packages feed

gogol-dfareporting 0.0.1 → 0.1.0

raw patch · 203 files changed

+31244/−28909 lines, 203 filesdep ~gogol-corePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: gogol-core

API changes (from Hackage documentation)

- Network.Google.DFAReporting: ACWeb :: AdCompatibility
- Network.Google.DFAReporting: ACWebInterstitial :: AdCompatibility
- Network.Google.DFAReporting: ALCTCustomInpage :: AdsListCreativeType
- Network.Google.DFAReporting: ALCTCustomInterstitial :: AdsListCreativeType
- Network.Google.DFAReporting: ALCTEnhancedBanner :: AdsListCreativeType
- Network.Google.DFAReporting: ALCTEnhancedImage :: AdsListCreativeType
- Network.Google.DFAReporting: ALCTRedirect :: AdsListCreativeType
- Network.Google.DFAReporting: ALCTRichMediaExpanding :: AdsListCreativeType
- Network.Google.DFAReporting: ALCTRichMediaInpage :: AdsListCreativeType
- Network.Google.DFAReporting: ALCTRichMediaInterstitialFloat :: AdsListCreativeType
- Network.Google.DFAReporting: ALCTRichMediaMultiFloating :: AdsListCreativeType
- Network.Google.DFAReporting: ALCTVastRedirect :: AdsListCreativeType
- Network.Google.DFAReporting: ALCTVpaidLinear :: AdsListCreativeType
- Network.Google.DFAReporting: ALCTVpaidNonLinear :: AdsListCreativeType
- Network.Google.DFAReporting: ALCWeb :: AdsListCompatibility
- Network.Google.DFAReporting: ALCWebInterstitial :: AdsListCompatibility
- Network.Google.DFAReporting: BrandSafeDefaultInstreamVideo :: CreativesListTypes
- Network.Google.DFAReporting: CCIWeb :: CreativeCompatibilityItem
- Network.Google.DFAReporting: CCIWebInterstitial :: CreativeCompatibilityItem
- Network.Google.DFAReporting: CTCustomInpage :: CreativeType
- Network.Google.DFAReporting: CTCustomInterstitial :: CreativeType
- Network.Google.DFAReporting: CTEnhancedBanner :: CreativeType
- Network.Google.DFAReporting: CTEnhancedImage :: CreativeType
- Network.Google.DFAReporting: CTRedirect :: CreativeType
- Network.Google.DFAReporting: CTRichMediaExpanding :: CreativeType
- Network.Google.DFAReporting: CTRichMediaInpage :: CreativeType
- Network.Google.DFAReporting: CTRichMediaInterstitialFloat :: CreativeType
- Network.Google.DFAReporting: CTRichMediaMultiFloating :: CreativeType
- Network.Google.DFAReporting: CTVastRedirect :: CreativeType
- Network.Google.DFAReporting: CTVpaidLinear :: CreativeType
- Network.Google.DFAReporting: CTVpaidNonLinear :: CreativeType
- Network.Google.DFAReporting: CustomInpage :: CreativesListTypes
- Network.Google.DFAReporting: CustomInterstitial :: CreativesListTypes
- Network.Google.DFAReporting: EnhancedBanner :: CreativesListTypes
- Network.Google.DFAReporting: EnhancedImage :: CreativesListTypes
- Network.Google.DFAReporting: FlashInpage :: CreativesListTypes
- Network.Google.DFAReporting: HTML5Banner :: CreativesListTypes
- Network.Google.DFAReporting: Image :: CreativesListTypes
- Network.Google.DFAReporting: InstreamVideo :: CreativesListTypes
- Network.Google.DFAReporting: InternalRedirect :: CreativesListTypes
- Network.Google.DFAReporting: InterstitialInternalRedirect :: CreativesListTypes
- Network.Google.DFAReporting: ObjectAccount :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectAccountBillingFeature :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectAdvertiserGroup :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectBillingAccountGroup :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectBillingFeature :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectBillingMinimumFee :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectBillingProFile :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectCampaign :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectContentCategory :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectCreativeAsset :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectCreativeBundle :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectCreativeField :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectCreativeGroup :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectDfaSite :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectEventTag :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectFloodlightActivityGroup :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectFloodlightActvity :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectFloodlightConfiguration :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectInstreamCreative :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectLandingPage :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectMediaOrder :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectPlacementStrategy :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectProvidedListClient :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectRateCard :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectRemarketingList :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectRichmediaCreative :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectSdSite :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectSize :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectSubAccount :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectUserProFile :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectUserProFileFilter :: ChangeLogsListObjectType
- Network.Google.DFAReporting: ObjectUserRole :: ChangeLogsListObjectType
- Network.Google.DFAReporting: PLCWeb :: PlacementsListCompatibilities
- Network.Google.DFAReporting: PLCWebInterstitial :: PlacementsListCompatibilities
- Network.Google.DFAReporting: PlanningRenderingEnvironmentTypeApp :: AdSlotCompatibility
- Network.Google.DFAReporting: PlanningRenderingEnvironmentTypeAppInterstitial :: AdSlotCompatibility
- Network.Google.DFAReporting: PlanningRenderingEnvironmentTypeInStreamVideo :: AdSlotCompatibility
- Network.Google.DFAReporting: PlanningRenderingEnvironmentTypeWeb :: AdSlotCompatibility
- Network.Google.DFAReporting: PlanningRenderingEnvironmentTypeWebInterstitial :: AdSlotCompatibility
- Network.Google.DFAReporting: Redirect :: CreativesListTypes
- Network.Google.DFAReporting: RichMediaExpanding :: CreativesListTypes
- Network.Google.DFAReporting: RichMediaImExpand :: CreativesListTypes
- Network.Google.DFAReporting: RichMediaInpage :: CreativesListTypes
- Network.Google.DFAReporting: RichMediaInpageFloating :: CreativesListTypes
- Network.Google.DFAReporting: RichMediaInterstitialFloat :: CreativesListTypes
- Network.Google.DFAReporting: RichMediaMobileInApp :: CreativesListTypes
- Network.Google.DFAReporting: RichMediaMultiFloating :: CreativesListTypes
- Network.Google.DFAReporting: RichMediaPeelDown :: CreativesListTypes
- Network.Google.DFAReporting: TrackingText :: CreativesListTypes
- Network.Google.DFAReporting: VastRedirect :: CreativesListTypes
- Network.Google.DFAReporting: VpaidLinear :: CreativesListTypes
- Network.Google.DFAReporting: VpaidNonLinear :: CreativesListTypes
- Network.Google.DFAReporting: Web :: PlacementCompatibility
- Network.Google.DFAReporting: WebInterstitial :: PlacementCompatibility
- Network.Google.DFAReporting: fcSSLRequired :: Lens' FloodlightConfiguration (Maybe Bool)
- Network.Google.DFAReporting.Types: ACWeb :: AdCompatibility
- Network.Google.DFAReporting.Types: ACWebInterstitial :: AdCompatibility
- Network.Google.DFAReporting.Types: ALCTCustomInpage :: AdsListCreativeType
- Network.Google.DFAReporting.Types: ALCTCustomInterstitial :: AdsListCreativeType
- Network.Google.DFAReporting.Types: ALCTEnhancedBanner :: AdsListCreativeType
- Network.Google.DFAReporting.Types: ALCTEnhancedImage :: AdsListCreativeType
- Network.Google.DFAReporting.Types: ALCTRedirect :: AdsListCreativeType
- Network.Google.DFAReporting.Types: ALCTRichMediaExpanding :: AdsListCreativeType
- Network.Google.DFAReporting.Types: ALCTRichMediaInpage :: AdsListCreativeType
- Network.Google.DFAReporting.Types: ALCTRichMediaInterstitialFloat :: AdsListCreativeType
- Network.Google.DFAReporting.Types: ALCTRichMediaMultiFloating :: AdsListCreativeType
- Network.Google.DFAReporting.Types: ALCTVastRedirect :: AdsListCreativeType
- Network.Google.DFAReporting.Types: ALCTVpaidLinear :: AdsListCreativeType
- Network.Google.DFAReporting.Types: ALCTVpaidNonLinear :: AdsListCreativeType
- Network.Google.DFAReporting.Types: ALCWeb :: AdsListCompatibility
- Network.Google.DFAReporting.Types: ALCWebInterstitial :: AdsListCompatibility
- Network.Google.DFAReporting.Types: BrandSafeDefaultInstreamVideo :: CreativesListTypes
- Network.Google.DFAReporting.Types: CCIWeb :: CreativeCompatibilityItem
- Network.Google.DFAReporting.Types: CCIWebInterstitial :: CreativeCompatibilityItem
- Network.Google.DFAReporting.Types: CTCustomInpage :: CreativeType
- Network.Google.DFAReporting.Types: CTCustomInterstitial :: CreativeType
- Network.Google.DFAReporting.Types: CTEnhancedBanner :: CreativeType
- Network.Google.DFAReporting.Types: CTEnhancedImage :: CreativeType
- Network.Google.DFAReporting.Types: CTRedirect :: CreativeType
- Network.Google.DFAReporting.Types: CTRichMediaExpanding :: CreativeType
- Network.Google.DFAReporting.Types: CTRichMediaInpage :: CreativeType
- Network.Google.DFAReporting.Types: CTRichMediaInterstitialFloat :: CreativeType
- Network.Google.DFAReporting.Types: CTRichMediaMultiFloating :: CreativeType
- Network.Google.DFAReporting.Types: CTVastRedirect :: CreativeType
- Network.Google.DFAReporting.Types: CTVpaidLinear :: CreativeType
- Network.Google.DFAReporting.Types: CTVpaidNonLinear :: CreativeType
- Network.Google.DFAReporting.Types: CustomInpage :: CreativesListTypes
- Network.Google.DFAReporting.Types: CustomInterstitial :: CreativesListTypes
- Network.Google.DFAReporting.Types: EnhancedBanner :: CreativesListTypes
- Network.Google.DFAReporting.Types: EnhancedImage :: CreativesListTypes
- Network.Google.DFAReporting.Types: FlashInpage :: CreativesListTypes
- Network.Google.DFAReporting.Types: HTML5Banner :: CreativesListTypes
- Network.Google.DFAReporting.Types: Image :: CreativesListTypes
- Network.Google.DFAReporting.Types: InstreamVideo :: CreativesListTypes
- Network.Google.DFAReporting.Types: InternalRedirect :: CreativesListTypes
- Network.Google.DFAReporting.Types: InterstitialInternalRedirect :: CreativesListTypes
- Network.Google.DFAReporting.Types: ObjectAccount :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectAccountBillingFeature :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectAdvertiserGroup :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectBillingAccountGroup :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectBillingFeature :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectBillingMinimumFee :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectBillingProFile :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectCampaign :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectContentCategory :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectCreativeAsset :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectCreativeBundle :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectCreativeField :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectCreativeGroup :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectDfaSite :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectEventTag :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectFloodlightActivityGroup :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectFloodlightActvity :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectFloodlightConfiguration :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectInstreamCreative :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectLandingPage :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectMediaOrder :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectPlacementStrategy :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectProvidedListClient :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectRateCard :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectRemarketingList :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectRichmediaCreative :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectSdSite :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectSize :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectSubAccount :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectUserProFile :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectUserProFileFilter :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: ObjectUserRole :: ChangeLogsListObjectType
- Network.Google.DFAReporting.Types: PLCWeb :: PlacementsListCompatibilities
- Network.Google.DFAReporting.Types: PLCWebInterstitial :: PlacementsListCompatibilities
- Network.Google.DFAReporting.Types: PlanningRenderingEnvironmentTypeApp :: AdSlotCompatibility
- Network.Google.DFAReporting.Types: PlanningRenderingEnvironmentTypeAppInterstitial :: AdSlotCompatibility
- Network.Google.DFAReporting.Types: PlanningRenderingEnvironmentTypeInStreamVideo :: AdSlotCompatibility
- Network.Google.DFAReporting.Types: PlanningRenderingEnvironmentTypeWeb :: AdSlotCompatibility
- Network.Google.DFAReporting.Types: PlanningRenderingEnvironmentTypeWebInterstitial :: AdSlotCompatibility
- Network.Google.DFAReporting.Types: Redirect :: CreativesListTypes
- Network.Google.DFAReporting.Types: RichMediaExpanding :: CreativesListTypes
- Network.Google.DFAReporting.Types: RichMediaImExpand :: CreativesListTypes
- Network.Google.DFAReporting.Types: RichMediaInpage :: CreativesListTypes
- Network.Google.DFAReporting.Types: RichMediaInpageFloating :: CreativesListTypes
- Network.Google.DFAReporting.Types: RichMediaInterstitialFloat :: CreativesListTypes
- Network.Google.DFAReporting.Types: RichMediaMobileInApp :: CreativesListTypes
- Network.Google.DFAReporting.Types: RichMediaMultiFloating :: CreativesListTypes
- Network.Google.DFAReporting.Types: RichMediaPeelDown :: CreativesListTypes
- Network.Google.DFAReporting.Types: TrackingText :: CreativesListTypes
- Network.Google.DFAReporting.Types: VastRedirect :: CreativesListTypes
- Network.Google.DFAReporting.Types: VpaidLinear :: CreativesListTypes
- Network.Google.DFAReporting.Types: VpaidNonLinear :: CreativesListTypes
- Network.Google.DFAReporting.Types: Web :: PlacementCompatibility
- Network.Google.DFAReporting.Types: WebInterstitial :: PlacementCompatibility
- Network.Google.DFAReporting.Types: dfareportingScope :: OAuthScope
- Network.Google.DFAReporting.Types: fcSSLRequired :: Lens' FloodlightConfiguration (Maybe Bool)
- Network.Google.Resource.DFAReporting.AccountActiveAdSummaries.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.AccountActiveAdSummaries.Get.C1_0AccountActiveAdSummariesGet
- Network.Google.Resource.DFAReporting.AccountActiveAdSummaries.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.AccountActiveAdSummaries.Get.D1AccountActiveAdSummariesGet
- Network.Google.Resource.DFAReporting.AccountActiveAdSummaries.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountActiveAdSummaries.Get.S1_0_0AccountActiveAdSummariesGet
- Network.Google.Resource.DFAReporting.AccountActiveAdSummaries.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountActiveAdSummaries.Get.S1_0_1AccountActiveAdSummariesGet
- Network.Google.Resource.DFAReporting.AccountPermissionGroups.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.AccountPermissionGroups.Get.C1_0AccountPermissionGroupsGet
- Network.Google.Resource.DFAReporting.AccountPermissionGroups.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.AccountPermissionGroups.Get.D1AccountPermissionGroupsGet
- Network.Google.Resource.DFAReporting.AccountPermissionGroups.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountPermissionGroups.Get.S1_0_0AccountPermissionGroupsGet
- Network.Google.Resource.DFAReporting.AccountPermissionGroups.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountPermissionGroups.Get.S1_0_1AccountPermissionGroupsGet
- Network.Google.Resource.DFAReporting.AccountPermissionGroups.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.AccountPermissionGroups.List.C1_0AccountPermissionGroupsList
- Network.Google.Resource.DFAReporting.AccountPermissionGroups.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.AccountPermissionGroups.List.D1AccountPermissionGroupsList
- Network.Google.Resource.DFAReporting.AccountPermissionGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountPermissionGroups.List.S1_0_0AccountPermissionGroupsList
- Network.Google.Resource.DFAReporting.AccountPermissions.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.AccountPermissions.Get.C1_0AccountPermissionsGet
- Network.Google.Resource.DFAReporting.AccountPermissions.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.AccountPermissions.Get.D1AccountPermissionsGet
- Network.Google.Resource.DFAReporting.AccountPermissions.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountPermissions.Get.S1_0_0AccountPermissionsGet
- Network.Google.Resource.DFAReporting.AccountPermissions.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountPermissions.Get.S1_0_1AccountPermissionsGet
- Network.Google.Resource.DFAReporting.AccountPermissions.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.AccountPermissions.List.C1_0AccountPermissionsList
- Network.Google.Resource.DFAReporting.AccountPermissions.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.AccountPermissions.List.D1AccountPermissionsList
- Network.Google.Resource.DFAReporting.AccountPermissions.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountPermissions.List.S1_0_0AccountPermissionsList
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.AccountUserProFiles.Get.C1_0AccountUserProFilesGet
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.AccountUserProFiles.Get.D1AccountUserProFilesGet
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.Get.S1_0_0AccountUserProFilesGet
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.Get.S1_0_1AccountUserProFilesGet
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.AccountUserProFiles.Insert.C1_0AccountUserProFilesInsert
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.AccountUserProFiles.Insert.D1AccountUserProFilesInsert
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.Insert.S1_0_0AccountUserProFilesInsert
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.Insert.S1_0_1AccountUserProFilesInsert
- Network.Google.Resource.DFAReporting.AccountUserProFiles.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.AccountUserProFiles.List.C1_0AccountUserProFilesList
- Network.Google.Resource.DFAReporting.AccountUserProFiles.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.AccountUserProFiles.List.D1AccountUserProFilesList
- Network.Google.Resource.DFAReporting.AccountUserProFiles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.List.S1_0_0AccountUserProFilesList
- Network.Google.Resource.DFAReporting.AccountUserProFiles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.List.S1_0_1AccountUserProFilesList
- Network.Google.Resource.DFAReporting.AccountUserProFiles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.List.S1_0_2AccountUserProFilesList
- Network.Google.Resource.DFAReporting.AccountUserProFiles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.List.S1_0_3AccountUserProFilesList
- Network.Google.Resource.DFAReporting.AccountUserProFiles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.List.S1_0_4AccountUserProFilesList
- Network.Google.Resource.DFAReporting.AccountUserProFiles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.List.S1_0_5AccountUserProFilesList
- Network.Google.Resource.DFAReporting.AccountUserProFiles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.List.S1_0_6AccountUserProFilesList
- Network.Google.Resource.DFAReporting.AccountUserProFiles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.List.S1_0_7AccountUserProFilesList
- Network.Google.Resource.DFAReporting.AccountUserProFiles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.List.S1_0_8AccountUserProFilesList
- Network.Google.Resource.DFAReporting.AccountUserProFiles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.List.S1_0_9AccountUserProFilesList
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.AccountUserProFiles.Patch.C1_0AccountUserProFilesPatch
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.AccountUserProFiles.Patch.D1AccountUserProFilesPatch
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.Patch.S1_0_0AccountUserProFilesPatch
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.Patch.S1_0_1AccountUserProFilesPatch
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.Patch.S1_0_2AccountUserProFilesPatch
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.AccountUserProFiles.Update.C1_0AccountUserProFilesUpdate
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.AccountUserProFiles.Update.D1AccountUserProFilesUpdate
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.Update.S1_0_0AccountUserProFilesUpdate
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AccountUserProFiles.Update.S1_0_1AccountUserProFilesUpdate
- Network.Google.Resource.DFAReporting.Accounts.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Accounts.Get.C1_0AccountsGet
- Network.Google.Resource.DFAReporting.Accounts.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Accounts.Get.D1AccountsGet
- Network.Google.Resource.DFAReporting.Accounts.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Accounts.Get.S1_0_0AccountsGet
- Network.Google.Resource.DFAReporting.Accounts.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Accounts.Get.S1_0_1AccountsGet
- Network.Google.Resource.DFAReporting.Accounts.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Accounts.List.C1_0AccountsList
- Network.Google.Resource.DFAReporting.Accounts.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Accounts.List.D1AccountsList
- Network.Google.Resource.DFAReporting.Accounts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Accounts.List.S1_0_0AccountsList
- Network.Google.Resource.DFAReporting.Accounts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Accounts.List.S1_0_1AccountsList
- Network.Google.Resource.DFAReporting.Accounts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Accounts.List.S1_0_2AccountsList
- Network.Google.Resource.DFAReporting.Accounts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Accounts.List.S1_0_3AccountsList
- Network.Google.Resource.DFAReporting.Accounts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Accounts.List.S1_0_4AccountsList
- Network.Google.Resource.DFAReporting.Accounts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Accounts.List.S1_0_5AccountsList
- Network.Google.Resource.DFAReporting.Accounts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Accounts.List.S1_0_6AccountsList
- Network.Google.Resource.DFAReporting.Accounts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Accounts.List.S1_0_7AccountsList
- Network.Google.Resource.DFAReporting.Accounts.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Accounts.Patch.C1_0AccountsPatch
- Network.Google.Resource.DFAReporting.Accounts.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Accounts.Patch.D1AccountsPatch
- Network.Google.Resource.DFAReporting.Accounts.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Accounts.Patch.S1_0_0AccountsPatch
- Network.Google.Resource.DFAReporting.Accounts.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Accounts.Patch.S1_0_1AccountsPatch
- Network.Google.Resource.DFAReporting.Accounts.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Accounts.Patch.S1_0_2AccountsPatch
- Network.Google.Resource.DFAReporting.Accounts.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Accounts.Update.C1_0AccountsUpdate
- Network.Google.Resource.DFAReporting.Accounts.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Accounts.Update.D1AccountsUpdate
- Network.Google.Resource.DFAReporting.Accounts.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Accounts.Update.S1_0_0AccountsUpdate
- Network.Google.Resource.DFAReporting.Accounts.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Accounts.Update.S1_0_1AccountsUpdate
- Network.Google.Resource.DFAReporting.Ads.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Ads.Get.C1_0AdsGet
- Network.Google.Resource.DFAReporting.Ads.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Ads.Get.D1AdsGet
- Network.Google.Resource.DFAReporting.Ads.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.Get.S1_0_0AdsGet
- Network.Google.Resource.DFAReporting.Ads.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.Get.S1_0_1AdsGet
- Network.Google.Resource.DFAReporting.Ads.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Ads.Insert.C1_0AdsInsert
- Network.Google.Resource.DFAReporting.Ads.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Ads.Insert.D1AdsInsert
- Network.Google.Resource.DFAReporting.Ads.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.Insert.S1_0_0AdsInsert
- Network.Google.Resource.DFAReporting.Ads.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.Insert.S1_0_1AdsInsert
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Ads.List.C1_0AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Ads.List.D1AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_0AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_10AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_11AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_12AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_13AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_14AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_15AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_16AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_17AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_18AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_19AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_1AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_20AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_21AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_22AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_23AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_24AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_2AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_3AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_4AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_5AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_6AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_7AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_8AdsList
- Network.Google.Resource.DFAReporting.Ads.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.List.S1_0_9AdsList
- Network.Google.Resource.DFAReporting.Ads.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Ads.Patch.C1_0AdsPatch
- Network.Google.Resource.DFAReporting.Ads.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Ads.Patch.D1AdsPatch
- Network.Google.Resource.DFAReporting.Ads.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.Patch.S1_0_0AdsPatch
- Network.Google.Resource.DFAReporting.Ads.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.Patch.S1_0_1AdsPatch
- Network.Google.Resource.DFAReporting.Ads.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.Patch.S1_0_2AdsPatch
- Network.Google.Resource.DFAReporting.Ads.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Ads.Update.C1_0AdsUpdate
- Network.Google.Resource.DFAReporting.Ads.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Ads.Update.D1AdsUpdate
- Network.Google.Resource.DFAReporting.Ads.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.Update.S1_0_0AdsUpdate
- Network.Google.Resource.DFAReporting.Ads.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Ads.Update.S1_0_1AdsUpdate
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Delete: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.AdvertiserGroups.Delete.C1_0AdvertiserGroupsDelete
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Delete: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.AdvertiserGroups.Delete.D1AdvertiserGroupsDelete
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AdvertiserGroups.Delete.S1_0_0AdvertiserGroupsDelete
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AdvertiserGroups.Delete.S1_0_1AdvertiserGroupsDelete
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.AdvertiserGroups.Get.C1_0AdvertiserGroupsGet
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.AdvertiserGroups.Get.D1AdvertiserGroupsGet
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AdvertiserGroups.Get.S1_0_0AdvertiserGroupsGet
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AdvertiserGroups.Get.S1_0_1AdvertiserGroupsGet
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.AdvertiserGroups.Insert.C1_0AdvertiserGroupsInsert
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.AdvertiserGroups.Insert.D1AdvertiserGroupsInsert
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AdvertiserGroups.Insert.S1_0_0AdvertiserGroupsInsert
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AdvertiserGroups.Insert.S1_0_1AdvertiserGroupsInsert
- Network.Google.Resource.DFAReporting.AdvertiserGroups.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.AdvertiserGroups.List.C1_0AdvertiserGroupsList
- Network.Google.Resource.DFAReporting.AdvertiserGroups.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.AdvertiserGroups.List.D1AdvertiserGroupsList
- Network.Google.Resource.DFAReporting.AdvertiserGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AdvertiserGroups.List.S1_0_0AdvertiserGroupsList
- Network.Google.Resource.DFAReporting.AdvertiserGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AdvertiserGroups.List.S1_0_1AdvertiserGroupsList
- Network.Google.Resource.DFAReporting.AdvertiserGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AdvertiserGroups.List.S1_0_2AdvertiserGroupsList
- Network.Google.Resource.DFAReporting.AdvertiserGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AdvertiserGroups.List.S1_0_3AdvertiserGroupsList
- Network.Google.Resource.DFAReporting.AdvertiserGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AdvertiserGroups.List.S1_0_4AdvertiserGroupsList
- Network.Google.Resource.DFAReporting.AdvertiserGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AdvertiserGroups.List.S1_0_5AdvertiserGroupsList
- Network.Google.Resource.DFAReporting.AdvertiserGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AdvertiserGroups.List.S1_0_6AdvertiserGroupsList
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.AdvertiserGroups.Patch.C1_0AdvertiserGroupsPatch
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.AdvertiserGroups.Patch.D1AdvertiserGroupsPatch
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AdvertiserGroups.Patch.S1_0_0AdvertiserGroupsPatch
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AdvertiserGroups.Patch.S1_0_1AdvertiserGroupsPatch
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AdvertiserGroups.Patch.S1_0_2AdvertiserGroupsPatch
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.AdvertiserGroups.Update.C1_0AdvertiserGroupsUpdate
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.AdvertiserGroups.Update.D1AdvertiserGroupsUpdate
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AdvertiserGroups.Update.S1_0_0AdvertiserGroupsUpdate
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.AdvertiserGroups.Update.S1_0_1AdvertiserGroupsUpdate
- Network.Google.Resource.DFAReporting.Advertisers.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Advertisers.Get.C1_0AdvertisersGet
- Network.Google.Resource.DFAReporting.Advertisers.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Advertisers.Get.D1AdvertisersGet
- Network.Google.Resource.DFAReporting.Advertisers.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.Get.S1_0_0AdvertisersGet
- Network.Google.Resource.DFAReporting.Advertisers.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.Get.S1_0_1AdvertisersGet
- Network.Google.Resource.DFAReporting.Advertisers.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Advertisers.Insert.C1_0AdvertisersInsert
- Network.Google.Resource.DFAReporting.Advertisers.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Advertisers.Insert.D1AdvertisersInsert
- Network.Google.Resource.DFAReporting.Advertisers.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.Insert.S1_0_0AdvertisersInsert
- Network.Google.Resource.DFAReporting.Advertisers.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.Insert.S1_0_1AdvertisersInsert
- Network.Google.Resource.DFAReporting.Advertisers.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Advertisers.List.C1_0AdvertisersList
- Network.Google.Resource.DFAReporting.Advertisers.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Advertisers.List.D1AdvertisersList
- Network.Google.Resource.DFAReporting.Advertisers.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.List.S1_0_0AdvertisersList
- Network.Google.Resource.DFAReporting.Advertisers.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.List.S1_0_10AdvertisersList
- Network.Google.Resource.DFAReporting.Advertisers.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.List.S1_0_11AdvertisersList
- Network.Google.Resource.DFAReporting.Advertisers.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.List.S1_0_12AdvertisersList
- Network.Google.Resource.DFAReporting.Advertisers.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.List.S1_0_1AdvertisersList
- Network.Google.Resource.DFAReporting.Advertisers.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.List.S1_0_2AdvertisersList
- Network.Google.Resource.DFAReporting.Advertisers.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.List.S1_0_3AdvertisersList
- Network.Google.Resource.DFAReporting.Advertisers.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.List.S1_0_4AdvertisersList
- Network.Google.Resource.DFAReporting.Advertisers.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.List.S1_0_5AdvertisersList
- Network.Google.Resource.DFAReporting.Advertisers.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.List.S1_0_6AdvertisersList
- Network.Google.Resource.DFAReporting.Advertisers.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.List.S1_0_7AdvertisersList
- Network.Google.Resource.DFAReporting.Advertisers.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.List.S1_0_8AdvertisersList
- Network.Google.Resource.DFAReporting.Advertisers.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.List.S1_0_9AdvertisersList
- Network.Google.Resource.DFAReporting.Advertisers.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Advertisers.Patch.C1_0AdvertisersPatch
- Network.Google.Resource.DFAReporting.Advertisers.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Advertisers.Patch.D1AdvertisersPatch
- Network.Google.Resource.DFAReporting.Advertisers.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.Patch.S1_0_0AdvertisersPatch
- Network.Google.Resource.DFAReporting.Advertisers.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.Patch.S1_0_1AdvertisersPatch
- Network.Google.Resource.DFAReporting.Advertisers.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.Patch.S1_0_2AdvertisersPatch
- Network.Google.Resource.DFAReporting.Advertisers.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Advertisers.Update.C1_0AdvertisersUpdate
- Network.Google.Resource.DFAReporting.Advertisers.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Advertisers.Update.D1AdvertisersUpdate
- Network.Google.Resource.DFAReporting.Advertisers.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.Update.S1_0_0AdvertisersUpdate
- Network.Google.Resource.DFAReporting.Advertisers.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Advertisers.Update.S1_0_1AdvertisersUpdate
- Network.Google.Resource.DFAReporting.Browsers.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Browsers.List.C1_0BrowsersList
- Network.Google.Resource.DFAReporting.Browsers.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Browsers.List.D1BrowsersList
- Network.Google.Resource.DFAReporting.Browsers.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Browsers.List.S1_0_0BrowsersList
- Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.Insert.C1_0CampaignCreativeAssociationsInsert
- Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.Insert.D1CampaignCreativeAssociationsInsert
- Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.Insert.S1_0_0CampaignCreativeAssociationsInsert
- Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.Insert.S1_0_1CampaignCreativeAssociationsInsert
- Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.Insert.S1_0_2CampaignCreativeAssociationsInsert
- Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.List.C1_0CampaignCreativeAssociationsList
- Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.List.D1CampaignCreativeAssociationsList
- Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.List.S1_0_0CampaignCreativeAssociationsList
- Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.List.S1_0_1CampaignCreativeAssociationsList
- Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.List.S1_0_2CampaignCreativeAssociationsList
- Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.List.S1_0_3CampaignCreativeAssociationsList
- Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.List.S1_0_4CampaignCreativeAssociationsList
- Network.Google.Resource.DFAReporting.Campaigns.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Campaigns.Get.C1_0CampaignsGet
- Network.Google.Resource.DFAReporting.Campaigns.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Campaigns.Get.D1CampaignsGet
- Network.Google.Resource.DFAReporting.Campaigns.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.Get.S1_0_0CampaignsGet
- Network.Google.Resource.DFAReporting.Campaigns.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.Get.S1_0_1CampaignsGet
- Network.Google.Resource.DFAReporting.Campaigns.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Campaigns.Insert.C1_0CampaignsInsert
- Network.Google.Resource.DFAReporting.Campaigns.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Campaigns.Insert.D1CampaignsInsert
- Network.Google.Resource.DFAReporting.Campaigns.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.Insert.S1_0_0CampaignsInsert
- Network.Google.Resource.DFAReporting.Campaigns.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.Insert.S1_0_1CampaignsInsert
- Network.Google.Resource.DFAReporting.Campaigns.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.Insert.S1_0_2CampaignsInsert
- Network.Google.Resource.DFAReporting.Campaigns.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.Insert.S1_0_3CampaignsInsert
- Network.Google.Resource.DFAReporting.Campaigns.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Campaigns.List.C1_0CampaignsList
- Network.Google.Resource.DFAReporting.Campaigns.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Campaigns.List.D1CampaignsList
- Network.Google.Resource.DFAReporting.Campaigns.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.List.S1_0_0CampaignsList
- Network.Google.Resource.DFAReporting.Campaigns.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.List.S1_0_10CampaignsList
- Network.Google.Resource.DFAReporting.Campaigns.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.List.S1_0_11CampaignsList
- Network.Google.Resource.DFAReporting.Campaigns.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.List.S1_0_12CampaignsList
- Network.Google.Resource.DFAReporting.Campaigns.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.List.S1_0_13CampaignsList
- Network.Google.Resource.DFAReporting.Campaigns.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.List.S1_0_1CampaignsList
- Network.Google.Resource.DFAReporting.Campaigns.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.List.S1_0_2CampaignsList
- Network.Google.Resource.DFAReporting.Campaigns.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.List.S1_0_3CampaignsList
- Network.Google.Resource.DFAReporting.Campaigns.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.List.S1_0_4CampaignsList
- Network.Google.Resource.DFAReporting.Campaigns.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.List.S1_0_5CampaignsList
- Network.Google.Resource.DFAReporting.Campaigns.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.List.S1_0_6CampaignsList
- Network.Google.Resource.DFAReporting.Campaigns.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.List.S1_0_7CampaignsList
- Network.Google.Resource.DFAReporting.Campaigns.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.List.S1_0_8CampaignsList
- Network.Google.Resource.DFAReporting.Campaigns.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.List.S1_0_9CampaignsList
- Network.Google.Resource.DFAReporting.Campaigns.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Campaigns.Patch.C1_0CampaignsPatch
- Network.Google.Resource.DFAReporting.Campaigns.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Campaigns.Patch.D1CampaignsPatch
- Network.Google.Resource.DFAReporting.Campaigns.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.Patch.S1_0_0CampaignsPatch
- Network.Google.Resource.DFAReporting.Campaigns.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.Patch.S1_0_1CampaignsPatch
- Network.Google.Resource.DFAReporting.Campaigns.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.Patch.S1_0_2CampaignsPatch
- Network.Google.Resource.DFAReporting.Campaigns.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Campaigns.Update.C1_0CampaignsUpdate
- Network.Google.Resource.DFAReporting.Campaigns.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Campaigns.Update.D1CampaignsUpdate
- Network.Google.Resource.DFAReporting.Campaigns.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.Update.S1_0_0CampaignsUpdate
- Network.Google.Resource.DFAReporting.Campaigns.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Campaigns.Update.S1_0_1CampaignsUpdate
- Network.Google.Resource.DFAReporting.ChangeLogs.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.ChangeLogs.Get.C1_0ChangeLogsGet
- Network.Google.Resource.DFAReporting.ChangeLogs.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.ChangeLogs.Get.D1ChangeLogsGet
- Network.Google.Resource.DFAReporting.ChangeLogs.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ChangeLogs.Get.S1_0_0ChangeLogsGet
- Network.Google.Resource.DFAReporting.ChangeLogs.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ChangeLogs.Get.S1_0_1ChangeLogsGet
- Network.Google.Resource.DFAReporting.ChangeLogs.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.ChangeLogs.List.C1_0ChangeLogsList
- Network.Google.Resource.DFAReporting.ChangeLogs.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.ChangeLogs.List.D1ChangeLogsList
- Network.Google.Resource.DFAReporting.ChangeLogs.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ChangeLogs.List.S1_0_0ChangeLogsList
- Network.Google.Resource.DFAReporting.ChangeLogs.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ChangeLogs.List.S1_0_10ChangeLogsList
- Network.Google.Resource.DFAReporting.ChangeLogs.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ChangeLogs.List.S1_0_1ChangeLogsList
- Network.Google.Resource.DFAReporting.ChangeLogs.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ChangeLogs.List.S1_0_2ChangeLogsList
- Network.Google.Resource.DFAReporting.ChangeLogs.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ChangeLogs.List.S1_0_3ChangeLogsList
- Network.Google.Resource.DFAReporting.ChangeLogs.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ChangeLogs.List.S1_0_4ChangeLogsList
- Network.Google.Resource.DFAReporting.ChangeLogs.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ChangeLogs.List.S1_0_5ChangeLogsList
- Network.Google.Resource.DFAReporting.ChangeLogs.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ChangeLogs.List.S1_0_6ChangeLogsList
- Network.Google.Resource.DFAReporting.ChangeLogs.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ChangeLogs.List.S1_0_7ChangeLogsList
- Network.Google.Resource.DFAReporting.ChangeLogs.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ChangeLogs.List.S1_0_8ChangeLogsList
- Network.Google.Resource.DFAReporting.ChangeLogs.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ChangeLogs.List.S1_0_9ChangeLogsList
- Network.Google.Resource.DFAReporting.Cities.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Cities.List.C1_0CitiesList
- Network.Google.Resource.DFAReporting.Cities.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Cities.List.D1CitiesList
- Network.Google.Resource.DFAReporting.Cities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Cities.List.S1_0_0CitiesList
- Network.Google.Resource.DFAReporting.Cities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Cities.List.S1_0_1CitiesList
- Network.Google.Resource.DFAReporting.Cities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Cities.List.S1_0_2CitiesList
- Network.Google.Resource.DFAReporting.Cities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Cities.List.S1_0_3CitiesList
- Network.Google.Resource.DFAReporting.Cities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Cities.List.S1_0_4CitiesList
- Network.Google.Resource.DFAReporting.ConnectionTypes.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.ConnectionTypes.Get.C1_0ConnectionTypesGet
- Network.Google.Resource.DFAReporting.ConnectionTypes.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.ConnectionTypes.Get.D1ConnectionTypesGet
- Network.Google.Resource.DFAReporting.ConnectionTypes.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ConnectionTypes.Get.S1_0_0ConnectionTypesGet
- Network.Google.Resource.DFAReporting.ConnectionTypes.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ConnectionTypes.Get.S1_0_1ConnectionTypesGet
- Network.Google.Resource.DFAReporting.ConnectionTypes.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.ConnectionTypes.List.C1_0ConnectionTypesList
- Network.Google.Resource.DFAReporting.ConnectionTypes.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.ConnectionTypes.List.D1ConnectionTypesList
- Network.Google.Resource.DFAReporting.ConnectionTypes.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ConnectionTypes.List.S1_0_0ConnectionTypesList
- Network.Google.Resource.DFAReporting.ContentCategories.Delete: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.ContentCategories.Delete.C1_0ContentCategoriesDelete
- Network.Google.Resource.DFAReporting.ContentCategories.Delete: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.ContentCategories.Delete.D1ContentCategoriesDelete
- Network.Google.Resource.DFAReporting.ContentCategories.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ContentCategories.Delete.S1_0_0ContentCategoriesDelete
- Network.Google.Resource.DFAReporting.ContentCategories.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ContentCategories.Delete.S1_0_1ContentCategoriesDelete
- Network.Google.Resource.DFAReporting.ContentCategories.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.ContentCategories.Get.C1_0ContentCategoriesGet
- Network.Google.Resource.DFAReporting.ContentCategories.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.ContentCategories.Get.D1ContentCategoriesGet
- Network.Google.Resource.DFAReporting.ContentCategories.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ContentCategories.Get.S1_0_0ContentCategoriesGet
- Network.Google.Resource.DFAReporting.ContentCategories.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ContentCategories.Get.S1_0_1ContentCategoriesGet
- Network.Google.Resource.DFAReporting.ContentCategories.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.ContentCategories.Insert.C1_0ContentCategoriesInsert
- Network.Google.Resource.DFAReporting.ContentCategories.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.ContentCategories.Insert.D1ContentCategoriesInsert
- Network.Google.Resource.DFAReporting.ContentCategories.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ContentCategories.Insert.S1_0_0ContentCategoriesInsert
- Network.Google.Resource.DFAReporting.ContentCategories.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ContentCategories.Insert.S1_0_1ContentCategoriesInsert
- Network.Google.Resource.DFAReporting.ContentCategories.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.ContentCategories.List.C1_0ContentCategoriesList
- Network.Google.Resource.DFAReporting.ContentCategories.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.ContentCategories.List.D1ContentCategoriesList
- Network.Google.Resource.DFAReporting.ContentCategories.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ContentCategories.List.S1_0_0ContentCategoriesList
- Network.Google.Resource.DFAReporting.ContentCategories.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ContentCategories.List.S1_0_1ContentCategoriesList
- Network.Google.Resource.DFAReporting.ContentCategories.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ContentCategories.List.S1_0_2ContentCategoriesList
- Network.Google.Resource.DFAReporting.ContentCategories.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ContentCategories.List.S1_0_3ContentCategoriesList
- Network.Google.Resource.DFAReporting.ContentCategories.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ContentCategories.List.S1_0_4ContentCategoriesList
- Network.Google.Resource.DFAReporting.ContentCategories.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ContentCategories.List.S1_0_5ContentCategoriesList
- Network.Google.Resource.DFAReporting.ContentCategories.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ContentCategories.List.S1_0_6ContentCategoriesList
- Network.Google.Resource.DFAReporting.ContentCategories.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.ContentCategories.Patch.C1_0ContentCategoriesPatch
- Network.Google.Resource.DFAReporting.ContentCategories.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.ContentCategories.Patch.D1ContentCategoriesPatch
- Network.Google.Resource.DFAReporting.ContentCategories.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ContentCategories.Patch.S1_0_0ContentCategoriesPatch
- Network.Google.Resource.DFAReporting.ContentCategories.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ContentCategories.Patch.S1_0_1ContentCategoriesPatch
- Network.Google.Resource.DFAReporting.ContentCategories.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ContentCategories.Patch.S1_0_2ContentCategoriesPatch
- Network.Google.Resource.DFAReporting.ContentCategories.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.ContentCategories.Update.C1_0ContentCategoriesUpdate
- Network.Google.Resource.DFAReporting.ContentCategories.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.ContentCategories.Update.D1ContentCategoriesUpdate
- Network.Google.Resource.DFAReporting.ContentCategories.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ContentCategories.Update.S1_0_0ContentCategoriesUpdate
- Network.Google.Resource.DFAReporting.ContentCategories.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.ContentCategories.Update.S1_0_1ContentCategoriesUpdate
- Network.Google.Resource.DFAReporting.Countries.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Countries.Get.C1_0CountriesGet
- Network.Google.Resource.DFAReporting.Countries.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Countries.Get.D1CountriesGet
- Network.Google.Resource.DFAReporting.Countries.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Countries.Get.S1_0_0CountriesGet
- Network.Google.Resource.DFAReporting.Countries.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Countries.Get.S1_0_1CountriesGet
- Network.Google.Resource.DFAReporting.Countries.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Countries.List.C1_0CountriesList
- Network.Google.Resource.DFAReporting.Countries.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Countries.List.D1CountriesList
- Network.Google.Resource.DFAReporting.Countries.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Countries.List.S1_0_0CountriesList
- Network.Google.Resource.DFAReporting.CreativeAssets.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CreativeAssets.Insert.C1_0CreativeAssetsInsert
- Network.Google.Resource.DFAReporting.CreativeAssets.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CreativeAssets.Insert.D1CreativeAssetsInsert
- Network.Google.Resource.DFAReporting.CreativeAssets.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeAssets.Insert.S1_0_0CreativeAssetsInsert
- Network.Google.Resource.DFAReporting.CreativeAssets.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeAssets.Insert.S1_0_1CreativeAssetsInsert
- Network.Google.Resource.DFAReporting.CreativeAssets.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeAssets.Insert.S1_0_2CreativeAssetsInsert
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Delete: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CreativeFieldValues.Delete.C1_0CreativeFieldValuesDelete
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Delete: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CreativeFieldValues.Delete.D1CreativeFieldValuesDelete
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.Delete.S1_0_0CreativeFieldValuesDelete
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.Delete.S1_0_1CreativeFieldValuesDelete
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.Delete.S1_0_2CreativeFieldValuesDelete
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CreativeFieldValues.Get.C1_0CreativeFieldValuesGet
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CreativeFieldValues.Get.D1CreativeFieldValuesGet
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.Get.S1_0_0CreativeFieldValuesGet
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.Get.S1_0_1CreativeFieldValuesGet
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.Get.S1_0_2CreativeFieldValuesGet
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CreativeFieldValues.Insert.C1_0CreativeFieldValuesInsert
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CreativeFieldValues.Insert.D1CreativeFieldValuesInsert
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.Insert.S1_0_0CreativeFieldValuesInsert
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.Insert.S1_0_1CreativeFieldValuesInsert
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.Insert.S1_0_2CreativeFieldValuesInsert
- Network.Google.Resource.DFAReporting.CreativeFieldValues.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CreativeFieldValues.List.C1_0CreativeFieldValuesList
- Network.Google.Resource.DFAReporting.CreativeFieldValues.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CreativeFieldValues.List.D1CreativeFieldValuesList
- Network.Google.Resource.DFAReporting.CreativeFieldValues.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.List.S1_0_0CreativeFieldValuesList
- Network.Google.Resource.DFAReporting.CreativeFieldValues.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.List.S1_0_1CreativeFieldValuesList
- Network.Google.Resource.DFAReporting.CreativeFieldValues.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.List.S1_0_2CreativeFieldValuesList
- Network.Google.Resource.DFAReporting.CreativeFieldValues.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.List.S1_0_3CreativeFieldValuesList
- Network.Google.Resource.DFAReporting.CreativeFieldValues.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.List.S1_0_4CreativeFieldValuesList
- Network.Google.Resource.DFAReporting.CreativeFieldValues.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.List.S1_0_5CreativeFieldValuesList
- Network.Google.Resource.DFAReporting.CreativeFieldValues.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.List.S1_0_6CreativeFieldValuesList
- Network.Google.Resource.DFAReporting.CreativeFieldValues.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.List.S1_0_7CreativeFieldValuesList
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CreativeFieldValues.Patch.C1_0CreativeFieldValuesPatch
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CreativeFieldValues.Patch.D1CreativeFieldValuesPatch
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.Patch.S1_0_0CreativeFieldValuesPatch
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.Patch.S1_0_1CreativeFieldValuesPatch
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.Patch.S1_0_2CreativeFieldValuesPatch
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.Patch.S1_0_3CreativeFieldValuesPatch
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CreativeFieldValues.Update.C1_0CreativeFieldValuesUpdate
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CreativeFieldValues.Update.D1CreativeFieldValuesUpdate
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.Update.S1_0_0CreativeFieldValuesUpdate
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.Update.S1_0_1CreativeFieldValuesUpdate
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFieldValues.Update.S1_0_2CreativeFieldValuesUpdate
- Network.Google.Resource.DFAReporting.CreativeFields.Delete: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CreativeFields.Delete.C1_0CreativeFieldsDelete
- Network.Google.Resource.DFAReporting.CreativeFields.Delete: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CreativeFields.Delete.D1CreativeFieldsDelete
- Network.Google.Resource.DFAReporting.CreativeFields.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.Delete.S1_0_0CreativeFieldsDelete
- Network.Google.Resource.DFAReporting.CreativeFields.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.Delete.S1_0_1CreativeFieldsDelete
- Network.Google.Resource.DFAReporting.CreativeFields.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CreativeFields.Get.C1_0CreativeFieldsGet
- Network.Google.Resource.DFAReporting.CreativeFields.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CreativeFields.Get.D1CreativeFieldsGet
- Network.Google.Resource.DFAReporting.CreativeFields.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.Get.S1_0_0CreativeFieldsGet
- Network.Google.Resource.DFAReporting.CreativeFields.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.Get.S1_0_1CreativeFieldsGet
- Network.Google.Resource.DFAReporting.CreativeFields.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CreativeFields.Insert.C1_0CreativeFieldsInsert
- Network.Google.Resource.DFAReporting.CreativeFields.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CreativeFields.Insert.D1CreativeFieldsInsert
- Network.Google.Resource.DFAReporting.CreativeFields.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.Insert.S1_0_0CreativeFieldsInsert
- Network.Google.Resource.DFAReporting.CreativeFields.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.Insert.S1_0_1CreativeFieldsInsert
- Network.Google.Resource.DFAReporting.CreativeFields.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CreativeFields.List.C1_0CreativeFieldsList
- Network.Google.Resource.DFAReporting.CreativeFields.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CreativeFields.List.D1CreativeFieldsList
- Network.Google.Resource.DFAReporting.CreativeFields.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.List.S1_0_0CreativeFieldsList
- Network.Google.Resource.DFAReporting.CreativeFields.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.List.S1_0_1CreativeFieldsList
- Network.Google.Resource.DFAReporting.CreativeFields.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.List.S1_0_2CreativeFieldsList
- Network.Google.Resource.DFAReporting.CreativeFields.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.List.S1_0_3CreativeFieldsList
- Network.Google.Resource.DFAReporting.CreativeFields.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.List.S1_0_4CreativeFieldsList
- Network.Google.Resource.DFAReporting.CreativeFields.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.List.S1_0_5CreativeFieldsList
- Network.Google.Resource.DFAReporting.CreativeFields.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.List.S1_0_6CreativeFieldsList
- Network.Google.Resource.DFAReporting.CreativeFields.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.List.S1_0_7CreativeFieldsList
- Network.Google.Resource.DFAReporting.CreativeFields.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CreativeFields.Patch.C1_0CreativeFieldsPatch
- Network.Google.Resource.DFAReporting.CreativeFields.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CreativeFields.Patch.D1CreativeFieldsPatch
- Network.Google.Resource.DFAReporting.CreativeFields.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.Patch.S1_0_0CreativeFieldsPatch
- Network.Google.Resource.DFAReporting.CreativeFields.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.Patch.S1_0_1CreativeFieldsPatch
- Network.Google.Resource.DFAReporting.CreativeFields.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.Patch.S1_0_2CreativeFieldsPatch
- Network.Google.Resource.DFAReporting.CreativeFields.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CreativeFields.Update.C1_0CreativeFieldsUpdate
- Network.Google.Resource.DFAReporting.CreativeFields.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CreativeFields.Update.D1CreativeFieldsUpdate
- Network.Google.Resource.DFAReporting.CreativeFields.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.Update.S1_0_0CreativeFieldsUpdate
- Network.Google.Resource.DFAReporting.CreativeFields.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeFields.Update.S1_0_1CreativeFieldsUpdate
- Network.Google.Resource.DFAReporting.CreativeGroups.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CreativeGroups.Get.C1_0CreativeGroupsGet
- Network.Google.Resource.DFAReporting.CreativeGroups.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CreativeGroups.Get.D1CreativeGroupsGet
- Network.Google.Resource.DFAReporting.CreativeGroups.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeGroups.Get.S1_0_0CreativeGroupsGet
- Network.Google.Resource.DFAReporting.CreativeGroups.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeGroups.Get.S1_0_1CreativeGroupsGet
- Network.Google.Resource.DFAReporting.CreativeGroups.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CreativeGroups.Insert.C1_0CreativeGroupsInsert
- Network.Google.Resource.DFAReporting.CreativeGroups.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CreativeGroups.Insert.D1CreativeGroupsInsert
- Network.Google.Resource.DFAReporting.CreativeGroups.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeGroups.Insert.S1_0_0CreativeGroupsInsert
- Network.Google.Resource.DFAReporting.CreativeGroups.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeGroups.Insert.S1_0_1CreativeGroupsInsert
- Network.Google.Resource.DFAReporting.CreativeGroups.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CreativeGroups.List.C1_0CreativeGroupsList
- Network.Google.Resource.DFAReporting.CreativeGroups.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CreativeGroups.List.D1CreativeGroupsList
- Network.Google.Resource.DFAReporting.CreativeGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeGroups.List.S1_0_0CreativeGroupsList
- Network.Google.Resource.DFAReporting.CreativeGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeGroups.List.S1_0_1CreativeGroupsList
- Network.Google.Resource.DFAReporting.CreativeGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeGroups.List.S1_0_2CreativeGroupsList
- Network.Google.Resource.DFAReporting.CreativeGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeGroups.List.S1_0_3CreativeGroupsList
- Network.Google.Resource.DFAReporting.CreativeGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeGroups.List.S1_0_4CreativeGroupsList
- Network.Google.Resource.DFAReporting.CreativeGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeGroups.List.S1_0_5CreativeGroupsList
- Network.Google.Resource.DFAReporting.CreativeGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeGroups.List.S1_0_6CreativeGroupsList
- Network.Google.Resource.DFAReporting.CreativeGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeGroups.List.S1_0_7CreativeGroupsList
- Network.Google.Resource.DFAReporting.CreativeGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeGroups.List.S1_0_8CreativeGroupsList
- Network.Google.Resource.DFAReporting.CreativeGroups.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CreativeGroups.Patch.C1_0CreativeGroupsPatch
- Network.Google.Resource.DFAReporting.CreativeGroups.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CreativeGroups.Patch.D1CreativeGroupsPatch
- Network.Google.Resource.DFAReporting.CreativeGroups.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeGroups.Patch.S1_0_0CreativeGroupsPatch
- Network.Google.Resource.DFAReporting.CreativeGroups.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeGroups.Patch.S1_0_1CreativeGroupsPatch
- Network.Google.Resource.DFAReporting.CreativeGroups.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeGroups.Patch.S1_0_2CreativeGroupsPatch
- Network.Google.Resource.DFAReporting.CreativeGroups.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.CreativeGroups.Update.C1_0CreativeGroupsUpdate
- Network.Google.Resource.DFAReporting.CreativeGroups.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.CreativeGroups.Update.D1CreativeGroupsUpdate
- Network.Google.Resource.DFAReporting.CreativeGroups.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeGroups.Update.S1_0_0CreativeGroupsUpdate
- Network.Google.Resource.DFAReporting.CreativeGroups.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.CreativeGroups.Update.S1_0_1CreativeGroupsUpdate
- Network.Google.Resource.DFAReporting.Creatives.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Creatives.Get.C1_0CreativesGet
- Network.Google.Resource.DFAReporting.Creatives.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Creatives.Get.D1CreativesGet
- Network.Google.Resource.DFAReporting.Creatives.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.Get.S1_0_0CreativesGet
- Network.Google.Resource.DFAReporting.Creatives.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.Get.S1_0_1CreativesGet
- Network.Google.Resource.DFAReporting.Creatives.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Creatives.Insert.C1_0CreativesInsert
- Network.Google.Resource.DFAReporting.Creatives.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Creatives.Insert.D1CreativesInsert
- Network.Google.Resource.DFAReporting.Creatives.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.Insert.S1_0_0CreativesInsert
- Network.Google.Resource.DFAReporting.Creatives.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.Insert.S1_0_1CreativesInsert
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Creatives.List.C1_0CreativesList
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Creatives.List.D1CreativesList
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.List.S1_0_0CreativesList
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.List.S1_0_10CreativesList
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.List.S1_0_11CreativesList
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.List.S1_0_12CreativesList
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.List.S1_0_13CreativesList
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.List.S1_0_14CreativesList
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.List.S1_0_15CreativesList
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.List.S1_0_16CreativesList
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.List.S1_0_1CreativesList
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.List.S1_0_2CreativesList
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.List.S1_0_3CreativesList
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.List.S1_0_4CreativesList
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.List.S1_0_5CreativesList
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.List.S1_0_6CreativesList
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.List.S1_0_7CreativesList
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.List.S1_0_8CreativesList
- Network.Google.Resource.DFAReporting.Creatives.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.List.S1_0_9CreativesList
- Network.Google.Resource.DFAReporting.Creatives.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Creatives.Patch.C1_0CreativesPatch
- Network.Google.Resource.DFAReporting.Creatives.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Creatives.Patch.D1CreativesPatch
- Network.Google.Resource.DFAReporting.Creatives.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.Patch.S1_0_0CreativesPatch
- Network.Google.Resource.DFAReporting.Creatives.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.Patch.S1_0_1CreativesPatch
- Network.Google.Resource.DFAReporting.Creatives.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.Patch.S1_0_2CreativesPatch
- Network.Google.Resource.DFAReporting.Creatives.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Creatives.Update.C1_0CreativesUpdate
- Network.Google.Resource.DFAReporting.Creatives.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Creatives.Update.D1CreativesUpdate
- Network.Google.Resource.DFAReporting.Creatives.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.Update.S1_0_0CreativesUpdate
- Network.Google.Resource.DFAReporting.Creatives.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Creatives.Update.S1_0_1CreativesUpdate
- Network.Google.Resource.DFAReporting.DimensionValues.Query: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.DimensionValues.Query.C1_0DimensionValuesQuery
- Network.Google.Resource.DFAReporting.DimensionValues.Query: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.DimensionValues.Query.D1DimensionValuesQuery
- Network.Google.Resource.DFAReporting.DimensionValues.Query: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DimensionValues.Query.S1_0_0DimensionValuesQuery
- Network.Google.Resource.DFAReporting.DimensionValues.Query: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DimensionValues.Query.S1_0_1DimensionValuesQuery
- Network.Google.Resource.DFAReporting.DimensionValues.Query: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DimensionValues.Query.S1_0_2DimensionValuesQuery
- Network.Google.Resource.DFAReporting.DimensionValues.Query: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DimensionValues.Query.S1_0_3DimensionValuesQuery
- Network.Google.Resource.DFAReporting.DirectorySiteContacts.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.DirectorySiteContacts.Get.C1_0DirectorySiteContactsGet
- Network.Google.Resource.DFAReporting.DirectorySiteContacts.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.DirectorySiteContacts.Get.D1DirectorySiteContactsGet
- Network.Google.Resource.DFAReporting.DirectorySiteContacts.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySiteContacts.Get.S1_0_0DirectorySiteContactsGet
- Network.Google.Resource.DFAReporting.DirectorySiteContacts.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySiteContacts.Get.S1_0_1DirectorySiteContactsGet
- Network.Google.Resource.DFAReporting.DirectorySiteContacts.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.DirectorySiteContacts.List.C1_0DirectorySiteContactsList
- Network.Google.Resource.DFAReporting.DirectorySiteContacts.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.DirectorySiteContacts.List.D1DirectorySiteContactsList
- Network.Google.Resource.DFAReporting.DirectorySiteContacts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySiteContacts.List.S1_0_0DirectorySiteContactsList
- Network.Google.Resource.DFAReporting.DirectorySiteContacts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySiteContacts.List.S1_0_1DirectorySiteContactsList
- Network.Google.Resource.DFAReporting.DirectorySiteContacts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySiteContacts.List.S1_0_2DirectorySiteContactsList
- Network.Google.Resource.DFAReporting.DirectorySiteContacts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySiteContacts.List.S1_0_3DirectorySiteContactsList
- Network.Google.Resource.DFAReporting.DirectorySiteContacts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySiteContacts.List.S1_0_4DirectorySiteContactsList
- Network.Google.Resource.DFAReporting.DirectorySiteContacts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySiteContacts.List.S1_0_5DirectorySiteContactsList
- Network.Google.Resource.DFAReporting.DirectorySiteContacts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySiteContacts.List.S1_0_6DirectorySiteContactsList
- Network.Google.Resource.DFAReporting.DirectorySiteContacts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySiteContacts.List.S1_0_7DirectorySiteContactsList
- Network.Google.Resource.DFAReporting.DirectorySites.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.DirectorySites.Get.C1_0DirectorySitesGet
- Network.Google.Resource.DFAReporting.DirectorySites.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.DirectorySites.Get.D1DirectorySitesGet
- Network.Google.Resource.DFAReporting.DirectorySites.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySites.Get.S1_0_0DirectorySitesGet
- Network.Google.Resource.DFAReporting.DirectorySites.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySites.Get.S1_0_1DirectorySitesGet
- Network.Google.Resource.DFAReporting.DirectorySites.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.DirectorySites.Insert.C1_0DirectorySitesInsert
- Network.Google.Resource.DFAReporting.DirectorySites.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.DirectorySites.Insert.D1DirectorySitesInsert
- Network.Google.Resource.DFAReporting.DirectorySites.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySites.Insert.S1_0_0DirectorySitesInsert
- Network.Google.Resource.DFAReporting.DirectorySites.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySites.Insert.S1_0_1DirectorySitesInsert
- Network.Google.Resource.DFAReporting.DirectorySites.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.DirectorySites.List.C1_0DirectorySitesList
- Network.Google.Resource.DFAReporting.DirectorySites.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.DirectorySites.List.D1DirectorySitesList
- Network.Google.Resource.DFAReporting.DirectorySites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySites.List.S1_0_0DirectorySitesList
- Network.Google.Resource.DFAReporting.DirectorySites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySites.List.S1_0_10DirectorySitesList
- Network.Google.Resource.DFAReporting.DirectorySites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySites.List.S1_0_11DirectorySitesList
- Network.Google.Resource.DFAReporting.DirectorySites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySites.List.S1_0_12DirectorySitesList
- Network.Google.Resource.DFAReporting.DirectorySites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySites.List.S1_0_13DirectorySitesList
- Network.Google.Resource.DFAReporting.DirectorySites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySites.List.S1_0_1DirectorySitesList
- Network.Google.Resource.DFAReporting.DirectorySites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySites.List.S1_0_2DirectorySitesList
- Network.Google.Resource.DFAReporting.DirectorySites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySites.List.S1_0_3DirectorySitesList
- Network.Google.Resource.DFAReporting.DirectorySites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySites.List.S1_0_4DirectorySitesList
- Network.Google.Resource.DFAReporting.DirectorySites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySites.List.S1_0_5DirectorySitesList
- Network.Google.Resource.DFAReporting.DirectorySites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySites.List.S1_0_6DirectorySitesList
- Network.Google.Resource.DFAReporting.DirectorySites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySites.List.S1_0_7DirectorySitesList
- Network.Google.Resource.DFAReporting.DirectorySites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySites.List.S1_0_8DirectorySitesList
- Network.Google.Resource.DFAReporting.DirectorySites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.DirectorySites.List.S1_0_9DirectorySitesList
- Network.Google.Resource.DFAReporting.EventTags.Delete: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.EventTags.Delete.C1_0EventTagsDelete
- Network.Google.Resource.DFAReporting.EventTags.Delete: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.EventTags.Delete.D1EventTagsDelete
- Network.Google.Resource.DFAReporting.EventTags.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.Delete.S1_0_0EventTagsDelete
- Network.Google.Resource.DFAReporting.EventTags.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.Delete.S1_0_1EventTagsDelete
- Network.Google.Resource.DFAReporting.EventTags.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.EventTags.Get.C1_0EventTagsGet
- Network.Google.Resource.DFAReporting.EventTags.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.EventTags.Get.D1EventTagsGet
- Network.Google.Resource.DFAReporting.EventTags.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.Get.S1_0_0EventTagsGet
- Network.Google.Resource.DFAReporting.EventTags.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.Get.S1_0_1EventTagsGet
- Network.Google.Resource.DFAReporting.EventTags.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.EventTags.Insert.C1_0EventTagsInsert
- Network.Google.Resource.DFAReporting.EventTags.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.EventTags.Insert.D1EventTagsInsert
- Network.Google.Resource.DFAReporting.EventTags.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.Insert.S1_0_0EventTagsInsert
- Network.Google.Resource.DFAReporting.EventTags.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.Insert.S1_0_1EventTagsInsert
- Network.Google.Resource.DFAReporting.EventTags.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.EventTags.List.C1_0EventTagsList
- Network.Google.Resource.DFAReporting.EventTags.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.EventTags.List.D1EventTagsList
- Network.Google.Resource.DFAReporting.EventTags.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.List.S1_0_0EventTagsList
- Network.Google.Resource.DFAReporting.EventTags.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.List.S1_0_10EventTagsList
- Network.Google.Resource.DFAReporting.EventTags.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.List.S1_0_1EventTagsList
- Network.Google.Resource.DFAReporting.EventTags.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.List.S1_0_2EventTagsList
- Network.Google.Resource.DFAReporting.EventTags.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.List.S1_0_3EventTagsList
- Network.Google.Resource.DFAReporting.EventTags.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.List.S1_0_4EventTagsList
- Network.Google.Resource.DFAReporting.EventTags.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.List.S1_0_5EventTagsList
- Network.Google.Resource.DFAReporting.EventTags.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.List.S1_0_6EventTagsList
- Network.Google.Resource.DFAReporting.EventTags.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.List.S1_0_7EventTagsList
- Network.Google.Resource.DFAReporting.EventTags.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.List.S1_0_8EventTagsList
- Network.Google.Resource.DFAReporting.EventTags.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.List.S1_0_9EventTagsList
- Network.Google.Resource.DFAReporting.EventTags.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.EventTags.Patch.C1_0EventTagsPatch
- Network.Google.Resource.DFAReporting.EventTags.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.EventTags.Patch.D1EventTagsPatch
- Network.Google.Resource.DFAReporting.EventTags.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.Patch.S1_0_0EventTagsPatch
- Network.Google.Resource.DFAReporting.EventTags.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.Patch.S1_0_1EventTagsPatch
- Network.Google.Resource.DFAReporting.EventTags.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.Patch.S1_0_2EventTagsPatch
- Network.Google.Resource.DFAReporting.EventTags.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.EventTags.Update.C1_0EventTagsUpdate
- Network.Google.Resource.DFAReporting.EventTags.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.EventTags.Update.D1EventTagsUpdate
- Network.Google.Resource.DFAReporting.EventTags.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.Update.S1_0_0EventTagsUpdate
- Network.Google.Resource.DFAReporting.EventTags.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.EventTags.Update.S1_0_1EventTagsUpdate
- Network.Google.Resource.DFAReporting.Files.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Files.Get.C1_0FilesGet
- Network.Google.Resource.DFAReporting.Files.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Files.Get.D1FilesGet
- Network.Google.Resource.DFAReporting.Files.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Files.Get.S1_0_0FilesGet
- Network.Google.Resource.DFAReporting.Files.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Files.Get.S1_0_1FilesGet
- Network.Google.Resource.DFAReporting.Files.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Files.List.C1_0FilesList
- Network.Google.Resource.DFAReporting.Files.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Files.List.D1FilesList
- Network.Google.Resource.DFAReporting.Files.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Files.List.S1_0_0FilesList
- Network.Google.Resource.DFAReporting.Files.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Files.List.S1_0_1FilesList
- Network.Google.Resource.DFAReporting.Files.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Files.List.S1_0_2FilesList
- Network.Google.Resource.DFAReporting.Files.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Files.List.S1_0_3FilesList
- Network.Google.Resource.DFAReporting.Files.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Files.List.S1_0_4FilesList
- Network.Google.Resource.DFAReporting.Files.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Files.List.S1_0_5FilesList
- Network.Google.Resource.DFAReporting.FloodlightActivities.Delete: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.FloodlightActivities.Delete.C1_0FloodlightActivitiesDelete
- Network.Google.Resource.DFAReporting.FloodlightActivities.Delete: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.FloodlightActivities.Delete.D1FloodlightActivitiesDelete
- Network.Google.Resource.DFAReporting.FloodlightActivities.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.Delete.S1_0_0FloodlightActivitiesDelete
- Network.Google.Resource.DFAReporting.FloodlightActivities.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.Delete.S1_0_1FloodlightActivitiesDelete
- Network.Google.Resource.DFAReporting.FloodlightActivities.Generatetag: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.FloodlightActivities.Generatetag.C1_0FloodlightActivitiesGeneratetag
- Network.Google.Resource.DFAReporting.FloodlightActivities.Generatetag: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.FloodlightActivities.Generatetag.D1FloodlightActivitiesGeneratetag
- Network.Google.Resource.DFAReporting.FloodlightActivities.Generatetag: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.Generatetag.S1_0_0FloodlightActivitiesGeneratetag
- Network.Google.Resource.DFAReporting.FloodlightActivities.Generatetag: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.Generatetag.S1_0_1FloodlightActivitiesGeneratetag
- Network.Google.Resource.DFAReporting.FloodlightActivities.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.FloodlightActivities.Get.C1_0FloodlightActivitiesGet
- Network.Google.Resource.DFAReporting.FloodlightActivities.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.FloodlightActivities.Get.D1FloodlightActivitiesGet
- Network.Google.Resource.DFAReporting.FloodlightActivities.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.Get.S1_0_0FloodlightActivitiesGet
- Network.Google.Resource.DFAReporting.FloodlightActivities.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.Get.S1_0_1FloodlightActivitiesGet
- Network.Google.Resource.DFAReporting.FloodlightActivities.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.FloodlightActivities.Insert.C1_0FloodlightActivitiesInsert
- Network.Google.Resource.DFAReporting.FloodlightActivities.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.FloodlightActivities.Insert.D1FloodlightActivitiesInsert
- Network.Google.Resource.DFAReporting.FloodlightActivities.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.Insert.S1_0_0FloodlightActivitiesInsert
- Network.Google.Resource.DFAReporting.FloodlightActivities.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.Insert.S1_0_1FloodlightActivitiesInsert
- Network.Google.Resource.DFAReporting.FloodlightActivities.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.FloodlightActivities.List.C1_0FloodlightActivitiesList
- Network.Google.Resource.DFAReporting.FloodlightActivities.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.FloodlightActivities.List.D1FloodlightActivitiesList
- Network.Google.Resource.DFAReporting.FloodlightActivities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.List.S1_0_0FloodlightActivitiesList
- Network.Google.Resource.DFAReporting.FloodlightActivities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.List.S1_0_10FloodlightActivitiesList
- Network.Google.Resource.DFAReporting.FloodlightActivities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.List.S1_0_11FloodlightActivitiesList
- Network.Google.Resource.DFAReporting.FloodlightActivities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.List.S1_0_12FloodlightActivitiesList
- Network.Google.Resource.DFAReporting.FloodlightActivities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.List.S1_0_13FloodlightActivitiesList
- Network.Google.Resource.DFAReporting.FloodlightActivities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.List.S1_0_1FloodlightActivitiesList
- Network.Google.Resource.DFAReporting.FloodlightActivities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.List.S1_0_2FloodlightActivitiesList
- Network.Google.Resource.DFAReporting.FloodlightActivities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.List.S1_0_3FloodlightActivitiesList
- Network.Google.Resource.DFAReporting.FloodlightActivities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.List.S1_0_4FloodlightActivitiesList
- Network.Google.Resource.DFAReporting.FloodlightActivities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.List.S1_0_5FloodlightActivitiesList
- Network.Google.Resource.DFAReporting.FloodlightActivities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.List.S1_0_6FloodlightActivitiesList
- Network.Google.Resource.DFAReporting.FloodlightActivities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.List.S1_0_7FloodlightActivitiesList
- Network.Google.Resource.DFAReporting.FloodlightActivities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.List.S1_0_8FloodlightActivitiesList
- Network.Google.Resource.DFAReporting.FloodlightActivities.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.List.S1_0_9FloodlightActivitiesList
- Network.Google.Resource.DFAReporting.FloodlightActivities.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.FloodlightActivities.Patch.C1_0FloodlightActivitiesPatch
- Network.Google.Resource.DFAReporting.FloodlightActivities.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.FloodlightActivities.Patch.D1FloodlightActivitiesPatch
- Network.Google.Resource.DFAReporting.FloodlightActivities.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.Patch.S1_0_0FloodlightActivitiesPatch
- Network.Google.Resource.DFAReporting.FloodlightActivities.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.Patch.S1_0_1FloodlightActivitiesPatch
- Network.Google.Resource.DFAReporting.FloodlightActivities.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.Patch.S1_0_2FloodlightActivitiesPatch
- Network.Google.Resource.DFAReporting.FloodlightActivities.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.FloodlightActivities.Update.C1_0FloodlightActivitiesUpdate
- Network.Google.Resource.DFAReporting.FloodlightActivities.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.FloodlightActivities.Update.D1FloodlightActivitiesUpdate
- Network.Google.Resource.DFAReporting.FloodlightActivities.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.Update.S1_0_0FloodlightActivitiesUpdate
- Network.Google.Resource.DFAReporting.FloodlightActivities.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivities.Update.S1_0_1FloodlightActivitiesUpdate
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete: data FloodlightActivityGroupsDelete
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete: fagdId :: Lens' FloodlightActivityGroupsDelete Int64
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete: fagdProFileId :: Lens' FloodlightActivityGroupsDelete Int64
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete: floodlightActivityGroupsDelete :: Int64 -> Int64 -> FloodlightActivityGroupsDelete
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete: instance Data.Data.Data Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete.FloodlightActivityGroupsDelete
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete: instance GHC.Classes.Eq Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete.FloodlightActivityGroupsDelete
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete.C1_0FloodlightActivityGroupsDelete
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete.D1FloodlightActivityGroupsDelete
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete: instance GHC.Generics.Generic Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete.FloodlightActivityGroupsDelete
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete.S1_0_0FloodlightActivityGroupsDelete
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete.S1_0_1FloodlightActivityGroupsDelete
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete: instance GHC.Show.Show Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete.FloodlightActivityGroupsDelete
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete: instance Network.Google.Types.GoogleRequest Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete.FloodlightActivityGroupsDelete
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete: type FloodlightActivityGroupsDeleteResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivityGroups" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Get.C1_0FloodlightActivityGroupsGet
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Get.D1FloodlightActivityGroupsGet
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Get.S1_0_0FloodlightActivityGroupsGet
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Get.S1_0_1FloodlightActivityGroupsGet
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Insert.C1_0FloodlightActivityGroupsInsert
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Insert.D1FloodlightActivityGroupsInsert
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Insert.S1_0_0FloodlightActivityGroupsInsert
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Insert.S1_0_1FloodlightActivityGroupsInsert
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List.C1_0FloodlightActivityGroupsList
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List.D1FloodlightActivityGroupsList
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List.S1_0_0FloodlightActivityGroupsList
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List.S1_0_1FloodlightActivityGroupsList
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List.S1_0_2FloodlightActivityGroupsList
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List.S1_0_3FloodlightActivityGroupsList
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List.S1_0_4FloodlightActivityGroupsList
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List.S1_0_5FloodlightActivityGroupsList
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List.S1_0_6FloodlightActivityGroupsList
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List.S1_0_7FloodlightActivityGroupsList
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List.S1_0_8FloodlightActivityGroupsList
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List.S1_0_9FloodlightActivityGroupsList
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Patch.C1_0FloodlightActivityGroupsPatch
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Patch.D1FloodlightActivityGroupsPatch
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Patch.S1_0_0FloodlightActivityGroupsPatch
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Patch.S1_0_1FloodlightActivityGroupsPatch
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Patch.S1_0_2FloodlightActivityGroupsPatch
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Update.C1_0FloodlightActivityGroupsUpdate
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Update.D1FloodlightActivityGroupsUpdate
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Update.S1_0_0FloodlightActivityGroupsUpdate
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Update.S1_0_1FloodlightActivityGroupsUpdate
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.FloodlightConfigurations.Get.C1_0FloodlightConfigurationsGet
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.FloodlightConfigurations.Get.D1FloodlightConfigurationsGet
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightConfigurations.Get.S1_0_0FloodlightConfigurationsGet
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightConfigurations.Get.S1_0_1FloodlightConfigurationsGet
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.FloodlightConfigurations.List.C1_0FloodlightConfigurationsList
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.FloodlightConfigurations.List.D1FloodlightConfigurationsList
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightConfigurations.List.S1_0_0FloodlightConfigurationsList
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightConfigurations.List.S1_0_1FloodlightConfigurationsList
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.FloodlightConfigurations.Patch.C1_0FloodlightConfigurationsPatch
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.FloodlightConfigurations.Patch.D1FloodlightConfigurationsPatch
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightConfigurations.Patch.S1_0_0FloodlightConfigurationsPatch
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightConfigurations.Patch.S1_0_1FloodlightConfigurationsPatch
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightConfigurations.Patch.S1_0_2FloodlightConfigurationsPatch
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.FloodlightConfigurations.Update.C1_0FloodlightConfigurationsUpdate
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.FloodlightConfigurations.Update.D1FloodlightConfigurationsUpdate
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightConfigurations.Update.S1_0_0FloodlightConfigurationsUpdate
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.FloodlightConfigurations.Update.S1_0_1FloodlightConfigurationsUpdate
- Network.Google.Resource.DFAReporting.InventoryItems.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.InventoryItems.Get.C1_0InventoryItemsGet
- Network.Google.Resource.DFAReporting.InventoryItems.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.InventoryItems.Get.D1InventoryItemsGet
- Network.Google.Resource.DFAReporting.InventoryItems.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.InventoryItems.Get.S1_0_0InventoryItemsGet
- Network.Google.Resource.DFAReporting.InventoryItems.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.InventoryItems.Get.S1_0_1InventoryItemsGet
- Network.Google.Resource.DFAReporting.InventoryItems.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.InventoryItems.Get.S1_0_2InventoryItemsGet
- Network.Google.Resource.DFAReporting.InventoryItems.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.InventoryItems.List.C1_0InventoryItemsList
- Network.Google.Resource.DFAReporting.InventoryItems.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.InventoryItems.List.D1InventoryItemsList
- Network.Google.Resource.DFAReporting.InventoryItems.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.InventoryItems.List.S1_0_0InventoryItemsList
- Network.Google.Resource.DFAReporting.InventoryItems.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.InventoryItems.List.S1_0_1InventoryItemsList
- Network.Google.Resource.DFAReporting.InventoryItems.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.InventoryItems.List.S1_0_2InventoryItemsList
- Network.Google.Resource.DFAReporting.InventoryItems.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.InventoryItems.List.S1_0_3InventoryItemsList
- Network.Google.Resource.DFAReporting.InventoryItems.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.InventoryItems.List.S1_0_4InventoryItemsList
- Network.Google.Resource.DFAReporting.InventoryItems.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.InventoryItems.List.S1_0_5InventoryItemsList
- Network.Google.Resource.DFAReporting.InventoryItems.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.InventoryItems.List.S1_0_6InventoryItemsList
- Network.Google.Resource.DFAReporting.InventoryItems.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.InventoryItems.List.S1_0_7InventoryItemsList
- Network.Google.Resource.DFAReporting.InventoryItems.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.InventoryItems.List.S1_0_8InventoryItemsList
- Network.Google.Resource.DFAReporting.InventoryItems.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.InventoryItems.List.S1_0_9InventoryItemsList
- Network.Google.Resource.DFAReporting.LandingPages.Delete: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.LandingPages.Delete.C1_0LandingPagesDelete
- Network.Google.Resource.DFAReporting.LandingPages.Delete: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.LandingPages.Delete.D1LandingPagesDelete
- Network.Google.Resource.DFAReporting.LandingPages.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.LandingPages.Delete.S1_0_0LandingPagesDelete
- Network.Google.Resource.DFAReporting.LandingPages.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.LandingPages.Delete.S1_0_1LandingPagesDelete
- Network.Google.Resource.DFAReporting.LandingPages.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.LandingPages.Delete.S1_0_2LandingPagesDelete
- Network.Google.Resource.DFAReporting.LandingPages.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.LandingPages.Get.C1_0LandingPagesGet
- Network.Google.Resource.DFAReporting.LandingPages.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.LandingPages.Get.D1LandingPagesGet
- Network.Google.Resource.DFAReporting.LandingPages.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.LandingPages.Get.S1_0_0LandingPagesGet
- Network.Google.Resource.DFAReporting.LandingPages.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.LandingPages.Get.S1_0_1LandingPagesGet
- Network.Google.Resource.DFAReporting.LandingPages.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.LandingPages.Get.S1_0_2LandingPagesGet
- Network.Google.Resource.DFAReporting.LandingPages.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.LandingPages.Insert.C1_0LandingPagesInsert
- Network.Google.Resource.DFAReporting.LandingPages.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.LandingPages.Insert.D1LandingPagesInsert
- Network.Google.Resource.DFAReporting.LandingPages.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.LandingPages.Insert.S1_0_0LandingPagesInsert
- Network.Google.Resource.DFAReporting.LandingPages.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.LandingPages.Insert.S1_0_1LandingPagesInsert
- Network.Google.Resource.DFAReporting.LandingPages.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.LandingPages.Insert.S1_0_2LandingPagesInsert
- Network.Google.Resource.DFAReporting.LandingPages.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.LandingPages.List.C1_0LandingPagesList
- Network.Google.Resource.DFAReporting.LandingPages.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.LandingPages.List.D1LandingPagesList
- Network.Google.Resource.DFAReporting.LandingPages.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.LandingPages.List.S1_0_0LandingPagesList
- Network.Google.Resource.DFAReporting.LandingPages.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.LandingPages.List.S1_0_1LandingPagesList
- Network.Google.Resource.DFAReporting.LandingPages.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.LandingPages.Patch.C1_0LandingPagesPatch
- Network.Google.Resource.DFAReporting.LandingPages.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.LandingPages.Patch.D1LandingPagesPatch
- Network.Google.Resource.DFAReporting.LandingPages.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.LandingPages.Patch.S1_0_0LandingPagesPatch
- Network.Google.Resource.DFAReporting.LandingPages.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.LandingPages.Patch.S1_0_1LandingPagesPatch
- Network.Google.Resource.DFAReporting.LandingPages.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.LandingPages.Patch.S1_0_2LandingPagesPatch
- Network.Google.Resource.DFAReporting.LandingPages.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.LandingPages.Patch.S1_0_3LandingPagesPatch
- Network.Google.Resource.DFAReporting.LandingPages.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.LandingPages.Update.C1_0LandingPagesUpdate
- Network.Google.Resource.DFAReporting.LandingPages.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.LandingPages.Update.D1LandingPagesUpdate
- Network.Google.Resource.DFAReporting.LandingPages.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.LandingPages.Update.S1_0_0LandingPagesUpdate
- Network.Google.Resource.DFAReporting.LandingPages.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.LandingPages.Update.S1_0_1LandingPagesUpdate
- Network.Google.Resource.DFAReporting.LandingPages.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.LandingPages.Update.S1_0_2LandingPagesUpdate
- Network.Google.Resource.DFAReporting.Metros.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Metros.List.C1_0MetrosList
- Network.Google.Resource.DFAReporting.Metros.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Metros.List.D1MetrosList
- Network.Google.Resource.DFAReporting.Metros.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Metros.List.S1_0_0MetrosList
- Network.Google.Resource.DFAReporting.MobileCarriers.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.MobileCarriers.Get.C1_0MobileCarriersGet
- Network.Google.Resource.DFAReporting.MobileCarriers.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.MobileCarriers.Get.D1MobileCarriersGet
- Network.Google.Resource.DFAReporting.MobileCarriers.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.MobileCarriers.Get.S1_0_0MobileCarriersGet
- Network.Google.Resource.DFAReporting.MobileCarriers.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.MobileCarriers.Get.S1_0_1MobileCarriersGet
- Network.Google.Resource.DFAReporting.MobileCarriers.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.MobileCarriers.List.C1_0MobileCarriersList
- Network.Google.Resource.DFAReporting.MobileCarriers.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.MobileCarriers.List.D1MobileCarriersList
- Network.Google.Resource.DFAReporting.MobileCarriers.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.MobileCarriers.List.S1_0_0MobileCarriersList
- Network.Google.Resource.DFAReporting.OperatingSystemVersions.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.OperatingSystemVersions.Get.C1_0OperatingSystemVersionsGet
- Network.Google.Resource.DFAReporting.OperatingSystemVersions.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.OperatingSystemVersions.Get.D1OperatingSystemVersionsGet
- Network.Google.Resource.DFAReporting.OperatingSystemVersions.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OperatingSystemVersions.Get.S1_0_0OperatingSystemVersionsGet
- Network.Google.Resource.DFAReporting.OperatingSystemVersions.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OperatingSystemVersions.Get.S1_0_1OperatingSystemVersionsGet
- Network.Google.Resource.DFAReporting.OperatingSystemVersions.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.OperatingSystemVersions.List.C1_0OperatingSystemVersionsList
- Network.Google.Resource.DFAReporting.OperatingSystemVersions.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.OperatingSystemVersions.List.D1OperatingSystemVersionsList
- Network.Google.Resource.DFAReporting.OperatingSystemVersions.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OperatingSystemVersions.List.S1_0_0OperatingSystemVersionsList
- Network.Google.Resource.DFAReporting.OperatingSystems.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.OperatingSystems.Get.C1_0OperatingSystemsGet
- Network.Google.Resource.DFAReporting.OperatingSystems.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.OperatingSystems.Get.D1OperatingSystemsGet
- Network.Google.Resource.DFAReporting.OperatingSystems.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OperatingSystems.Get.S1_0_0OperatingSystemsGet
- Network.Google.Resource.DFAReporting.OperatingSystems.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OperatingSystems.Get.S1_0_1OperatingSystemsGet
- Network.Google.Resource.DFAReporting.OperatingSystems.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.OperatingSystems.List.C1_0OperatingSystemsList
- Network.Google.Resource.DFAReporting.OperatingSystems.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.OperatingSystems.List.D1OperatingSystemsList
- Network.Google.Resource.DFAReporting.OperatingSystems.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OperatingSystems.List.S1_0_0OperatingSystemsList
- Network.Google.Resource.DFAReporting.OrderDocuments.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.OrderDocuments.Get.C1_0OrderDocumentsGet
- Network.Google.Resource.DFAReporting.OrderDocuments.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.OrderDocuments.Get.D1OrderDocumentsGet
- Network.Google.Resource.DFAReporting.OrderDocuments.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OrderDocuments.Get.S1_0_0OrderDocumentsGet
- Network.Google.Resource.DFAReporting.OrderDocuments.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OrderDocuments.Get.S1_0_1OrderDocumentsGet
- Network.Google.Resource.DFAReporting.OrderDocuments.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OrderDocuments.Get.S1_0_2OrderDocumentsGet
- Network.Google.Resource.DFAReporting.OrderDocuments.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.OrderDocuments.List.C1_0OrderDocumentsList
- Network.Google.Resource.DFAReporting.OrderDocuments.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.OrderDocuments.List.D1OrderDocumentsList
- Network.Google.Resource.DFAReporting.OrderDocuments.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OrderDocuments.List.S1_0_0OrderDocumentsList
- Network.Google.Resource.DFAReporting.OrderDocuments.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OrderDocuments.List.S1_0_10OrderDocumentsList
- Network.Google.Resource.DFAReporting.OrderDocuments.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OrderDocuments.List.S1_0_1OrderDocumentsList
- Network.Google.Resource.DFAReporting.OrderDocuments.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OrderDocuments.List.S1_0_2OrderDocumentsList
- Network.Google.Resource.DFAReporting.OrderDocuments.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OrderDocuments.List.S1_0_3OrderDocumentsList
- Network.Google.Resource.DFAReporting.OrderDocuments.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OrderDocuments.List.S1_0_4OrderDocumentsList
- Network.Google.Resource.DFAReporting.OrderDocuments.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OrderDocuments.List.S1_0_5OrderDocumentsList
- Network.Google.Resource.DFAReporting.OrderDocuments.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OrderDocuments.List.S1_0_6OrderDocumentsList
- Network.Google.Resource.DFAReporting.OrderDocuments.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OrderDocuments.List.S1_0_7OrderDocumentsList
- Network.Google.Resource.DFAReporting.OrderDocuments.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OrderDocuments.List.S1_0_8OrderDocumentsList
- Network.Google.Resource.DFAReporting.OrderDocuments.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.OrderDocuments.List.S1_0_9OrderDocumentsList
- Network.Google.Resource.DFAReporting.Orders.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Orders.Get.C1_0OrdersGet
- Network.Google.Resource.DFAReporting.Orders.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Orders.Get.D1OrdersGet
- Network.Google.Resource.DFAReporting.Orders.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Orders.Get.S1_0_0OrdersGet
- Network.Google.Resource.DFAReporting.Orders.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Orders.Get.S1_0_1OrdersGet
- Network.Google.Resource.DFAReporting.Orders.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Orders.Get.S1_0_2OrdersGet
- Network.Google.Resource.DFAReporting.Orders.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Orders.List.C1_0OrdersList
- Network.Google.Resource.DFAReporting.Orders.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Orders.List.D1OrdersList
- Network.Google.Resource.DFAReporting.Orders.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Orders.List.S1_0_0OrdersList
- Network.Google.Resource.DFAReporting.Orders.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Orders.List.S1_0_1OrdersList
- Network.Google.Resource.DFAReporting.Orders.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Orders.List.S1_0_2OrdersList
- Network.Google.Resource.DFAReporting.Orders.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Orders.List.S1_0_3OrdersList
- Network.Google.Resource.DFAReporting.Orders.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Orders.List.S1_0_4OrdersList
- Network.Google.Resource.DFAReporting.Orders.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Orders.List.S1_0_5OrdersList
- Network.Google.Resource.DFAReporting.Orders.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Orders.List.S1_0_6OrdersList
- Network.Google.Resource.DFAReporting.Orders.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Orders.List.S1_0_7OrdersList
- Network.Google.Resource.DFAReporting.Orders.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Orders.List.S1_0_8OrdersList
- Network.Google.Resource.DFAReporting.PlacementGroups.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.PlacementGroups.Get.C1_0PlacementGroupsGet
- Network.Google.Resource.DFAReporting.PlacementGroups.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.PlacementGroups.Get.D1PlacementGroupsGet
- Network.Google.Resource.DFAReporting.PlacementGroups.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.Get.S1_0_0PlacementGroupsGet
- Network.Google.Resource.DFAReporting.PlacementGroups.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.Get.S1_0_1PlacementGroupsGet
- Network.Google.Resource.DFAReporting.PlacementGroups.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.PlacementGroups.Insert.C1_0PlacementGroupsInsert
- Network.Google.Resource.DFAReporting.PlacementGroups.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.PlacementGroups.Insert.D1PlacementGroupsInsert
- Network.Google.Resource.DFAReporting.PlacementGroups.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.Insert.S1_0_0PlacementGroupsInsert
- Network.Google.Resource.DFAReporting.PlacementGroups.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.Insert.S1_0_1PlacementGroupsInsert
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.PlacementGroups.List.C1_0PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.PlacementGroups.List.D1PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_0PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_10PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_11PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_12PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_13PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_14PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_15PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_16PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_17PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_18PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_19PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_1PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_2PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_3PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_4PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_5PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_6PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_7PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_8PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.List.S1_0_9PlacementGroupsList
- Network.Google.Resource.DFAReporting.PlacementGroups.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.PlacementGroups.Patch.C1_0PlacementGroupsPatch
- Network.Google.Resource.DFAReporting.PlacementGroups.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.PlacementGroups.Patch.D1PlacementGroupsPatch
- Network.Google.Resource.DFAReporting.PlacementGroups.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.Patch.S1_0_0PlacementGroupsPatch
- Network.Google.Resource.DFAReporting.PlacementGroups.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.Patch.S1_0_1PlacementGroupsPatch
- Network.Google.Resource.DFAReporting.PlacementGroups.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.Patch.S1_0_2PlacementGroupsPatch
- Network.Google.Resource.DFAReporting.PlacementGroups.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.PlacementGroups.Update.C1_0PlacementGroupsUpdate
- Network.Google.Resource.DFAReporting.PlacementGroups.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.PlacementGroups.Update.D1PlacementGroupsUpdate
- Network.Google.Resource.DFAReporting.PlacementGroups.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.Update.S1_0_0PlacementGroupsUpdate
- Network.Google.Resource.DFAReporting.PlacementGroups.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementGroups.Update.S1_0_1PlacementGroupsUpdate
- Network.Google.Resource.DFAReporting.PlacementStrategies.Delete: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.PlacementStrategies.Delete.C1_0PlacementStrategiesDelete
- Network.Google.Resource.DFAReporting.PlacementStrategies.Delete: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.PlacementStrategies.Delete.D1PlacementStrategiesDelete
- Network.Google.Resource.DFAReporting.PlacementStrategies.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementStrategies.Delete.S1_0_0PlacementStrategiesDelete
- Network.Google.Resource.DFAReporting.PlacementStrategies.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementStrategies.Delete.S1_0_1PlacementStrategiesDelete
- Network.Google.Resource.DFAReporting.PlacementStrategies.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.PlacementStrategies.Get.C1_0PlacementStrategiesGet
- Network.Google.Resource.DFAReporting.PlacementStrategies.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.PlacementStrategies.Get.D1PlacementStrategiesGet
- Network.Google.Resource.DFAReporting.PlacementStrategies.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementStrategies.Get.S1_0_0PlacementStrategiesGet
- Network.Google.Resource.DFAReporting.PlacementStrategies.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementStrategies.Get.S1_0_1PlacementStrategiesGet
- Network.Google.Resource.DFAReporting.PlacementStrategies.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.PlacementStrategies.Insert.C1_0PlacementStrategiesInsert
- Network.Google.Resource.DFAReporting.PlacementStrategies.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.PlacementStrategies.Insert.D1PlacementStrategiesInsert
- Network.Google.Resource.DFAReporting.PlacementStrategies.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementStrategies.Insert.S1_0_0PlacementStrategiesInsert
- Network.Google.Resource.DFAReporting.PlacementStrategies.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementStrategies.Insert.S1_0_1PlacementStrategiesInsert
- Network.Google.Resource.DFAReporting.PlacementStrategies.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.PlacementStrategies.List.C1_0PlacementStrategiesList
- Network.Google.Resource.DFAReporting.PlacementStrategies.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.PlacementStrategies.List.D1PlacementStrategiesList
- Network.Google.Resource.DFAReporting.PlacementStrategies.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementStrategies.List.S1_0_0PlacementStrategiesList
- Network.Google.Resource.DFAReporting.PlacementStrategies.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementStrategies.List.S1_0_1PlacementStrategiesList
- Network.Google.Resource.DFAReporting.PlacementStrategies.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementStrategies.List.S1_0_2PlacementStrategiesList
- Network.Google.Resource.DFAReporting.PlacementStrategies.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementStrategies.List.S1_0_3PlacementStrategiesList
- Network.Google.Resource.DFAReporting.PlacementStrategies.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementStrategies.List.S1_0_4PlacementStrategiesList
- Network.Google.Resource.DFAReporting.PlacementStrategies.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementStrategies.List.S1_0_5PlacementStrategiesList
- Network.Google.Resource.DFAReporting.PlacementStrategies.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementStrategies.List.S1_0_6PlacementStrategiesList
- Network.Google.Resource.DFAReporting.PlacementStrategies.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.PlacementStrategies.Patch.C1_0PlacementStrategiesPatch
- Network.Google.Resource.DFAReporting.PlacementStrategies.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.PlacementStrategies.Patch.D1PlacementStrategiesPatch
- Network.Google.Resource.DFAReporting.PlacementStrategies.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementStrategies.Patch.S1_0_0PlacementStrategiesPatch
- Network.Google.Resource.DFAReporting.PlacementStrategies.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementStrategies.Patch.S1_0_1PlacementStrategiesPatch
- Network.Google.Resource.DFAReporting.PlacementStrategies.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementStrategies.Patch.S1_0_2PlacementStrategiesPatch
- Network.Google.Resource.DFAReporting.PlacementStrategies.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.PlacementStrategies.Update.C1_0PlacementStrategiesUpdate
- Network.Google.Resource.DFAReporting.PlacementStrategies.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.PlacementStrategies.Update.D1PlacementStrategiesUpdate
- Network.Google.Resource.DFAReporting.PlacementStrategies.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementStrategies.Update.S1_0_0PlacementStrategiesUpdate
- Network.Google.Resource.DFAReporting.PlacementStrategies.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlacementStrategies.Update.S1_0_1PlacementStrategiesUpdate
- Network.Google.Resource.DFAReporting.Placements.Generatetags: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Placements.Generatetags.C1_0PlacementsGeneratetags
- Network.Google.Resource.DFAReporting.Placements.Generatetags: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Placements.Generatetags.D1PlacementsGeneratetags
- Network.Google.Resource.DFAReporting.Placements.Generatetags: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.Generatetags.S1_0_0PlacementsGeneratetags
- Network.Google.Resource.DFAReporting.Placements.Generatetags: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.Generatetags.S1_0_1PlacementsGeneratetags
- Network.Google.Resource.DFAReporting.Placements.Generatetags: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.Generatetags.S1_0_2PlacementsGeneratetags
- Network.Google.Resource.DFAReporting.Placements.Generatetags: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.Generatetags.S1_0_3PlacementsGeneratetags
- Network.Google.Resource.DFAReporting.Placements.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Placements.Get.C1_0PlacementsGet
- Network.Google.Resource.DFAReporting.Placements.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Placements.Get.D1PlacementsGet
- Network.Google.Resource.DFAReporting.Placements.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.Get.S1_0_0PlacementsGet
- Network.Google.Resource.DFAReporting.Placements.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.Get.S1_0_1PlacementsGet
- Network.Google.Resource.DFAReporting.Placements.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Placements.Insert.C1_0PlacementsInsert
- Network.Google.Resource.DFAReporting.Placements.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Placements.Insert.D1PlacementsInsert
- Network.Google.Resource.DFAReporting.Placements.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.Insert.S1_0_0PlacementsInsert
- Network.Google.Resource.DFAReporting.Placements.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.Insert.S1_0_1PlacementsInsert
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Placements.List.C1_0PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Placements.List.D1PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_0PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_10PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_11PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_12PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_13PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_14PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_15PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_16PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_17PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_18PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_19PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_1PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_20PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_21PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_22PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_2PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_3PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_4PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_5PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_6PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_7PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_8PlacementsList
- Network.Google.Resource.DFAReporting.Placements.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.List.S1_0_9PlacementsList
- Network.Google.Resource.DFAReporting.Placements.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Placements.Patch.C1_0PlacementsPatch
- Network.Google.Resource.DFAReporting.Placements.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Placements.Patch.D1PlacementsPatch
- Network.Google.Resource.DFAReporting.Placements.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.Patch.S1_0_0PlacementsPatch
- Network.Google.Resource.DFAReporting.Placements.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.Patch.S1_0_1PlacementsPatch
- Network.Google.Resource.DFAReporting.Placements.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.Patch.S1_0_2PlacementsPatch
- Network.Google.Resource.DFAReporting.Placements.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Placements.Update.C1_0PlacementsUpdate
- Network.Google.Resource.DFAReporting.Placements.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Placements.Update.D1PlacementsUpdate
- Network.Google.Resource.DFAReporting.Placements.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.Update.S1_0_0PlacementsUpdate
- Network.Google.Resource.DFAReporting.Placements.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Placements.Update.S1_0_1PlacementsUpdate
- Network.Google.Resource.DFAReporting.PlatformTypes.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.PlatformTypes.Get.C1_0PlatformTypesGet
- Network.Google.Resource.DFAReporting.PlatformTypes.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.PlatformTypes.Get.D1PlatformTypesGet
- Network.Google.Resource.DFAReporting.PlatformTypes.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlatformTypes.Get.S1_0_0PlatformTypesGet
- Network.Google.Resource.DFAReporting.PlatformTypes.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlatformTypes.Get.S1_0_1PlatformTypesGet
- Network.Google.Resource.DFAReporting.PlatformTypes.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.PlatformTypes.List.C1_0PlatformTypesList
- Network.Google.Resource.DFAReporting.PlatformTypes.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.PlatformTypes.List.D1PlatformTypesList
- Network.Google.Resource.DFAReporting.PlatformTypes.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PlatformTypes.List.S1_0_0PlatformTypesList
- Network.Google.Resource.DFAReporting.PostalCodes.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.PostalCodes.Get.C1_0PostalCodesGet
- Network.Google.Resource.DFAReporting.PostalCodes.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.PostalCodes.Get.D1PostalCodesGet
- Network.Google.Resource.DFAReporting.PostalCodes.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PostalCodes.Get.S1_0_0PostalCodesGet
- Network.Google.Resource.DFAReporting.PostalCodes.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PostalCodes.Get.S1_0_1PostalCodesGet
- Network.Google.Resource.DFAReporting.PostalCodes.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.PostalCodes.List.C1_0PostalCodesList
- Network.Google.Resource.DFAReporting.PostalCodes.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.PostalCodes.List.D1PostalCodesList
- Network.Google.Resource.DFAReporting.PostalCodes.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.PostalCodes.List.S1_0_0PostalCodesList
- Network.Google.Resource.DFAReporting.Projects.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Projects.Get.C1_0ProjectsGet
- Network.Google.Resource.DFAReporting.Projects.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Projects.Get.D1ProjectsGet
- Network.Google.Resource.DFAReporting.Projects.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Projects.Get.S1_0_0ProjectsGet
- Network.Google.Resource.DFAReporting.Projects.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Projects.Get.S1_0_1ProjectsGet
- Network.Google.Resource.DFAReporting.Projects.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Projects.List.C1_0ProjectsList
- Network.Google.Resource.DFAReporting.Projects.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Projects.List.D1ProjectsList
- Network.Google.Resource.DFAReporting.Projects.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Projects.List.S1_0_0ProjectsList
- Network.Google.Resource.DFAReporting.Projects.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Projects.List.S1_0_1ProjectsList
- Network.Google.Resource.DFAReporting.Projects.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Projects.List.S1_0_2ProjectsList
- Network.Google.Resource.DFAReporting.Projects.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Projects.List.S1_0_3ProjectsList
- Network.Google.Resource.DFAReporting.Projects.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Projects.List.S1_0_4ProjectsList
- Network.Google.Resource.DFAReporting.Projects.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Projects.List.S1_0_5ProjectsList
- Network.Google.Resource.DFAReporting.Projects.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Projects.List.S1_0_6ProjectsList
- Network.Google.Resource.DFAReporting.Projects.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Projects.List.S1_0_7ProjectsList
- Network.Google.Resource.DFAReporting.Regions.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Regions.List.C1_0RegionsList
- Network.Google.Resource.DFAReporting.Regions.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Regions.List.D1RegionsList
- Network.Google.Resource.DFAReporting.Regions.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Regions.List.S1_0_0RegionsList
- Network.Google.Resource.DFAReporting.RemarketingListShares.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.RemarketingListShares.Get.C1_0RemarketingListSharesGet
- Network.Google.Resource.DFAReporting.RemarketingListShares.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.RemarketingListShares.Get.D1RemarketingListSharesGet
- Network.Google.Resource.DFAReporting.RemarketingListShares.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingListShares.Get.S1_0_0RemarketingListSharesGet
- Network.Google.Resource.DFAReporting.RemarketingListShares.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingListShares.Get.S1_0_1RemarketingListSharesGet
- Network.Google.Resource.DFAReporting.RemarketingListShares.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.RemarketingListShares.Patch.C1_0RemarketingListSharesPatch
- Network.Google.Resource.DFAReporting.RemarketingListShares.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.RemarketingListShares.Patch.D1RemarketingListSharesPatch
- Network.Google.Resource.DFAReporting.RemarketingListShares.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingListShares.Patch.S1_0_0RemarketingListSharesPatch
- Network.Google.Resource.DFAReporting.RemarketingListShares.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingListShares.Patch.S1_0_1RemarketingListSharesPatch
- Network.Google.Resource.DFAReporting.RemarketingListShares.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingListShares.Patch.S1_0_2RemarketingListSharesPatch
- Network.Google.Resource.DFAReporting.RemarketingListShares.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.RemarketingListShares.Update.C1_0RemarketingListSharesUpdate
- Network.Google.Resource.DFAReporting.RemarketingListShares.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.RemarketingListShares.Update.D1RemarketingListSharesUpdate
- Network.Google.Resource.DFAReporting.RemarketingListShares.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingListShares.Update.S1_0_0RemarketingListSharesUpdate
- Network.Google.Resource.DFAReporting.RemarketingListShares.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingListShares.Update.S1_0_1RemarketingListSharesUpdate
- Network.Google.Resource.DFAReporting.RemarketingLists.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.RemarketingLists.Get.C1_0RemarketingListsGet
- Network.Google.Resource.DFAReporting.RemarketingLists.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.RemarketingLists.Get.D1RemarketingListsGet
- Network.Google.Resource.DFAReporting.RemarketingLists.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingLists.Get.S1_0_0RemarketingListsGet
- Network.Google.Resource.DFAReporting.RemarketingLists.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingLists.Get.S1_0_1RemarketingListsGet
- Network.Google.Resource.DFAReporting.RemarketingLists.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.RemarketingLists.Insert.C1_0RemarketingListsInsert
- Network.Google.Resource.DFAReporting.RemarketingLists.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.RemarketingLists.Insert.D1RemarketingListsInsert
- Network.Google.Resource.DFAReporting.RemarketingLists.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingLists.Insert.S1_0_0RemarketingListsInsert
- Network.Google.Resource.DFAReporting.RemarketingLists.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingLists.Insert.S1_0_1RemarketingListsInsert
- Network.Google.Resource.DFAReporting.RemarketingLists.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.RemarketingLists.List.C1_0RemarketingListsList
- Network.Google.Resource.DFAReporting.RemarketingLists.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.RemarketingLists.List.D1RemarketingListsList
- Network.Google.Resource.DFAReporting.RemarketingLists.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingLists.List.S1_0_0RemarketingListsList
- Network.Google.Resource.DFAReporting.RemarketingLists.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingLists.List.S1_0_1RemarketingListsList
- Network.Google.Resource.DFAReporting.RemarketingLists.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingLists.List.S1_0_2RemarketingListsList
- Network.Google.Resource.DFAReporting.RemarketingLists.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingLists.List.S1_0_3RemarketingListsList
- Network.Google.Resource.DFAReporting.RemarketingLists.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingLists.List.S1_0_4RemarketingListsList
- Network.Google.Resource.DFAReporting.RemarketingLists.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingLists.List.S1_0_5RemarketingListsList
- Network.Google.Resource.DFAReporting.RemarketingLists.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingLists.List.S1_0_6RemarketingListsList
- Network.Google.Resource.DFAReporting.RemarketingLists.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingLists.List.S1_0_7RemarketingListsList
- Network.Google.Resource.DFAReporting.RemarketingLists.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingLists.List.S1_0_8RemarketingListsList
- Network.Google.Resource.DFAReporting.RemarketingLists.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.RemarketingLists.Patch.C1_0RemarketingListsPatch
- Network.Google.Resource.DFAReporting.RemarketingLists.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.RemarketingLists.Patch.D1RemarketingListsPatch
- Network.Google.Resource.DFAReporting.RemarketingLists.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingLists.Patch.S1_0_0RemarketingListsPatch
- Network.Google.Resource.DFAReporting.RemarketingLists.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingLists.Patch.S1_0_1RemarketingListsPatch
- Network.Google.Resource.DFAReporting.RemarketingLists.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingLists.Patch.S1_0_2RemarketingListsPatch
- Network.Google.Resource.DFAReporting.RemarketingLists.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.RemarketingLists.Update.C1_0RemarketingListsUpdate
- Network.Google.Resource.DFAReporting.RemarketingLists.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.RemarketingLists.Update.D1RemarketingListsUpdate
- Network.Google.Resource.DFAReporting.RemarketingLists.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingLists.Update.S1_0_0RemarketingListsUpdate
- Network.Google.Resource.DFAReporting.RemarketingLists.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.RemarketingLists.Update.S1_0_1RemarketingListsUpdate
- Network.Google.Resource.DFAReporting.Reports.CompatibleFields.Query: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Reports.CompatibleFields.Query.C1_0ReportsCompatibleFieldsQuery
- Network.Google.Resource.DFAReporting.Reports.CompatibleFields.Query: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Reports.CompatibleFields.Query.D1ReportsCompatibleFieldsQuery
- Network.Google.Resource.DFAReporting.Reports.CompatibleFields.Query: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.CompatibleFields.Query.S1_0_0ReportsCompatibleFieldsQuery
- Network.Google.Resource.DFAReporting.Reports.CompatibleFields.Query: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.CompatibleFields.Query.S1_0_1ReportsCompatibleFieldsQuery
- Network.Google.Resource.DFAReporting.Reports.Delete: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Reports.Delete.C1_0ReportsDelete
- Network.Google.Resource.DFAReporting.Reports.Delete: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Reports.Delete.D1ReportsDelete
- Network.Google.Resource.DFAReporting.Reports.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Delete.S1_0_0ReportsDelete
- Network.Google.Resource.DFAReporting.Reports.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Delete.S1_0_1ReportsDelete
- Network.Google.Resource.DFAReporting.Reports.Files.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Reports.Files.Get.C1_0ReportsFilesGet
- Network.Google.Resource.DFAReporting.Reports.Files.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Reports.Files.Get.D1ReportsFilesGet
- Network.Google.Resource.DFAReporting.Reports.Files.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Files.Get.S1_0_0ReportsFilesGet
- Network.Google.Resource.DFAReporting.Reports.Files.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Files.Get.S1_0_1ReportsFilesGet
- Network.Google.Resource.DFAReporting.Reports.Files.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Files.Get.S1_0_2ReportsFilesGet
- Network.Google.Resource.DFAReporting.Reports.Files.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Reports.Files.List.C1_0ReportsFilesList
- Network.Google.Resource.DFAReporting.Reports.Files.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Reports.Files.List.D1ReportsFilesList
- Network.Google.Resource.DFAReporting.Reports.Files.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Files.List.S1_0_0ReportsFilesList
- Network.Google.Resource.DFAReporting.Reports.Files.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Files.List.S1_0_1ReportsFilesList
- Network.Google.Resource.DFAReporting.Reports.Files.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Files.List.S1_0_2ReportsFilesList
- Network.Google.Resource.DFAReporting.Reports.Files.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Files.List.S1_0_3ReportsFilesList
- Network.Google.Resource.DFAReporting.Reports.Files.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Files.List.S1_0_4ReportsFilesList
- Network.Google.Resource.DFAReporting.Reports.Files.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Files.List.S1_0_5ReportsFilesList
- Network.Google.Resource.DFAReporting.Reports.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Reports.Get.C1_0ReportsGet
- Network.Google.Resource.DFAReporting.Reports.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Reports.Get.D1ReportsGet
- Network.Google.Resource.DFAReporting.Reports.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Get.S1_0_0ReportsGet
- Network.Google.Resource.DFAReporting.Reports.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Get.S1_0_1ReportsGet
- Network.Google.Resource.DFAReporting.Reports.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Reports.Insert.C1_0ReportsInsert
- Network.Google.Resource.DFAReporting.Reports.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Reports.Insert.D1ReportsInsert
- Network.Google.Resource.DFAReporting.Reports.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Insert.S1_0_0ReportsInsert
- Network.Google.Resource.DFAReporting.Reports.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Insert.S1_0_1ReportsInsert
- Network.Google.Resource.DFAReporting.Reports.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Reports.List.C1_0ReportsList
- Network.Google.Resource.DFAReporting.Reports.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Reports.List.D1ReportsList
- Network.Google.Resource.DFAReporting.Reports.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.List.S1_0_0ReportsList
- Network.Google.Resource.DFAReporting.Reports.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.List.S1_0_1ReportsList
- Network.Google.Resource.DFAReporting.Reports.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.List.S1_0_2ReportsList
- Network.Google.Resource.DFAReporting.Reports.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.List.S1_0_3ReportsList
- Network.Google.Resource.DFAReporting.Reports.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.List.S1_0_4ReportsList
- Network.Google.Resource.DFAReporting.Reports.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.List.S1_0_5ReportsList
- Network.Google.Resource.DFAReporting.Reports.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Reports.Patch.C1_0ReportsPatch
- Network.Google.Resource.DFAReporting.Reports.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Reports.Patch.D1ReportsPatch
- Network.Google.Resource.DFAReporting.Reports.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Patch.S1_0_0ReportsPatch
- Network.Google.Resource.DFAReporting.Reports.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Patch.S1_0_1ReportsPatch
- Network.Google.Resource.DFAReporting.Reports.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Patch.S1_0_2ReportsPatch
- Network.Google.Resource.DFAReporting.Reports.Run: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Reports.Run.C1_0ReportsRun
- Network.Google.Resource.DFAReporting.Reports.Run: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Reports.Run.D1ReportsRun
- Network.Google.Resource.DFAReporting.Reports.Run: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Run.S1_0_0ReportsRun
- Network.Google.Resource.DFAReporting.Reports.Run: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Run.S1_0_1ReportsRun
- Network.Google.Resource.DFAReporting.Reports.Run: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Run.S1_0_2ReportsRun
- Network.Google.Resource.DFAReporting.Reports.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Reports.Update.C1_0ReportsUpdate
- Network.Google.Resource.DFAReporting.Reports.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Reports.Update.D1ReportsUpdate
- Network.Google.Resource.DFAReporting.Reports.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Update.S1_0_0ReportsUpdate
- Network.Google.Resource.DFAReporting.Reports.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Update.S1_0_1ReportsUpdate
- Network.Google.Resource.DFAReporting.Reports.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Reports.Update.S1_0_2ReportsUpdate
- Network.Google.Resource.DFAReporting.Sites.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Sites.Get.C1_0SitesGet
- Network.Google.Resource.DFAReporting.Sites.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Sites.Get.D1SitesGet
- Network.Google.Resource.DFAReporting.Sites.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.Get.S1_0_0SitesGet
- Network.Google.Resource.DFAReporting.Sites.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.Get.S1_0_1SitesGet
- Network.Google.Resource.DFAReporting.Sites.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Sites.Insert.C1_0SitesInsert
- Network.Google.Resource.DFAReporting.Sites.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Sites.Insert.D1SitesInsert
- Network.Google.Resource.DFAReporting.Sites.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.Insert.S1_0_0SitesInsert
- Network.Google.Resource.DFAReporting.Sites.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.Insert.S1_0_1SitesInsert
- Network.Google.Resource.DFAReporting.Sites.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Sites.List.C1_0SitesList
- Network.Google.Resource.DFAReporting.Sites.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Sites.List.D1SitesList
- Network.Google.Resource.DFAReporting.Sites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.List.S1_0_0SitesList
- Network.Google.Resource.DFAReporting.Sites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.List.S1_0_10SitesList
- Network.Google.Resource.DFAReporting.Sites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.List.S1_0_11SitesList
- Network.Google.Resource.DFAReporting.Sites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.List.S1_0_12SitesList
- Network.Google.Resource.DFAReporting.Sites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.List.S1_0_13SitesList
- Network.Google.Resource.DFAReporting.Sites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.List.S1_0_14SitesList
- Network.Google.Resource.DFAReporting.Sites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.List.S1_0_15SitesList
- Network.Google.Resource.DFAReporting.Sites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.List.S1_0_1SitesList
- Network.Google.Resource.DFAReporting.Sites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.List.S1_0_2SitesList
- Network.Google.Resource.DFAReporting.Sites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.List.S1_0_3SitesList
- Network.Google.Resource.DFAReporting.Sites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.List.S1_0_4SitesList
- Network.Google.Resource.DFAReporting.Sites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.List.S1_0_5SitesList
- Network.Google.Resource.DFAReporting.Sites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.List.S1_0_6SitesList
- Network.Google.Resource.DFAReporting.Sites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.List.S1_0_7SitesList
- Network.Google.Resource.DFAReporting.Sites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.List.S1_0_8SitesList
- Network.Google.Resource.DFAReporting.Sites.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.List.S1_0_9SitesList
- Network.Google.Resource.DFAReporting.Sites.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Sites.Patch.C1_0SitesPatch
- Network.Google.Resource.DFAReporting.Sites.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Sites.Patch.D1SitesPatch
- Network.Google.Resource.DFAReporting.Sites.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.Patch.S1_0_0SitesPatch
- Network.Google.Resource.DFAReporting.Sites.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.Patch.S1_0_1SitesPatch
- Network.Google.Resource.DFAReporting.Sites.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.Patch.S1_0_2SitesPatch
- Network.Google.Resource.DFAReporting.Sites.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Sites.Update.C1_0SitesUpdate
- Network.Google.Resource.DFAReporting.Sites.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Sites.Update.D1SitesUpdate
- Network.Google.Resource.DFAReporting.Sites.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.Update.S1_0_0SitesUpdate
- Network.Google.Resource.DFAReporting.Sites.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sites.Update.S1_0_1SitesUpdate
- Network.Google.Resource.DFAReporting.Sizes.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Sizes.Get.C1_0SizesGet
- Network.Google.Resource.DFAReporting.Sizes.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Sizes.Get.D1SizesGet
- Network.Google.Resource.DFAReporting.Sizes.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sizes.Get.S1_0_0SizesGet
- Network.Google.Resource.DFAReporting.Sizes.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sizes.Get.S1_0_1SizesGet
- Network.Google.Resource.DFAReporting.Sizes.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Sizes.Insert.C1_0SizesInsert
- Network.Google.Resource.DFAReporting.Sizes.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Sizes.Insert.D1SizesInsert
- Network.Google.Resource.DFAReporting.Sizes.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sizes.Insert.S1_0_0SizesInsert
- Network.Google.Resource.DFAReporting.Sizes.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sizes.Insert.S1_0_1SizesInsert
- Network.Google.Resource.DFAReporting.Sizes.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.Sizes.List.C1_0SizesList
- Network.Google.Resource.DFAReporting.Sizes.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.Sizes.List.D1SizesList
- Network.Google.Resource.DFAReporting.Sizes.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sizes.List.S1_0_0SizesList
- Network.Google.Resource.DFAReporting.Sizes.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sizes.List.S1_0_1SizesList
- Network.Google.Resource.DFAReporting.Sizes.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sizes.List.S1_0_2SizesList
- Network.Google.Resource.DFAReporting.Sizes.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sizes.List.S1_0_3SizesList
- Network.Google.Resource.DFAReporting.Sizes.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.Sizes.List.S1_0_4SizesList
- Network.Google.Resource.DFAReporting.SubAccounts.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.SubAccounts.Get.C1_0SubAccountsGet
- Network.Google.Resource.DFAReporting.SubAccounts.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.SubAccounts.Get.D1SubAccountsGet
- Network.Google.Resource.DFAReporting.SubAccounts.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.SubAccounts.Get.S1_0_0SubAccountsGet
- Network.Google.Resource.DFAReporting.SubAccounts.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.SubAccounts.Get.S1_0_1SubAccountsGet
- Network.Google.Resource.DFAReporting.SubAccounts.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.SubAccounts.Insert.C1_0SubAccountsInsert
- Network.Google.Resource.DFAReporting.SubAccounts.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.SubAccounts.Insert.D1SubAccountsInsert
- Network.Google.Resource.DFAReporting.SubAccounts.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.SubAccounts.Insert.S1_0_0SubAccountsInsert
- Network.Google.Resource.DFAReporting.SubAccounts.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.SubAccounts.Insert.S1_0_1SubAccountsInsert
- Network.Google.Resource.DFAReporting.SubAccounts.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.SubAccounts.List.C1_0SubAccountsList
- Network.Google.Resource.DFAReporting.SubAccounts.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.SubAccounts.List.D1SubAccountsList
- Network.Google.Resource.DFAReporting.SubAccounts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.SubAccounts.List.S1_0_0SubAccountsList
- Network.Google.Resource.DFAReporting.SubAccounts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.SubAccounts.List.S1_0_1SubAccountsList
- Network.Google.Resource.DFAReporting.SubAccounts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.SubAccounts.List.S1_0_2SubAccountsList
- Network.Google.Resource.DFAReporting.SubAccounts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.SubAccounts.List.S1_0_3SubAccountsList
- Network.Google.Resource.DFAReporting.SubAccounts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.SubAccounts.List.S1_0_4SubAccountsList
- Network.Google.Resource.DFAReporting.SubAccounts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.SubAccounts.List.S1_0_5SubAccountsList
- Network.Google.Resource.DFAReporting.SubAccounts.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.SubAccounts.List.S1_0_6SubAccountsList
- Network.Google.Resource.DFAReporting.SubAccounts.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.SubAccounts.Patch.C1_0SubAccountsPatch
- Network.Google.Resource.DFAReporting.SubAccounts.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.SubAccounts.Patch.D1SubAccountsPatch
- Network.Google.Resource.DFAReporting.SubAccounts.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.SubAccounts.Patch.S1_0_0SubAccountsPatch
- Network.Google.Resource.DFAReporting.SubAccounts.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.SubAccounts.Patch.S1_0_1SubAccountsPatch
- Network.Google.Resource.DFAReporting.SubAccounts.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.SubAccounts.Patch.S1_0_2SubAccountsPatch
- Network.Google.Resource.DFAReporting.SubAccounts.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.SubAccounts.Update.C1_0SubAccountsUpdate
- Network.Google.Resource.DFAReporting.SubAccounts.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.SubAccounts.Update.D1SubAccountsUpdate
- Network.Google.Resource.DFAReporting.SubAccounts.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.SubAccounts.Update.S1_0_0SubAccountsUpdate
- Network.Google.Resource.DFAReporting.SubAccounts.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.SubAccounts.Update.S1_0_1SubAccountsUpdate
- Network.Google.Resource.DFAReporting.TargetableRemarketingLists.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.TargetableRemarketingLists.Get.C1_0TargetableRemarketingListsGet
- Network.Google.Resource.DFAReporting.TargetableRemarketingLists.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.TargetableRemarketingLists.Get.D1TargetableRemarketingListsGet
- Network.Google.Resource.DFAReporting.TargetableRemarketingLists.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.TargetableRemarketingLists.Get.S1_0_0TargetableRemarketingListsGet
- Network.Google.Resource.DFAReporting.TargetableRemarketingLists.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.TargetableRemarketingLists.Get.S1_0_1TargetableRemarketingListsGet
- Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List.C1_0TargetableRemarketingListsList
- Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List.D1TargetableRemarketingListsList
- Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List.S1_0_0TargetableRemarketingListsList
- Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List.S1_0_1TargetableRemarketingListsList
- Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List.S1_0_2TargetableRemarketingListsList
- Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List.S1_0_3TargetableRemarketingListsList
- Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List.S1_0_4TargetableRemarketingListsList
- Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List.S1_0_5TargetableRemarketingListsList
- Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List.S1_0_6TargetableRemarketingListsList
- Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List.S1_0_7TargetableRemarketingListsList
- Network.Google.Resource.DFAReporting.UserProFiles.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.UserProFiles.Get.C1_0UserProFilesGet
- Network.Google.Resource.DFAReporting.UserProFiles.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.UserProFiles.Get.D1UserProFilesGet
- Network.Google.Resource.DFAReporting.UserProFiles.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserProFiles.Get.S1_0_0UserProFilesGet
- Network.Google.Resource.DFAReporting.UserProFiles.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.UserProFiles.List.C1_0UserProFilesList
- Network.Google.Resource.DFAReporting.UserProFiles.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.UserProFiles.List.D1UserProFilesList
- Network.Google.Resource.DFAReporting.UserRolePermissionGroups.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.UserRolePermissionGroups.Get.C1_0UserRolePermissionGroupsGet
- Network.Google.Resource.DFAReporting.UserRolePermissionGroups.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.UserRolePermissionGroups.Get.D1UserRolePermissionGroupsGet
- Network.Google.Resource.DFAReporting.UserRolePermissionGroups.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRolePermissionGroups.Get.S1_0_0UserRolePermissionGroupsGet
- Network.Google.Resource.DFAReporting.UserRolePermissionGroups.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRolePermissionGroups.Get.S1_0_1UserRolePermissionGroupsGet
- Network.Google.Resource.DFAReporting.UserRolePermissionGroups.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.UserRolePermissionGroups.List.C1_0UserRolePermissionGroupsList
- Network.Google.Resource.DFAReporting.UserRolePermissionGroups.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.UserRolePermissionGroups.List.D1UserRolePermissionGroupsList
- Network.Google.Resource.DFAReporting.UserRolePermissionGroups.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRolePermissionGroups.List.S1_0_0UserRolePermissionGroupsList
- Network.Google.Resource.DFAReporting.UserRolePermissions.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.UserRolePermissions.Get.C1_0UserRolePermissionsGet
- Network.Google.Resource.DFAReporting.UserRolePermissions.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.UserRolePermissions.Get.D1UserRolePermissionsGet
- Network.Google.Resource.DFAReporting.UserRolePermissions.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRolePermissions.Get.S1_0_0UserRolePermissionsGet
- Network.Google.Resource.DFAReporting.UserRolePermissions.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRolePermissions.Get.S1_0_1UserRolePermissionsGet
- Network.Google.Resource.DFAReporting.UserRolePermissions.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.UserRolePermissions.List.C1_0UserRolePermissionsList
- Network.Google.Resource.DFAReporting.UserRolePermissions.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.UserRolePermissions.List.D1UserRolePermissionsList
- Network.Google.Resource.DFAReporting.UserRolePermissions.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRolePermissions.List.S1_0_0UserRolePermissionsList
- Network.Google.Resource.DFAReporting.UserRolePermissions.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRolePermissions.List.S1_0_1UserRolePermissionsList
- Network.Google.Resource.DFAReporting.UserRoles.Delete: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.UserRoles.Delete.C1_0UserRolesDelete
- Network.Google.Resource.DFAReporting.UserRoles.Delete: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.UserRoles.Delete.D1UserRolesDelete
- Network.Google.Resource.DFAReporting.UserRoles.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.Delete.S1_0_0UserRolesDelete
- Network.Google.Resource.DFAReporting.UserRoles.Delete: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.Delete.S1_0_1UserRolesDelete
- Network.Google.Resource.DFAReporting.UserRoles.Get: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.UserRoles.Get.C1_0UserRolesGet
- Network.Google.Resource.DFAReporting.UserRoles.Get: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.UserRoles.Get.D1UserRolesGet
- Network.Google.Resource.DFAReporting.UserRoles.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.Get.S1_0_0UserRolesGet
- Network.Google.Resource.DFAReporting.UserRoles.Get: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.Get.S1_0_1UserRolesGet
- Network.Google.Resource.DFAReporting.UserRoles.Insert: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.UserRoles.Insert.C1_0UserRolesInsert
- Network.Google.Resource.DFAReporting.UserRoles.Insert: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.UserRoles.Insert.D1UserRolesInsert
- Network.Google.Resource.DFAReporting.UserRoles.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.Insert.S1_0_0UserRolesInsert
- Network.Google.Resource.DFAReporting.UserRoles.Insert: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.Insert.S1_0_1UserRolesInsert
- Network.Google.Resource.DFAReporting.UserRoles.List: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.UserRoles.List.C1_0UserRolesList
- Network.Google.Resource.DFAReporting.UserRoles.List: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.UserRoles.List.D1UserRolesList
- Network.Google.Resource.DFAReporting.UserRoles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.List.S1_0_0UserRolesList
- Network.Google.Resource.DFAReporting.UserRoles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.List.S1_0_1UserRolesList
- Network.Google.Resource.DFAReporting.UserRoles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.List.S1_0_2UserRolesList
- Network.Google.Resource.DFAReporting.UserRoles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.List.S1_0_3UserRolesList
- Network.Google.Resource.DFAReporting.UserRoles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.List.S1_0_4UserRolesList
- Network.Google.Resource.DFAReporting.UserRoles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.List.S1_0_5UserRolesList
- Network.Google.Resource.DFAReporting.UserRoles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.List.S1_0_6UserRolesList
- Network.Google.Resource.DFAReporting.UserRoles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.List.S1_0_7UserRolesList
- Network.Google.Resource.DFAReporting.UserRoles.List: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.List.S1_0_8UserRolesList
- Network.Google.Resource.DFAReporting.UserRoles.Patch: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.UserRoles.Patch.C1_0UserRolesPatch
- Network.Google.Resource.DFAReporting.UserRoles.Patch: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.UserRoles.Patch.D1UserRolesPatch
- Network.Google.Resource.DFAReporting.UserRoles.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.Patch.S1_0_0UserRolesPatch
- Network.Google.Resource.DFAReporting.UserRoles.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.Patch.S1_0_1UserRolesPatch
- Network.Google.Resource.DFAReporting.UserRoles.Patch: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.Patch.S1_0_2UserRolesPatch
- Network.Google.Resource.DFAReporting.UserRoles.Update: instance GHC.Generics.Constructor Network.Google.Resource.DFAReporting.UserRoles.Update.C1_0UserRolesUpdate
- Network.Google.Resource.DFAReporting.UserRoles.Update: instance GHC.Generics.Datatype Network.Google.Resource.DFAReporting.UserRoles.Update.D1UserRolesUpdate
- Network.Google.Resource.DFAReporting.UserRoles.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.Update.S1_0_0UserRolesUpdate
- Network.Google.Resource.DFAReporting.UserRoles.Update: instance GHC.Generics.Selector Network.Google.Resource.DFAReporting.UserRoles.Update.S1_0_1UserRolesUpdate
+ Network.Google.DFAReporting: ACDisplay :: AdCompatibility
+ Network.Google.DFAReporting: ACDisplayInterstitial :: AdCompatibility
+ Network.Google.DFAReporting: ALCDisplay :: AdsListCompatibility
+ Network.Google.DFAReporting: ALCDisplayInterstitial :: AdsListCompatibility
+ Network.Google.DFAReporting: ALCTCustomDisplay :: AdsListCreativeType
+ Network.Google.DFAReporting: ALCTCustomDisplayInterstitial :: AdsListCreativeType
+ Network.Google.DFAReporting: ALCTDisplay :: AdsListCreativeType
+ Network.Google.DFAReporting: ALCTDisplayImageGallery :: AdsListCreativeType
+ Network.Google.DFAReporting: ALCTDisplayRedirect :: AdsListCreativeType
+ Network.Google.DFAReporting: ALCTInstreamVideoRedirect :: AdsListCreativeType
+ Network.Google.DFAReporting: ALCTRichMediaDisplayBanner :: AdsListCreativeType
+ Network.Google.DFAReporting: ALCTRichMediaDisplayExpanding :: AdsListCreativeType
+ Network.Google.DFAReporting: ALCTRichMediaDisplayInterstitial :: AdsListCreativeType
+ Network.Google.DFAReporting: ALCTRichMediaDisplayMultiFloatingInterstitial :: AdsListCreativeType
+ Network.Google.DFAReporting: ALCTVpaidLinearVideo :: AdsListCreativeType
+ Network.Google.DFAReporting: ALCTVpaidNonLinearVideo :: AdsListCreativeType
+ Network.Google.DFAReporting: ASCApp :: AdSlotCompatibility
+ Network.Google.DFAReporting: ASCAppInterstitial :: AdSlotCompatibility
+ Network.Google.DFAReporting: ASCDisplay :: AdSlotCompatibility
+ Network.Google.DFAReporting: ASCDisplayInterstitial :: AdSlotCompatibility
+ Network.Google.DFAReporting: ASCInStreamVideo :: AdSlotCompatibility
+ Network.Google.DFAReporting: AdServing :: EncryptionInfoEncryptionSource
+ Network.Google.DFAReporting: AdwordsCustomer :: EncryptionInfoEncryptionEntityType
+ Network.Google.DFAReporting: ArtworkTypeImage :: CreativeCustomEventArtworkType
+ Network.Google.DFAReporting: CAATArtworkTypeImage :: CreativeAssetArtworkType
+ Network.Google.DFAReporting: CATArtworkTypeImage :: CreativeArtworkType
+ Network.Google.DFAReporting: CCIDisplay :: CreativeCompatibilityItem
+ Network.Google.DFAReporting: CCIDisplayInterstitial :: CreativeCompatibilityItem
+ Network.Google.DFAReporting: CLLOTObjectAccount :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectAccountBillingFeature :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectAd :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectAdvertiser :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectAdvertiserGroup :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectBillingAccountGroup :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectBillingFeature :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectBillingMinimumFee :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectBillingProFile :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectCampaign :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectContentCategory :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectCreative :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectCreativeAsset :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectCreativeBundle :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectCreativeField :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectCreativeGroup :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectDfaSite :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectEventTag :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectFloodlightActivityGroup :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectFloodlightActvity :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectFloodlightConfiguration :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectInstreamCreative :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectLandingPage :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectMediaOrder :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectPlacement :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectPlacementStrategy :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectPlaystoreLink :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectProvidedListClient :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectRateCard :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectRemarketingList :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectRichmediaCreative :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectSdSite :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectSize :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectSubAccount :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectUserProFile :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectUserProFileFilter :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLLOTObjectUserRole :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: CLTBrandSafeDefaultInstreamVideo :: CreativesListTypes
+ Network.Google.DFAReporting: CLTCustomDisplay :: CreativesListTypes
+ Network.Google.DFAReporting: CLTCustomDisplayInterstitial :: CreativesListTypes
+ Network.Google.DFAReporting: CLTDisplay :: CreativesListTypes
+ Network.Google.DFAReporting: CLTDisplayImageGallery :: CreativesListTypes
+ Network.Google.DFAReporting: CLTDisplayRedirect :: CreativesListTypes
+ Network.Google.DFAReporting: CLTFlashInpage :: CreativesListTypes
+ Network.Google.DFAReporting: CLTHTML5Banner :: CreativesListTypes
+ Network.Google.DFAReporting: CLTImage :: CreativesListTypes
+ Network.Google.DFAReporting: CLTInstreamVideo :: CreativesListTypes
+ Network.Google.DFAReporting: CLTInstreamVideoRedirect :: CreativesListTypes
+ Network.Google.DFAReporting: CLTInternalRedirect :: CreativesListTypes
+ Network.Google.DFAReporting: CLTInterstitialInternalRedirect :: CreativesListTypes
+ Network.Google.DFAReporting: CLTRichMediaDisplayBanner :: CreativesListTypes
+ Network.Google.DFAReporting: CLTRichMediaDisplayExpanding :: CreativesListTypes
+ Network.Google.DFAReporting: CLTRichMediaDisplayInterstitial :: CreativesListTypes
+ Network.Google.DFAReporting: CLTRichMediaDisplayMultiFloatingInterstitial :: CreativesListTypes
+ Network.Google.DFAReporting: CLTRichMediaImExpand :: CreativesListTypes
+ Network.Google.DFAReporting: CLTRichMediaInpageFloating :: CreativesListTypes
+ Network.Google.DFAReporting: CLTRichMediaMobileInApp :: CreativesListTypes
+ Network.Google.DFAReporting: CLTRichMediaPeelDown :: CreativesListTypes
+ Network.Google.DFAReporting: CLTTrackingText :: CreativesListTypes
+ Network.Google.DFAReporting: CLTVpaidLinearVideo :: CreativesListTypes
+ Network.Google.DFAReporting: CLTVpaidNonLinearVideo :: CreativesListTypes
+ Network.Google.DFAReporting: CTCustomDisplay :: CreativeType
+ Network.Google.DFAReporting: CTCustomDisplayInterstitial :: CreativeType
+ Network.Google.DFAReporting: CTDisplay :: CreativeType
+ Network.Google.DFAReporting: CTDisplayImageGallery :: CreativeType
+ Network.Google.DFAReporting: CTDisplayRedirect :: CreativeType
+ Network.Google.DFAReporting: CTInstreamVideoRedirect :: CreativeType
+ Network.Google.DFAReporting: CTRichMediaDisplayBanner :: CreativeType
+ Network.Google.DFAReporting: CTRichMediaDisplayExpanding :: CreativeType
+ Network.Google.DFAReporting: CTRichMediaDisplayInterstitial :: CreativeType
+ Network.Google.DFAReporting: CTRichMediaDisplayMultiFloatingInterstitial :: CreativeType
+ Network.Google.DFAReporting: CTVpaidLinearVideo :: CreativeType
+ Network.Google.DFAReporting: CTVpaidNonLinearVideo :: CreativeType
+ Network.Google.DFAReporting: ClickTagHardCoded :: CreativeAssetMetadataWarnedValidationRulesItem
+ Network.Google.DFAReporting: ClickTagInGwd :: CreativeAssetMetadataWarnedValidationRulesItem
+ Network.Google.DFAReporting: CreativeAuthoringSourceDBm :: CreativeAuthoringSource
+ Network.Google.DFAReporting: CreativeAuthoringSourceDcm :: CreativeAuthoringSource
+ Network.Google.DFAReporting: CreativeAuthoringSourceStudio :: CreativeAuthoringSource
+ Network.Google.DFAReporting: DBmAdvertiser :: EncryptionInfoEncryptionEntityType
+ Network.Google.DFAReporting: DBmPartner :: EncryptionInfoEncryptionEntityType
+ Network.Google.DFAReporting: DTKDOTObjectAd :: DynamicTargetingKeysDeleteObjectType
+ Network.Google.DFAReporting: DTKDOTObjectAdvertiser :: DynamicTargetingKeysDeleteObjectType
+ Network.Google.DFAReporting: DTKDOTObjectCreative :: DynamicTargetingKeysDeleteObjectType
+ Network.Google.DFAReporting: DTKDOTObjectPlacement :: DynamicTargetingKeysDeleteObjectType
+ Network.Google.DFAReporting: DTKOTObjectAd :: DynamicTargetingKeyObjectType
+ Network.Google.DFAReporting: DTKOTObjectAdvertiser :: DynamicTargetingKeyObjectType
+ Network.Google.DFAReporting: DTKOTObjectCreative :: DynamicTargetingKeyObjectType
+ Network.Google.DFAReporting: DTKOTObjectPlacement :: DynamicTargetingKeyObjectType
+ Network.Google.DFAReporting: DataTransfer :: EncryptionInfoEncryptionSource
+ Network.Google.DFAReporting: DcmAccount :: EncryptionInfoEncryptionEntityType
+ Network.Google.DFAReporting: DcmAdvertiser :: EncryptionInfoEncryptionEntityType
+ Network.Google.DFAReporting: Display :: PlacementCompatibility
+ Network.Google.DFAReporting: DisplayInterstitial :: PlacementCompatibility
+ Network.Google.DFAReporting: EncryptionEntityTypeUnknown :: EncryptionInfoEncryptionEntityType
+ Network.Google.DFAReporting: EncryptionScopeUnknown :: EncryptionInfoEncryptionSource
+ Network.Google.DFAReporting: IITPlanningPlacementTypeCredit :: InventoryItemType
+ Network.Google.DFAReporting: IITPlanningPlacementTypeRegular :: InventoryItemType
+ Network.Google.DFAReporting: Internal :: ConversionErrorCode
+ Network.Google.DFAReporting: InvalidArgument :: ConversionErrorCode
+ Network.Google.DFAReporting: NotFound :: ConversionErrorCode
+ Network.Google.DFAReporting: PLCDisplay :: PlacementsListCompatibilities
+ Network.Google.DFAReporting: PLCDisplayInterstitial :: PlacementsListCompatibilities
+ Network.Google.DFAReporting: PermissionDenied :: ConversionErrorCode
+ Network.Google.DFAReporting: PlanningPlacementTypeCredit :: InventoryItemsListType
+ Network.Google.DFAReporting: PlanningPlacementTypeRegular :: InventoryItemsListType
+ Network.Google.DFAReporting: RLLSRemarketingListSourceAdx :: RemarketingListListSource
+ Network.Google.DFAReporting: RLLSRemarketingListSourceDfp :: RemarketingListListSource
+ Network.Google.DFAReporting: RLLSRemarketingListSourceGplus :: RemarketingListListSource
+ Network.Google.DFAReporting: RLLSRemarketingListSourcePlayStore :: RemarketingListListSource
+ Network.Google.DFAReporting: RLLSRemarketingListSourceXfp :: RemarketingListListSource
+ Network.Google.DFAReporting: RLLSRemarketingListSourceYouTube :: RemarketingListListSource
+ Network.Google.DFAReporting: ReadOnlySuperUser :: AccountUserProFileUserAccessType
+ Network.Google.DFAReporting: RemarketingListSourceAdx :: TargetableRemarketingListListSource
+ Network.Google.DFAReporting: RemarketingListSourceDfp :: TargetableRemarketingListListSource
+ Network.Google.DFAReporting: RemarketingListSourceGplus :: TargetableRemarketingListListSource
+ Network.Google.DFAReporting: RemarketingListSourcePlayStore :: TargetableRemarketingListListSource
+ Network.Google.DFAReporting: RemarketingListSourceXfp :: TargetableRemarketingListListSource
+ Network.Google.DFAReporting: RemarketingListSourceYouTube :: TargetableRemarketingListListSource
+ Network.Google.DFAReporting: SvgInvalid :: CreativeAssetMetadataWarnedValidationRulesItem
+ Network.Google.DFAReporting: UDVCVTU1 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU10 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU11 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU12 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU13 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU14 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU15 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU16 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU17 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU18 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU19 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU2 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU20 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU3 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU4 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU5 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU6 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU7 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU8 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: UDVCVTU9 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: VideoCompletion :: CreativeOptimizationConfigurationOptimizationModel
+ Network.Google.DFAReporting: VideoProgress :: ThirdPartyTrackingURLThirdPartyURLType
+ Network.Google.DFAReporting: VideoSkip :: ThirdPartyTrackingURLThirdPartyURLType
+ Network.Google.DFAReporting: cbirConversions :: Lens' ConversionsBatchInsertRequest [Conversion]
+ Network.Google.DFAReporting: cbirEncryptionInfo :: Lens' ConversionsBatchInsertRequest (Maybe EncryptionInfo)
+ Network.Google.DFAReporting: cbirKind :: Lens' ConversionsBatchInsertRequest Text
+ Network.Google.DFAReporting: cbirbHasFailures :: Lens' ConversionsBatchInsertResponse (Maybe Bool)
+ Network.Google.DFAReporting: cbirbKind :: Lens' ConversionsBatchInsertResponse Text
+ Network.Google.DFAReporting: cbirbStatus :: Lens' ConversionsBatchInsertResponse [ConversionStatus]
+ Network.Google.DFAReporting: cceAdvertiserCustomEventId :: Lens' CreativeCustomEvent (Maybe Int64)
+ Network.Google.DFAReporting: ceCode :: Lens' ConversionError (Maybe ConversionErrorCode)
+ Network.Google.DFAReporting: ceKind :: Lens' ConversionError Text
+ Network.Google.DFAReporting: ceMessage :: Lens' ConversionError (Maybe Text)
+ Network.Google.DFAReporting: conoChildDirectedTreatment :: Lens' Conversion (Maybe Bool)
+ Network.Google.DFAReporting: conoCustomVariables :: Lens' Conversion [CustomFloodlightVariable]
+ Network.Google.DFAReporting: conoEncryptedUserId :: Lens' Conversion (Maybe Text)
+ Network.Google.DFAReporting: conoFloodlightActivityId :: Lens' Conversion (Maybe Int64)
+ Network.Google.DFAReporting: conoFloodlightConfigurationId :: Lens' Conversion (Maybe Int64)
+ Network.Google.DFAReporting: conoKind :: Lens' Conversion Text
+ Network.Google.DFAReporting: conoLimitAdTracking :: Lens' Conversion (Maybe Bool)
+ Network.Google.DFAReporting: conoMobileDeviceId :: Lens' Conversion (Maybe Text)
+ Network.Google.DFAReporting: conoOrdinal :: Lens' Conversion (Maybe Text)
+ Network.Google.DFAReporting: conoQuantity :: Lens' Conversion (Maybe Int64)
+ Network.Google.DFAReporting: conoTimestampMicros :: Lens' Conversion (Maybe Int64)
+ Network.Google.DFAReporting: conoValue :: Lens' Conversion (Maybe Double)
+ Network.Google.DFAReporting: conversion :: Conversion
+ Network.Google.DFAReporting: conversionError :: ConversionError
+ Network.Google.DFAReporting: conversionStatus :: ConversionStatus
+ Network.Google.DFAReporting: conversionsBatchInsertRequest :: ConversionsBatchInsertRequest
+ Network.Google.DFAReporting: conversionsBatchInsertResponse :: ConversionsBatchInsertResponse
+ Network.Google.DFAReporting: creAuthoringSource :: Lens' Creative (Maybe CreativeAuthoringSource)
+ Network.Google.DFAReporting: csConversion :: Lens' ConversionStatus (Maybe Conversion)
+ Network.Google.DFAReporting: csErrors :: Lens' ConversionStatus [ConversionError]
+ Network.Google.DFAReporting: csKind :: Lens' ConversionStatus Text
+ Network.Google.DFAReporting: cusKind :: Lens' CustomFloodlightVariable Text
+ Network.Google.DFAReporting: cusType :: Lens' CustomFloodlightVariable (Maybe CustomFloodlightVariableType)
+ Network.Google.DFAReporting: cusValue :: Lens' CustomFloodlightVariable (Maybe Text)
+ Network.Google.DFAReporting: customFloodlightVariable :: CustomFloodlightVariable
+ Network.Google.DFAReporting: dFAReportingScope :: Proxy '["https://www.googleapis.com/auth/dfareporting"]
+ Network.Google.DFAReporting: data Conversion
+ Network.Google.DFAReporting: data ConversionError
+ Network.Google.DFAReporting: data ConversionErrorCode
+ Network.Google.DFAReporting: data ConversionStatus
+ Network.Google.DFAReporting: data ConversionsBatchInsertRequest
+ Network.Google.DFAReporting: data ConversionsBatchInsertResponse
+ Network.Google.DFAReporting: data CreativeAuthoringSource
+ Network.Google.DFAReporting: data CustomFloodlightVariable
+ Network.Google.DFAReporting: data CustomFloodlightVariableType
+ Network.Google.DFAReporting: data DynamicTargetingKey
+ Network.Google.DFAReporting: data DynamicTargetingKeyObjectType
+ Network.Google.DFAReporting: data DynamicTargetingKeysDeleteObjectType
+ Network.Google.DFAReporting: data DynamicTargetingKeysListObjectType
+ Network.Google.DFAReporting: data DynamicTargetingKeysListResponse
+ Network.Google.DFAReporting: data EncryptionInfo
+ Network.Google.DFAReporting: data EncryptionInfoEncryptionEntityType
+ Network.Google.DFAReporting: data EncryptionInfoEncryptionSource
+ Network.Google.DFAReporting: data InventoryItemType
+ Network.Google.DFAReporting: data InventoryItemsListType
+ Network.Google.DFAReporting: ddmconversionsScope :: Proxy '["https://www.googleapis.com/auth/ddmconversions"]
+ Network.Google.DFAReporting: dfatraffickingScope :: Proxy '["https://www.googleapis.com/auth/dfatrafficking"]
+ Network.Google.DFAReporting: dtkKind :: Lens' DynamicTargetingKey Text
+ Network.Google.DFAReporting: dtkName :: Lens' DynamicTargetingKey (Maybe Text)
+ Network.Google.DFAReporting: dtkObjectId :: Lens' DynamicTargetingKey (Maybe Int64)
+ Network.Google.DFAReporting: dtkObjectType :: Lens' DynamicTargetingKey (Maybe DynamicTargetingKeyObjectType)
+ Network.Google.DFAReporting: dtklrDynamicTargetingKeys :: Lens' DynamicTargetingKeysListResponse [DynamicTargetingKey]
+ Network.Google.DFAReporting: dtklrKind :: Lens' DynamicTargetingKeysListResponse Text
+ Network.Google.DFAReporting: dynamicTargetingKey :: DynamicTargetingKey
+ Network.Google.DFAReporting: dynamicTargetingKeysListResponse :: DynamicTargetingKeysListResponse
+ Network.Google.DFAReporting: eiEncryptionEntityId :: Lens' EncryptionInfo (Maybe Int64)
+ Network.Google.DFAReporting: eiEncryptionEntityType :: Lens' EncryptionInfo (Maybe EncryptionInfoEncryptionEntityType)
+ Network.Google.DFAReporting: eiEncryptionSource :: Lens' EncryptionInfo (Maybe EncryptionInfoEncryptionSource)
+ Network.Google.DFAReporting: eiKind :: Lens' EncryptionInfo Text
+ Network.Google.DFAReporting: encryptionInfo :: EncryptionInfo
+ Network.Google.DFAReporting: iiType :: Lens' InventoryItem (Maybe InventoryItemType)
+ Network.Google.DFAReporting: ssVideoActiveViewOptOut :: Lens' SiteSettings (Maybe Bool)
+ Network.Google.DFAReporting.Types: ACDisplay :: AdCompatibility
+ Network.Google.DFAReporting.Types: ACDisplayInterstitial :: AdCompatibility
+ Network.Google.DFAReporting.Types: ALCDisplay :: AdsListCompatibility
+ Network.Google.DFAReporting.Types: ALCDisplayInterstitial :: AdsListCompatibility
+ Network.Google.DFAReporting.Types: ALCTCustomDisplay :: AdsListCreativeType
+ Network.Google.DFAReporting.Types: ALCTCustomDisplayInterstitial :: AdsListCreativeType
+ Network.Google.DFAReporting.Types: ALCTDisplay :: AdsListCreativeType
+ Network.Google.DFAReporting.Types: ALCTDisplayImageGallery :: AdsListCreativeType
+ Network.Google.DFAReporting.Types: ALCTDisplayRedirect :: AdsListCreativeType
+ Network.Google.DFAReporting.Types: ALCTInstreamVideoRedirect :: AdsListCreativeType
+ Network.Google.DFAReporting.Types: ALCTRichMediaDisplayBanner :: AdsListCreativeType
+ Network.Google.DFAReporting.Types: ALCTRichMediaDisplayExpanding :: AdsListCreativeType
+ Network.Google.DFAReporting.Types: ALCTRichMediaDisplayInterstitial :: AdsListCreativeType
+ Network.Google.DFAReporting.Types: ALCTRichMediaDisplayMultiFloatingInterstitial :: AdsListCreativeType
+ Network.Google.DFAReporting.Types: ALCTVpaidLinearVideo :: AdsListCreativeType
+ Network.Google.DFAReporting.Types: ALCTVpaidNonLinearVideo :: AdsListCreativeType
+ Network.Google.DFAReporting.Types: ASCApp :: AdSlotCompatibility
+ Network.Google.DFAReporting.Types: ASCAppInterstitial :: AdSlotCompatibility
+ Network.Google.DFAReporting.Types: ASCDisplay :: AdSlotCompatibility
+ Network.Google.DFAReporting.Types: ASCDisplayInterstitial :: AdSlotCompatibility
+ Network.Google.DFAReporting.Types: ASCInStreamVideo :: AdSlotCompatibility
+ Network.Google.DFAReporting.Types: AdServing :: EncryptionInfoEncryptionSource
+ Network.Google.DFAReporting.Types: AdwordsCustomer :: EncryptionInfoEncryptionEntityType
+ Network.Google.DFAReporting.Types: ArtworkTypeImage :: CreativeCustomEventArtworkType
+ Network.Google.DFAReporting.Types: CAATArtworkTypeImage :: CreativeAssetArtworkType
+ Network.Google.DFAReporting.Types: CATArtworkTypeImage :: CreativeArtworkType
+ Network.Google.DFAReporting.Types: CCIDisplay :: CreativeCompatibilityItem
+ Network.Google.DFAReporting.Types: CCIDisplayInterstitial :: CreativeCompatibilityItem
+ Network.Google.DFAReporting.Types: CLLOTObjectAccount :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectAccountBillingFeature :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectAd :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectAdvertiser :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectAdvertiserGroup :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectBillingAccountGroup :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectBillingFeature :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectBillingMinimumFee :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectBillingProFile :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectCampaign :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectContentCategory :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectCreative :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectCreativeAsset :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectCreativeBundle :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectCreativeField :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectCreativeGroup :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectDfaSite :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectEventTag :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectFloodlightActivityGroup :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectFloodlightActvity :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectFloodlightConfiguration :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectInstreamCreative :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectLandingPage :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectMediaOrder :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectPlacement :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectPlacementStrategy :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectPlaystoreLink :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectProvidedListClient :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectRateCard :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectRemarketingList :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectRichmediaCreative :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectSdSite :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectSize :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectSubAccount :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectUserProFile :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectUserProFileFilter :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLLOTObjectUserRole :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: CLTBrandSafeDefaultInstreamVideo :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTCustomDisplay :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTCustomDisplayInterstitial :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTDisplay :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTDisplayImageGallery :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTDisplayRedirect :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTFlashInpage :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTHTML5Banner :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTImage :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTInstreamVideo :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTInstreamVideoRedirect :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTInternalRedirect :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTInterstitialInternalRedirect :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTRichMediaDisplayBanner :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTRichMediaDisplayExpanding :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTRichMediaDisplayInterstitial :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTRichMediaDisplayMultiFloatingInterstitial :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTRichMediaImExpand :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTRichMediaInpageFloating :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTRichMediaMobileInApp :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTRichMediaPeelDown :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTTrackingText :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTVpaidLinearVideo :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CLTVpaidNonLinearVideo :: CreativesListTypes
+ Network.Google.DFAReporting.Types: CTCustomDisplay :: CreativeType
+ Network.Google.DFAReporting.Types: CTCustomDisplayInterstitial :: CreativeType
+ Network.Google.DFAReporting.Types: CTDisplay :: CreativeType
+ Network.Google.DFAReporting.Types: CTDisplayImageGallery :: CreativeType
+ Network.Google.DFAReporting.Types: CTDisplayRedirect :: CreativeType
+ Network.Google.DFAReporting.Types: CTInstreamVideoRedirect :: CreativeType
+ Network.Google.DFAReporting.Types: CTRichMediaDisplayBanner :: CreativeType
+ Network.Google.DFAReporting.Types: CTRichMediaDisplayExpanding :: CreativeType
+ Network.Google.DFAReporting.Types: CTRichMediaDisplayInterstitial :: CreativeType
+ Network.Google.DFAReporting.Types: CTRichMediaDisplayMultiFloatingInterstitial :: CreativeType
+ Network.Google.DFAReporting.Types: CTVpaidLinearVideo :: CreativeType
+ Network.Google.DFAReporting.Types: CTVpaidNonLinearVideo :: CreativeType
+ Network.Google.DFAReporting.Types: ClickTagHardCoded :: CreativeAssetMetadataWarnedValidationRulesItem
+ Network.Google.DFAReporting.Types: ClickTagInGwd :: CreativeAssetMetadataWarnedValidationRulesItem
+ Network.Google.DFAReporting.Types: CreativeAuthoringSourceDBm :: CreativeAuthoringSource
+ Network.Google.DFAReporting.Types: CreativeAuthoringSourceDcm :: CreativeAuthoringSource
+ Network.Google.DFAReporting.Types: CreativeAuthoringSourceStudio :: CreativeAuthoringSource
+ Network.Google.DFAReporting.Types: DBmAdvertiser :: EncryptionInfoEncryptionEntityType
+ Network.Google.DFAReporting.Types: DBmPartner :: EncryptionInfoEncryptionEntityType
+ Network.Google.DFAReporting.Types: DTKDOTObjectAd :: DynamicTargetingKeysDeleteObjectType
+ Network.Google.DFAReporting.Types: DTKDOTObjectAdvertiser :: DynamicTargetingKeysDeleteObjectType
+ Network.Google.DFAReporting.Types: DTKDOTObjectCreative :: DynamicTargetingKeysDeleteObjectType
+ Network.Google.DFAReporting.Types: DTKDOTObjectPlacement :: DynamicTargetingKeysDeleteObjectType
+ Network.Google.DFAReporting.Types: DTKOTObjectAd :: DynamicTargetingKeyObjectType
+ Network.Google.DFAReporting.Types: DTKOTObjectAdvertiser :: DynamicTargetingKeyObjectType
+ Network.Google.DFAReporting.Types: DTKOTObjectCreative :: DynamicTargetingKeyObjectType
+ Network.Google.DFAReporting.Types: DTKOTObjectPlacement :: DynamicTargetingKeyObjectType
+ Network.Google.DFAReporting.Types: DataTransfer :: EncryptionInfoEncryptionSource
+ Network.Google.DFAReporting.Types: DcmAccount :: EncryptionInfoEncryptionEntityType
+ Network.Google.DFAReporting.Types: DcmAdvertiser :: EncryptionInfoEncryptionEntityType
+ Network.Google.DFAReporting.Types: Display :: PlacementCompatibility
+ Network.Google.DFAReporting.Types: DisplayInterstitial :: PlacementCompatibility
+ Network.Google.DFAReporting.Types: EncryptionEntityTypeUnknown :: EncryptionInfoEncryptionEntityType
+ Network.Google.DFAReporting.Types: EncryptionScopeUnknown :: EncryptionInfoEncryptionSource
+ Network.Google.DFAReporting.Types: IITPlanningPlacementTypeCredit :: InventoryItemType
+ Network.Google.DFAReporting.Types: IITPlanningPlacementTypeRegular :: InventoryItemType
+ Network.Google.DFAReporting.Types: Internal :: ConversionErrorCode
+ Network.Google.DFAReporting.Types: InvalidArgument :: ConversionErrorCode
+ Network.Google.DFAReporting.Types: NotFound :: ConversionErrorCode
+ Network.Google.DFAReporting.Types: PLCDisplay :: PlacementsListCompatibilities
+ Network.Google.DFAReporting.Types: PLCDisplayInterstitial :: PlacementsListCompatibilities
+ Network.Google.DFAReporting.Types: PermissionDenied :: ConversionErrorCode
+ Network.Google.DFAReporting.Types: PlanningPlacementTypeCredit :: InventoryItemsListType
+ Network.Google.DFAReporting.Types: PlanningPlacementTypeRegular :: InventoryItemsListType
+ Network.Google.DFAReporting.Types: RLLSRemarketingListSourceAdx :: RemarketingListListSource
+ Network.Google.DFAReporting.Types: RLLSRemarketingListSourceDfp :: RemarketingListListSource
+ Network.Google.DFAReporting.Types: RLLSRemarketingListSourceGplus :: RemarketingListListSource
+ Network.Google.DFAReporting.Types: RLLSRemarketingListSourcePlayStore :: RemarketingListListSource
+ Network.Google.DFAReporting.Types: RLLSRemarketingListSourceXfp :: RemarketingListListSource
+ Network.Google.DFAReporting.Types: RLLSRemarketingListSourceYouTube :: RemarketingListListSource
+ Network.Google.DFAReporting.Types: ReadOnlySuperUser :: AccountUserProFileUserAccessType
+ Network.Google.DFAReporting.Types: RemarketingListSourceAdx :: TargetableRemarketingListListSource
+ Network.Google.DFAReporting.Types: RemarketingListSourceDfp :: TargetableRemarketingListListSource
+ Network.Google.DFAReporting.Types: RemarketingListSourceGplus :: TargetableRemarketingListListSource
+ Network.Google.DFAReporting.Types: RemarketingListSourcePlayStore :: TargetableRemarketingListListSource
+ Network.Google.DFAReporting.Types: RemarketingListSourceXfp :: TargetableRemarketingListListSource
+ Network.Google.DFAReporting.Types: RemarketingListSourceYouTube :: TargetableRemarketingListListSource
+ Network.Google.DFAReporting.Types: SvgInvalid :: CreativeAssetMetadataWarnedValidationRulesItem
+ Network.Google.DFAReporting.Types: UDVCVTU1 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU10 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU11 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU12 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU13 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU14 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU15 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU16 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU17 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU18 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU19 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU2 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU20 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU3 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU4 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU5 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU6 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU7 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU8 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: UDVCVTU9 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: VideoCompletion :: CreativeOptimizationConfigurationOptimizationModel
+ Network.Google.DFAReporting.Types: VideoProgress :: ThirdPartyTrackingURLThirdPartyURLType
+ Network.Google.DFAReporting.Types: VideoSkip :: ThirdPartyTrackingURLThirdPartyURLType
+ Network.Google.DFAReporting.Types: cbirConversions :: Lens' ConversionsBatchInsertRequest [Conversion]
+ Network.Google.DFAReporting.Types: cbirEncryptionInfo :: Lens' ConversionsBatchInsertRequest (Maybe EncryptionInfo)
+ Network.Google.DFAReporting.Types: cbirKind :: Lens' ConversionsBatchInsertRequest Text
+ Network.Google.DFAReporting.Types: cbirbHasFailures :: Lens' ConversionsBatchInsertResponse (Maybe Bool)
+ Network.Google.DFAReporting.Types: cbirbKind :: Lens' ConversionsBatchInsertResponse Text
+ Network.Google.DFAReporting.Types: cbirbStatus :: Lens' ConversionsBatchInsertResponse [ConversionStatus]
+ Network.Google.DFAReporting.Types: cceAdvertiserCustomEventId :: Lens' CreativeCustomEvent (Maybe Int64)
+ Network.Google.DFAReporting.Types: ceCode :: Lens' ConversionError (Maybe ConversionErrorCode)
+ Network.Google.DFAReporting.Types: ceKind :: Lens' ConversionError Text
+ Network.Google.DFAReporting.Types: ceMessage :: Lens' ConversionError (Maybe Text)
+ Network.Google.DFAReporting.Types: conoChildDirectedTreatment :: Lens' Conversion (Maybe Bool)
+ Network.Google.DFAReporting.Types: conoCustomVariables :: Lens' Conversion [CustomFloodlightVariable]
+ Network.Google.DFAReporting.Types: conoEncryptedUserId :: Lens' Conversion (Maybe Text)
+ Network.Google.DFAReporting.Types: conoFloodlightActivityId :: Lens' Conversion (Maybe Int64)
+ Network.Google.DFAReporting.Types: conoFloodlightConfigurationId :: Lens' Conversion (Maybe Int64)
+ Network.Google.DFAReporting.Types: conoKind :: Lens' Conversion Text
+ Network.Google.DFAReporting.Types: conoLimitAdTracking :: Lens' Conversion (Maybe Bool)
+ Network.Google.DFAReporting.Types: conoMobileDeviceId :: Lens' Conversion (Maybe Text)
+ Network.Google.DFAReporting.Types: conoOrdinal :: Lens' Conversion (Maybe Text)
+ Network.Google.DFAReporting.Types: conoQuantity :: Lens' Conversion (Maybe Int64)
+ Network.Google.DFAReporting.Types: conoTimestampMicros :: Lens' Conversion (Maybe Int64)
+ Network.Google.DFAReporting.Types: conoValue :: Lens' Conversion (Maybe Double)
+ Network.Google.DFAReporting.Types: conversion :: Conversion
+ Network.Google.DFAReporting.Types: conversionError :: ConversionError
+ Network.Google.DFAReporting.Types: conversionStatus :: ConversionStatus
+ Network.Google.DFAReporting.Types: conversionsBatchInsertRequest :: ConversionsBatchInsertRequest
+ Network.Google.DFAReporting.Types: conversionsBatchInsertResponse :: ConversionsBatchInsertResponse
+ Network.Google.DFAReporting.Types: creAuthoringSource :: Lens' Creative (Maybe CreativeAuthoringSource)
+ Network.Google.DFAReporting.Types: csConversion :: Lens' ConversionStatus (Maybe Conversion)
+ Network.Google.DFAReporting.Types: csErrors :: Lens' ConversionStatus [ConversionError]
+ Network.Google.DFAReporting.Types: csKind :: Lens' ConversionStatus Text
+ Network.Google.DFAReporting.Types: cusKind :: Lens' CustomFloodlightVariable Text
+ Network.Google.DFAReporting.Types: cusType :: Lens' CustomFloodlightVariable (Maybe CustomFloodlightVariableType)
+ Network.Google.DFAReporting.Types: cusValue :: Lens' CustomFloodlightVariable (Maybe Text)
+ Network.Google.DFAReporting.Types: customFloodlightVariable :: CustomFloodlightVariable
+ Network.Google.DFAReporting.Types: dFAReportingScope :: Proxy '["https://www.googleapis.com/auth/dfareporting"]
+ Network.Google.DFAReporting.Types: data Conversion
+ Network.Google.DFAReporting.Types: data ConversionError
+ Network.Google.DFAReporting.Types: data ConversionErrorCode
+ Network.Google.DFAReporting.Types: data ConversionStatus
+ Network.Google.DFAReporting.Types: data ConversionsBatchInsertRequest
+ Network.Google.DFAReporting.Types: data ConversionsBatchInsertResponse
+ Network.Google.DFAReporting.Types: data CreativeAuthoringSource
+ Network.Google.DFAReporting.Types: data CustomFloodlightVariable
+ Network.Google.DFAReporting.Types: data CustomFloodlightVariableType
+ Network.Google.DFAReporting.Types: data DynamicTargetingKey
+ Network.Google.DFAReporting.Types: data DynamicTargetingKeyObjectType
+ Network.Google.DFAReporting.Types: data DynamicTargetingKeysDeleteObjectType
+ Network.Google.DFAReporting.Types: data DynamicTargetingKeysListObjectType
+ Network.Google.DFAReporting.Types: data DynamicTargetingKeysListResponse
+ Network.Google.DFAReporting.Types: data EncryptionInfo
+ Network.Google.DFAReporting.Types: data EncryptionInfoEncryptionEntityType
+ Network.Google.DFAReporting.Types: data EncryptionInfoEncryptionSource
+ Network.Google.DFAReporting.Types: data InventoryItemType
+ Network.Google.DFAReporting.Types: data InventoryItemsListType
+ Network.Google.DFAReporting.Types: ddmconversionsScope :: Proxy '["https://www.googleapis.com/auth/ddmconversions"]
+ Network.Google.DFAReporting.Types: dtkKind :: Lens' DynamicTargetingKey Text
+ Network.Google.DFAReporting.Types: dtkName :: Lens' DynamicTargetingKey (Maybe Text)
+ Network.Google.DFAReporting.Types: dtkObjectId :: Lens' DynamicTargetingKey (Maybe Int64)
+ Network.Google.DFAReporting.Types: dtkObjectType :: Lens' DynamicTargetingKey (Maybe DynamicTargetingKeyObjectType)
+ Network.Google.DFAReporting.Types: dtklrDynamicTargetingKeys :: Lens' DynamicTargetingKeysListResponse [DynamicTargetingKey]
+ Network.Google.DFAReporting.Types: dtklrKind :: Lens' DynamicTargetingKeysListResponse Text
+ Network.Google.DFAReporting.Types: dynamicTargetingKey :: DynamicTargetingKey
+ Network.Google.DFAReporting.Types: dynamicTargetingKeysListResponse :: DynamicTargetingKeysListResponse
+ Network.Google.DFAReporting.Types: eiEncryptionEntityId :: Lens' EncryptionInfo (Maybe Int64)
+ Network.Google.DFAReporting.Types: eiEncryptionEntityType :: Lens' EncryptionInfo (Maybe EncryptionInfoEncryptionEntityType)
+ Network.Google.DFAReporting.Types: eiEncryptionSource :: Lens' EncryptionInfo (Maybe EncryptionInfoEncryptionSource)
+ Network.Google.DFAReporting.Types: eiKind :: Lens' EncryptionInfo Text
+ Network.Google.DFAReporting.Types: encryptionInfo :: EncryptionInfo
+ Network.Google.DFAReporting.Types: iiType :: Lens' InventoryItem (Maybe InventoryItemType)
+ Network.Google.DFAReporting.Types: ssVideoActiveViewOptOut :: Lens' SiteSettings (Maybe Bool)
+ Network.Google.Resource.DFAReporting.Conversions.Batchinsert: cbPayload :: Lens' ConversionsBatchinsert ConversionsBatchInsertRequest
+ Network.Google.Resource.DFAReporting.Conversions.Batchinsert: cbProFileId :: Lens' ConversionsBatchinsert Int64
+ Network.Google.Resource.DFAReporting.Conversions.Batchinsert: conversionsBatchinsert :: Int64 -> ConversionsBatchInsertRequest -> ConversionsBatchinsert
+ Network.Google.Resource.DFAReporting.Conversions.Batchinsert: data ConversionsBatchinsert
+ Network.Google.Resource.DFAReporting.Conversions.Batchinsert: instance Data.Data.Data Network.Google.Resource.DFAReporting.Conversions.Batchinsert.ConversionsBatchinsert
+ Network.Google.Resource.DFAReporting.Conversions.Batchinsert: instance GHC.Classes.Eq Network.Google.Resource.DFAReporting.Conversions.Batchinsert.ConversionsBatchinsert
+ Network.Google.Resource.DFAReporting.Conversions.Batchinsert: instance GHC.Generics.Generic Network.Google.Resource.DFAReporting.Conversions.Batchinsert.ConversionsBatchinsert
+ Network.Google.Resource.DFAReporting.Conversions.Batchinsert: instance GHC.Show.Show Network.Google.Resource.DFAReporting.Conversions.Batchinsert.ConversionsBatchinsert
+ Network.Google.Resource.DFAReporting.Conversions.Batchinsert: instance Network.Google.Types.GoogleRequest Network.Google.Resource.DFAReporting.Conversions.Batchinsert.ConversionsBatchinsert
+ Network.Google.Resource.DFAReporting.Conversions.Batchinsert: type ConversionsBatchinsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("conversions" :> ("batchinsert" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] ConversionsBatchInsertRequest :> Post '[JSON] ConversionsBatchInsertResponse)))))))
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete: data DynamicTargetingKeysDelete
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete: dtkdName :: Lens' DynamicTargetingKeysDelete Text
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete: dtkdObjectId :: Lens' DynamicTargetingKeysDelete Int64
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete: dtkdObjectType :: Lens' DynamicTargetingKeysDelete DynamicTargetingKeysDeleteObjectType
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete: dtkdProFileId :: Lens' DynamicTargetingKeysDelete Int64
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete: dynamicTargetingKeysDelete :: DynamicTargetingKeysDeleteObjectType -> Int64 -> Int64 -> Text -> DynamicTargetingKeysDelete
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete: instance Data.Data.Data Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete.DynamicTargetingKeysDelete
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete: instance GHC.Classes.Eq Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete.DynamicTargetingKeysDelete
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete: instance GHC.Generics.Generic Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete.DynamicTargetingKeysDelete
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete: instance GHC.Show.Show Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete.DynamicTargetingKeysDelete
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete: instance Network.Google.Types.GoogleRequest Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete.DynamicTargetingKeysDelete
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete: type DynamicTargetingKeysDeleteResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("dynamicTargetingKeys" :> (Capture "objectId" (Textual Int64) :> (QueryParam "name" Text :> (QueryParam "objectType" DynamicTargetingKeysDeleteObjectType :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))))
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert: data DynamicTargetingKeysInsert
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert: dtkiPayload :: Lens' DynamicTargetingKeysInsert DynamicTargetingKey
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert: dtkiProFileId :: Lens' DynamicTargetingKeysInsert Int64
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert: dynamicTargetingKeysInsert :: Int64 -> DynamicTargetingKey -> DynamicTargetingKeysInsert
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert: instance Data.Data.Data Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert.DynamicTargetingKeysInsert
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert: instance GHC.Classes.Eq Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert.DynamicTargetingKeysInsert
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert: instance GHC.Generics.Generic Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert.DynamicTargetingKeysInsert
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert: instance GHC.Show.Show Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert.DynamicTargetingKeysInsert
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert: instance Network.Google.Types.GoogleRequest Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert.DynamicTargetingKeysInsert
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert: type DynamicTargetingKeysInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("dynamicTargetingKeys" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] DynamicTargetingKey :> Post '[JSON] DynamicTargetingKey))))))
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List: data DynamicTargetingKeysList
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List: dtklAdvertiserId :: Lens' DynamicTargetingKeysList (Maybe Int64)
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List: dtklNames :: Lens' DynamicTargetingKeysList [Text]
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List: dtklObjectId :: Lens' DynamicTargetingKeysList (Maybe Int64)
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List: dtklObjectType :: Lens' DynamicTargetingKeysList (Maybe DynamicTargetingKeysListObjectType)
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List: dtklProFileId :: Lens' DynamicTargetingKeysList Int64
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List: dynamicTargetingKeysList :: Int64 -> DynamicTargetingKeysList
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List: instance Data.Data.Data Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List.DynamicTargetingKeysList
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List: instance GHC.Classes.Eq Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List.DynamicTargetingKeysList
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List: instance GHC.Generics.Generic Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List.DynamicTargetingKeysList
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List: instance GHC.Show.Show Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List.DynamicTargetingKeysList
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List: instance Network.Google.Types.GoogleRequest Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List.DynamicTargetingKeysList
+ Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List: type DynamicTargetingKeysListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("dynamicTargetingKeys" :> (QueryParam "objectType" DynamicTargetingKeysListObjectType :> (QueryParam "advertiserId" (Textual Int64) :> (QueryParam "objectId" (Textual Int64) :> (QueryParams "names" Text :> (QueryParam "alt" AltJSON :> Get '[JSON] DynamicTargetingKeysListResponse)))))))))
+ Network.Google.Resource.DFAReporting.InventoryItems.List: iilType :: Lens' InventoryItemsList (Maybe InventoryItemsListType)
- Network.Google.DFAReporting: ObjectAd :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: ObjectAd :: DynamicTargetingKeysListObjectType
- Network.Google.DFAReporting: ObjectAdvertiser :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: ObjectAdvertiser :: DynamicTargetingKeysListObjectType
- Network.Google.DFAReporting: ObjectCreative :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: ObjectCreative :: DynamicTargetingKeysListObjectType
- Network.Google.DFAReporting: ObjectPlacement :: ChangeLogsListObjectType
+ Network.Google.DFAReporting: ObjectPlacement :: DynamicTargetingKeysListObjectType
- Network.Google.DFAReporting: U1 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U1 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U10 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U10 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U11 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U11 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U12 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U12 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U13 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U13 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U14 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U14 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U15 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U15 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U16 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U16 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U17 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U17 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U18 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U18 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U19 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U19 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U2 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U2 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U20 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U20 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U3 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U3 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U4 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U4 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U5 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U5 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U6 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U6 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U7 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U7 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U8 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U8 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: U9 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting: U9 :: CustomFloodlightVariableType
- Network.Google.DFAReporting: dFAReportingService :: Service
+ Network.Google.DFAReporting: dFAReportingService :: ServiceConfig
- Network.Google.DFAReporting: type DFAReportingAPI = InventoryItemsListResource :<|> (InventoryItemsGetResource :<|> (PlacementStrategiesInsertResource :<|> (PlacementStrategiesListResource :<|> (PlacementStrategiesPatchResource :<|> (PlacementStrategiesGetResource :<|> (PlacementStrategiesDeleteResource :<|> (PlacementStrategiesUpdateResource :<|> (CampaignCreativeAssociationsInsertResource :<|> (CampaignCreativeAssociationsListResource :<|> (RemarketingListSharesPatchResource :<|> (RemarketingListSharesGetResource :<|> (RemarketingListSharesUpdateResource :<|> (LandingPagesInsertResource :<|> (LandingPagesListResource :<|> (LandingPagesPatchResource :<|> (LandingPagesGetResource :<|> (LandingPagesDeleteResource :<|> (LandingPagesUpdateResource :<|> (MobileCarriersListResource :<|> (MobileCarriersGetResource :<|> (CreativeGroupsInsertResource :<|> (CreativeGroupsListResource :<|> (CreativeGroupsPatchResource :<|> (CreativeGroupsGetResource :<|> (CreativeGroupsUpdateResource :<|> (RemarketingListsInsertResource :<|> (RemarketingListsListResource :<|> (RemarketingListsPatchResource :<|> (RemarketingListsGetResource :<|> (RemarketingListsUpdateResource :<|> (AccountActiveAdSummariesGetResource :<|> (UserRolePermissionGroupsListResource :<|> (UserRolePermissionGroupsGetResource :<|> (AccountsListResource :<|> (AccountsPatchResource :<|> (AccountsGetResource :<|> (AccountsUpdateResource :<|> (ReportsCompatibleFieldsQueryResource :<|> (ReportsFilesListResource :<|> (ReportsFilesGetResource :<|> (ReportsInsertResource :<|> (ReportsListResource :<|> (ReportsPatchResource :<|> (ReportsGetResource :<|> (ReportsRunResource :<|> (ReportsDeleteResource :<|> (ReportsUpdateResource :<|> (CampaignsInsertResource :<|> (CampaignsListResource :<|> (CampaignsPatchResource :<|> (CampaignsGetResource :<|> (CampaignsUpdateResource :<|> (AccountUserProFilesInsertResource :<|> (AccountUserProFilesListResource :<|> (AccountUserProFilesPatchResource :<|> (AccountUserProFilesGetResource :<|> (AccountUserProFilesUpdateResource :<|> (CreativesInsertResource :<|> (CreativesListResource :<|> (CreativesPatchResource :<|> (CreativesGetResource :<|> (CreativesUpdateResource :<|> (DimensionValuesQueryResource :<|> (RegionsListResource :<|> (FloodlightConfigurationsListResource :<|> (FloodlightConfigurationsPatchResource :<|> (FloodlightConfigurationsGetResource :<|> (FloodlightConfigurationsUpdateResource :<|> (FloodlightActivitiesInsertResource :<|> (FloodlightActivitiesListResource :<|> (FloodlightActivitiesPatchResource :<|> (FloodlightActivitiesGetResource :<|> (FloodlightActivitiesGeneratetagResource :<|> (FloodlightActivitiesDeleteResource :<|> (FloodlightActivitiesUpdateResource :<|> (UserRolesInsertResource :<|> (UserRolesListResource :<|> (UserRolesPatchResource :<|> (UserRolesGetResource :<|> (UserRolesDeleteResource :<|> (UserRolesUpdateResource :<|> (AccountPermissionGroupsListResource :<|> (AccountPermissionGroupsGetResource :<|> (AdvertisersInsertResource :<|> (AdvertisersListResource :<|> (AdvertisersPatchResource :<|> (AdvertisersGetResource :<|> (AdvertisersUpdateResource :<|> (CountriesListResource :<|> (CountriesGetResource :<|> (AccountPermissionsListResource :<|> (AccountPermissionsGetResource :<|> (UserProFilesListResource :<|> (UserProFilesGetResource :<|> (OperatingSystemVersionsListResource :<|> (OperatingSystemVersionsGetResource :<|> (ChangeLogsListResource :<|> (ChangeLogsGetResource :<|> (CitiesListResource :<|> (TargetableRemarketingListsListResource :<|> (TargetableRemarketingListsGetResource :<|> (PlatformTypesListResource :<|> (PlatformTypesGetResource :<|> (BrowsersListResource :<|> (ContentCategoriesInsertResource :<|> (ContentCategoriesListResource :<|> (ContentCategoriesPatchResource :<|> (ContentCategoriesGetResource :<|> (ContentCategoriesDeleteResource :<|> (ContentCategoriesUpdateResource :<|> (PlacementsInsertResource :<|> (PlacementsGeneratetagsResource :<|> (PlacementsListResource :<|> (PlacementsPatchResource :<|> (PlacementsGetResource :<|> (PlacementsUpdateResource :<|> (MetrosListResource :<|> (OrderDocumentsListResource :<|> (OrderDocumentsGetResource :<|> (CreativeFieldsInsertResource :<|> (CreativeFieldsListResource :<|> (CreativeFieldsPatchResource :<|> (CreativeFieldsGetResource :<|> (CreativeFieldsDeleteResource :<|> (CreativeFieldsUpdateResource :<|> (EventTagsInsertResource :<|> (EventTagsListResource :<|> (EventTagsPatchResource :<|> (EventTagsGetResource :<|> (EventTagsDeleteResource :<|> (EventTagsUpdateResource :<|> (FilesListResource :<|> (FilesGetResource :<|> (UserRolePermissionsListResource :<|> (UserRolePermissionsGetResource :<|> (PlacementGroupsInsertResource :<|> (PlacementGroupsListResource :<|> (PlacementGroupsPatchResource :<|> (PlacementGroupsGetResource :<|> (PlacementGroupsUpdateResource :<|> (OrdersListResource :<|> (OrdersGetResource :<|> (ConnectionTypesListResource :<|> (ConnectionTypesGetResource :<|> (CreativeAssetsInsertResource :<|> (SitesInsertResource :<|> (SitesListResource :<|> (SitesPatchResource :<|> (SitesGetResource :<|> (SitesUpdateResource :<|> (PostalCodesListResource :<|> (PostalCodesGetResource :<|> (OperatingSystemsListResource :<|> (OperatingSystemsGetResource :<|> (SizesInsertResource :<|> (SizesListResource :<|> (SizesGetResource :<|> (AdsInsertResource :<|> (AdsListResource :<|> (AdsPatchResource :<|> (AdsGetResource :<|> (AdsUpdateResource :<|> (ProjectsListResource :<|> (ProjectsGetResource :<|> (SubAccountsInsertResource :<|> (SubAccountsListResource :<|> (SubAccountsPatchResource :<|> (SubAccountsGetResource :<|> (SubAccountsUpdateResource :<|> (CreativeFieldValuesInsertResource :<|> (CreativeFieldValuesListResource :<|> (CreativeFieldValuesPatchResource :<|> (CreativeFieldValuesGetResource :<|> (CreativeFieldValuesDeleteResource :<|> (CreativeFieldValuesUpdateResource :<|> (DirectorySitesInsertResource :<|> (DirectorySitesListResource :<|> (DirectorySitesGetResource :<|> (AdvertiserGroupsInsertResource :<|> (AdvertiserGroupsListResource :<|> (AdvertiserGroupsPatchResource :<|> (AdvertiserGroupsGetResource :<|> (AdvertiserGroupsDeleteResource :<|> (AdvertiserGroupsUpdateResource :<|> (DirectorySiteContactsListResource :<|> (DirectorySiteContactsGetResource :<|> (FloodlightActivityGroupsInsertResource :<|> (FloodlightActivityGroupsListResource :<|> (FloodlightActivityGroupsPatchResource :<|> (FloodlightActivityGroupsGetResource :<|> (FloodlightActivityGroupsDeleteResource :<|> FloodlightActivityGroupsUpdateResource)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))
+ Network.Google.DFAReporting: type DFAReportingAPI = InventoryItemsListResource :<|> (InventoryItemsGetResource :<|> (PlacementStrategiesInsertResource :<|> (PlacementStrategiesListResource :<|> (PlacementStrategiesPatchResource :<|> (PlacementStrategiesGetResource :<|> (PlacementStrategiesDeleteResource :<|> (PlacementStrategiesUpdateResource :<|> (CampaignCreativeAssociationsInsertResource :<|> (CampaignCreativeAssociationsListResource :<|> (RemarketingListSharesPatchResource :<|> (RemarketingListSharesGetResource :<|> (RemarketingListSharesUpdateResource :<|> (LandingPagesInsertResource :<|> (LandingPagesListResource :<|> (LandingPagesPatchResource :<|> (LandingPagesGetResource :<|> (LandingPagesDeleteResource :<|> (LandingPagesUpdateResource :<|> (MobileCarriersListResource :<|> (MobileCarriersGetResource :<|> (CreativeGroupsInsertResource :<|> (CreativeGroupsListResource :<|> (CreativeGroupsPatchResource :<|> (CreativeGroupsGetResource :<|> (CreativeGroupsUpdateResource :<|> (RemarketingListsInsertResource :<|> (RemarketingListsListResource :<|> (RemarketingListsPatchResource :<|> (RemarketingListsGetResource :<|> (RemarketingListsUpdateResource :<|> (AccountActiveAdSummariesGetResource :<|> (UserRolePermissionGroupsListResource :<|> (UserRolePermissionGroupsGetResource :<|> (AccountsListResource :<|> (AccountsPatchResource :<|> (AccountsGetResource :<|> (AccountsUpdateResource :<|> (ReportsCompatibleFieldsQueryResource :<|> (ReportsFilesListResource :<|> (ReportsFilesGetResource :<|> (ReportsInsertResource :<|> (ReportsListResource :<|> (ReportsPatchResource :<|> (ReportsGetResource :<|> (ReportsRunResource :<|> (ReportsDeleteResource :<|> (ReportsUpdateResource :<|> (CampaignsInsertResource :<|> (CampaignsListResource :<|> (CampaignsPatchResource :<|> (CampaignsGetResource :<|> (CampaignsUpdateResource :<|> (DynamicTargetingKeysInsertResource :<|> (DynamicTargetingKeysListResource :<|> (DynamicTargetingKeysDeleteResource :<|> (AccountUserProFilesInsertResource :<|> (AccountUserProFilesListResource :<|> (AccountUserProFilesPatchResource :<|> (AccountUserProFilesGetResource :<|> (AccountUserProFilesUpdateResource :<|> (CreativesInsertResource :<|> (CreativesListResource :<|> (CreativesPatchResource :<|> (CreativesGetResource :<|> (CreativesUpdateResource :<|> (DimensionValuesQueryResource :<|> (RegionsListResource :<|> (FloodlightConfigurationsListResource :<|> (FloodlightConfigurationsPatchResource :<|> (FloodlightConfigurationsGetResource :<|> (FloodlightConfigurationsUpdateResource :<|> (ConversionsBatchinsertResource :<|> (FloodlightActivitiesInsertResource :<|> (FloodlightActivitiesListResource :<|> (FloodlightActivitiesPatchResource :<|> (FloodlightActivitiesGetResource :<|> (FloodlightActivitiesGeneratetagResource :<|> (FloodlightActivitiesDeleteResource :<|> (FloodlightActivitiesUpdateResource :<|> (UserRolesInsertResource :<|> (UserRolesListResource :<|> (UserRolesPatchResource :<|> (UserRolesGetResource :<|> (UserRolesDeleteResource :<|> (UserRolesUpdateResource :<|> (AccountPermissionGroupsListResource :<|> (AccountPermissionGroupsGetResource :<|> (AdvertisersInsertResource :<|> (AdvertisersListResource :<|> (AdvertisersPatchResource :<|> (AdvertisersGetResource :<|> (AdvertisersUpdateResource :<|> (CountriesListResource :<|> (CountriesGetResource :<|> (AccountPermissionsListResource :<|> (AccountPermissionsGetResource :<|> (UserProFilesListResource :<|> (UserProFilesGetResource :<|> (OperatingSystemVersionsListResource :<|> (OperatingSystemVersionsGetResource :<|> (ChangeLogsListResource :<|> (ChangeLogsGetResource :<|> (CitiesListResource :<|> (TargetableRemarketingListsListResource :<|> (TargetableRemarketingListsGetResource :<|> (PlatformTypesListResource :<|> (PlatformTypesGetResource :<|> (BrowsersListResource :<|> (ContentCategoriesInsertResource :<|> (ContentCategoriesListResource :<|> (ContentCategoriesPatchResource :<|> (ContentCategoriesGetResource :<|> (ContentCategoriesDeleteResource :<|> (ContentCategoriesUpdateResource :<|> (PlacementsInsertResource :<|> (PlacementsGeneratetagsResource :<|> (PlacementsListResource :<|> (PlacementsPatchResource :<|> (PlacementsGetResource :<|> (PlacementsUpdateResource :<|> (MetrosListResource :<|> (OrderDocumentsListResource :<|> (OrderDocumentsGetResource :<|> (CreativeFieldsInsertResource :<|> (CreativeFieldsListResource :<|> (CreativeFieldsPatchResource :<|> (CreativeFieldsGetResource :<|> (CreativeFieldsDeleteResource :<|> (CreativeFieldsUpdateResource :<|> (EventTagsInsertResource :<|> (EventTagsListResource :<|> (EventTagsPatchResource :<|> (EventTagsGetResource :<|> (EventTagsDeleteResource :<|> (EventTagsUpdateResource :<|> (FilesListResource :<|> (FilesGetResource :<|> (UserRolePermissionsListResource :<|> (UserRolePermissionsGetResource :<|> (PlacementGroupsInsertResource :<|> (PlacementGroupsListResource :<|> (PlacementGroupsPatchResource :<|> (PlacementGroupsGetResource :<|> (PlacementGroupsUpdateResource :<|> (OrdersListResource :<|> (OrdersGetResource :<|> (ConnectionTypesListResource :<|> (ConnectionTypesGetResource :<|> (CreativeAssetsInsertResource :<|> (SitesInsertResource :<|> (SitesListResource :<|> (SitesPatchResource :<|> (SitesGetResource :<|> (SitesUpdateResource :<|> (PostalCodesListResource :<|> (PostalCodesGetResource :<|> (OperatingSystemsListResource :<|> (OperatingSystemsGetResource :<|> (SizesInsertResource :<|> (SizesListResource :<|> (SizesGetResource :<|> (AdsInsertResource :<|> (AdsListResource :<|> (AdsPatchResource :<|> (AdsGetResource :<|> (AdsUpdateResource :<|> (ProjectsListResource :<|> (ProjectsGetResource :<|> (SubAccountsInsertResource :<|> (SubAccountsListResource :<|> (SubAccountsPatchResource :<|> (SubAccountsGetResource :<|> (SubAccountsUpdateResource :<|> (CreativeFieldValuesInsertResource :<|> (CreativeFieldValuesListResource :<|> (CreativeFieldValuesPatchResource :<|> (CreativeFieldValuesGetResource :<|> (CreativeFieldValuesDeleteResource :<|> (CreativeFieldValuesUpdateResource :<|> (DirectorySitesInsertResource :<|> (DirectorySitesListResource :<|> (DirectorySitesGetResource :<|> (AdvertiserGroupsInsertResource :<|> (AdvertiserGroupsListResource :<|> (AdvertiserGroupsPatchResource :<|> (AdvertiserGroupsGetResource :<|> (AdvertiserGroupsDeleteResource :<|> (AdvertiserGroupsUpdateResource :<|> (DirectorySiteContactsListResource :<|> (DirectorySiteContactsGetResource :<|> (FloodlightActivityGroupsInsertResource :<|> (FloodlightActivityGroupsListResource :<|> (FloodlightActivityGroupsPatchResource :<|> (FloodlightActivityGroupsGetResource :<|> FloodlightActivityGroupsUpdateResource))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))
- Network.Google.DFAReporting.Types: ObjectAd :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: ObjectAd :: DynamicTargetingKeysListObjectType
- Network.Google.DFAReporting.Types: ObjectAdvertiser :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: ObjectAdvertiser :: DynamicTargetingKeysListObjectType
- Network.Google.DFAReporting.Types: ObjectCreative :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: ObjectCreative :: DynamicTargetingKeysListObjectType
- Network.Google.DFAReporting.Types: ObjectPlacement :: ChangeLogsListObjectType
+ Network.Google.DFAReporting.Types: ObjectPlacement :: DynamicTargetingKeysListObjectType
- Network.Google.DFAReporting.Types: U1 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U1 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U10 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U10 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U11 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U11 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U12 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U12 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U13 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U13 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U14 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U14 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U15 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U15 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U16 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U16 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U17 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U17 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U18 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U18 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U19 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U19 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U2 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U2 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U20 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U20 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U3 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U3 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U4 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U4 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U5 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U5 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U6 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U6 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U7 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U7 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U8 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U8 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: U9 :: UserDefinedVariableConfigurationVariableType
+ Network.Google.DFAReporting.Types: U9 :: CustomFloodlightVariableType
- Network.Google.DFAReporting.Types: dFAReportingService :: Service
+ Network.Google.DFAReporting.Types: dFAReportingService :: ServiceConfig
- Network.Google.DFAReporting.Types: dfatraffickingScope :: OAuthScope
+ Network.Google.DFAReporting.Types: dfatraffickingScope :: Proxy '["https://www.googleapis.com/auth/dfatrafficking"]
- Network.Google.Resource.DFAReporting.AccountActiveAdSummaries.Get: type AccountActiveAdSummariesGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountActiveAdSummaries" :> (Capture "summaryAccountId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] AccountActiveAdSummary))))))
+ Network.Google.Resource.DFAReporting.AccountActiveAdSummaries.Get: type AccountActiveAdSummariesGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountActiveAdSummaries" :> (Capture "summaryAccountId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] AccountActiveAdSummary))))))
- Network.Google.Resource.DFAReporting.AccountPermissionGroups.Get: type AccountPermissionGroupsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountPermissionGroups" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] AccountPermissionGroup))))))
+ Network.Google.Resource.DFAReporting.AccountPermissionGroups.Get: type AccountPermissionGroupsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountPermissionGroups" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] AccountPermissionGroup))))))
- Network.Google.Resource.DFAReporting.AccountPermissionGroups.List: type AccountPermissionGroupsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountPermissionGroups" :> (QueryParam "alt" AltJSON :> Get '[JSON] AccountPermissionGroupsListResponse)))))
+ Network.Google.Resource.DFAReporting.AccountPermissionGroups.List: type AccountPermissionGroupsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountPermissionGroups" :> (QueryParam "alt" AltJSON :> Get '[JSON] AccountPermissionGroupsListResponse)))))
- Network.Google.Resource.DFAReporting.AccountPermissions.Get: type AccountPermissionsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountPermissions" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] AccountPermission))))))
+ Network.Google.Resource.DFAReporting.AccountPermissions.Get: type AccountPermissionsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountPermissions" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] AccountPermission))))))
- Network.Google.Resource.DFAReporting.AccountPermissions.List: type AccountPermissionsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountPermissions" :> (QueryParam "alt" AltJSON :> Get '[JSON] AccountPermissionsListResponse)))))
+ Network.Google.Resource.DFAReporting.AccountPermissions.List: type AccountPermissionsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountPermissions" :> (QueryParam "alt" AltJSON :> Get '[JSON] AccountPermissionsListResponse)))))
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Get: type AccountUserProFilesGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountUserProfiles" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] AccountUserProFile))))))
+ Network.Google.Resource.DFAReporting.AccountUserProFiles.Get: type AccountUserProFilesGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountUserProfiles" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] AccountUserProFile))))))
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Insert: type AccountUserProFilesInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountUserProfiles" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] AccountUserProFile :> Post '[JSON] AccountUserProFile))))))
+ Network.Google.Resource.DFAReporting.AccountUserProFiles.Insert: type AccountUserProFilesInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountUserProfiles" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] AccountUserProFile :> Post '[JSON] AccountUserProFile))))))
- Network.Google.Resource.DFAReporting.AccountUserProFiles.List: type AccountUserProFilesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountUserProfiles" :> (QueryParam "userRoleId" (Textual Int64) :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" AccountUserProFilesListSortOrder :> (QueryParam "active" Bool :> (QueryParam "pageToken" Text :> (QueryParam "sortField" AccountUserProFilesListSortField :> (QueryParam "subaccountId" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] AccountUserProFilesListResponse))))))))))))))
+ Network.Google.Resource.DFAReporting.AccountUserProFiles.List: type AccountUserProFilesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountUserProfiles" :> (QueryParam "userRoleId" (Textual Int64) :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" AccountUserProFilesListSortOrder :> (QueryParam "active" Bool :> (QueryParam "pageToken" Text :> (QueryParam "sortField" AccountUserProFilesListSortField :> (QueryParam "subaccountId" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] AccountUserProFilesListResponse))))))))))))))
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Patch: type AccountUserProFilesPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountUserProfiles" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] AccountUserProFile :> Patch '[JSON] AccountUserProFile)))))))
+ Network.Google.Resource.DFAReporting.AccountUserProFiles.Patch: type AccountUserProFilesPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountUserProfiles" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] AccountUserProFile :> Patch '[JSON] AccountUserProFile)))))))
- Network.Google.Resource.DFAReporting.AccountUserProFiles.Update: type AccountUserProFilesUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountUserProfiles" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] AccountUserProFile :> Put '[JSON] AccountUserProFile))))))
+ Network.Google.Resource.DFAReporting.AccountUserProFiles.Update: type AccountUserProFilesUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accountUserProfiles" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] AccountUserProFile :> Put '[JSON] AccountUserProFile))))))
- Network.Google.Resource.DFAReporting.Accounts.Get: type AccountsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accounts" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Account))))))
+ Network.Google.Resource.DFAReporting.Accounts.Get: type AccountsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accounts" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Account))))))
- Network.Google.Resource.DFAReporting.Accounts.List: type AccountsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accounts" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" AccountsListSortOrder :> (QueryParam "active" Bool :> (QueryParam "pageToken" Text :> (QueryParam "sortField" AccountsListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] AccountsListResponse))))))))))))
+ Network.Google.Resource.DFAReporting.Accounts.List: type AccountsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accounts" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" AccountsListSortOrder :> (QueryParam "active" Bool :> (QueryParam "pageToken" Text :> (QueryParam "sortField" AccountsListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] AccountsListResponse))))))))))))
- Network.Google.Resource.DFAReporting.Accounts.Patch: type AccountsPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accounts" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Account :> Patch '[JSON] Account)))))))
+ Network.Google.Resource.DFAReporting.Accounts.Patch: type AccountsPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accounts" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Account :> Patch '[JSON] Account)))))))
- Network.Google.Resource.DFAReporting.Accounts.Update: type AccountsUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accounts" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Account :> Put '[JSON] Account))))))
+ Network.Google.Resource.DFAReporting.Accounts.Update: type AccountsUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("accounts" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Account :> Put '[JSON] Account))))))
- Network.Google.Resource.DFAReporting.Ads.Get: type AdsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("ads" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Ad))))))
+ Network.Google.Resource.DFAReporting.Ads.Get: type AdsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("ads" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Ad))))))
- Network.Google.Resource.DFAReporting.Ads.Insert: type AdsInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("ads" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Ad :> Post '[JSON] Ad))))))
+ Network.Google.Resource.DFAReporting.Ads.Insert: type AdsInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("ads" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Ad :> Post '[JSON] Ad))))))
- Network.Google.Resource.DFAReporting.Ads.List: type AdsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("ads" :> (QueryParams "remarketingListIds" (Textual Int64) :> (QueryParams "landingPageIds" (Textual Int64) :> (QueryParams "creativeIds" (Textual Int64) :> (QueryParam "advertiserId" (Textual Int64) :> (QueryParams "campaignIds" (Textual Int64) :> (QueryParam "searchString" Text :> (QueryParams "sizeIds" (Textual Int64) :> (QueryParam "sslCompliant" Bool :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" AdsListSortOrder :> (QueryParam "active" Bool :> (QueryParams "creativeOptimizationConfigurationIds" (Textual Int64) :> (QueryParams "placementIds" (Textual Int64) :> (QueryParam "sslRequired" Bool :> (QueryParam "overriddenEventTagId" (Textual Int64) :> (QueryParam "pageToken" Text :> (QueryParam "sortField" AdsListSortField :> (QueryParams "type" AdsListType :> (QueryParam "creativeType" AdsListCreativeType :> (QueryParam "dynamicClickTracker" Bool :> (QueryParam "compatibility" AdsListCompatibility :> (QueryParam "archived" Bool :> (QueryParam "maxResults" (Textual Int32) :> (QueryParams "audienceSegmentIds" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] AdsListResponse)))))))))))))))))))))))))))))
+ Network.Google.Resource.DFAReporting.Ads.List: type AdsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("ads" :> (QueryParams "remarketingListIds" (Textual Int64) :> (QueryParams "landingPageIds" (Textual Int64) :> (QueryParams "creativeIds" (Textual Int64) :> (QueryParam "advertiserId" (Textual Int64) :> (QueryParams "campaignIds" (Textual Int64) :> (QueryParam "searchString" Text :> (QueryParams "sizeIds" (Textual Int64) :> (QueryParam "sslCompliant" Bool :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" AdsListSortOrder :> (QueryParam "active" Bool :> (QueryParams "creativeOptimizationConfigurationIds" (Textual Int64) :> (QueryParams "placementIds" (Textual Int64) :> (QueryParam "sslRequired" Bool :> (QueryParam "overriddenEventTagId" (Textual Int64) :> (QueryParam "pageToken" Text :> (QueryParam "sortField" AdsListSortField :> (QueryParams "type" AdsListType :> (QueryParam "creativeType" AdsListCreativeType :> (QueryParam "dynamicClickTracker" Bool :> (QueryParam "compatibility" AdsListCompatibility :> (QueryParam "archived" Bool :> (QueryParam "maxResults" (Textual Int32) :> (QueryParams "audienceSegmentIds" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] AdsListResponse)))))))))))))))))))))))))))))
- Network.Google.Resource.DFAReporting.Ads.Patch: type AdsPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("ads" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Ad :> Patch '[JSON] Ad)))))))
+ Network.Google.Resource.DFAReporting.Ads.Patch: type AdsPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("ads" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Ad :> Patch '[JSON] Ad)))))))
- Network.Google.Resource.DFAReporting.Ads.Update: type AdsUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("ads" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Ad :> Put '[JSON] Ad))))))
+ Network.Google.Resource.DFAReporting.Ads.Update: type AdsUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("ads" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Ad :> Put '[JSON] Ad))))))
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Delete: type AdvertiserGroupsDeleteResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertiserGroups" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))
+ Network.Google.Resource.DFAReporting.AdvertiserGroups.Delete: type AdvertiserGroupsDeleteResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertiserGroups" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Get: type AdvertiserGroupsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertiserGroups" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] AdvertiserGroup))))))
+ Network.Google.Resource.DFAReporting.AdvertiserGroups.Get: type AdvertiserGroupsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertiserGroups" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] AdvertiserGroup))))))
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Insert: type AdvertiserGroupsInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertiserGroups" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] AdvertiserGroup :> Post '[JSON] AdvertiserGroup))))))
+ Network.Google.Resource.DFAReporting.AdvertiserGroups.Insert: type AdvertiserGroupsInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertiserGroups" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] AdvertiserGroup :> Post '[JSON] AdvertiserGroup))))))
- Network.Google.Resource.DFAReporting.AdvertiserGroups.List: type AdvertiserGroupsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertiserGroups" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" AdvertiserGroupsListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" AdvertiserGroupsListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] AdvertiserGroupsListResponse)))))))))))
+ Network.Google.Resource.DFAReporting.AdvertiserGroups.List: type AdvertiserGroupsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertiserGroups" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" AdvertiserGroupsListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" AdvertiserGroupsListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] AdvertiserGroupsListResponse)))))))))))
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Patch: type AdvertiserGroupsPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertiserGroups" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] AdvertiserGroup :> Patch '[JSON] AdvertiserGroup)))))))
+ Network.Google.Resource.DFAReporting.AdvertiserGroups.Patch: type AdvertiserGroupsPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertiserGroups" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] AdvertiserGroup :> Patch '[JSON] AdvertiserGroup)))))))
- Network.Google.Resource.DFAReporting.AdvertiserGroups.Update: type AdvertiserGroupsUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertiserGroups" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] AdvertiserGroup :> Put '[JSON] AdvertiserGroup))))))
+ Network.Google.Resource.DFAReporting.AdvertiserGroups.Update: type AdvertiserGroupsUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertiserGroups" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] AdvertiserGroup :> Put '[JSON] AdvertiserGroup))))))
- Network.Google.Resource.DFAReporting.Advertisers.Get: type AdvertisersGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertisers" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Advertiser))))))
+ Network.Google.Resource.DFAReporting.Advertisers.Get: type AdvertisersGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertisers" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Advertiser))))))
- Network.Google.Resource.DFAReporting.Advertisers.Insert: type AdvertisersInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertisers" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Advertiser :> Post '[JSON] Advertiser))))))
+ Network.Google.Resource.DFAReporting.Advertisers.Insert: type AdvertisersInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertisers" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Advertiser :> Post '[JSON] Advertiser))))))
- Network.Google.Resource.DFAReporting.Advertisers.List: type AdvertisersListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertisers" :> (QueryParam "status" AdvertisersListStatus :> (QueryParam "onlyParent" Bool :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "includeAdvertisersWithoutGroupsOnly" Bool :> (QueryParam "sortOrder" AdvertisersListSortOrder :> (QueryParams "advertiserGroupIds" (Textual Int64) :> (QueryParam "pageToken" Text :> (QueryParam "sortField" AdvertisersListSortField :> (QueryParam "subaccountId" (Textual Int64) :> (QueryParams "floodlightConfigurationIds" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] AdvertisersListResponse)))))))))))))))))
+ Network.Google.Resource.DFAReporting.Advertisers.List: type AdvertisersListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertisers" :> (QueryParam "status" AdvertisersListStatus :> (QueryParam "onlyParent" Bool :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "includeAdvertisersWithoutGroupsOnly" Bool :> (QueryParam "sortOrder" AdvertisersListSortOrder :> (QueryParams "advertiserGroupIds" (Textual Int64) :> (QueryParam "pageToken" Text :> (QueryParam "sortField" AdvertisersListSortField :> (QueryParam "subaccountId" (Textual Int64) :> (QueryParams "floodlightConfigurationIds" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] AdvertisersListResponse)))))))))))))))))
- Network.Google.Resource.DFAReporting.Advertisers.Patch: type AdvertisersPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertisers" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Advertiser :> Patch '[JSON] Advertiser)))))))
+ Network.Google.Resource.DFAReporting.Advertisers.Patch: type AdvertisersPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertisers" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Advertiser :> Patch '[JSON] Advertiser)))))))
- Network.Google.Resource.DFAReporting.Advertisers.Update: type AdvertisersUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertisers" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Advertiser :> Put '[JSON] Advertiser))))))
+ Network.Google.Resource.DFAReporting.Advertisers.Update: type AdvertisersUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("advertisers" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Advertiser :> Put '[JSON] Advertiser))))))
- Network.Google.Resource.DFAReporting.Browsers.List: type BrowsersListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("browsers" :> (QueryParam "alt" AltJSON :> Get '[JSON] BrowsersListResponse)))))
+ Network.Google.Resource.DFAReporting.Browsers.List: type BrowsersListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("browsers" :> (QueryParam "alt" AltJSON :> Get '[JSON] BrowsersListResponse)))))
- Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.Insert: type CampaignCreativeAssociationsInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (Capture "campaignId" (Textual Int64) :> ("campaignCreativeAssociations" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CampaignCreativeAssociation :> Post '[JSON] CampaignCreativeAssociation))))))))
+ Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.Insert: type CampaignCreativeAssociationsInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (Capture "campaignId" (Textual Int64) :> ("campaignCreativeAssociations" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CampaignCreativeAssociation :> Post '[JSON] CampaignCreativeAssociation))))))))
- Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.List: type CampaignCreativeAssociationsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (Capture "campaignId" (Textual Int64) :> ("campaignCreativeAssociations" :> (QueryParam "sortOrder" CampaignCreativeAssociationsListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] CampaignCreativeAssociationsListResponse))))))))))
+ Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.List: type CampaignCreativeAssociationsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (Capture "campaignId" (Textual Int64) :> ("campaignCreativeAssociations" :> (QueryParam "sortOrder" CampaignCreativeAssociationsListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] CampaignCreativeAssociationsListResponse))))))))))
- Network.Google.Resource.DFAReporting.Campaigns.Get: type CampaignsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Campaign))))))
+ Network.Google.Resource.DFAReporting.Campaigns.Get: type CampaignsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Campaign))))))
- Network.Google.Resource.DFAReporting.Campaigns.Insert: type CampaignsInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (QueryParam "defaultLandingPageName" Text :> (QueryParam "defaultLandingPageUrl" Text :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Campaign :> Post '[JSON] Campaign))))))))
+ Network.Google.Resource.DFAReporting.Campaigns.Insert: type CampaignsInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (QueryParam "defaultLandingPageName" Text :> (QueryParam "defaultLandingPageUrl" Text :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Campaign :> Post '[JSON] Campaign))))))))
- Network.Google.Resource.DFAReporting.Campaigns.List: type CampaignsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (QueryParams "excludedIds" (Textual Int64) :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" CampaignsListSortOrder :> (QueryParams "advertiserGroupIds" (Textual Int64) :> (QueryParam "atLeastOneOptimizationActivity" Bool :> (QueryParam "overriddenEventTagId" (Textual Int64) :> (QueryParam "pageToken" Text :> (QueryParam "sortField" CampaignsListSortField :> (QueryParam "subaccountId" (Textual Int64) :> (QueryParams "advertiserIds" (Textual Int64) :> (QueryParam "archived" Bool :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] CampaignsListResponse))))))))))))))))))
+ Network.Google.Resource.DFAReporting.Campaigns.List: type CampaignsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (QueryParams "excludedIds" (Textual Int64) :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" CampaignsListSortOrder :> (QueryParams "advertiserGroupIds" (Textual Int64) :> (QueryParam "atLeastOneOptimizationActivity" Bool :> (QueryParam "overriddenEventTagId" (Textual Int64) :> (QueryParam "pageToken" Text :> (QueryParam "sortField" CampaignsListSortField :> (QueryParam "subaccountId" (Textual Int64) :> (QueryParams "advertiserIds" (Textual Int64) :> (QueryParam "archived" Bool :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] CampaignsListResponse))))))))))))))))))
- Network.Google.Resource.DFAReporting.Campaigns.Patch: type CampaignsPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Campaign :> Patch '[JSON] Campaign)))))))
+ Network.Google.Resource.DFAReporting.Campaigns.Patch: type CampaignsPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Campaign :> Patch '[JSON] Campaign)))))))
- Network.Google.Resource.DFAReporting.Campaigns.Update: type CampaignsUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Campaign :> Put '[JSON] Campaign))))))
+ Network.Google.Resource.DFAReporting.Campaigns.Update: type CampaignsUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Campaign :> Put '[JSON] Campaign))))))
- Network.Google.Resource.DFAReporting.ChangeLogs.Get: type ChangeLogsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("changeLogs" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] ChangeLog))))))
+ Network.Google.Resource.DFAReporting.ChangeLogs.Get: type ChangeLogsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("changeLogs" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] ChangeLog))))))
- Network.Google.Resource.DFAReporting.ChangeLogs.List: type ChangeLogsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("changeLogs" :> (QueryParams "userProfileIds" (Textual Int64) :> (QueryParam "objectType" ChangeLogsListObjectType :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "action" ChangeLogsListAction :> (QueryParam "minChangeTime" Text :> (QueryParam "maxChangeTime" Text :> (QueryParam "pageToken" Text :> (QueryParams "objectIds" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] ChangeLogsListResponse)))))))))))))))
+ Network.Google.Resource.DFAReporting.ChangeLogs.List: type ChangeLogsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("changeLogs" :> (QueryParams "userProfileIds" (Textual Int64) :> (QueryParam "objectType" ChangeLogsListObjectType :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "action" ChangeLogsListAction :> (QueryParam "minChangeTime" Text :> (QueryParam "maxChangeTime" Text :> (QueryParam "pageToken" Text :> (QueryParams "objectIds" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] ChangeLogsListResponse)))))))))))))))
- Network.Google.Resource.DFAReporting.Cities.List: type CitiesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("cities" :> (QueryParams "regionDartIds" (Textual Int64) :> (QueryParam "namePrefix" Text :> (QueryParams "countryDartIds" (Textual Int64) :> (QueryParams "dartIds" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] CitiesListResponse)))))))))
+ Network.Google.Resource.DFAReporting.Cities.List: type CitiesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("cities" :> (QueryParams "regionDartIds" (Textual Int64) :> (QueryParam "namePrefix" Text :> (QueryParams "countryDartIds" (Textual Int64) :> (QueryParams "dartIds" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] CitiesListResponse)))))))))
- Network.Google.Resource.DFAReporting.ConnectionTypes.Get: type ConnectionTypesGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("connectionTypes" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] ConnectionType))))))
+ Network.Google.Resource.DFAReporting.ConnectionTypes.Get: type ConnectionTypesGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("connectionTypes" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] ConnectionType))))))
- Network.Google.Resource.DFAReporting.ConnectionTypes.List: type ConnectionTypesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("connectionTypes" :> (QueryParam "alt" AltJSON :> Get '[JSON] ConnectionTypesListResponse)))))
+ Network.Google.Resource.DFAReporting.ConnectionTypes.List: type ConnectionTypesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("connectionTypes" :> (QueryParam "alt" AltJSON :> Get '[JSON] ConnectionTypesListResponse)))))
- Network.Google.Resource.DFAReporting.ContentCategories.Delete: type ContentCategoriesDeleteResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("contentCategories" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))
+ Network.Google.Resource.DFAReporting.ContentCategories.Delete: type ContentCategoriesDeleteResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("contentCategories" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))
- Network.Google.Resource.DFAReporting.ContentCategories.Get: type ContentCategoriesGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("contentCategories" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] ContentCategory))))))
+ Network.Google.Resource.DFAReporting.ContentCategories.Get: type ContentCategoriesGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("contentCategories" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] ContentCategory))))))
- Network.Google.Resource.DFAReporting.ContentCategories.Insert: type ContentCategoriesInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("contentCategories" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] ContentCategory :> Post '[JSON] ContentCategory))))))
+ Network.Google.Resource.DFAReporting.ContentCategories.Insert: type ContentCategoriesInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("contentCategories" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] ContentCategory :> Post '[JSON] ContentCategory))))))
- Network.Google.Resource.DFAReporting.ContentCategories.List: type ContentCategoriesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("contentCategories" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" ContentCategoriesListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" ContentCategoriesListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] ContentCategoriesListResponse)))))))))))
+ Network.Google.Resource.DFAReporting.ContentCategories.List: type ContentCategoriesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("contentCategories" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" ContentCategoriesListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" ContentCategoriesListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] ContentCategoriesListResponse)))))))))))
- Network.Google.Resource.DFAReporting.ContentCategories.Patch: type ContentCategoriesPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("contentCategories" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] ContentCategory :> Patch '[JSON] ContentCategory)))))))
+ Network.Google.Resource.DFAReporting.ContentCategories.Patch: type ContentCategoriesPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("contentCategories" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] ContentCategory :> Patch '[JSON] ContentCategory)))))))
- Network.Google.Resource.DFAReporting.ContentCategories.Update: type ContentCategoriesUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("contentCategories" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] ContentCategory :> Put '[JSON] ContentCategory))))))
+ Network.Google.Resource.DFAReporting.ContentCategories.Update: type ContentCategoriesUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("contentCategories" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] ContentCategory :> Put '[JSON] ContentCategory))))))
- Network.Google.Resource.DFAReporting.Countries.Get: type CountriesGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("countries" :> (Capture "dartId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Country))))))
+ Network.Google.Resource.DFAReporting.Countries.Get: type CountriesGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("countries" :> (Capture "dartId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Country))))))
- Network.Google.Resource.DFAReporting.Countries.List: type CountriesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("countries" :> (QueryParam "alt" AltJSON :> Get '[JSON] CountriesListResponse)))))
+ Network.Google.Resource.DFAReporting.Countries.List: type CountriesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("countries" :> (QueryParam "alt" AltJSON :> Get '[JSON] CountriesListResponse)))))
- Network.Google.Resource.DFAReporting.CreativeAssets.Insert: type CreativeAssetsInsertResource = ("dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeAssets" :> (Capture "advertiserId" (Textual Int64) :> ("creativeAssets" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeAssetMetadata :> Post '[JSON] CreativeAssetMetadata))))))))) :<|> ("upload" :> ("dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeAssets" :> (Capture "advertiserId" (Textual Int64) :> ("creativeAssets" :> (QueryParam "alt" AltJSON :> (QueryParam "uploadType" AltMedia :> (MultipartRelated '[JSON] CreativeAssetMetadata RequestBody :> Post '[JSON] CreativeAssetMetadata)))))))))))
+ Network.Google.Resource.DFAReporting.CreativeAssets.Insert: type CreativeAssetsInsertResource = ("dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeAssets" :> (Capture "advertiserId" (Textual Int64) :> ("creativeAssets" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeAssetMetadata :> Post '[JSON] CreativeAssetMetadata))))))))) :<|> ("upload" :> ("dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeAssets" :> (Capture "advertiserId" (Textual Int64) :> ("creativeAssets" :> (QueryParam "alt" AltJSON :> (QueryParam "uploadType" Multipart :> (MultipartRelated '[JSON] CreativeAssetMetadata :> Post '[JSON] CreativeAssetMetadata)))))))))))
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Delete: type CreativeFieldValuesDeleteResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (Capture "creativeFieldId" (Textual Int64) :> ("creativeFieldValues" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))))
+ Network.Google.Resource.DFAReporting.CreativeFieldValues.Delete: type CreativeFieldValuesDeleteResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (Capture "creativeFieldId" (Textual Int64) :> ("creativeFieldValues" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))))
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Get: type CreativeFieldValuesGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (Capture "creativeFieldId" (Textual Int64) :> ("creativeFieldValues" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] CreativeFieldValue))))))))
+ Network.Google.Resource.DFAReporting.CreativeFieldValues.Get: type CreativeFieldValuesGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (Capture "creativeFieldId" (Textual Int64) :> ("creativeFieldValues" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] CreativeFieldValue))))))))
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Insert: type CreativeFieldValuesInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (Capture "creativeFieldId" (Textual Int64) :> ("creativeFieldValues" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeFieldValue :> Post '[JSON] CreativeFieldValue))))))))
+ Network.Google.Resource.DFAReporting.CreativeFieldValues.Insert: type CreativeFieldValuesInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (Capture "creativeFieldId" (Textual Int64) :> ("creativeFieldValues" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeFieldValue :> Post '[JSON] CreativeFieldValue))))))))
- Network.Google.Resource.DFAReporting.CreativeFieldValues.List: type CreativeFieldValuesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (Capture "creativeFieldId" (Textual Int64) :> ("creativeFieldValues" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" CreativeFieldValuesListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" CreativeFieldValuesListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] CreativeFieldValuesListResponse)))))))))))))
+ Network.Google.Resource.DFAReporting.CreativeFieldValues.List: type CreativeFieldValuesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (Capture "creativeFieldId" (Textual Int64) :> ("creativeFieldValues" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" CreativeFieldValuesListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" CreativeFieldValuesListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] CreativeFieldValuesListResponse)))))))))))))
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Patch: type CreativeFieldValuesPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (Capture "creativeFieldId" (Textual Int64) :> ("creativeFieldValues" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeFieldValue :> Patch '[JSON] CreativeFieldValue)))))))))
+ Network.Google.Resource.DFAReporting.CreativeFieldValues.Patch: type CreativeFieldValuesPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (Capture "creativeFieldId" (Textual Int64) :> ("creativeFieldValues" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeFieldValue :> Patch '[JSON] CreativeFieldValue)))))))))
- Network.Google.Resource.DFAReporting.CreativeFieldValues.Update: type CreativeFieldValuesUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (Capture "creativeFieldId" (Textual Int64) :> ("creativeFieldValues" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeFieldValue :> Put '[JSON] CreativeFieldValue))))))))
+ Network.Google.Resource.DFAReporting.CreativeFieldValues.Update: type CreativeFieldValuesUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (Capture "creativeFieldId" (Textual Int64) :> ("creativeFieldValues" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeFieldValue :> Put '[JSON] CreativeFieldValue))))))))
- Network.Google.Resource.DFAReporting.CreativeFields.Delete: type CreativeFieldsDeleteResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))
+ Network.Google.Resource.DFAReporting.CreativeFields.Delete: type CreativeFieldsDeleteResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))
- Network.Google.Resource.DFAReporting.CreativeFields.Get: type CreativeFieldsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] CreativeField))))))
+ Network.Google.Resource.DFAReporting.CreativeFields.Get: type CreativeFieldsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] CreativeField))))))
- Network.Google.Resource.DFAReporting.CreativeFields.Insert: type CreativeFieldsInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeField :> Post '[JSON] CreativeField))))))
+ Network.Google.Resource.DFAReporting.CreativeFields.Insert: type CreativeFieldsInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeField :> Post '[JSON] CreativeField))))))
- Network.Google.Resource.DFAReporting.CreativeFields.List: type CreativeFieldsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" CreativeFieldsListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" CreativeFieldsListSortField :> (QueryParams "advertiserIds" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] CreativeFieldsListResponse))))))))))))
+ Network.Google.Resource.DFAReporting.CreativeFields.List: type CreativeFieldsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" CreativeFieldsListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" CreativeFieldsListSortField :> (QueryParams "advertiserIds" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] CreativeFieldsListResponse))))))))))))
- Network.Google.Resource.DFAReporting.CreativeFields.Patch: type CreativeFieldsPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeField :> Patch '[JSON] CreativeField)))))))
+ Network.Google.Resource.DFAReporting.CreativeFields.Patch: type CreativeFieldsPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeField :> Patch '[JSON] CreativeField)))))))
- Network.Google.Resource.DFAReporting.CreativeFields.Update: type CreativeFieldsUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeField :> Put '[JSON] CreativeField))))))
+ Network.Google.Resource.DFAReporting.CreativeFields.Update: type CreativeFieldsUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeFields" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeField :> Put '[JSON] CreativeField))))))
- Network.Google.Resource.DFAReporting.CreativeGroups.Get: type CreativeGroupsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeGroups" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] CreativeGroup))))))
+ Network.Google.Resource.DFAReporting.CreativeGroups.Get: type CreativeGroupsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeGroups" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] CreativeGroup))))))
- Network.Google.Resource.DFAReporting.CreativeGroups.Insert: type CreativeGroupsInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeGroups" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeGroup :> Post '[JSON] CreativeGroup))))))
+ Network.Google.Resource.DFAReporting.CreativeGroups.Insert: type CreativeGroupsInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeGroups" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeGroup :> Post '[JSON] CreativeGroup))))))
- Network.Google.Resource.DFAReporting.CreativeGroups.List: type CreativeGroupsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeGroups" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" CreativeGroupsListSortOrder :> (QueryParam "groupNumber" (Textual Int32) :> (QueryParam "pageToken" Text :> (QueryParam "sortField" CreativeGroupsListSortField :> (QueryParams "advertiserIds" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] CreativeGroupsListResponse)))))))))))))
+ Network.Google.Resource.DFAReporting.CreativeGroups.List: type CreativeGroupsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeGroups" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" CreativeGroupsListSortOrder :> (QueryParam "groupNumber" (Textual Int32) :> (QueryParam "pageToken" Text :> (QueryParam "sortField" CreativeGroupsListSortField :> (QueryParams "advertiserIds" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] CreativeGroupsListResponse)))))))))))))
- Network.Google.Resource.DFAReporting.CreativeGroups.Patch: type CreativeGroupsPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeGroups" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeGroup :> Patch '[JSON] CreativeGroup)))))))
+ Network.Google.Resource.DFAReporting.CreativeGroups.Patch: type CreativeGroupsPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeGroups" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeGroup :> Patch '[JSON] CreativeGroup)))))))
- Network.Google.Resource.DFAReporting.CreativeGroups.Update: type CreativeGroupsUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeGroups" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeGroup :> Put '[JSON] CreativeGroup))))))
+ Network.Google.Resource.DFAReporting.CreativeGroups.Update: type CreativeGroupsUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creativeGroups" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] CreativeGroup :> Put '[JSON] CreativeGroup))))))
- Network.Google.Resource.DFAReporting.Creatives.Get: type CreativesGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creatives" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Creative))))))
+ Network.Google.Resource.DFAReporting.Creatives.Get: type CreativesGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creatives" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Creative))))))
- Network.Google.Resource.DFAReporting.Creatives.Insert: type CreativesInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creatives" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Creative :> Post '[JSON] Creative))))))
+ Network.Google.Resource.DFAReporting.Creatives.Insert: type CreativesInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creatives" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Creative :> Post '[JSON] Creative))))))
- Network.Google.Resource.DFAReporting.Creatives.List: type CreativesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creatives" :> (QueryParams "renderingIds" (Textual Int64) :> (QueryParam "advertiserId" (Textual Int64) :> (QueryParam "searchString" Text :> (QueryParams "sizeIds" (Textual Int64) :> (QueryParams "companionCreativeIds" (Textual Int64) :> (QueryParam "campaignId" (Textual Int64) :> (QueryParams "types" CreativesListTypes :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" CreativesListSortOrder :> (QueryParam "active" Bool :> (QueryParams "creativeFieldIds" (Textual Int64) :> (QueryParam "pageToken" Text :> (QueryParam "sortField" CreativesListSortField :> (QueryParam "studioCreativeId" (Textual Int64) :> (QueryParam "archived" Bool :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] CreativesListResponse)))))))))))))))))))))
+ Network.Google.Resource.DFAReporting.Creatives.List: type CreativesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creatives" :> (QueryParams "renderingIds" (Textual Int64) :> (QueryParam "advertiserId" (Textual Int64) :> (QueryParam "searchString" Text :> (QueryParams "sizeIds" (Textual Int64) :> (QueryParams "companionCreativeIds" (Textual Int64) :> (QueryParam "campaignId" (Textual Int64) :> (QueryParams "types" CreativesListTypes :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" CreativesListSortOrder :> (QueryParam "active" Bool :> (QueryParams "creativeFieldIds" (Textual Int64) :> (QueryParam "pageToken" Text :> (QueryParam "sortField" CreativesListSortField :> (QueryParam "studioCreativeId" (Textual Int64) :> (QueryParam "archived" Bool :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] CreativesListResponse)))))))))))))))))))))
- Network.Google.Resource.DFAReporting.Creatives.Patch: type CreativesPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creatives" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Creative :> Patch '[JSON] Creative)))))))
+ Network.Google.Resource.DFAReporting.Creatives.Patch: type CreativesPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creatives" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Creative :> Patch '[JSON] Creative)))))))
- Network.Google.Resource.DFAReporting.Creatives.Update: type CreativesUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creatives" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Creative :> Put '[JSON] Creative))))))
+ Network.Google.Resource.DFAReporting.Creatives.Update: type CreativesUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("creatives" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Creative :> Put '[JSON] Creative))))))
- Network.Google.Resource.DFAReporting.DimensionValues.Query: type DimensionValuesQueryResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("dimensionvalues" :> ("query" :> (QueryParam "pageToken" Text :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] DimensionValueRequest :> Post '[JSON] DimensionValueList)))))))))
+ Network.Google.Resource.DFAReporting.DimensionValues.Query: type DimensionValuesQueryResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("dimensionvalues" :> ("query" :> (QueryParam "pageToken" Text :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] DimensionValueRequest :> Post '[JSON] DimensionValueList)))))))))
- Network.Google.Resource.DFAReporting.DirectorySiteContacts.Get: type DirectorySiteContactsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("directorySiteContacts" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] DirectorySiteContact))))))
+ Network.Google.Resource.DFAReporting.DirectorySiteContacts.Get: type DirectorySiteContactsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("directorySiteContacts" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] DirectorySiteContact))))))
- Network.Google.Resource.DFAReporting.DirectorySiteContacts.List: type DirectorySiteContactsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("directorySiteContacts" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParams "directorySiteIds" (Textual Int64) :> (QueryParam "sortOrder" DirectorySiteContactsListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" DirectorySiteContactsListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] DirectorySiteContactsListResponse))))))))))))
+ Network.Google.Resource.DFAReporting.DirectorySiteContacts.List: type DirectorySiteContactsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("directorySiteContacts" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParams "directorySiteIds" (Textual Int64) :> (QueryParam "sortOrder" DirectorySiteContactsListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" DirectorySiteContactsListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] DirectorySiteContactsListResponse))))))))))))
- Network.Google.Resource.DFAReporting.DirectorySites.Get: type DirectorySitesGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("directorySites" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] DirectorySite))))))
+ Network.Google.Resource.DFAReporting.DirectorySites.Get: type DirectorySitesGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("directorySites" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] DirectorySite))))))
- Network.Google.Resource.DFAReporting.DirectorySites.Insert: type DirectorySitesInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("directorySites" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] DirectorySite :> Post '[JSON] DirectorySite))))))
+ Network.Google.Resource.DFAReporting.DirectorySites.Insert: type DirectorySitesInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("directorySites" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] DirectorySite :> Post '[JSON] DirectorySite))))))
- Network.Google.Resource.DFAReporting.DirectorySites.List: type DirectorySitesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("directorySites" :> (QueryParam "searchString" Text :> (QueryParam "acceptsInterstitialPlacements" Bool :> (QueryParam "acceptsPublisherPaidPlacements" Bool :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" DirectorySitesListSortOrder :> (QueryParam "active" Bool :> (QueryParam "countryId" (Textual Int64) :> (QueryParam "pageToken" Text :> (QueryParam "sortField" DirectorySitesListSortField :> (QueryParam "acceptsInStreamVideoPlacements" Bool :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "parentId" (Textual Int64) :> (QueryParam "dfp_network_code" Text :> (QueryParam "alt" AltJSON :> Get '[JSON] DirectorySitesListResponse))))))))))))))))))
+ Network.Google.Resource.DFAReporting.DirectorySites.List: type DirectorySitesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("directorySites" :> (QueryParam "searchString" Text :> (QueryParam "acceptsInterstitialPlacements" Bool :> (QueryParam "acceptsPublisherPaidPlacements" Bool :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" DirectorySitesListSortOrder :> (QueryParam "active" Bool :> (QueryParam "countryId" (Textual Int64) :> (QueryParam "pageToken" Text :> (QueryParam "sortField" DirectorySitesListSortField :> (QueryParam "acceptsInStreamVideoPlacements" Bool :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "parentId" (Textual Int64) :> (QueryParam "dfp_network_code" Text :> (QueryParam "alt" AltJSON :> Get '[JSON] DirectorySitesListResponse))))))))))))))))))
- Network.Google.Resource.DFAReporting.EventTags.Delete: type EventTagsDeleteResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("eventTags" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))
+ Network.Google.Resource.DFAReporting.EventTags.Delete: type EventTagsDeleteResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("eventTags" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))
- Network.Google.Resource.DFAReporting.EventTags.Get: type EventTagsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("eventTags" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] EventTag))))))
+ Network.Google.Resource.DFAReporting.EventTags.Get: type EventTagsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("eventTags" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] EventTag))))))
- Network.Google.Resource.DFAReporting.EventTags.Insert: type EventTagsInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("eventTags" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] EventTag :> Post '[JSON] EventTag))))))
+ Network.Google.Resource.DFAReporting.EventTags.Insert: type EventTagsInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("eventTags" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] EventTag :> Post '[JSON] EventTag))))))
- Network.Google.Resource.DFAReporting.EventTags.List: type EventTagsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("eventTags" :> (QueryParam "definitionsOnly" Bool :> (QueryParams "eventTagTypes" EventTagsListEventTagTypes :> (QueryParam "enabled" Bool :> (QueryParam "advertiserId" (Textual Int64) :> (QueryParam "searchString" Text :> (QueryParam "campaignId" (Textual Int64) :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" EventTagsListSortOrder :> (QueryParam "adId" (Textual Int64) :> (QueryParam "sortField" EventTagsListSortField :> (QueryParam "alt" AltJSON :> Get '[JSON] EventTagsListResponse)))))))))))))))
+ Network.Google.Resource.DFAReporting.EventTags.List: type EventTagsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("eventTags" :> (QueryParam "definitionsOnly" Bool :> (QueryParams "eventTagTypes" EventTagsListEventTagTypes :> (QueryParam "enabled" Bool :> (QueryParam "advertiserId" (Textual Int64) :> (QueryParam "searchString" Text :> (QueryParam "campaignId" (Textual Int64) :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" EventTagsListSortOrder :> (QueryParam "adId" (Textual Int64) :> (QueryParam "sortField" EventTagsListSortField :> (QueryParam "alt" AltJSON :> Get '[JSON] EventTagsListResponse)))))))))))))))
- Network.Google.Resource.DFAReporting.EventTags.Patch: type EventTagsPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("eventTags" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] EventTag :> Patch '[JSON] EventTag)))))))
+ Network.Google.Resource.DFAReporting.EventTags.Patch: type EventTagsPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("eventTags" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] EventTag :> Patch '[JSON] EventTag)))))))
- Network.Google.Resource.DFAReporting.EventTags.Update: type EventTagsUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("eventTags" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] EventTag :> Put '[JSON] EventTag))))))
+ Network.Google.Resource.DFAReporting.EventTags.Update: type EventTagsUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("eventTags" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] EventTag :> Put '[JSON] EventTag))))))
- Network.Google.Resource.DFAReporting.Files.Get: type FilesGetResource = ("dfareporting" :> ("v2.2" :> ("reports" :> (Capture "reportId" (Textual Int64) :> ("files" :> (Capture "fileId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] File))))))) :<|> ("dfareporting" :> ("v2.2" :> ("reports" :> (Capture "reportId" (Textual Int64) :> ("files" :> (Capture "fileId" (Textual Int64) :> (QueryParam "alt" AltMedia :> Get '[OctetStream] Stream)))))))
+ Network.Google.Resource.DFAReporting.Files.Get: type FilesGetResource = ("dfareporting" :> ("v2.5" :> ("reports" :> (Capture "reportId" (Textual Int64) :> ("files" :> (Capture "fileId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] File))))))) :<|> ("dfareporting" :> ("v2.5" :> ("reports" :> (Capture "reportId" (Textual Int64) :> ("files" :> (Capture "fileId" (Textual Int64) :> (QueryParam "alt" AltMedia :> Get '[OctetStream] Stream)))))))
- Network.Google.Resource.DFAReporting.Files.List: type FilesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("files" :> (QueryParam "sortOrder" FilesListSortOrder :> (QueryParam "scope" FilesListScope :> (QueryParam "pageToken" Text :> (QueryParam "sortField" FilesListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] FileList))))))))))
+ Network.Google.Resource.DFAReporting.Files.List: type FilesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("files" :> (QueryParam "sortOrder" FilesListSortOrder :> (QueryParam "scope" FilesListScope :> (QueryParam "pageToken" Text :> (QueryParam "sortField" FilesListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] FileList))))))))))
- Network.Google.Resource.DFAReporting.FloodlightActivities.Delete: type FloodlightActivitiesDeleteResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivities" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))
+ Network.Google.Resource.DFAReporting.FloodlightActivities.Delete: type FloodlightActivitiesDeleteResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivities" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))
- Network.Google.Resource.DFAReporting.FloodlightActivities.Generatetag: type FloodlightActivitiesGeneratetagResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivities" :> ("generatetag" :> (QueryParam "floodlightActivityId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Post '[JSON] FloodlightActivitiesGenerateTagResponse)))))))
+ Network.Google.Resource.DFAReporting.FloodlightActivities.Generatetag: type FloodlightActivitiesGeneratetagResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivities" :> ("generatetag" :> (QueryParam "floodlightActivityId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Post '[JSON] FloodlightActivitiesGenerateTagResponse)))))))
- Network.Google.Resource.DFAReporting.FloodlightActivities.Get: type FloodlightActivitiesGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivities" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] FloodlightActivity))))))
+ Network.Google.Resource.DFAReporting.FloodlightActivities.Get: type FloodlightActivitiesGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivities" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] FloodlightActivity))))))
- Network.Google.Resource.DFAReporting.FloodlightActivities.Insert: type FloodlightActivitiesInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivities" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] FloodlightActivity :> Post '[JSON] FloodlightActivity))))))
+ Network.Google.Resource.DFAReporting.FloodlightActivities.Insert: type FloodlightActivitiesInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivities" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] FloodlightActivity :> Post '[JSON] FloodlightActivity))))))
- Network.Google.Resource.DFAReporting.FloodlightActivities.List: type FloodlightActivitiesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivities" :> (QueryParam "tagString" Text :> (QueryParam "floodlightActivityGroupTagString" Text :> (QueryParam "floodlightConfigurationId" (Textual Int64) :> (QueryParam "advertiserId" (Textual Int64) :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParams "floodlightActivityGroupIds" (Textual Int64) :> (QueryParam "sortOrder" FloodlightActivitiesListSortOrder :> (QueryParam "floodlightActivityGroupType" FloodlightActivitiesListFloodlightActivityGroupType :> (QueryParam "floodlightActivityGroupName" Text :> (QueryParam "pageToken" Text :> (QueryParam "sortField" FloodlightActivitiesListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] FloodlightActivitiesListResponse))))))))))))))))))
+ Network.Google.Resource.DFAReporting.FloodlightActivities.List: type FloodlightActivitiesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivities" :> (QueryParam "tagString" Text :> (QueryParam "floodlightActivityGroupTagString" Text :> (QueryParam "floodlightConfigurationId" (Textual Int64) :> (QueryParam "advertiserId" (Textual Int64) :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParams "floodlightActivityGroupIds" (Textual Int64) :> (QueryParam "sortOrder" FloodlightActivitiesListSortOrder :> (QueryParam "floodlightActivityGroupType" FloodlightActivitiesListFloodlightActivityGroupType :> (QueryParam "floodlightActivityGroupName" Text :> (QueryParam "pageToken" Text :> (QueryParam "sortField" FloodlightActivitiesListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] FloodlightActivitiesListResponse))))))))))))))))))
- Network.Google.Resource.DFAReporting.FloodlightActivities.Patch: type FloodlightActivitiesPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivities" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] FloodlightActivity :> Patch '[JSON] FloodlightActivity)))))))
+ Network.Google.Resource.DFAReporting.FloodlightActivities.Patch: type FloodlightActivitiesPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivities" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] FloodlightActivity :> Patch '[JSON] FloodlightActivity)))))))
- Network.Google.Resource.DFAReporting.FloodlightActivities.Update: type FloodlightActivitiesUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivities" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] FloodlightActivity :> Put '[JSON] FloodlightActivity))))))
+ Network.Google.Resource.DFAReporting.FloodlightActivities.Update: type FloodlightActivitiesUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivities" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] FloodlightActivity :> Put '[JSON] FloodlightActivity))))))
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Get: type FloodlightActivityGroupsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivityGroups" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] FloodlightActivityGroup))))))
+ Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Get: type FloodlightActivityGroupsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivityGroups" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] FloodlightActivityGroup))))))
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Insert: type FloodlightActivityGroupsInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivityGroups" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] FloodlightActivityGroup :> Post '[JSON] FloodlightActivityGroup))))))
+ Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Insert: type FloodlightActivityGroupsInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivityGroups" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] FloodlightActivityGroup :> Post '[JSON] FloodlightActivityGroup))))))
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List: type FloodlightActivityGroupsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivityGroups" :> (QueryParam "floodlightConfigurationId" (Textual Int64) :> (QueryParam "advertiserId" (Textual Int64) :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" FloodlightActivityGroupsListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" FloodlightActivityGroupsListSortField :> (QueryParam "type" FloodlightActivityGroupsListType :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] FloodlightActivityGroupsListResponse))))))))))))))
+ Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List: type FloodlightActivityGroupsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivityGroups" :> (QueryParam "floodlightConfigurationId" (Textual Int64) :> (QueryParam "advertiserId" (Textual Int64) :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" FloodlightActivityGroupsListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" FloodlightActivityGroupsListSortField :> (QueryParam "type" FloodlightActivityGroupsListType :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] FloodlightActivityGroupsListResponse))))))))))))))
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Patch: type FloodlightActivityGroupsPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivityGroups" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] FloodlightActivityGroup :> Patch '[JSON] FloodlightActivityGroup)))))))
+ Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Patch: type FloodlightActivityGroupsPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivityGroups" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] FloodlightActivityGroup :> Patch '[JSON] FloodlightActivityGroup)))))))
- Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Update: type FloodlightActivityGroupsUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivityGroups" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] FloodlightActivityGroup :> Put '[JSON] FloodlightActivityGroup))))))
+ Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Update: type FloodlightActivityGroupsUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightActivityGroups" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] FloodlightActivityGroup :> Put '[JSON] FloodlightActivityGroup))))))
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.Get: type FloodlightConfigurationsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightConfigurations" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] FloodlightConfiguration))))))
+ Network.Google.Resource.DFAReporting.FloodlightConfigurations.Get: type FloodlightConfigurationsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightConfigurations" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] FloodlightConfiguration))))))
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.List: type FloodlightConfigurationsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightConfigurations" :> (QueryParams "ids" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] FloodlightConfigurationsListResponse))))))
+ Network.Google.Resource.DFAReporting.FloodlightConfigurations.List: type FloodlightConfigurationsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightConfigurations" :> (QueryParams "ids" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] FloodlightConfigurationsListResponse))))))
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.Patch: type FloodlightConfigurationsPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightConfigurations" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] FloodlightConfiguration :> Patch '[JSON] FloodlightConfiguration)))))))
+ Network.Google.Resource.DFAReporting.FloodlightConfigurations.Patch: type FloodlightConfigurationsPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightConfigurations" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] FloodlightConfiguration :> Patch '[JSON] FloodlightConfiguration)))))))
- Network.Google.Resource.DFAReporting.FloodlightConfigurations.Update: type FloodlightConfigurationsUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightConfigurations" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] FloodlightConfiguration :> Put '[JSON] FloodlightConfiguration))))))
+ Network.Google.Resource.DFAReporting.FloodlightConfigurations.Update: type FloodlightConfigurationsUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("floodlightConfigurations" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] FloodlightConfiguration :> Put '[JSON] FloodlightConfiguration))))))
- Network.Google.Resource.DFAReporting.InventoryItems.Get: type InventoryItemsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("projects" :> (Capture "projectId" (Textual Int64) :> ("inventoryItems" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] InventoryItem))))))))
+ Network.Google.Resource.DFAReporting.InventoryItems.Get: type InventoryItemsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("projects" :> (Capture "projectId" (Textual Int64) :> ("inventoryItems" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] InventoryItem))))))))
- Network.Google.Resource.DFAReporting.InventoryItems.List: type InventoryItemsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("projects" :> (Capture "projectId" (Textual Int64) :> ("inventoryItems" :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" InventoryItemsListSortOrder :> (QueryParam "inPlan" Bool :> (QueryParam "pageToken" Text :> (QueryParam "sortField" InventoryItemsListSortField :> (QueryParams "orderId" (Textual Int64) :> (QueryParams "siteId" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] InventoryItemsListResponse)))))))))))))))
+ Network.Google.Resource.DFAReporting.InventoryItems.List: type InventoryItemsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("projects" :> (Capture "projectId" (Textual Int64) :> ("inventoryItems" :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" InventoryItemsListSortOrder :> (QueryParam "inPlan" Bool :> (QueryParam "pageToken" Text :> (QueryParam "sortField" InventoryItemsListSortField :> (QueryParam "type" InventoryItemsListType :> (QueryParams "orderId" (Textual Int64) :> (QueryParams "siteId" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] InventoryItemsListResponse))))))))))))))))
- Network.Google.Resource.DFAReporting.LandingPages.Delete: type LandingPagesDeleteResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (Capture "campaignId" (Textual Int64) :> ("landingPages" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))))
+ Network.Google.Resource.DFAReporting.LandingPages.Delete: type LandingPagesDeleteResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (Capture "campaignId" (Textual Int64) :> ("landingPages" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))))
- Network.Google.Resource.DFAReporting.LandingPages.Get: type LandingPagesGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (Capture "campaignId" (Textual Int64) :> ("landingPages" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] LandingPage))))))))
+ Network.Google.Resource.DFAReporting.LandingPages.Get: type LandingPagesGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (Capture "campaignId" (Textual Int64) :> ("landingPages" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] LandingPage))))))))
- Network.Google.Resource.DFAReporting.LandingPages.Insert: type LandingPagesInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (Capture "campaignId" (Textual Int64) :> ("landingPages" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] LandingPage :> Post '[JSON] LandingPage))))))))
+ Network.Google.Resource.DFAReporting.LandingPages.Insert: type LandingPagesInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (Capture "campaignId" (Textual Int64) :> ("landingPages" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] LandingPage :> Post '[JSON] LandingPage))))))))
- Network.Google.Resource.DFAReporting.LandingPages.List: type LandingPagesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (Capture "campaignId" (Textual Int64) :> ("landingPages" :> (QueryParam "alt" AltJSON :> Get '[JSON] LandingPagesListResponse)))))))
+ Network.Google.Resource.DFAReporting.LandingPages.List: type LandingPagesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (Capture "campaignId" (Textual Int64) :> ("landingPages" :> (QueryParam "alt" AltJSON :> Get '[JSON] LandingPagesListResponse)))))))
- Network.Google.Resource.DFAReporting.LandingPages.Patch: type LandingPagesPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (Capture "campaignId" (Textual Int64) :> ("landingPages" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] LandingPage :> Patch '[JSON] LandingPage)))))))))
+ Network.Google.Resource.DFAReporting.LandingPages.Patch: type LandingPagesPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (Capture "campaignId" (Textual Int64) :> ("landingPages" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] LandingPage :> Patch '[JSON] LandingPage)))))))))
- Network.Google.Resource.DFAReporting.LandingPages.Update: type LandingPagesUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (Capture "campaignId" (Textual Int64) :> ("landingPages" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] LandingPage :> Put '[JSON] LandingPage))))))))
+ Network.Google.Resource.DFAReporting.LandingPages.Update: type LandingPagesUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("campaigns" :> (Capture "campaignId" (Textual Int64) :> ("landingPages" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] LandingPage :> Put '[JSON] LandingPage))))))))
- Network.Google.Resource.DFAReporting.Metros.List: type MetrosListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("metros" :> (QueryParam "alt" AltJSON :> Get '[JSON] MetrosListResponse)))))
+ Network.Google.Resource.DFAReporting.Metros.List: type MetrosListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("metros" :> (QueryParam "alt" AltJSON :> Get '[JSON] MetrosListResponse)))))
- Network.Google.Resource.DFAReporting.MobileCarriers.Get: type MobileCarriersGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("mobileCarriers" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] MobileCarrier))))))
+ Network.Google.Resource.DFAReporting.MobileCarriers.Get: type MobileCarriersGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("mobileCarriers" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] MobileCarrier))))))
- Network.Google.Resource.DFAReporting.MobileCarriers.List: type MobileCarriersListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("mobileCarriers" :> (QueryParam "alt" AltJSON :> Get '[JSON] MobileCarriersListResponse)))))
+ Network.Google.Resource.DFAReporting.MobileCarriers.List: type MobileCarriersListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("mobileCarriers" :> (QueryParam "alt" AltJSON :> Get '[JSON] MobileCarriersListResponse)))))
- Network.Google.Resource.DFAReporting.OperatingSystemVersions.Get: type OperatingSystemVersionsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("operatingSystemVersions" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] OperatingSystemVersion))))))
+ Network.Google.Resource.DFAReporting.OperatingSystemVersions.Get: type OperatingSystemVersionsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("operatingSystemVersions" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] OperatingSystemVersion))))))
- Network.Google.Resource.DFAReporting.OperatingSystemVersions.List: type OperatingSystemVersionsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("operatingSystemVersions" :> (QueryParam "alt" AltJSON :> Get '[JSON] OperatingSystemVersionsListResponse)))))
+ Network.Google.Resource.DFAReporting.OperatingSystemVersions.List: type OperatingSystemVersionsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("operatingSystemVersions" :> (QueryParam "alt" AltJSON :> Get '[JSON] OperatingSystemVersionsListResponse)))))
- Network.Google.Resource.DFAReporting.OperatingSystems.Get: type OperatingSystemsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("operatingSystems" :> (Capture "dartId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] OperatingSystem))))))
+ Network.Google.Resource.DFAReporting.OperatingSystems.Get: type OperatingSystemsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("operatingSystems" :> (Capture "dartId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] OperatingSystem))))))
- Network.Google.Resource.DFAReporting.OperatingSystems.List: type OperatingSystemsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("operatingSystems" :> (QueryParam "alt" AltJSON :> Get '[JSON] OperatingSystemsListResponse)))))
+ Network.Google.Resource.DFAReporting.OperatingSystems.List: type OperatingSystemsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("operatingSystems" :> (QueryParam "alt" AltJSON :> Get '[JSON] OperatingSystemsListResponse)))))
- Network.Google.Resource.DFAReporting.OrderDocuments.Get: type OrderDocumentsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("projects" :> (Capture "projectId" (Textual Int64) :> ("orderDocuments" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] OrderDocument))))))))
+ Network.Google.Resource.DFAReporting.OrderDocuments.Get: type OrderDocumentsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("projects" :> (Capture "projectId" (Textual Int64) :> ("orderDocuments" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] OrderDocument))))))))
- Network.Google.Resource.DFAReporting.OrderDocuments.List: type OrderDocumentsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("projects" :> (Capture "projectId" (Textual Int64) :> ("orderDocuments" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" OrderDocumentsListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" OrderDocumentsListSortField :> (QueryParams "orderId" (Textual Int64) :> (QueryParam "approved" Bool :> (QueryParams "siteId" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] OrderDocumentsListResponse))))))))))))))))
+ Network.Google.Resource.DFAReporting.OrderDocuments.List: type OrderDocumentsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("projects" :> (Capture "projectId" (Textual Int64) :> ("orderDocuments" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" OrderDocumentsListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" OrderDocumentsListSortField :> (QueryParams "orderId" (Textual Int64) :> (QueryParam "approved" Bool :> (QueryParams "siteId" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] OrderDocumentsListResponse))))))))))))))))
- Network.Google.Resource.DFAReporting.Orders.Get: type OrdersGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("projects" :> (Capture "projectId" (Textual Int64) :> ("orders" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Order))))))))
+ Network.Google.Resource.DFAReporting.Orders.Get: type OrdersGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("projects" :> (Capture "projectId" (Textual Int64) :> ("orders" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Order))))))))
- Network.Google.Resource.DFAReporting.Orders.List: type OrdersListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("projects" :> (Capture "projectId" (Textual Int64) :> ("orders" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" OrdersListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" OrdersListSortField :> (QueryParams "siteId" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] OrdersListResponse))))))))))))))
+ Network.Google.Resource.DFAReporting.Orders.List: type OrdersListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("projects" :> (Capture "projectId" (Textual Int64) :> ("orders" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" OrdersListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" OrdersListSortField :> (QueryParams "siteId" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] OrdersListResponse))))))))))))))
- Network.Google.Resource.DFAReporting.PlacementGroups.Get: type PlacementGroupsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementGroups" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] PlacementGroup))))))
+ Network.Google.Resource.DFAReporting.PlacementGroups.Get: type PlacementGroupsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementGroups" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] PlacementGroup))))))
- Network.Google.Resource.DFAReporting.PlacementGroups.Insert: type PlacementGroupsInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementGroups" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] PlacementGroup :> Post '[JSON] PlacementGroup))))))
+ Network.Google.Resource.DFAReporting.PlacementGroups.Insert: type PlacementGroupsInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementGroups" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] PlacementGroup :> Post '[JSON] PlacementGroup))))))
- Network.Google.Resource.DFAReporting.PlacementGroups.List: type PlacementGroupsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementGroups" :> (QueryParams "placementStrategyIds" (Textual Int64) :> (QueryParams "contentCategoryIds" (Textual Int64) :> (QueryParam "maxEndDate" Text :> (QueryParams "campaignIds" (Textual Int64) :> (QueryParams "pricingTypes" PlacementGroupsListPricingTypes :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "placementGroupType" PlacementGroupsListPlacementGroupType :> (QueryParams "directorySiteIds" (Textual Int64) :> (QueryParam "sortOrder" PlacementGroupsListSortOrder :> (QueryParams "siteIds" (Textual Int64) :> (QueryParam "pageToken" Text :> (QueryParam "sortField" PlacementGroupsListSortField :> (QueryParam "maxStartDate" Text :> (QueryParams "advertiserIds" (Textual Int64) :> (QueryParam "minStartDate" Text :> (QueryParam "archived" Bool :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "minEndDate" Text :> (QueryParam "alt" AltJSON :> Get '[JSON] PlacementGroupsListResponse))))))))))))))))))))))))
+ Network.Google.Resource.DFAReporting.PlacementGroups.List: type PlacementGroupsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementGroups" :> (QueryParams "placementStrategyIds" (Textual Int64) :> (QueryParams "contentCategoryIds" (Textual Int64) :> (QueryParam "maxEndDate" Text :> (QueryParams "campaignIds" (Textual Int64) :> (QueryParams "pricingTypes" PlacementGroupsListPricingTypes :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "placementGroupType" PlacementGroupsListPlacementGroupType :> (QueryParams "directorySiteIds" (Textual Int64) :> (QueryParam "sortOrder" PlacementGroupsListSortOrder :> (QueryParams "siteIds" (Textual Int64) :> (QueryParam "pageToken" Text :> (QueryParam "sortField" PlacementGroupsListSortField :> (QueryParam "maxStartDate" Text :> (QueryParams "advertiserIds" (Textual Int64) :> (QueryParam "minStartDate" Text :> (QueryParam "archived" Bool :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "minEndDate" Text :> (QueryParam "alt" AltJSON :> Get '[JSON] PlacementGroupsListResponse))))))))))))))))))))))))
- Network.Google.Resource.DFAReporting.PlacementGroups.Patch: type PlacementGroupsPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementGroups" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] PlacementGroup :> Patch '[JSON] PlacementGroup)))))))
+ Network.Google.Resource.DFAReporting.PlacementGroups.Patch: type PlacementGroupsPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementGroups" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] PlacementGroup :> Patch '[JSON] PlacementGroup)))))))
- Network.Google.Resource.DFAReporting.PlacementGroups.Update: type PlacementGroupsUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementGroups" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] PlacementGroup :> Put '[JSON] PlacementGroup))))))
+ Network.Google.Resource.DFAReporting.PlacementGroups.Update: type PlacementGroupsUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementGroups" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] PlacementGroup :> Put '[JSON] PlacementGroup))))))
- Network.Google.Resource.DFAReporting.PlacementStrategies.Delete: type PlacementStrategiesDeleteResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementStrategies" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))
+ Network.Google.Resource.DFAReporting.PlacementStrategies.Delete: type PlacementStrategiesDeleteResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementStrategies" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))
- Network.Google.Resource.DFAReporting.PlacementStrategies.Get: type PlacementStrategiesGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementStrategies" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] PlacementStrategy))))))
+ Network.Google.Resource.DFAReporting.PlacementStrategies.Get: type PlacementStrategiesGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementStrategies" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] PlacementStrategy))))))
- Network.Google.Resource.DFAReporting.PlacementStrategies.Insert: type PlacementStrategiesInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementStrategies" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] PlacementStrategy :> Post '[JSON] PlacementStrategy))))))
+ Network.Google.Resource.DFAReporting.PlacementStrategies.Insert: type PlacementStrategiesInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementStrategies" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] PlacementStrategy :> Post '[JSON] PlacementStrategy))))))
- Network.Google.Resource.DFAReporting.PlacementStrategies.List: type PlacementStrategiesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementStrategies" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" PlacementStrategiesListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" PlacementStrategiesListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] PlacementStrategiesListResponse)))))))))))
+ Network.Google.Resource.DFAReporting.PlacementStrategies.List: type PlacementStrategiesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementStrategies" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" PlacementStrategiesListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" PlacementStrategiesListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] PlacementStrategiesListResponse)))))))))))
- Network.Google.Resource.DFAReporting.PlacementStrategies.Patch: type PlacementStrategiesPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementStrategies" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] PlacementStrategy :> Patch '[JSON] PlacementStrategy)))))))
+ Network.Google.Resource.DFAReporting.PlacementStrategies.Patch: type PlacementStrategiesPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementStrategies" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] PlacementStrategy :> Patch '[JSON] PlacementStrategy)))))))
- Network.Google.Resource.DFAReporting.PlacementStrategies.Update: type PlacementStrategiesUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementStrategies" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] PlacementStrategy :> Put '[JSON] PlacementStrategy))))))
+ Network.Google.Resource.DFAReporting.PlacementStrategies.Update: type PlacementStrategiesUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placementStrategies" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] PlacementStrategy :> Put '[JSON] PlacementStrategy))))))
- Network.Google.Resource.DFAReporting.Placements.Generatetags: type PlacementsGeneratetagsResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placements" :> ("generatetags" :> (QueryParams "tagFormats" PlacementsGeneratetagsTagFormats :> (QueryParam "campaignId" (Textual Int64) :> (QueryParams "placementIds" (Textual Int64) :> (QueryParam "alt" AltJSON :> Post '[JSON] PlacementsGenerateTagsResponse)))))))))
+ Network.Google.Resource.DFAReporting.Placements.Generatetags: type PlacementsGeneratetagsResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placements" :> ("generatetags" :> (QueryParams "tagFormats" PlacementsGeneratetagsTagFormats :> (QueryParam "campaignId" (Textual Int64) :> (QueryParams "placementIds" (Textual Int64) :> (QueryParam "alt" AltJSON :> Post '[JSON] PlacementsGenerateTagsResponse)))))))))
- Network.Google.Resource.DFAReporting.Placements.Get: type PlacementsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placements" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Placement))))))
+ Network.Google.Resource.DFAReporting.Placements.Get: type PlacementsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placements" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Placement))))))
- Network.Google.Resource.DFAReporting.Placements.Insert: type PlacementsInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placements" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Placement :> Post '[JSON] Placement))))))
+ Network.Google.Resource.DFAReporting.Placements.Insert: type PlacementsInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placements" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Placement :> Post '[JSON] Placement))))))
- Network.Google.Resource.DFAReporting.Placements.List: type PlacementsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placements" :> (QueryParams "placementStrategyIds" (Textual Int64) :> (QueryParams "contentCategoryIds" (Textual Int64) :> (QueryParam "maxEndDate" Text :> (QueryParams "campaignIds" (Textual Int64) :> (QueryParams "pricingTypes" PlacementsListPricingTypes :> (QueryParam "searchString" Text :> (QueryParams "sizeIds" (Textual Int64) :> (QueryParams "ids" (Textual Int64) :> (QueryParams "groupIds" (Textual Int64) :> (QueryParams "directorySiteIds" (Textual Int64) :> (QueryParam "sortOrder" PlacementsListSortOrder :> (QueryParam "paymentSource" PlacementsListPaymentSource :> (QueryParams "siteIds" (Textual Int64) :> (QueryParam "pageToken" Text :> (QueryParam "sortField" PlacementsListSortField :> (QueryParams "compatibilities" PlacementsListCompatibilities :> (QueryParam "maxStartDate" Text :> (QueryParams "advertiserIds" (Textual Int64) :> (QueryParam "minStartDate" Text :> (QueryParam "archived" Bool :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "minEndDate" Text :> (QueryParam "alt" AltJSON :> Get '[JSON] PlacementsListResponse)))))))))))))))))))))))))))
+ Network.Google.Resource.DFAReporting.Placements.List: type PlacementsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placements" :> (QueryParams "placementStrategyIds" (Textual Int64) :> (QueryParams "contentCategoryIds" (Textual Int64) :> (QueryParam "maxEndDate" Text :> (QueryParams "campaignIds" (Textual Int64) :> (QueryParams "pricingTypes" PlacementsListPricingTypes :> (QueryParam "searchString" Text :> (QueryParams "sizeIds" (Textual Int64) :> (QueryParams "ids" (Textual Int64) :> (QueryParams "groupIds" (Textual Int64) :> (QueryParams "directorySiteIds" (Textual Int64) :> (QueryParam "sortOrder" PlacementsListSortOrder :> (QueryParam "paymentSource" PlacementsListPaymentSource :> (QueryParams "siteIds" (Textual Int64) :> (QueryParam "pageToken" Text :> (QueryParam "sortField" PlacementsListSortField :> (QueryParams "compatibilities" PlacementsListCompatibilities :> (QueryParam "maxStartDate" Text :> (QueryParams "advertiserIds" (Textual Int64) :> (QueryParam "minStartDate" Text :> (QueryParam "archived" Bool :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "minEndDate" Text :> (QueryParam "alt" AltJSON :> Get '[JSON] PlacementsListResponse)))))))))))))))))))))))))))
- Network.Google.Resource.DFAReporting.Placements.Patch: type PlacementsPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placements" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Placement :> Patch '[JSON] Placement)))))))
+ Network.Google.Resource.DFAReporting.Placements.Patch: type PlacementsPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placements" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Placement :> Patch '[JSON] Placement)))))))
- Network.Google.Resource.DFAReporting.Placements.Update: type PlacementsUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placements" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Placement :> Put '[JSON] Placement))))))
+ Network.Google.Resource.DFAReporting.Placements.Update: type PlacementsUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("placements" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Placement :> Put '[JSON] Placement))))))
- Network.Google.Resource.DFAReporting.PlatformTypes.Get: type PlatformTypesGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("platformTypes" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] PlatformType))))))
+ Network.Google.Resource.DFAReporting.PlatformTypes.Get: type PlatformTypesGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("platformTypes" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] PlatformType))))))
- Network.Google.Resource.DFAReporting.PlatformTypes.List: type PlatformTypesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("platformTypes" :> (QueryParam "alt" AltJSON :> Get '[JSON] PlatformTypesListResponse)))))
+ Network.Google.Resource.DFAReporting.PlatformTypes.List: type PlatformTypesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("platformTypes" :> (QueryParam "alt" AltJSON :> Get '[JSON] PlatformTypesListResponse)))))
- Network.Google.Resource.DFAReporting.PostalCodes.Get: type PostalCodesGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("postalCodes" :> (Capture "code" Text :> (QueryParam "alt" AltJSON :> Get '[JSON] PostalCode))))))
+ Network.Google.Resource.DFAReporting.PostalCodes.Get: type PostalCodesGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("postalCodes" :> (Capture "code" Text :> (QueryParam "alt" AltJSON :> Get '[JSON] PostalCode))))))
- Network.Google.Resource.DFAReporting.PostalCodes.List: type PostalCodesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("postalCodes" :> (QueryParam "alt" AltJSON :> Get '[JSON] PostalCodesListResponse)))))
+ Network.Google.Resource.DFAReporting.PostalCodes.List: type PostalCodesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("postalCodes" :> (QueryParam "alt" AltJSON :> Get '[JSON] PostalCodesListResponse)))))
- Network.Google.Resource.DFAReporting.Projects.Get: type ProjectsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("projects" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Project))))))
+ Network.Google.Resource.DFAReporting.Projects.Get: type ProjectsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("projects" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Project))))))
- Network.Google.Resource.DFAReporting.Projects.List: type ProjectsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("projects" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" ProjectsListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" ProjectsListSortField :> (QueryParams "advertiserIds" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] ProjectsListResponse))))))))))))
+ Network.Google.Resource.DFAReporting.Projects.List: type ProjectsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("projects" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" ProjectsListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" ProjectsListSortField :> (QueryParams "advertiserIds" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] ProjectsListResponse))))))))))))
- Network.Google.Resource.DFAReporting.Regions.List: type RegionsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("regions" :> (QueryParam "alt" AltJSON :> Get '[JSON] RegionsListResponse)))))
+ Network.Google.Resource.DFAReporting.Regions.List: type RegionsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("regions" :> (QueryParam "alt" AltJSON :> Get '[JSON] RegionsListResponse)))))
- Network.Google.Resource.DFAReporting.RemarketingListShares.Get: type RemarketingListSharesGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("remarketingListShares" :> (Capture "remarketingListId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] RemarketingListShare))))))
+ Network.Google.Resource.DFAReporting.RemarketingListShares.Get: type RemarketingListSharesGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("remarketingListShares" :> (Capture "remarketingListId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] RemarketingListShare))))))
- Network.Google.Resource.DFAReporting.RemarketingListShares.Patch: type RemarketingListSharesPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("remarketingListShares" :> (QueryParam "remarketingListId" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] RemarketingListShare :> Patch '[JSON] RemarketingListShare)))))))
+ Network.Google.Resource.DFAReporting.RemarketingListShares.Patch: type RemarketingListSharesPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("remarketingListShares" :> (QueryParam "remarketingListId" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] RemarketingListShare :> Patch '[JSON] RemarketingListShare)))))))
- Network.Google.Resource.DFAReporting.RemarketingListShares.Update: type RemarketingListSharesUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("remarketingListShares" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] RemarketingListShare :> Put '[JSON] RemarketingListShare))))))
+ Network.Google.Resource.DFAReporting.RemarketingListShares.Update: type RemarketingListSharesUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("remarketingListShares" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] RemarketingListShare :> Put '[JSON] RemarketingListShare))))))
- Network.Google.Resource.DFAReporting.RemarketingLists.Get: type RemarketingListsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("remarketingLists" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] RemarketingList))))))
+ Network.Google.Resource.DFAReporting.RemarketingLists.Get: type RemarketingListsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("remarketingLists" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] RemarketingList))))))
- Network.Google.Resource.DFAReporting.RemarketingLists.Insert: type RemarketingListsInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("remarketingLists" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] RemarketingList :> Post '[JSON] RemarketingList))))))
+ Network.Google.Resource.DFAReporting.RemarketingLists.Insert: type RemarketingListsInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("remarketingLists" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] RemarketingList :> Post '[JSON] RemarketingList))))))
- Network.Google.Resource.DFAReporting.RemarketingLists.List: type RemarketingListsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("remarketingLists" :> (QueryParam "advertiserId" (Textual Int64) :> (QueryParam "floodlightActivityId" (Textual Int64) :> (QueryParam "sortOrder" RemarketingListsListSortOrder :> (QueryParam "active" Bool :> (QueryParam "name" Text :> (QueryParam "pageToken" Text :> (QueryParam "sortField" RemarketingListsListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] RemarketingListsListResponse)))))))))))))
+ Network.Google.Resource.DFAReporting.RemarketingLists.List: type RemarketingListsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("remarketingLists" :> (QueryParam "advertiserId" (Textual Int64) :> (QueryParam "floodlightActivityId" (Textual Int64) :> (QueryParam "sortOrder" RemarketingListsListSortOrder :> (QueryParam "active" Bool :> (QueryParam "name" Text :> (QueryParam "pageToken" Text :> (QueryParam "sortField" RemarketingListsListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] RemarketingListsListResponse)))))))))))))
- Network.Google.Resource.DFAReporting.RemarketingLists.Patch: type RemarketingListsPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("remarketingLists" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] RemarketingList :> Patch '[JSON] RemarketingList)))))))
+ Network.Google.Resource.DFAReporting.RemarketingLists.Patch: type RemarketingListsPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("remarketingLists" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] RemarketingList :> Patch '[JSON] RemarketingList)))))))
- Network.Google.Resource.DFAReporting.RemarketingLists.Update: type RemarketingListsUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("remarketingLists" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] RemarketingList :> Put '[JSON] RemarketingList))))))
+ Network.Google.Resource.DFAReporting.RemarketingLists.Update: type RemarketingListsUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("remarketingLists" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] RemarketingList :> Put '[JSON] RemarketingList))))))
- Network.Google.Resource.DFAReporting.Reports.CompatibleFields.Query: type ReportsCompatibleFieldsQueryResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> ("compatiblefields" :> ("query" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Report :> Post '[JSON] CompatibleFields))))))))
+ Network.Google.Resource.DFAReporting.Reports.CompatibleFields.Query: type ReportsCompatibleFieldsQueryResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> ("compatiblefields" :> ("query" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Report :> Post '[JSON] CompatibleFields))))))))
- Network.Google.Resource.DFAReporting.Reports.Delete: type ReportsDeleteResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (Capture "reportId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))
+ Network.Google.Resource.DFAReporting.Reports.Delete: type ReportsDeleteResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (Capture "reportId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))
- Network.Google.Resource.DFAReporting.Reports.Files.Get: type ReportsFilesGetResource = ("dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (Capture "reportId" (Textual Int64) :> ("files" :> (Capture "fileId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] File))))))))) :<|> ("dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (Capture "reportId" (Textual Int64) :> ("files" :> (Capture "fileId" (Textual Int64) :> (QueryParam "alt" AltMedia :> Get '[OctetStream] Stream)))))))))
+ Network.Google.Resource.DFAReporting.Reports.Files.Get: type ReportsFilesGetResource = ("dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (Capture "reportId" (Textual Int64) :> ("files" :> (Capture "fileId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] File))))))))) :<|> ("dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (Capture "reportId" (Textual Int64) :> ("files" :> (Capture "fileId" (Textual Int64) :> (QueryParam "alt" AltMedia :> Get '[OctetStream] Stream)))))))))
- Network.Google.Resource.DFAReporting.Reports.Files.List: type ReportsFilesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (Capture "reportId" (Textual Int64) :> ("files" :> (QueryParam "sortOrder" ReportsFilesListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" ReportsFilesListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] FileList)))))))))))
+ Network.Google.Resource.DFAReporting.Reports.Files.List: type ReportsFilesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (Capture "reportId" (Textual Int64) :> ("files" :> (QueryParam "sortOrder" ReportsFilesListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" ReportsFilesListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] FileList)))))))))))
- Network.Google.Resource.DFAReporting.Reports.Get: type ReportsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (Capture "reportId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Report))))))
+ Network.Google.Resource.DFAReporting.Reports.Get: type ReportsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (Capture "reportId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Report))))))
- Network.Google.Resource.DFAReporting.Reports.Insert: type ReportsInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Report :> Post '[JSON] Report))))))
+ Network.Google.Resource.DFAReporting.Reports.Insert: type ReportsInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Report :> Post '[JSON] Report))))))
- Network.Google.Resource.DFAReporting.Reports.List: type ReportsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (QueryParam "sortOrder" ReportsListSortOrder :> (QueryParam "scope" ReportsListScope :> (QueryParam "pageToken" Text :> (QueryParam "sortField" ReportsListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] ReportList))))))))))
+ Network.Google.Resource.DFAReporting.Reports.List: type ReportsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (QueryParam "sortOrder" ReportsListSortOrder :> (QueryParam "scope" ReportsListScope :> (QueryParam "pageToken" Text :> (QueryParam "sortField" ReportsListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] ReportList))))))))))
- Network.Google.Resource.DFAReporting.Reports.Patch: type ReportsPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (Capture "reportId" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Report :> Patch '[JSON] Report)))))))
+ Network.Google.Resource.DFAReporting.Reports.Patch: type ReportsPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (Capture "reportId" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Report :> Patch '[JSON] Report)))))))
- Network.Google.Resource.DFAReporting.Reports.Run: type ReportsRunResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (Capture "reportId" (Textual Int64) :> ("run" :> (QueryParam "synchronous" Bool :> (QueryParam "alt" AltJSON :> Post '[JSON] File))))))))
+ Network.Google.Resource.DFAReporting.Reports.Run: type ReportsRunResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (Capture "reportId" (Textual Int64) :> ("run" :> (QueryParam "synchronous" Bool :> (QueryParam "alt" AltJSON :> Post '[JSON] File))))))))
- Network.Google.Resource.DFAReporting.Reports.Update: type ReportsUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (Capture "reportId" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Report :> Put '[JSON] Report)))))))
+ Network.Google.Resource.DFAReporting.Reports.Update: type ReportsUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("reports" :> (Capture "reportId" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Report :> Put '[JSON] Report)))))))
- Network.Google.Resource.DFAReporting.Sites.Get: type SitesGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("sites" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Site))))))
+ Network.Google.Resource.DFAReporting.Sites.Get: type SitesGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("sites" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Site))))))
- Network.Google.Resource.DFAReporting.Sites.Insert: type SitesInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("sites" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Site :> Post '[JSON] Site))))))
+ Network.Google.Resource.DFAReporting.Sites.Insert: type SitesInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("sites" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Site :> Post '[JSON] Site))))))
- Network.Google.Resource.DFAReporting.Sites.List: type SitesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("sites" :> (QueryParam "unmappedSite" Bool :> (QueryParams "campaignIds" (Textual Int64) :> (QueryParam "searchString" Text :> (QueryParam "acceptsInterstitialPlacements" Bool :> (QueryParam "acceptsPublisherPaidPlacements" Bool :> (QueryParams "ids" (Textual Int64) :> (QueryParams "directorySiteIds" (Textual Int64) :> (QueryParam "sortOrder" SitesListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" SitesListSortField :> (QueryParam "subaccountId" (Textual Int64) :> (QueryParam "acceptsInStreamVideoPlacements" Bool :> (QueryParam "approved" Bool :> (QueryParam "adWordsSite" Bool :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] SitesListResponse))))))))))))))))))))
+ Network.Google.Resource.DFAReporting.Sites.List: type SitesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("sites" :> (QueryParam "unmappedSite" Bool :> (QueryParams "campaignIds" (Textual Int64) :> (QueryParam "searchString" Text :> (QueryParam "acceptsInterstitialPlacements" Bool :> (QueryParam "acceptsPublisherPaidPlacements" Bool :> (QueryParams "ids" (Textual Int64) :> (QueryParams "directorySiteIds" (Textual Int64) :> (QueryParam "sortOrder" SitesListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" SitesListSortField :> (QueryParam "subaccountId" (Textual Int64) :> (QueryParam "acceptsInStreamVideoPlacements" Bool :> (QueryParam "approved" Bool :> (QueryParam "adWordsSite" Bool :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] SitesListResponse))))))))))))))))))))
- Network.Google.Resource.DFAReporting.Sites.Patch: type SitesPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("sites" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Site :> Patch '[JSON] Site)))))))
+ Network.Google.Resource.DFAReporting.Sites.Patch: type SitesPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("sites" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Site :> Patch '[JSON] Site)))))))
- Network.Google.Resource.DFAReporting.Sites.Update: type SitesUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("sites" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Site :> Put '[JSON] Site))))))
+ Network.Google.Resource.DFAReporting.Sites.Update: type SitesUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("sites" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Site :> Put '[JSON] Site))))))
- Network.Google.Resource.DFAReporting.Sizes.Get: type SizesGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("sizes" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Size))))))
+ Network.Google.Resource.DFAReporting.Sizes.Get: type SizesGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("sizes" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] Size))))))
- Network.Google.Resource.DFAReporting.Sizes.Insert: type SizesInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("sizes" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Size :> Post '[JSON] Size))))))
+ Network.Google.Resource.DFAReporting.Sizes.Insert: type SizesInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("sizes" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Size :> Post '[JSON] Size))))))
- Network.Google.Resource.DFAReporting.Sizes.List: type SizesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("sizes" :> (QueryParam "height" (Textual Int32) :> (QueryParams "ids" (Textual Int64) :> (QueryParam "width" (Textual Int32) :> (QueryParam "iabStandard" Bool :> (QueryParam "alt" AltJSON :> Get '[JSON] SizesListResponse)))))))))
+ Network.Google.Resource.DFAReporting.Sizes.List: type SizesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("sizes" :> (QueryParam "height" (Textual Int32) :> (QueryParams "ids" (Textual Int64) :> (QueryParam "width" (Textual Int32) :> (QueryParam "iabStandard" Bool :> (QueryParam "alt" AltJSON :> Get '[JSON] SizesListResponse)))))))))
- Network.Google.Resource.DFAReporting.SubAccounts.Get: type SubAccountsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("subaccounts" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] SubAccount))))))
+ Network.Google.Resource.DFAReporting.SubAccounts.Get: type SubAccountsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("subaccounts" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] SubAccount))))))
- Network.Google.Resource.DFAReporting.SubAccounts.Insert: type SubAccountsInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("subaccounts" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] SubAccount :> Post '[JSON] SubAccount))))))
+ Network.Google.Resource.DFAReporting.SubAccounts.Insert: type SubAccountsInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("subaccounts" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] SubAccount :> Post '[JSON] SubAccount))))))
- Network.Google.Resource.DFAReporting.SubAccounts.List: type SubAccountsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("subaccounts" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" SubAccountsListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" SubAccountsListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] SubAccountsListResponse)))))))))))
+ Network.Google.Resource.DFAReporting.SubAccounts.List: type SubAccountsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("subaccounts" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" SubAccountsListSortOrder :> (QueryParam "pageToken" Text :> (QueryParam "sortField" SubAccountsListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] SubAccountsListResponse)))))))))))
- Network.Google.Resource.DFAReporting.SubAccounts.Patch: type SubAccountsPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("subaccounts" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] SubAccount :> Patch '[JSON] SubAccount)))))))
+ Network.Google.Resource.DFAReporting.SubAccounts.Patch: type SubAccountsPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("subaccounts" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] SubAccount :> Patch '[JSON] SubAccount)))))))
- Network.Google.Resource.DFAReporting.SubAccounts.Update: type SubAccountsUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("subaccounts" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] SubAccount :> Put '[JSON] SubAccount))))))
+ Network.Google.Resource.DFAReporting.SubAccounts.Update: type SubAccountsUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("subaccounts" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] SubAccount :> Put '[JSON] SubAccount))))))
- Network.Google.Resource.DFAReporting.TargetableRemarketingLists.Get: type TargetableRemarketingListsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("targetableRemarketingLists" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] TargetableRemarketingList))))))
+ Network.Google.Resource.DFAReporting.TargetableRemarketingLists.Get: type TargetableRemarketingListsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("targetableRemarketingLists" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] TargetableRemarketingList))))))
- Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List: type TargetableRemarketingListsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("targetableRemarketingLists" :> (QueryParam "advertiserId" (Textual Int64) :> (QueryParam "sortOrder" TargetableRemarketingListsListSortOrder :> (QueryParam "active" Bool :> (QueryParam "name" Text :> (QueryParam "pageToken" Text :> (QueryParam "sortField" TargetableRemarketingListsListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] TargetableRemarketingListsListResponse))))))))))))
+ Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List: type TargetableRemarketingListsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("targetableRemarketingLists" :> (QueryParam "advertiserId" (Textual Int64) :> (QueryParam "sortOrder" TargetableRemarketingListsListSortOrder :> (QueryParam "active" Bool :> (QueryParam "name" Text :> (QueryParam "pageToken" Text :> (QueryParam "sortField" TargetableRemarketingListsListSortField :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] TargetableRemarketingListsListResponse))))))))))))
- Network.Google.Resource.DFAReporting.UserProFiles.Get: type UserProFilesGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] UserProFile))))
+ Network.Google.Resource.DFAReporting.UserProFiles.Get: type UserProFilesGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] UserProFile))))
- Network.Google.Resource.DFAReporting.UserProFiles.List: type UserProFilesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (QueryParam "alt" AltJSON :> Get '[JSON] UserProFileList)))
+ Network.Google.Resource.DFAReporting.UserProFiles.List: type UserProFilesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (QueryParam "alt" AltJSON :> Get '[JSON] UserProFileList)))
- Network.Google.Resource.DFAReporting.UserRolePermissionGroups.Get: type UserRolePermissionGroupsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRolePermissionGroups" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] UserRolePermissionGroup))))))
+ Network.Google.Resource.DFAReporting.UserRolePermissionGroups.Get: type UserRolePermissionGroupsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRolePermissionGroups" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] UserRolePermissionGroup))))))
- Network.Google.Resource.DFAReporting.UserRolePermissionGroups.List: type UserRolePermissionGroupsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRolePermissionGroups" :> (QueryParam "alt" AltJSON :> Get '[JSON] UserRolePermissionGroupsListResponse)))))
+ Network.Google.Resource.DFAReporting.UserRolePermissionGroups.List: type UserRolePermissionGroupsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRolePermissionGroups" :> (QueryParam "alt" AltJSON :> Get '[JSON] UserRolePermissionGroupsListResponse)))))
- Network.Google.Resource.DFAReporting.UserRolePermissions.Get: type UserRolePermissionsGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRolePermissions" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] UserRolePermission))))))
+ Network.Google.Resource.DFAReporting.UserRolePermissions.Get: type UserRolePermissionsGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRolePermissions" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] UserRolePermission))))))
- Network.Google.Resource.DFAReporting.UserRolePermissions.List: type UserRolePermissionsListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRolePermissions" :> (QueryParams "ids" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] UserRolePermissionsListResponse))))))
+ Network.Google.Resource.DFAReporting.UserRolePermissions.List: type UserRolePermissionsListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRolePermissions" :> (QueryParams "ids" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] UserRolePermissionsListResponse))))))
- Network.Google.Resource.DFAReporting.UserRoles.Delete: type UserRolesDeleteResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRoles" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))
+ Network.Google.Resource.DFAReporting.UserRoles.Delete: type UserRolesDeleteResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRoles" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Delete '[JSON] ()))))))
- Network.Google.Resource.DFAReporting.UserRoles.Get: type UserRolesGetResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRoles" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] UserRole))))))
+ Network.Google.Resource.DFAReporting.UserRoles.Get: type UserRolesGetResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRoles" :> (Capture "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> Get '[JSON] UserRole))))))
- Network.Google.Resource.DFAReporting.UserRoles.Insert: type UserRolesInsertResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRoles" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] UserRole :> Post '[JSON] UserRole))))))
+ Network.Google.Resource.DFAReporting.UserRoles.Insert: type UserRolesInsertResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRoles" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] UserRole :> Post '[JSON] UserRole))))))
- Network.Google.Resource.DFAReporting.UserRoles.List: type UserRolesListResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRoles" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" UserRolesListSortOrder :> (QueryParam "accountUserRoleOnly" Bool :> (QueryParam "pageToken" Text :> (QueryParam "sortField" UserRolesListSortField :> (QueryParam "subaccountId" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] UserRolesListResponse)))))))))))))
+ Network.Google.Resource.DFAReporting.UserRoles.List: type UserRolesListResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRoles" :> (QueryParam "searchString" Text :> (QueryParams "ids" (Textual Int64) :> (QueryParam "sortOrder" UserRolesListSortOrder :> (QueryParam "accountUserRoleOnly" Bool :> (QueryParam "pageToken" Text :> (QueryParam "sortField" UserRolesListSortField :> (QueryParam "subaccountId" (Textual Int64) :> (QueryParam "maxResults" (Textual Int32) :> (QueryParam "alt" AltJSON :> Get '[JSON] UserRolesListResponse)))))))))))))
- Network.Google.Resource.DFAReporting.UserRoles.Patch: type UserRolesPatchResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRoles" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] UserRole :> Patch '[JSON] UserRole)))))))
+ Network.Google.Resource.DFAReporting.UserRoles.Patch: type UserRolesPatchResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRoles" :> (QueryParam "id" (Textual Int64) :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] UserRole :> Patch '[JSON] UserRole)))))))
- Network.Google.Resource.DFAReporting.UserRoles.Update: type UserRolesUpdateResource = "dfareporting" :> ("v2.2" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRoles" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] UserRole :> Put '[JSON] UserRole))))))
+ Network.Google.Resource.DFAReporting.UserRoles.Update: type UserRolesUpdateResource = "dfareporting" :> ("v2.5" :> ("userprofiles" :> (Capture "profileId" (Textual Int64) :> ("userRoles" :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] UserRole :> Put '[JSON] UserRole))))))

Files

README.md view
@@ -8,7 +8,7 @@  ## Version -`0.0.1`+`0.1.0`   ## Description@@ -18,9 +18,9 @@  ## Contribute -For any problems, comments, or feedback please create an issue [here on GitHub](https://github.com/brendanhay/amazonka/issues).+For any problems, comments, or feedback please create an issue [here on GitHub](https://github.com/brendanhay/gogol/issues). -> _Note:_ this library is an auto-generated Haskell package. Please see `amazonka-gen` for more information.+> _Note:_ this library is an auto-generated Haskell package. Please see `gogol-gen` for more information.   ## Licence
gen/Network/Google/DFAReporting.hs view
@@ -7,13 +7,13 @@  -- | -- Module      : Network.Google.DFAReporting--- Copyright   : (c) 2015 Brendan Hay+-- 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) ----- Manage your DoubleClick Campaign Manager ad campaigns and reports.+-- Manages your DoubleClick Campaign Manager ad campaigns and reports. -- -- /See:/ <https://developers.google.com/doubleclick-advertisers/reporting/ DCM/DFA Reporting And Trafficking API Reference> module Network.Google.DFAReporting@@ -21,6 +21,11 @@     -- * Service Configuration       dFAReportingService +    -- * OAuth Scopes+    , dFAReportingScope+    , ddmconversionsScope+    , dfatraffickingScope+     -- * API Declaration     , DFAReportingAPI @@ -173,6 +178,9 @@     -- ** dfareporting.contentCategories.update     , module Network.Google.Resource.DFAReporting.ContentCategories.Update +    -- ** dfareporting.conversions.batchinsert+    , module Network.Google.Resource.DFAReporting.Conversions.Batchinsert+     -- ** dfareporting.countries.get     , module Network.Google.Resource.DFAReporting.Countries.Get @@ -266,6 +274,15 @@     -- ** dfareporting.directorySites.list     , module Network.Google.Resource.DFAReporting.DirectorySites.List +    -- ** dfareporting.dynamicTargetingKeys.delete+    , module Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete++    -- ** dfareporting.dynamicTargetingKeys.insert+    , module Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert++    -- ** dfareporting.dynamicTargetingKeys.list+    , module Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List+     -- ** dfareporting.eventTags.delete     , module Network.Google.Resource.DFAReporting.EventTags.Delete @@ -311,9 +328,6 @@     -- ** dfareporting.floodlightActivities.update     , module Network.Google.Resource.DFAReporting.FloodlightActivities.Update -    -- ** dfareporting.floodlightActivityGroups.delete-    , module Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete-     -- ** dfareporting.floodlightActivityGroups.get     , module Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Get @@ -642,6 +656,7 @@     -- ** CreativeCustomEvent     , CreativeCustomEvent     , creativeCustomEvent+    , cceAdvertiserCustomEventId     , cceAdvertiserCustomEventType     , cceAdvertiserCustomEventName     , cceExitURL@@ -714,6 +729,9 @@     -- ** CreativeAssetRole     , CreativeAssetRole (..) +    -- ** DynamicTargetingKeysListObjectType+    , DynamicTargetingKeysListObjectType (..)+     -- ** RecipientDeliveryType     , RecipientDeliveryType (..) @@ -806,6 +824,7 @@     , iiEstimatedConversionRate     , iiProjectId     , iiSubAccountId+    , iiType     , iiOrderId     , iiSiteId @@ -1081,6 +1100,9 @@     , iilrNextPageToken     , iilrKind +    -- ** CustomFloodlightVariableType+    , CustomFloodlightVariableType (..)+     -- ** Ad     , Ad     , ad@@ -1122,6 +1144,9 @@     , aDefaultClickThroughEventTagProperties     , aPlacementAssignments +    -- ** ConversionErrorCode+    , ConversionErrorCode (..)+     -- ** FloodlightActivitiesListSortOrder     , FloodlightActivitiesListSortOrder (..) @@ -1153,6 +1178,9 @@     -- ** FileFormat     , FileFormat (..) +    -- ** EncryptionInfoEncryptionEntityType+    , EncryptionInfoEncryptionEntityType (..)+     -- ** PricingSchedulePricingType     , PricingSchedulePricingType (..) @@ -1445,6 +1473,14 @@     , rllrRemarketingLists     , rllrKind +    -- ** DynamicTargetingKey+    , DynamicTargetingKey+    , dynamicTargetingKey+    , dtkObjectType+    , dtkKind+    , dtkObjectId+    , dtkName+     -- ** Creative     , Creative     , creative@@ -1489,6 +1525,7 @@     , creThirdPartyRichMediaImpressionsURL     , creLastModifiedInfo     , creId+    , creAuthoringSource     , creStudioAdvertiserId     , creCreativeAssets     , creSubAccountId@@ -1518,6 +1555,9 @@     , scTitle     , scContactType +    -- ** CreativeAuthoringSource+    , CreativeAuthoringSource (..)+     -- ** AccountsListResponse     , AccountsListResponse     , accountsListResponse@@ -1605,6 +1645,9 @@     -- ** CreativesListSortOrder     , CreativesListSortOrder (..) +    -- ** InventoryItemsListType+    , InventoryItemsListType (..)+     -- ** ThirdPartyAuthenticationToken     , ThirdPartyAuthenticationToken     , thirdPartyAuthenticationToken@@ -1666,6 +1709,7 @@     , ssLookbackConfiguration     , ssTagSetting     , ssActiveViewOptOut+    , ssVideoActiveViewOptOut     , ssCreativeSettings      -- ** PlacementStrategiesListSortField@@ -1723,6 +1767,13 @@     , aaDefaultCreativeSizeId     , aaDescription +    -- ** ConversionsBatchInsertRequest+    , ConversionsBatchInsertRequest+    , conversionsBatchInsertRequest+    , cbirKind+    , cbirConversions+    , cbirEncryptionInfo+     -- ** AccountActiveAdSummaryActiveAdsLimitTier     , AccountActiveAdSummaryActiveAdsLimitTier (..) @@ -1790,6 +1841,12 @@     -- ** FloodlightActivitiesListSortField     , FloodlightActivitiesListSortField (..) +    -- ** DynamicTargetingKeysListResponse+    , DynamicTargetingKeysListResponse+    , dynamicTargetingKeysListResponse+    , dtklrKind+    , dtklrDynamicTargetingKeys+     -- ** DimensionValueList     , DimensionValueList     , dimensionValueList@@ -1858,6 +1915,9 @@     -- ** PlacementGroupsListPricingTypes     , PlacementGroupsListPricingTypes (..) +    -- ** DynamicTargetingKeysDeleteObjectType+    , DynamicTargetingKeysDeleteObjectType (..)+     -- ** AccountActiveAdsLimitTier     , AccountActiveAdsLimitTier (..) @@ -1931,6 +1991,13 @@     , ccaKind     , ccaCreativeId +    -- ** ConversionStatus+    , ConversionStatus+    , conversionStatus+    , csKind+    , csConversion+    , csErrors+     -- ** LookbackConfiguration     , LookbackConfiguration     , lookbackConfiguration@@ -2060,6 +2127,9 @@     , ptcrcfCustomFloodlightVariables     , ptcrcfPerInteractionDimensions +    -- ** InventoryItemType+    , InventoryItemType (..)+     -- ** CreativeAssetPositionTopUnit     , CreativeAssetPositionTopUnit (..) @@ -2315,6 +2385,13 @@     -- ** DayPartTargetingDaysOfWeekItem     , DayPartTargetingDaysOfWeekItem (..) +    -- ** CustomFloodlightVariable+    , CustomFloodlightVariable+    , customFloodlightVariable+    , cusKind+    , cusValue+    , cusType+     -- ** CreativeRotationWeightCalculationStrategy     , CreativeRotationWeightCalculationStrategy (..) @@ -2416,6 +2493,13 @@     , dslrKind     , dslrDirectorySites +    -- ** ConversionError+    , ConversionError+    , conversionError+    , ceKind+    , ceCode+    , ceMessage+     -- ** PricingPricingType     , PricingPricingType (..) @@ -2510,7 +2594,6 @@     , fcLookbackConfiguration     , fcAccountId     , fcId-    , fcSSLRequired     , fcNATuralSearchConversionAttributionOption     , fcUserDefinedVariableConfigurations     , fcSubAccountId@@ -2531,6 +2614,22 @@     -- ** CreativeGroupAssignmentCreativeGroupNumber     , CreativeGroupAssignmentCreativeGroupNumber (..) +    -- ** Conversion+    , Conversion+    , conversion+    , conoTimestampMicros+    , conoLimitAdTracking+    , conoEncryptedUserId+    , conoMobileDeviceId+    , conoFloodlightConfigurationId+    , conoKind+    , conoFloodlightActivityId+    , conoQuantity+    , conoValue+    , conoCustomVariables+    , conoChildDirectedTreatment+    , conoOrdinal+     -- ** CreativeFieldValuesListResponse     , CreativeFieldValuesListResponse     , creativeFieldValuesListResponse@@ -2675,6 +2774,13 @@     -- ** AccountAccountProFile     , AccountAccountProFile (..) +    -- ** ConversionsBatchInsertResponse+    , ConversionsBatchInsertResponse+    , conversionsBatchInsertResponse+    , cbirbStatus+    , cbirbKind+    , cbirbHasFailures+     -- ** OrderDocumentsListResponse     , OrderDocumentsListResponse     , orderDocumentsListResponse@@ -2710,6 +2816,9 @@     -- ** EventTagsListSortOrder     , EventTagsListSortOrder (..) +    -- ** EncryptionInfoEncryptionSource+    , EncryptionInfoEncryptionSource (..)+     -- ** DirectorySitesListSortField     , DirectorySitesListSortField (..) @@ -2825,6 +2934,9 @@     , csIFrameHeader     , csIFrameFooter +    -- ** DynamicTargetingKeyObjectType+    , DynamicTargetingKeyObjectType (..)+     -- ** ReportType     , ReportType (..) @@ -3065,6 +3177,14 @@     -- ** FloodlightActivityCountingMethod     , FloodlightActivityCountingMethod (..) +    -- ** EncryptionInfo+    , EncryptionInfo+    , encryptionInfo+    , eiEncryptionSource+    , eiKind+    , eiEncryptionEntityType+    , eiEncryptionEntityId+     -- ** SitesListResponse     , SitesListResponse     , sitesListResponse@@ -3152,6 +3272,7 @@ import           Network.Google.Resource.DFAReporting.ContentCategories.List import           Network.Google.Resource.DFAReporting.ContentCategories.Patch import           Network.Google.Resource.DFAReporting.ContentCategories.Update+import           Network.Google.Resource.DFAReporting.Conversions.Batchinsert import           Network.Google.Resource.DFAReporting.Countries.Get import           Network.Google.Resource.DFAReporting.Countries.List import           Network.Google.Resource.DFAReporting.CreativeAssets.Insert@@ -3183,6 +3304,9 @@ import           Network.Google.Resource.DFAReporting.DirectorySites.Get import           Network.Google.Resource.DFAReporting.DirectorySites.Insert import           Network.Google.Resource.DFAReporting.DirectorySites.List+import           Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete+import           Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert+import           Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List import           Network.Google.Resource.DFAReporting.EventTags.Delete import           Network.Google.Resource.DFAReporting.EventTags.Get import           Network.Google.Resource.DFAReporting.EventTags.Insert@@ -3198,7 +3322,6 @@ import           Network.Google.Resource.DFAReporting.FloodlightActivities.List import           Network.Google.Resource.DFAReporting.FloodlightActivities.Patch import           Network.Google.Resource.DFAReporting.FloodlightActivities.Update-import           Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete import           Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Get import           Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Insert import           Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List@@ -3356,6 +3479,9 @@        :<|> CampaignsPatchResource        :<|> CampaignsGetResource        :<|> CampaignsUpdateResource+       :<|> DynamicTargetingKeysInsertResource+       :<|> DynamicTargetingKeysListResource+       :<|> DynamicTargetingKeysDeleteResource        :<|> AccountUserProFilesInsertResource        :<|> AccountUserProFilesListResource        :<|> AccountUserProFilesPatchResource@@ -3372,6 +3498,7 @@        :<|> FloodlightConfigurationsPatchResource        :<|> FloodlightConfigurationsGetResource        :<|> FloodlightConfigurationsUpdateResource+       :<|> ConversionsBatchinsertResource        :<|> FloodlightActivitiesInsertResource        :<|> FloodlightActivitiesListResource        :<|> FloodlightActivitiesPatchResource@@ -3494,5 +3621,4 @@        :<|> FloodlightActivityGroupsListResource        :<|> FloodlightActivityGroupsPatchResource        :<|> FloodlightActivityGroupsGetResource-       :<|> FloodlightActivityGroupsDeleteResource        :<|> FloodlightActivityGroupsUpdateResource
gen/Network/Google/DFAReporting/Types.hs view
@@ -1,3 +1,4 @@+{-# LANGUAGE DataKinds          #-} {-# LANGUAGE DeriveDataTypeable #-} {-# LANGUAGE DeriveGeneric      #-} {-# LANGUAGE NoImplicitPrelude  #-}@@ -7,7 +8,7 @@  -- | -- Module      : Network.Google.DFAReporting.Types--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -19,7 +20,8 @@       dFAReportingService      -- * OAuth Scopes-    , dfareportingScope+    , dFAReportingScope+    , ddmconversionsScope     , dfatraffickingScope      -- * PlacementsListSortOrder@@ -57,6 +59,7 @@     -- * CreativeCustomEvent     , CreativeCustomEvent     , creativeCustomEvent+    , cceAdvertiserCustomEventId     , cceAdvertiserCustomEventType     , cceAdvertiserCustomEventName     , cceExitURL@@ -129,6 +132,9 @@     -- * CreativeAssetRole     , CreativeAssetRole (..) +    -- * DynamicTargetingKeysListObjectType+    , DynamicTargetingKeysListObjectType (..)+     -- * RecipientDeliveryType     , RecipientDeliveryType (..) @@ -221,6 +227,7 @@     , iiEstimatedConversionRate     , iiProjectId     , iiSubAccountId+    , iiType     , iiOrderId     , iiSiteId @@ -496,6 +503,9 @@     , iilrNextPageToken     , iilrKind +    -- * CustomFloodlightVariableType+    , CustomFloodlightVariableType (..)+     -- * Ad     , Ad     , ad@@ -537,6 +547,9 @@     , aDefaultClickThroughEventTagProperties     , aPlacementAssignments +    -- * ConversionErrorCode+    , ConversionErrorCode (..)+     -- * FloodlightActivitiesListSortOrder     , FloodlightActivitiesListSortOrder (..) @@ -568,6 +581,9 @@     -- * FileFormat     , FileFormat (..) +    -- * EncryptionInfoEncryptionEntityType+    , EncryptionInfoEncryptionEntityType (..)+     -- * PricingSchedulePricingType     , PricingSchedulePricingType (..) @@ -860,6 +876,14 @@     , rllrRemarketingLists     , rllrKind +    -- * DynamicTargetingKey+    , DynamicTargetingKey+    , dynamicTargetingKey+    , dtkObjectType+    , dtkKind+    , dtkObjectId+    , dtkName+     -- * Creative     , Creative     , creative@@ -904,6 +928,7 @@     , creThirdPartyRichMediaImpressionsURL     , creLastModifiedInfo     , creId+    , creAuthoringSource     , creStudioAdvertiserId     , creCreativeAssets     , creSubAccountId@@ -933,6 +958,9 @@     , scTitle     , scContactType +    -- * CreativeAuthoringSource+    , CreativeAuthoringSource (..)+     -- * AccountsListResponse     , AccountsListResponse     , accountsListResponse@@ -1020,6 +1048,9 @@     -- * CreativesListSortOrder     , CreativesListSortOrder (..) +    -- * InventoryItemsListType+    , InventoryItemsListType (..)+     -- * ThirdPartyAuthenticationToken     , ThirdPartyAuthenticationToken     , thirdPartyAuthenticationToken@@ -1081,6 +1112,7 @@     , ssLookbackConfiguration     , ssTagSetting     , ssActiveViewOptOut+    , ssVideoActiveViewOptOut     , ssCreativeSettings      -- * PlacementStrategiesListSortField@@ -1138,6 +1170,13 @@     , aaDefaultCreativeSizeId     , aaDescription +    -- * ConversionsBatchInsertRequest+    , ConversionsBatchInsertRequest+    , conversionsBatchInsertRequest+    , cbirKind+    , cbirConversions+    , cbirEncryptionInfo+     -- * AccountActiveAdSummaryActiveAdsLimitTier     , AccountActiveAdSummaryActiveAdsLimitTier (..) @@ -1205,6 +1244,12 @@     -- * FloodlightActivitiesListSortField     , FloodlightActivitiesListSortField (..) +    -- * DynamicTargetingKeysListResponse+    , DynamicTargetingKeysListResponse+    , dynamicTargetingKeysListResponse+    , dtklrKind+    , dtklrDynamicTargetingKeys+     -- * DimensionValueList     , DimensionValueList     , dimensionValueList@@ -1273,6 +1318,9 @@     -- * PlacementGroupsListPricingTypes     , PlacementGroupsListPricingTypes (..) +    -- * DynamicTargetingKeysDeleteObjectType+    , DynamicTargetingKeysDeleteObjectType (..)+     -- * AccountActiveAdsLimitTier     , AccountActiveAdsLimitTier (..) @@ -1346,6 +1394,13 @@     , ccaKind     , ccaCreativeId +    -- * ConversionStatus+    , ConversionStatus+    , conversionStatus+    , csKind+    , csConversion+    , csErrors+     -- * LookbackConfiguration     , LookbackConfiguration     , lookbackConfiguration@@ -1475,6 +1530,9 @@     , ptcrcfCustomFloodlightVariables     , ptcrcfPerInteractionDimensions +    -- * InventoryItemType+    , InventoryItemType (..)+     -- * CreativeAssetPositionTopUnit     , CreativeAssetPositionTopUnit (..) @@ -1730,6 +1788,13 @@     -- * DayPartTargetingDaysOfWeekItem     , DayPartTargetingDaysOfWeekItem (..) +    -- * CustomFloodlightVariable+    , CustomFloodlightVariable+    , customFloodlightVariable+    , cusKind+    , cusValue+    , cusType+     -- * CreativeRotationWeightCalculationStrategy     , CreativeRotationWeightCalculationStrategy (..) @@ -1831,6 +1896,13 @@     , dslrKind     , dslrDirectorySites +    -- * ConversionError+    , ConversionError+    , conversionError+    , ceKind+    , ceCode+    , ceMessage+     -- * PricingPricingType     , PricingPricingType (..) @@ -1925,7 +1997,6 @@     , fcLookbackConfiguration     , fcAccountId     , fcId-    , fcSSLRequired     , fcNATuralSearchConversionAttributionOption     , fcUserDefinedVariableConfigurations     , fcSubAccountId@@ -1946,6 +2017,22 @@     -- * CreativeGroupAssignmentCreativeGroupNumber     , CreativeGroupAssignmentCreativeGroupNumber (..) +    -- * Conversion+    , Conversion+    , conversion+    , conoTimestampMicros+    , conoLimitAdTracking+    , conoEncryptedUserId+    , conoMobileDeviceId+    , conoFloodlightConfigurationId+    , conoKind+    , conoFloodlightActivityId+    , conoQuantity+    , conoValue+    , conoCustomVariables+    , conoChildDirectedTreatment+    , conoOrdinal+     -- * CreativeFieldValuesListResponse     , CreativeFieldValuesListResponse     , creativeFieldValuesListResponse@@ -2090,6 +2177,13 @@     -- * AccountAccountProFile     , AccountAccountProFile (..) +    -- * ConversionsBatchInsertResponse+    , ConversionsBatchInsertResponse+    , conversionsBatchInsertResponse+    , cbirbStatus+    , cbirbKind+    , cbirbHasFailures+     -- * OrderDocumentsListResponse     , OrderDocumentsListResponse     , orderDocumentsListResponse@@ -2125,6 +2219,9 @@     -- * EventTagsListSortOrder     , EventTagsListSortOrder (..) +    -- * EncryptionInfoEncryptionSource+    , EncryptionInfoEncryptionSource (..)+     -- * DirectorySitesListSortField     , DirectorySitesListSortField (..) @@ -2240,6 +2337,9 @@     , csIFrameHeader     , csIFrameFooter +    -- * DynamicTargetingKeyObjectType+    , DynamicTargetingKeyObjectType (..)+     -- * ReportType     , ReportType (..) @@ -2480,6 +2580,14 @@     -- * FloodlightActivityCountingMethod     , FloodlightActivityCountingMethod (..) +    -- * EncryptionInfo+    , EncryptionInfo+    , encryptionInfo+    , eiEncryptionSource+    , eiKind+    , eiEncryptionEntityType+    , eiEncryptionEntityId+     -- * SitesListResponse     , SitesListResponse     , sitesListResponse@@ -2520,17 +2628,21 @@ import           Network.Google.DFAReporting.Types.Sum import           Network.Google.Prelude --- | Default request referring to version 'v2.2' of the DCM/DFA Reporting And Trafficking API. This contains the host and root path used as a starting point for constructing service requests.-dFAReportingService :: Service+-- | Default request referring to version 'v2.5' of the DCM/DFA Reporting And Trafficking API. This contains the host and root path used as a starting point for constructing service requests.+dFAReportingService :: ServiceConfig dFAReportingService-  = defaultService (ServiceId "dfareporting:v2.2")+  = defaultService (ServiceId "dfareporting:v2.5")       "www.googleapis.com"  -- | View and manage DoubleClick for Advertisers reports-dfareportingScope :: OAuthScope-dfareportingScope = "https://www.googleapis.com/auth/dfareporting";+dFAReportingScope :: Proxy '["https://www.googleapis.com/auth/dfareporting"]+dFAReportingScope = Proxy; +-- | Manage DoubleClick Digital Marketing conversions+ddmconversionsScope :: Proxy '["https://www.googleapis.com/auth/ddmconversions"]+ddmconversionsScope = Proxy;+ -- | View and manage your DoubleClick Campaign Manager\'s (DCM) display ad -- campaigns-dfatraffickingScope :: OAuthScope-dfatraffickingScope = "https://www.googleapis.com/auth/dfatrafficking";+dfatraffickingScope :: Proxy '["https://www.googleapis.com/auth/dfatrafficking"]+dfatraffickingScope = Proxy;
gen/Network/Google/DFAReporting/Types/Product.hs view
@@ -9,20447 +9,21239 @@  -- | -- Module      : Network.Google.DFAReporting.Types.Product--- Copyright   : (c) 2015 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.DFAReporting.Types.Product where--import           Network.Google.DFAReporting.Types.Sum-import           Network.Google.Prelude---- | Represents the list of File resources.------ /See:/ 'fileList' smart constructor.-data FileList = FileList-    { _flEtag          :: !(Maybe Text)-    , _flNextPageToken :: !(Maybe Text)-    , _flKind          :: !Text-    , _flItems         :: !(Maybe [File])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'FileList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'flEtag'------ * 'flNextPageToken'------ * 'flKind'------ * 'flItems'-fileList-    :: FileList-fileList =-    FileList-    { _flEtag = Nothing-    , _flNextPageToken = Nothing-    , _flKind = "dfareporting#fileList"-    , _flItems = Nothing-    }---- | The eTag of this response for caching purposes.-flEtag :: Lens' FileList (Maybe Text)-flEtag = lens _flEtag (\ s a -> s{_flEtag = a})---- | Continuation token used to page through files. To retrieve the next page--- of results, set the next request\'s \"pageToken\" to the value of this--- field. The page token is only valid for a limited amount of time and--- should not be persisted.-flNextPageToken :: Lens' FileList (Maybe Text)-flNextPageToken-  = lens _flNextPageToken-      (\ s a -> s{_flNextPageToken = a})---- | The kind of list this is, in this case dfareporting#fileList.-flKind :: Lens' FileList Text-flKind = lens _flKind (\ s a -> s{_flKind = a})---- | The files returned in this response.-flItems :: Lens' FileList [File]-flItems-  = lens _flItems (\ s a -> s{_flItems = a}) . _Default-      . _Coerce--instance FromJSON FileList where-        parseJSON-          = withObject "FileList"-              (\ o ->-                 FileList <$>-                   (o .:? "etag") <*> (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!= "dfareporting#fileList")-                     <*> (o .:? "items" .!= mempty))--instance ToJSON FileList where-        toJSON FileList{..}-          = object-              (catMaybes-                 [("etag" .=) <$> _flEtag,-                  ("nextPageToken" .=) <$> _flNextPageToken,-                  Just ("kind" .= _flKind), ("items" .=) <$> _flItems])---- | Creative optimization activity.------ /See:/ 'optimizationActivity' smart constructor.-data OptimizationActivity = OptimizationActivity-    { _oaWeight                             :: !(Maybe (Textual Int32))-    , _oaFloodlightActivityId               :: !(Maybe (Textual Int64))-    , _oaFloodlightActivityIdDimensionValue :: !(Maybe DimensionValue)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'OptimizationActivity' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'oaWeight'------ * 'oaFloodlightActivityId'------ * 'oaFloodlightActivityIdDimensionValue'-optimizationActivity-    :: OptimizationActivity-optimizationActivity =-    OptimizationActivity-    { _oaWeight = Nothing-    , _oaFloodlightActivityId = Nothing-    , _oaFloodlightActivityIdDimensionValue = Nothing-    }---- | Weight associated with this optimization. Must be greater than 1. The--- weight assigned will be understood in proportion to the weights assigned--- to the other optimization activities.-oaWeight :: Lens' OptimizationActivity (Maybe Int32)-oaWeight-  = lens _oaWeight (\ s a -> s{_oaWeight = a}) .-      mapping _Coerce---- | Floodlight activity ID of this optimization activity. This is a required--- field.-oaFloodlightActivityId :: Lens' OptimizationActivity (Maybe Int64)-oaFloodlightActivityId-  = lens _oaFloodlightActivityId-      (\ s a -> s{_oaFloodlightActivityId = a})-      . mapping _Coerce---- | Dimension value for the ID of the floodlight activity. This is a--- read-only, auto-generated field.-oaFloodlightActivityIdDimensionValue :: Lens' OptimizationActivity (Maybe DimensionValue)-oaFloodlightActivityIdDimensionValue-  = lens _oaFloodlightActivityIdDimensionValue-      (\ s a ->-         s{_oaFloodlightActivityIdDimensionValue = a})--instance FromJSON OptimizationActivity where-        parseJSON-          = withObject "OptimizationActivity"-              (\ o ->-                 OptimizationActivity <$>-                   (o .:? "weight") <*> (o .:? "floodlightActivityId")-                     <*> (o .:? "floodlightActivityIdDimensionValue"))--instance ToJSON OptimizationActivity where-        toJSON OptimizationActivity{..}-          = object-              (catMaybes-                 [("weight" .=) <$> _oaWeight,-                  ("floodlightActivityId" .=) <$>-                    _oaFloodlightActivityId,-                  ("floodlightActivityIdDimensionValue" .=) <$>-                    _oaFloodlightActivityIdDimensionValue])---- | A group clause made up of list population terms representing constraints--- joined by ORs.------ /See:/ 'listPopulationClause' smart constructor.-newtype ListPopulationClause = ListPopulationClause-    { _lpcTerms :: Maybe [ListPopulationTerm]-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ListPopulationClause' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lpcTerms'-listPopulationClause-    :: ListPopulationClause-listPopulationClause =-    ListPopulationClause-    { _lpcTerms = Nothing-    }---- | Terms of this list population clause. Each clause is made up of list--- population terms representing constraints and are joined by ORs.-lpcTerms :: Lens' ListPopulationClause [ListPopulationTerm]-lpcTerms-  = lens _lpcTerms (\ s a -> s{_lpcTerms = a}) .-      _Default-      . _Coerce--instance FromJSON ListPopulationClause where-        parseJSON-          = withObject "ListPopulationClause"-              (\ o ->-                 ListPopulationClause <$> (o .:? "terms" .!= mempty))--instance ToJSON ListPopulationClause where-        toJSON ListPopulationClause{..}-          = object (catMaybes [("terms" .=) <$> _lpcTerms])---- | Creative Custom Event.------ /See:/ 'creativeCustomEvent' smart constructor.-data CreativeCustomEvent = CreativeCustomEvent-    { _cceAdvertiserCustomEventType :: !(Maybe CreativeCustomEventAdvertiserCustomEventType)-    , _cceAdvertiserCustomEventName :: !(Maybe Text)-    , _cceExitURL                   :: !(Maybe Text)-    , _cceTargetType                :: !(Maybe CreativeCustomEventTargetType)-    , _ccePopupWindowProperties     :: !(Maybe PopupWindowProperties)-    , _cceVideoReportingId          :: !(Maybe Text)-    , _cceId                        :: !(Maybe (Textual Int64))-    , _cceArtworkLabel              :: !(Maybe Text)-    , _cceArtworkType               :: !(Maybe CreativeCustomEventArtworkType)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CreativeCustomEvent' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cceAdvertiserCustomEventType'------ * 'cceAdvertiserCustomEventName'------ * 'cceExitURL'------ * 'cceTargetType'------ * 'ccePopupWindowProperties'------ * 'cceVideoReportingId'------ * 'cceId'------ * 'cceArtworkLabel'------ * 'cceArtworkType'-creativeCustomEvent-    :: CreativeCustomEvent-creativeCustomEvent =-    CreativeCustomEvent-    { _cceAdvertiserCustomEventType = Nothing-    , _cceAdvertiserCustomEventName = Nothing-    , _cceExitURL = Nothing-    , _cceTargetType = Nothing-    , _ccePopupWindowProperties = Nothing-    , _cceVideoReportingId = Nothing-    , _cceId = Nothing-    , _cceArtworkLabel = Nothing-    , _cceArtworkType = Nothing-    }---- | Type of the event. This is a read-only field.-cceAdvertiserCustomEventType :: Lens' CreativeCustomEvent (Maybe CreativeCustomEventAdvertiserCustomEventType)-cceAdvertiserCustomEventType-  = lens _cceAdvertiserCustomEventType-      (\ s a -> s{_cceAdvertiserCustomEventType = a})---- | User-entered name for the event.-cceAdvertiserCustomEventName :: Lens' CreativeCustomEvent (Maybe Text)-cceAdvertiserCustomEventName-  = lens _cceAdvertiserCustomEventName-      (\ s a -> s{_cceAdvertiserCustomEventName = a})---- | Exit URL of the event. This field is used only for exit events.-cceExitURL :: Lens' CreativeCustomEvent (Maybe Text)-cceExitURL-  = lens _cceExitURL (\ s a -> s{_cceExitURL = a})---- | Target type used by the event.-cceTargetType :: Lens' CreativeCustomEvent (Maybe CreativeCustomEventTargetType)-cceTargetType-  = lens _cceTargetType-      (\ s a -> s{_cceTargetType = a})---- | Properties for rich media popup windows. This field is used only for--- exit events.-ccePopupWindowProperties :: Lens' CreativeCustomEvent (Maybe PopupWindowProperties)-ccePopupWindowProperties-  = lens _ccePopupWindowProperties-      (\ s a -> s{_ccePopupWindowProperties = a})---- | Reporting ID, used to differentiate multiple videos in a single--- creative.-cceVideoReportingId :: Lens' CreativeCustomEvent (Maybe Text)-cceVideoReportingId-  = lens _cceVideoReportingId-      (\ s a -> s{_cceVideoReportingId = a})---- | ID of this event. This is a required field and should not be modified--- after insertion.-cceId :: Lens' CreativeCustomEvent (Maybe Int64)-cceId-  = lens _cceId (\ s a -> s{_cceId = a}) .-      mapping _Coerce---- | Artwork label column, used to link events in DCM back to events in--- Studio. This is a required field and should not be modified after--- insertion.-cceArtworkLabel :: Lens' CreativeCustomEvent (Maybe Text)-cceArtworkLabel-  = lens _cceArtworkLabel-      (\ s a -> s{_cceArtworkLabel = a})---- | Artwork type used by the creative.This is a read-only field.-cceArtworkType :: Lens' CreativeCustomEvent (Maybe CreativeCustomEventArtworkType)-cceArtworkType-  = lens _cceArtworkType-      (\ s a -> s{_cceArtworkType = a})--instance FromJSON CreativeCustomEvent where-        parseJSON-          = withObject "CreativeCustomEvent"-              (\ o ->-                 CreativeCustomEvent <$>-                   (o .:? "advertiserCustomEventType") <*>-                     (o .:? "advertiserCustomEventName")-                     <*> (o .:? "exitUrl")-                     <*> (o .:? "targetType")-                     <*> (o .:? "popupWindowProperties")-                     <*> (o .:? "videoReportingId")-                     <*> (o .:? "id")-                     <*> (o .:? "artworkLabel")-                     <*> (o .:? "artworkType"))--instance ToJSON CreativeCustomEvent where-        toJSON CreativeCustomEvent{..}-          = object-              (catMaybes-                 [("advertiserCustomEventType" .=) <$>-                    _cceAdvertiserCustomEventType,-                  ("advertiserCustomEventName" .=) <$>-                    _cceAdvertiserCustomEventName,-                  ("exitUrl" .=) <$> _cceExitURL,-                  ("targetType" .=) <$> _cceTargetType,-                  ("popupWindowProperties" .=) <$>-                    _ccePopupWindowProperties,-                  ("videoReportingId" .=) <$> _cceVideoReportingId,-                  ("id" .=) <$> _cceId,-                  ("artworkLabel" .=) <$> _cceArtworkLabel,-                  ("artworkType" .=) <$> _cceArtworkType])---- | Creative Click Tag.------ /See:/ 'clickTag' smart constructor.-data ClickTag = ClickTag-    { _ctValue     :: !(Maybe Text)-    , _ctName      :: !(Maybe Text)-    , _ctEventName :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ClickTag' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ctValue'------ * 'ctName'------ * 'ctEventName'-clickTag-    :: ClickTag-clickTag =-    ClickTag-    { _ctValue = Nothing-    , _ctName = Nothing-    , _ctEventName = Nothing-    }---- | Parameter value for the specified click tag. This field contains a--- click-through url.-ctValue :: Lens' ClickTag (Maybe Text)-ctValue = lens _ctValue (\ s a -> s{_ctValue = a})---- | Parameter name for the specified click tag. For ENHANCED_IMAGE creative--- assets, this field must match the value of the creative asset\'s--- creativeAssetId.name field.-ctName :: Lens' ClickTag (Maybe Text)-ctName = lens _ctName (\ s a -> s{_ctName = a})---- | Advertiser event name associated with the click tag. This field is used--- by ENHANCED_BANNER, ENHANCED_IMAGE, and HTML5_BANNER creatives.-ctEventName :: Lens' ClickTag (Maybe Text)-ctEventName-  = lens _ctEventName (\ s a -> s{_ctEventName = a})--instance FromJSON ClickTag where-        parseJSON-          = withObject "ClickTag"-              (\ o ->-                 ClickTag <$>-                   (o .:? "value") <*> (o .:? "name") <*>-                     (o .:? "eventName"))--instance ToJSON ClickTag where-        toJSON ClickTag{..}-          = object-              (catMaybes-                 [("value" .=) <$> _ctValue, ("name" .=) <$> _ctName,-                  ("eventName" .=) <$> _ctEventName])---- | Campaign List Response------ /See:/ 'campaignsListResponse' smart constructor.-data CampaignsListResponse = CampaignsListResponse-    { _clrNextPageToken :: !(Maybe Text)-    , _clrCampaigns     :: !(Maybe [Campaign])-    , _clrKind          :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CampaignsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'clrNextPageToken'------ * 'clrCampaigns'------ * 'clrKind'-campaignsListResponse-    :: CampaignsListResponse-campaignsListResponse =-    CampaignsListResponse-    { _clrNextPageToken = Nothing-    , _clrCampaigns = Nothing-    , _clrKind = "dfareporting#campaignsListResponse"-    }---- | Pagination token to be used for the next list operation.-clrNextPageToken :: Lens' CampaignsListResponse (Maybe Text)-clrNextPageToken-  = lens _clrNextPageToken-      (\ s a -> s{_clrNextPageToken = a})---- | Campaign collection.-clrCampaigns :: Lens' CampaignsListResponse [Campaign]-clrCampaigns-  = lens _clrCampaigns (\ s a -> s{_clrCampaigns = a})-      . _Default-      . _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#campaignsListResponse\".-clrKind :: Lens' CampaignsListResponse Text-clrKind = lens _clrKind (\ s a -> s{_clrKind = a})--instance FromJSON CampaignsListResponse where-        parseJSON-          = withObject "CampaignsListResponse"-              (\ o ->-                 CampaignsListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "campaigns" .!= mempty)-                     <*>-                     (o .:? "kind" .!=-                        "dfareporting#campaignsListResponse"))--instance ToJSON CampaignsListResponse where-        toJSON CampaignsListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _clrNextPageToken,-                  ("campaigns" .=) <$> _clrCampaigns,-                  Just ("kind" .= _clrKind)])---- | Geographical Targeting.------ /See:/ 'geoTargeting' smart constructor.-data GeoTargeting = GeoTargeting-    { _gtRegions          :: !(Maybe [Region])-    , _gtCountries        :: !(Maybe [Country])-    , _gtCities           :: !(Maybe [City])-    , _gtMetros           :: !(Maybe [Metro])-    , _gtExcludeCountries :: !(Maybe Bool)-    , _gtPostalCodes      :: !(Maybe [PostalCode])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GeoTargeting' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gtRegions'------ * 'gtCountries'------ * 'gtCities'------ * 'gtMetros'------ * 'gtExcludeCountries'------ * 'gtPostalCodes'-geoTargeting-    :: GeoTargeting-geoTargeting =-    GeoTargeting-    { _gtRegions = Nothing-    , _gtCountries = Nothing-    , _gtCities = Nothing-    , _gtMetros = Nothing-    , _gtExcludeCountries = Nothing-    , _gtPostalCodes = Nothing-    }---- | Regions to be targeted. For each region only dartId is required. The--- other fields are populated automatically when the ad is inserted or--- updated. If targeting a region, do not target or exclude the country of--- the region.-gtRegions :: Lens' GeoTargeting [Region]-gtRegions-  = lens _gtRegions (\ s a -> s{_gtRegions = a}) .-      _Default-      . _Coerce---- | Countries to be targeted or excluded from targeting, depending on the--- setting of the excludeCountries field. For each country only dartId is--- required. The other fields are populated automatically when the ad is--- inserted or updated. If targeting or excluding a country, do not target--- regions, cities, metros, or postal codes in the same country.-gtCountries :: Lens' GeoTargeting [Country]-gtCountries-  = lens _gtCountries (\ s a -> s{_gtCountries = a}) .-      _Default-      . _Coerce---- | Cities to be targeted. For each city only dartId is required. The other--- fields are populated automatically when the ad is inserted or updated.--- If targeting a city, do not target or exclude the country of the city,--- and do not target the metro or region of the city.-gtCities :: Lens' GeoTargeting [City]-gtCities-  = lens _gtCities (\ s a -> s{_gtCities = a}) .-      _Default-      . _Coerce---- | Metros to be targeted. For each metro only dmaId is required. The other--- fields are populated automatically when the ad is inserted or updated.--- If targeting a metro, do not target or exclude the country of the metro.-gtMetros :: Lens' GeoTargeting [Metro]-gtMetros-  = lens _gtMetros (\ s a -> s{_gtMetros = a}) .-      _Default-      . _Coerce---- | Whether or not to exclude the countries in the countries field from--- targeting. If false, the countries field refers to countries which will--- be targeted by the ad.-gtExcludeCountries :: Lens' GeoTargeting (Maybe Bool)-gtExcludeCountries-  = lens _gtExcludeCountries-      (\ s a -> s{_gtExcludeCountries = a})---- | Postal codes to be targeted. For each postal code only id is required.--- The other fields are populated automatically when the ad is inserted or--- updated. If targeting a postal code, do not target or exclude the--- country of the postal code.-gtPostalCodes :: Lens' GeoTargeting [PostalCode]-gtPostalCodes-  = lens _gtPostalCodes-      (\ s a -> s{_gtPostalCodes = a})-      . _Default-      . _Coerce--instance FromJSON GeoTargeting where-        parseJSON-          = withObject "GeoTargeting"-              (\ o ->-                 GeoTargeting <$>-                   (o .:? "regions" .!= mempty) <*>-                     (o .:? "countries" .!= mempty)-                     <*> (o .:? "cities" .!= mempty)-                     <*> (o .:? "metros" .!= mempty)-                     <*> (o .:? "excludeCountries")-                     <*> (o .:? "postalCodes" .!= mempty))--instance ToJSON GeoTargeting where-        toJSON GeoTargeting{..}-          = object-              (catMaybes-                 [("regions" .=) <$> _gtRegions,-                  ("countries" .=) <$> _gtCountries,-                  ("cities" .=) <$> _gtCities,-                  ("metros" .=) <$> _gtMetros,-                  ("excludeCountries" .=) <$> _gtExcludeCountries,-                  ("postalCodes" .=) <$> _gtPostalCodes])---- | Represents fields that are compatible to be selected for a report of--- type \"REACH\".------ /See:/ 'reachReportCompatibleFields' smart constructor.-data ReachReportCompatibleFields = ReachReportCompatibleFields-    { _rrcfMetrics                 :: !(Maybe [Metric])-    , _rrcfReachByFrequencyMetrics :: !(Maybe [Metric])-    , _rrcfKind                    :: !Text-    , _rrcfDimensionFilters        :: !(Maybe [Dimension])-    , _rrcfPivotedActivityMetrics  :: !(Maybe [Metric])-    , _rrcfDimensions              :: !(Maybe [Dimension])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ReachReportCompatibleFields' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rrcfMetrics'------ * 'rrcfReachByFrequencyMetrics'------ * 'rrcfKind'------ * 'rrcfDimensionFilters'------ * 'rrcfPivotedActivityMetrics'------ * 'rrcfDimensions'-reachReportCompatibleFields-    :: ReachReportCompatibleFields-reachReportCompatibleFields =-    ReachReportCompatibleFields-    { _rrcfMetrics = Nothing-    , _rrcfReachByFrequencyMetrics = Nothing-    , _rrcfKind = "dfareporting#reachReportCompatibleFields"-    , _rrcfDimensionFilters = Nothing-    , _rrcfPivotedActivityMetrics = Nothing-    , _rrcfDimensions = Nothing-    }---- | Metrics which are compatible to be selected in the \"metricNames\"--- section of the report.-rrcfMetrics :: Lens' ReachReportCompatibleFields [Metric]-rrcfMetrics-  = lens _rrcfMetrics (\ s a -> s{_rrcfMetrics = a}) .-      _Default-      . _Coerce---- | Metrics which are compatible to be selected in the--- \"reachByFrequencyMetricNames\" section of the report.-rrcfReachByFrequencyMetrics :: Lens' ReachReportCompatibleFields [Metric]-rrcfReachByFrequencyMetrics-  = lens _rrcfReachByFrequencyMetrics-      (\ s a -> s{_rrcfReachByFrequencyMetrics = a})-      . _Default-      . _Coerce---- | The kind of resource this is, in this case--- dfareporting#reachReportCompatibleFields.-rrcfKind :: Lens' ReachReportCompatibleFields Text-rrcfKind = lens _rrcfKind (\ s a -> s{_rrcfKind = a})---- | Dimensions which are compatible to be selected in the--- \"dimensionFilters\" section of the report.-rrcfDimensionFilters :: Lens' ReachReportCompatibleFields [Dimension]-rrcfDimensionFilters-  = lens _rrcfDimensionFilters-      (\ s a -> s{_rrcfDimensionFilters = a})-      . _Default-      . _Coerce---- | Metrics which are compatible to be selected as activity metrics to pivot--- on in the \"activities\" section of the report.-rrcfPivotedActivityMetrics :: Lens' ReachReportCompatibleFields [Metric]-rrcfPivotedActivityMetrics-  = lens _rrcfPivotedActivityMetrics-      (\ s a -> s{_rrcfPivotedActivityMetrics = a})-      . _Default-      . _Coerce---- | Dimensions which are compatible to be selected in the \"dimensions\"--- section of the report.-rrcfDimensions :: Lens' ReachReportCompatibleFields [Dimension]-rrcfDimensions-  = lens _rrcfDimensions-      (\ s a -> s{_rrcfDimensions = a})-      . _Default-      . _Coerce--instance FromJSON ReachReportCompatibleFields where-        parseJSON-          = withObject "ReachReportCompatibleFields"-              (\ o ->-                 ReachReportCompatibleFields <$>-                   (o .:? "metrics" .!= mempty) <*>-                     (o .:? "reachByFrequencyMetrics" .!= mempty)-                     <*>-                     (o .:? "kind" .!=-                        "dfareporting#reachReportCompatibleFields")-                     <*> (o .:? "dimensionFilters" .!= mempty)-                     <*> (o .:? "pivotedActivityMetrics" .!= mempty)-                     <*> (o .:? "dimensions" .!= mempty))--instance ToJSON ReachReportCompatibleFields where-        toJSON ReachReportCompatibleFields{..}-          = object-              (catMaybes-                 [("metrics" .=) <$> _rrcfMetrics,-                  ("reachByFrequencyMetrics" .=) <$>-                    _rrcfReachByFrequencyMetrics,-                  Just ("kind" .= _rrcfKind),-                  ("dimensionFilters" .=) <$> _rrcfDimensionFilters,-                  ("pivotedActivityMetrics" .=) <$>-                    _rrcfPivotedActivityMetrics,-                  ("dimensions" .=) <$> _rrcfDimensions])---- | Contains information about a browser that can be targeted by ads.------ /See:/ 'browser' smart constructor.-data Browser = Browser-    { _bMinorVersion     :: !(Maybe Text)-    , _bKind             :: !Text-    , _bBrowserVersionId :: !(Maybe (Textual Int64))-    , _bMajorVersion     :: !(Maybe Text)-    , _bName             :: !(Maybe Text)-    , _bDartId           :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'Browser' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'bMinorVersion'------ * 'bKind'------ * 'bBrowserVersionId'------ * 'bMajorVersion'------ * 'bName'------ * 'bDartId'-browser-    :: Browser-browser =-    Browser-    { _bMinorVersion = Nothing-    , _bKind = "dfareporting#browser"-    , _bBrowserVersionId = Nothing-    , _bMajorVersion = Nothing-    , _bName = Nothing-    , _bDartId = Nothing-    }---- | Minor version number (number after first dot on left) of this browser.--- For example, for Chrome 5.0.375.86 beta, this field should be set to 0.--- An asterisk (*) may be used to target any version number, and a question--- mark (?) may be used to target cases where the version number cannot be--- identified. For example, Chrome *.* targets any version of Chrome: 1.2,--- 2.5, 3.5, and so on. Chrome 3.* targets Chrome 3.1, 3.5, but not 4.0.--- Firefox ?.? targets cases where the ad server knows the browser is--- Firefox but can\'t tell which version it is.-bMinorVersion :: Lens' Browser (Maybe Text)-bMinorVersion-  = lens _bMinorVersion-      (\ s a -> s{_bMinorVersion = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#browser\".-bKind :: Lens' Browser Text-bKind = lens _bKind (\ s a -> s{_bKind = a})---- | ID referring to this grouping of browser and version numbers. This is--- the ID used for targeting.-bBrowserVersionId :: Lens' Browser (Maybe Int64)-bBrowserVersionId-  = lens _bBrowserVersionId-      (\ s a -> s{_bBrowserVersionId = a})-      . mapping _Coerce---- | Major version number (leftmost number) of this browser. For example, for--- Chrome 5.0.376.86 beta, this field should be set to 5. An asterisk (*)--- may be used to target any version number, and a question mark (?) may be--- used to target cases where the version number cannot be identified. For--- example, Chrome *.* targets any version of Chrome: 1.2, 2.5, 3.5, and so--- on. Chrome 3.* targets Chrome 3.1, 3.5, but not 4.0. Firefox ?.? targets--- cases where the ad server knows the browser is Firefox but can\'t tell--- which version it is.-bMajorVersion :: Lens' Browser (Maybe Text)-bMajorVersion-  = lens _bMajorVersion-      (\ s a -> s{_bMajorVersion = a})---- | Name of this browser.-bName :: Lens' Browser (Maybe Text)-bName = lens _bName (\ s a -> s{_bName = a})---- | DART ID of this browser. This is the ID used when generating reports.-bDartId :: Lens' Browser (Maybe Int64)-bDartId-  = lens _bDartId (\ s a -> s{_bDartId = a}) .-      mapping _Coerce--instance FromJSON Browser where-        parseJSON-          = withObject "Browser"-              (\ o ->-                 Browser <$>-                   (o .:? "minorVersion") <*>-                     (o .:? "kind" .!= "dfareporting#browser")-                     <*> (o .:? "browserVersionId")-                     <*> (o .:? "majorVersion")-                     <*> (o .:? "name")-                     <*> (o .:? "dartId"))--instance ToJSON Browser where-        toJSON Browser{..}-          = object-              (catMaybes-                 [("minorVersion" .=) <$> _bMinorVersion,-                  Just ("kind" .= _bKind),-                  ("browserVersionId" .=) <$> _bBrowserVersionId,-                  ("majorVersion" .=) <$> _bMajorVersion,-                  ("name" .=) <$> _bName, ("dartId" .=) <$> _bDartId])---- | Creative Group Assignment.------ /See:/ 'creativeGroupAssignment' smart constructor.-data CreativeGroupAssignment = CreativeGroupAssignment-    { _cgaCreativeGroupNumber :: !(Maybe CreativeGroupAssignmentCreativeGroupNumber)-    , _cgaCreativeGroupId     :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CreativeGroupAssignment' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cgaCreativeGroupNumber'------ * 'cgaCreativeGroupId'-creativeGroupAssignment-    :: CreativeGroupAssignment-creativeGroupAssignment =-    CreativeGroupAssignment-    { _cgaCreativeGroupNumber = Nothing-    , _cgaCreativeGroupId = Nothing-    }---- | Creative group number of the creative group assignment.-cgaCreativeGroupNumber :: Lens' CreativeGroupAssignment (Maybe CreativeGroupAssignmentCreativeGroupNumber)-cgaCreativeGroupNumber-  = lens _cgaCreativeGroupNumber-      (\ s a -> s{_cgaCreativeGroupNumber = a})---- | ID of the creative group to be assigned.-cgaCreativeGroupId :: Lens' CreativeGroupAssignment (Maybe Int64)-cgaCreativeGroupId-  = lens _cgaCreativeGroupId-      (\ s a -> s{_cgaCreativeGroupId = a})-      . mapping _Coerce--instance FromJSON CreativeGroupAssignment where-        parseJSON-          = withObject "CreativeGroupAssignment"-              (\ o ->-                 CreativeGroupAssignment <$>-                   (o .:? "creativeGroupNumber") <*>-                     (o .:? "creativeGroupId"))--instance ToJSON CreativeGroupAssignment where-        toJSON CreativeGroupAssignment{..}-          = object-              (catMaybes-                 [("creativeGroupNumber" .=) <$>-                    _cgaCreativeGroupNumber,-                  ("creativeGroupId" .=) <$> _cgaCreativeGroupId])---- | Directory Site Settings------ /See:/ 'directorySiteSettings' smart constructor.-data DirectorySiteSettings = DirectorySiteSettings-    { _dssInterstitialPlacementAccepted  :: !(Maybe Bool)-    , _dssDfpSettings                    :: !(Maybe DfpSettings)-    , _dssVerificationTagOptOut          :: !(Maybe Bool)-    , _dssActiveViewOptOut               :: !(Maybe Bool)-    , _dssVideoActiveViewOptOut          :: !(Maybe Bool)-    , _dssInstreamVideoPlacementAccepted :: !(Maybe Bool)-    , _dssNielsenOCROptOut               :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'DirectorySiteSettings' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dssInterstitialPlacementAccepted'------ * 'dssDfpSettings'------ * 'dssVerificationTagOptOut'------ * 'dssActiveViewOptOut'------ * 'dssVideoActiveViewOptOut'------ * 'dssInstreamVideoPlacementAccepted'------ * 'dssNielsenOCROptOut'-directorySiteSettings-    :: DirectorySiteSettings-directorySiteSettings =-    DirectorySiteSettings-    { _dssInterstitialPlacementAccepted = Nothing-    , _dssDfpSettings = Nothing-    , _dssVerificationTagOptOut = Nothing-    , _dssActiveViewOptOut = Nothing-    , _dssVideoActiveViewOptOut = Nothing-    , _dssInstreamVideoPlacementAccepted = Nothing-    , _dssNielsenOCROptOut = Nothing-    }---- | Whether this site accepts interstitial ads.-dssInterstitialPlacementAccepted :: Lens' DirectorySiteSettings (Maybe Bool)-dssInterstitialPlacementAccepted-  = lens _dssInterstitialPlacementAccepted-      (\ s a -> s{_dssInterstitialPlacementAccepted = a})---- | Directory site DFP settings.-dssDfpSettings :: Lens' DirectorySiteSettings (Maybe DfpSettings)-dssDfpSettings-  = lens _dssDfpSettings-      (\ s a -> s{_dssDfpSettings = a})---- | Whether this directory site has disabled generation of Verification ins--- tags.-dssVerificationTagOptOut :: Lens' DirectorySiteSettings (Maybe Bool)-dssVerificationTagOptOut-  = lens _dssVerificationTagOptOut-      (\ s a -> s{_dssVerificationTagOptOut = a})---- | Whether this directory site has disabled active view creatives.-dssActiveViewOptOut :: Lens' DirectorySiteSettings (Maybe Bool)-dssActiveViewOptOut-  = lens _dssActiveViewOptOut-      (\ s a -> s{_dssActiveViewOptOut = a})---- | Whether this directory site has disabled active view for in-stream video--- creatives.-dssVideoActiveViewOptOut :: Lens' DirectorySiteSettings (Maybe Bool)-dssVideoActiveViewOptOut-  = lens _dssVideoActiveViewOptOut-      (\ s a -> s{_dssVideoActiveViewOptOut = a})---- | Whether this site accepts in-stream video ads.-dssInstreamVideoPlacementAccepted :: Lens' DirectorySiteSettings (Maybe Bool)-dssInstreamVideoPlacementAccepted-  = lens _dssInstreamVideoPlacementAccepted-      (\ s a -> s{_dssInstreamVideoPlacementAccepted = a})---- | Whether this directory site has disabled Nielsen OCR reach ratings.-dssNielsenOCROptOut :: Lens' DirectorySiteSettings (Maybe Bool)-dssNielsenOCROptOut-  = lens _dssNielsenOCROptOut-      (\ s a -> s{_dssNielsenOCROptOut = a})--instance FromJSON DirectorySiteSettings where-        parseJSON-          = withObject "DirectorySiteSettings"-              (\ o ->-                 DirectorySiteSettings <$>-                   (o .:? "interstitialPlacementAccepted") <*>-                     (o .:? "dfp_settings")-                     <*> (o .:? "verificationTagOptOut")-                     <*> (o .:? "activeViewOptOut")-                     <*> (o .:? "videoActiveViewOptOut")-                     <*> (o .:? "instream_video_placement_accepted")-                     <*> (o .:? "nielsenOcrOptOut"))--instance ToJSON DirectorySiteSettings where-        toJSON DirectorySiteSettings{..}-          = object-              (catMaybes-                 [("interstitialPlacementAccepted" .=) <$>-                    _dssInterstitialPlacementAccepted,-                  ("dfp_settings" .=) <$> _dssDfpSettings,-                  ("verificationTagOptOut" .=) <$>-                    _dssVerificationTagOptOut,-                  ("activeViewOptOut" .=) <$> _dssActiveViewOptOut,-                  ("videoActiveViewOptOut" .=) <$>-                    _dssVideoActiveViewOptOut,-                  ("instream_video_placement_accepted" .=) <$>-                    _dssInstreamVideoPlacementAccepted,-                  ("nielsenOcrOptOut" .=) <$> _dssNielsenOCROptOut])---- | Remarketing List Population Rule.------ /See:/ 'listPopulationRule' smart constructor.-data ListPopulationRule = ListPopulationRule-    { _lprFloodlightActivityName :: !(Maybe Text)-    , _lprFloodlightActivityId   :: !(Maybe (Textual Int64))-    , _lprListPopulationClauses  :: !(Maybe [ListPopulationClause])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ListPopulationRule' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lprFloodlightActivityName'------ * 'lprFloodlightActivityId'------ * 'lprListPopulationClauses'-listPopulationRule-    :: ListPopulationRule-listPopulationRule =-    ListPopulationRule-    { _lprFloodlightActivityName = Nothing-    , _lprFloodlightActivityId = Nothing-    , _lprListPopulationClauses = Nothing-    }---- | Name of floodlight activity associated with this rule. This is a--- read-only, auto-generated field.-lprFloodlightActivityName :: Lens' ListPopulationRule (Maybe Text)-lprFloodlightActivityName-  = lens _lprFloodlightActivityName-      (\ s a -> s{_lprFloodlightActivityName = a})---- | Floodlight activity ID associated with this rule. This field can be left--- blank.-lprFloodlightActivityId :: Lens' ListPopulationRule (Maybe Int64)-lprFloodlightActivityId-  = lens _lprFloodlightActivityId-      (\ s a -> s{_lprFloodlightActivityId = a})-      . mapping _Coerce---- | Clauses that make up this list population rule. Clauses are joined by--- ANDs, and the clauses themselves are made up of list population terms--- which are joined by ORs.-lprListPopulationClauses :: Lens' ListPopulationRule [ListPopulationClause]-lprListPopulationClauses-  = lens _lprListPopulationClauses-      (\ s a -> s{_lprListPopulationClauses = a})-      . _Default-      . _Coerce--instance FromJSON ListPopulationRule where-        parseJSON-          = withObject "ListPopulationRule"-              (\ o ->-                 ListPopulationRule <$>-                   (o .:? "floodlightActivityName") <*>-                     (o .:? "floodlightActivityId")-                     <*> (o .:? "listPopulationClauses" .!= mempty))--instance ToJSON ListPopulationRule where-        toJSON ListPopulationRule{..}-          = object-              (catMaybes-                 [("floodlightActivityName" .=) <$>-                    _lprFloodlightActivityName,-                  ("floodlightActivityId" .=) <$>-                    _lprFloodlightActivityId,-                  ("listPopulationClauses" .=) <$>-                    _lprListPopulationClauses])---- | Size List Response------ /See:/ 'sizesListResponse' smart constructor.-data SizesListResponse = SizesListResponse-    { _slrKind  :: !Text-    , _slrSizes :: !(Maybe [Size])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'SizesListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'slrKind'------ * 'slrSizes'-sizesListResponse-    :: SizesListResponse-sizesListResponse =-    SizesListResponse-    { _slrKind = "dfareporting#sizesListResponse"-    , _slrSizes = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#sizesListResponse\".-slrKind :: Lens' SizesListResponse Text-slrKind = lens _slrKind (\ s a -> s{_slrKind = a})---- | Size collection.-slrSizes :: Lens' SizesListResponse [Size]-slrSizes-  = lens _slrSizes (\ s a -> s{_slrSizes = a}) .-      _Default-      . _Coerce--instance FromJSON SizesListResponse where-        parseJSON-          = withObject "SizesListResponse"-              (\ o ->-                 SizesListResponse <$>-                   (o .:? "kind" .!= "dfareporting#sizesListResponse")-                     <*> (o .:? "sizes" .!= mempty))--instance ToJSON SizesListResponse where-        toJSON SizesListResponse{..}-          = object-              (catMaybes-                 [Just ("kind" .= _slrKind),-                  ("sizes" .=) <$> _slrSizes])---- | Creative Rotation.------ /See:/ 'creativeRotation' smart constructor.-data CreativeRotation = CreativeRotation-    { _crWeightCalculationStrategy           :: !(Maybe CreativeRotationWeightCalculationStrategy)-    , _crCreativeAssignments                 :: !(Maybe [CreativeAssignment])-    , _crCreativeOptimizationConfigurationId :: !(Maybe (Textual Int64))-    , _crType                                :: !(Maybe CreativeRotationType)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CreativeRotation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'crWeightCalculationStrategy'------ * 'crCreativeAssignments'------ * 'crCreativeOptimizationConfigurationId'------ * 'crType'-creativeRotation-    :: CreativeRotation-creativeRotation =-    CreativeRotation-    { _crWeightCalculationStrategy = Nothing-    , _crCreativeAssignments = Nothing-    , _crCreativeOptimizationConfigurationId = Nothing-    , _crType = Nothing-    }---- | Strategy for calculating weights. Used with--- CREATIVE_ROTATION_TYPE_RANDOM.-crWeightCalculationStrategy :: Lens' CreativeRotation (Maybe CreativeRotationWeightCalculationStrategy)-crWeightCalculationStrategy-  = lens _crWeightCalculationStrategy-      (\ s a -> s{_crWeightCalculationStrategy = a})---- | Creative assignments in this creative rotation.-crCreativeAssignments :: Lens' CreativeRotation [CreativeAssignment]-crCreativeAssignments-  = lens _crCreativeAssignments-      (\ s a -> s{_crCreativeAssignments = a})-      . _Default-      . _Coerce---- | Creative optimization configuration that is used by this ad. It should--- refer to one of the existing optimization configurations in the ad\'s--- campaign. If it is unset or set to 0, then the campaign\'s default--- optimization configuration will be used for this ad.-crCreativeOptimizationConfigurationId :: Lens' CreativeRotation (Maybe Int64)-crCreativeOptimizationConfigurationId-  = lens _crCreativeOptimizationConfigurationId-      (\ s a ->-         s{_crCreativeOptimizationConfigurationId = a})-      . mapping _Coerce---- | Type of creative rotation. Can be used to specify whether to use--- sequential or random rotation.-crType :: Lens' CreativeRotation (Maybe CreativeRotationType)-crType = lens _crType (\ s a -> s{_crType = a})--instance FromJSON CreativeRotation where-        parseJSON-          = withObject "CreativeRotation"-              (\ o ->-                 CreativeRotation <$>-                   (o .:? "weightCalculationStrategy") <*>-                     (o .:? "creativeAssignments" .!= mempty)-                     <*> (o .:? "creativeOptimizationConfigurationId")-                     <*> (o .:? "type"))--instance ToJSON CreativeRotation where-        toJSON CreativeRotation{..}-          = object-              (catMaybes-                 [("weightCalculationStrategy" .=) <$>-                    _crWeightCalculationStrategy,-                  ("creativeAssignments" .=) <$>-                    _crCreativeAssignments,-                  ("creativeOptimizationConfigurationId" .=) <$>-                    _crCreativeOptimizationConfigurationId,-                  ("type" .=) <$> _crType])---- | Technology Targeting.------ /See:/ 'technologyTargeting' smart constructor.-data TechnologyTargeting = TechnologyTargeting-    { _ttMobileCarriers          :: !(Maybe [MobileCarrier])-    , _ttOperatingSystemVersions :: !(Maybe [OperatingSystemVersion])-    , _ttPlatformTypes           :: !(Maybe [PlatformType])-    , _ttBrowsers                :: !(Maybe [Browser])-    , _ttConnectionTypes         :: !(Maybe [ConnectionType])-    , _ttOperatingSystems        :: !(Maybe [OperatingSystem])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'TechnologyTargeting' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ttMobileCarriers'------ * 'ttOperatingSystemVersions'------ * 'ttPlatformTypes'------ * 'ttBrowsers'------ * 'ttConnectionTypes'------ * 'ttOperatingSystems'-technologyTargeting-    :: TechnologyTargeting-technologyTargeting =-    TechnologyTargeting-    { _ttMobileCarriers = Nothing-    , _ttOperatingSystemVersions = Nothing-    , _ttPlatformTypes = Nothing-    , _ttBrowsers = Nothing-    , _ttConnectionTypes = Nothing-    , _ttOperatingSystems = Nothing-    }---- | Mobile carriers that this ad targets. For each mobile carrier only id is--- required, and the other fields are populated automatically when the ad--- is inserted or updated. If targeting a mobile carrier, do not set--- targeting for any zip codes.-ttMobileCarriers :: Lens' TechnologyTargeting [MobileCarrier]-ttMobileCarriers-  = lens _ttMobileCarriers-      (\ s a -> s{_ttMobileCarriers = a})-      . _Default-      . _Coerce---- | Operating system versions that this ad targets. To target all versions,--- use operatingSystems. For each operating system version, only id is--- required. The other fields are populated automatically when the ad is--- inserted or updated. If targeting an operating system version, do not--- set targeting for the corresponding operating system in--- operatingSystems.-ttOperatingSystemVersions :: Lens' TechnologyTargeting [OperatingSystemVersion]-ttOperatingSystemVersions-  = lens _ttOperatingSystemVersions-      (\ s a -> s{_ttOperatingSystemVersions = a})-      . _Default-      . _Coerce---- | Platform types that this ad targets. For example, desktop, mobile, or--- tablet. For each platform type, only id is required, and the other--- fields are populated automatically when the ad is inserted or updated.-ttPlatformTypes :: Lens' TechnologyTargeting [PlatformType]-ttPlatformTypes-  = lens _ttPlatformTypes-      (\ s a -> s{_ttPlatformTypes = a})-      . _Default-      . _Coerce---- | Browsers that this ad targets. For each browser either set--- browserVersionId or dartId along with the version numbers. If both are--- specified, only browserVersionId will be used.The other fields are--- populated automatically when the ad is inserted or updated.-ttBrowsers :: Lens' TechnologyTargeting [Browser]-ttBrowsers-  = lens _ttBrowsers (\ s a -> s{_ttBrowsers = a}) .-      _Default-      . _Coerce---- | Connection types that this ad targets. For each connection type only id--- is required.The other fields are populated automatically when the ad is--- inserted or updated.-ttConnectionTypes :: Lens' TechnologyTargeting [ConnectionType]-ttConnectionTypes-  = lens _ttConnectionTypes-      (\ s a -> s{_ttConnectionTypes = a})-      . _Default-      . _Coerce---- | Operating systems that this ad targets. To target specific versions, use--- operatingSystemVersions. For each operating system only dartId is--- required. The other fields are populated automatically when the ad is--- inserted or updated. If targeting an operating system, do not set--- targeting for operating system versions for the same operating system.-ttOperatingSystems :: Lens' TechnologyTargeting [OperatingSystem]-ttOperatingSystems-  = lens _ttOperatingSystems-      (\ s a -> s{_ttOperatingSystems = a})-      . _Default-      . _Coerce--instance FromJSON TechnologyTargeting where-        parseJSON-          = withObject "TechnologyTargeting"-              (\ o ->-                 TechnologyTargeting <$>-                   (o .:? "mobileCarriers" .!= mempty) <*>-                     (o .:? "operatingSystemVersions" .!= mempty)-                     <*> (o .:? "platformTypes" .!= mempty)-                     <*> (o .:? "browsers" .!= mempty)-                     <*> (o .:? "connectionTypes" .!= mempty)-                     <*> (o .:? "operatingSystems" .!= mempty))--instance ToJSON TechnologyTargeting where-        toJSON TechnologyTargeting{..}-          = object-              (catMaybes-                 [("mobileCarriers" .=) <$> _ttMobileCarriers,-                  ("operatingSystemVersions" .=) <$>-                    _ttOperatingSystemVersions,-                  ("platformTypes" .=) <$> _ttPlatformTypes,-                  ("browsers" .=) <$> _ttBrowsers,-                  ("connectionTypes" .=) <$> _ttConnectionTypes,-                  ("operatingSystems" .=) <$> _ttOperatingSystems])---- | Represents a buy from the DoubleClick Planning inventory store.------ /See:/ 'inventoryItem' smart constructor.-data InventoryItem = InventoryItem-    { _iiPlacementStrategyId       :: !(Maybe (Textual Int64))-    , _iiEstimatedClickThroughRate :: !(Maybe (Textual Int64))-    , _iiPricing                   :: !(Maybe Pricing)-    , _iiKind                      :: !Text-    , _iiAdvertiserId              :: !(Maybe (Textual Int64))-    , _iiRfpId                     :: !(Maybe (Textual Int64))-    , _iiContentCategoryId         :: !(Maybe (Textual Int64))-    , _iiInPlan                    :: !(Maybe Bool)-    , _iiAccountId                 :: !(Maybe (Textual Int64))-    , _iiName                      :: !(Maybe Text)-    , _iiAdSlots                   :: !(Maybe [AdSlot])-    , _iiNegotiationChannelId      :: !(Maybe (Textual Int64))-    , _iiLastModifiedInfo          :: !(Maybe LastModifiedInfo)-    , _iiId                        :: !(Maybe (Textual Int64))-    , _iiEstimatedConversionRate   :: !(Maybe (Textual Int64))-    , _iiProjectId                 :: !(Maybe (Textual Int64))-    , _iiSubAccountId              :: !(Maybe (Textual Int64))-    , _iiOrderId                   :: !(Maybe (Textual Int64))-    , _iiSiteId                    :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'InventoryItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'iiPlacementStrategyId'------ * 'iiEstimatedClickThroughRate'------ * 'iiPricing'------ * 'iiKind'------ * 'iiAdvertiserId'------ * 'iiRfpId'------ * 'iiContentCategoryId'------ * 'iiInPlan'------ * 'iiAccountId'------ * 'iiName'------ * 'iiAdSlots'------ * 'iiNegotiationChannelId'------ * 'iiLastModifiedInfo'------ * 'iiId'------ * 'iiEstimatedConversionRate'------ * 'iiProjectId'------ * 'iiSubAccountId'------ * 'iiOrderId'------ * 'iiSiteId'-inventoryItem-    :: InventoryItem-inventoryItem =-    InventoryItem-    { _iiPlacementStrategyId = Nothing-    , _iiEstimatedClickThroughRate = Nothing-    , _iiPricing = Nothing-    , _iiKind = "dfareporting#inventoryItem"-    , _iiAdvertiserId = Nothing-    , _iiRfpId = Nothing-    , _iiContentCategoryId = Nothing-    , _iiInPlan = Nothing-    , _iiAccountId = Nothing-    , _iiName = Nothing-    , _iiAdSlots = Nothing-    , _iiNegotiationChannelId = Nothing-    , _iiLastModifiedInfo = Nothing-    , _iiId = Nothing-    , _iiEstimatedConversionRate = Nothing-    , _iiProjectId = Nothing-    , _iiSubAccountId = Nothing-    , _iiOrderId = Nothing-    , _iiSiteId = Nothing-    }---- | Placement strategy ID of this inventory item.-iiPlacementStrategyId :: Lens' InventoryItem (Maybe Int64)-iiPlacementStrategyId-  = lens _iiPlacementStrategyId-      (\ s a -> s{_iiPlacementStrategyId = a})-      . mapping _Coerce---- | Estimated click-through rate of this inventory item.-iiEstimatedClickThroughRate :: Lens' InventoryItem (Maybe Int64)-iiEstimatedClickThroughRate-  = lens _iiEstimatedClickThroughRate-      (\ s a -> s{_iiEstimatedClickThroughRate = a})-      . mapping _Coerce---- | Pricing of this inventory item.-iiPricing :: Lens' InventoryItem (Maybe Pricing)-iiPricing-  = lens _iiPricing (\ s a -> s{_iiPricing = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#inventoryItem\".-iiKind :: Lens' InventoryItem Text-iiKind = lens _iiKind (\ s a -> s{_iiKind = a})---- | Advertiser ID of this inventory item.-iiAdvertiserId :: Lens' InventoryItem (Maybe Int64)-iiAdvertiserId-  = lens _iiAdvertiserId-      (\ s a -> s{_iiAdvertiserId = a})-      . mapping _Coerce---- | RFP ID of this inventory item.-iiRfpId :: Lens' InventoryItem (Maybe Int64)-iiRfpId-  = lens _iiRfpId (\ s a -> s{_iiRfpId = a}) .-      mapping _Coerce---- | Content category ID of this inventory item.-iiContentCategoryId :: Lens' InventoryItem (Maybe Int64)-iiContentCategoryId-  = lens _iiContentCategoryId-      (\ s a -> s{_iiContentCategoryId = a})-      . mapping _Coerce---- | Whether this inventory item is in plan.-iiInPlan :: Lens' InventoryItem (Maybe Bool)-iiInPlan = lens _iiInPlan (\ s a -> s{_iiInPlan = a})---- | Account ID of this inventory item.-iiAccountId :: Lens' InventoryItem (Maybe Int64)-iiAccountId-  = lens _iiAccountId (\ s a -> s{_iiAccountId = a}) .-      mapping _Coerce---- | Name of this inventory item. For standalone inventory items, this is the--- same name as that of its only ad slot. For group inventory items, this--- can differ from the name of any of its ad slots.-iiName :: Lens' InventoryItem (Maybe Text)-iiName = lens _iiName (\ s a -> s{_iiName = a})---- | Ad slots of this inventory item. If this inventory item represents a--- standalone placement, there will be exactly one ad slot. If this--- inventory item represents a placement group, there will be more than one--- ad slot, each representing one child placement in that placement group.-iiAdSlots :: Lens' InventoryItem [AdSlot]-iiAdSlots-  = lens _iiAdSlots (\ s a -> s{_iiAdSlots = a}) .-      _Default-      . _Coerce---- | Negotiation channel ID of this inventory item.-iiNegotiationChannelId :: Lens' InventoryItem (Maybe Int64)-iiNegotiationChannelId-  = lens _iiNegotiationChannelId-      (\ s a -> s{_iiNegotiationChannelId = a})-      . mapping _Coerce---- | Information about the most recent modification of this inventory item.-iiLastModifiedInfo :: Lens' InventoryItem (Maybe LastModifiedInfo)-iiLastModifiedInfo-  = lens _iiLastModifiedInfo-      (\ s a -> s{_iiLastModifiedInfo = a})---- | ID of this inventory item.-iiId :: Lens' InventoryItem (Maybe Int64)-iiId-  = lens _iiId (\ s a -> s{_iiId = a}) .-      mapping _Coerce---- | Estimated conversion rate of this inventory item.-iiEstimatedConversionRate :: Lens' InventoryItem (Maybe Int64)-iiEstimatedConversionRate-  = lens _iiEstimatedConversionRate-      (\ s a -> s{_iiEstimatedConversionRate = a})-      . mapping _Coerce---- | Project ID of this inventory item.-iiProjectId :: Lens' InventoryItem (Maybe Int64)-iiProjectId-  = lens _iiProjectId (\ s a -> s{_iiProjectId = a}) .-      mapping _Coerce---- | Subaccount ID of this inventory item.-iiSubAccountId :: Lens' InventoryItem (Maybe Int64)-iiSubAccountId-  = lens _iiSubAccountId-      (\ s a -> s{_iiSubAccountId = a})-      . mapping _Coerce---- | Order ID of this inventory item.-iiOrderId :: Lens' InventoryItem (Maybe Int64)-iiOrderId-  = lens _iiOrderId (\ s a -> s{_iiOrderId = a}) .-      mapping _Coerce---- | ID of the site this inventory item is associated with.-iiSiteId :: Lens' InventoryItem (Maybe Int64)-iiSiteId-  = lens _iiSiteId (\ s a -> s{_iiSiteId = a}) .-      mapping _Coerce--instance FromJSON InventoryItem where-        parseJSON-          = withObject "InventoryItem"-              (\ o ->-                 InventoryItem <$>-                   (o .:? "placementStrategyId") <*>-                     (o .:? "estimatedClickThroughRate")-                     <*> (o .:? "pricing")-                     <*> (o .:? "kind" .!= "dfareporting#inventoryItem")-                     <*> (o .:? "advertiserId")-                     <*> (o .:? "rfpId")-                     <*> (o .:? "contentCategoryId")-                     <*> (o .:? "inPlan")-                     <*> (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "adSlots" .!= mempty)-                     <*> (o .:? "negotiationChannelId")-                     <*> (o .:? "lastModifiedInfo")-                     <*> (o .:? "id")-                     <*> (o .:? "estimatedConversionRate")-                     <*> (o .:? "projectId")-                     <*> (o .:? "subaccountId")-                     <*> (o .:? "orderId")-                     <*> (o .:? "siteId"))--instance ToJSON InventoryItem where-        toJSON InventoryItem{..}-          = object-              (catMaybes-                 [("placementStrategyId" .=) <$>-                    _iiPlacementStrategyId,-                  ("estimatedClickThroughRate" .=) <$>-                    _iiEstimatedClickThroughRate,-                  ("pricing" .=) <$> _iiPricing,-                  Just ("kind" .= _iiKind),-                  ("advertiserId" .=) <$> _iiAdvertiserId,-                  ("rfpId" .=) <$> _iiRfpId,-                  ("contentCategoryId" .=) <$> _iiContentCategoryId,-                  ("inPlan" .=) <$> _iiInPlan,-                  ("accountId" .=) <$> _iiAccountId,-                  ("name" .=) <$> _iiName,-                  ("adSlots" .=) <$> _iiAdSlots,-                  ("negotiationChannelId" .=) <$>-                    _iiNegotiationChannelId,-                  ("lastModifiedInfo" .=) <$> _iiLastModifiedInfo,-                  ("id" .=) <$> _iiId,-                  ("estimatedConversionRate" .=) <$>-                    _iiEstimatedConversionRate,-                  ("projectId" .=) <$> _iiProjectId,-                  ("subaccountId" .=) <$> _iiSubAccountId,-                  ("orderId" .=) <$> _iiOrderId,-                  ("siteId" .=) <$> _iiSiteId])---- | Project List Response------ /See:/ 'projectsListResponse' smart constructor.-data ProjectsListResponse = ProjectsListResponse-    { _plrNextPageToken :: !(Maybe Text)-    , _plrKind          :: !Text-    , _plrProjects      :: !(Maybe [Project])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ProjectsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'plrNextPageToken'------ * 'plrKind'------ * 'plrProjects'-projectsListResponse-    :: ProjectsListResponse-projectsListResponse =-    ProjectsListResponse-    { _plrNextPageToken = Nothing-    , _plrKind = "dfareporting#projectsListResponse"-    , _plrProjects = Nothing-    }---- | Pagination token to be used for the next list operation.-plrNextPageToken :: Lens' ProjectsListResponse (Maybe Text)-plrNextPageToken-  = lens _plrNextPageToken-      (\ s a -> s{_plrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#projectsListResponse\".-plrKind :: Lens' ProjectsListResponse Text-plrKind = lens _plrKind (\ s a -> s{_plrKind = a})---- | Project collection.-plrProjects :: Lens' ProjectsListResponse [Project]-plrProjects-  = lens _plrProjects (\ s a -> s{_plrProjects = a}) .-      _Default-      . _Coerce--instance FromJSON ProjectsListResponse where-        parseJSON-          = withObject "ProjectsListResponse"-              (\ o ->-                 ProjectsListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!=-                        "dfareporting#projectsListResponse")-                     <*> (o .:? "projects" .!= mempty))--instance ToJSON ProjectsListResponse where-        toJSON ProjectsListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _plrNextPageToken,-                  Just ("kind" .= _plrKind),-                  ("projects" .=) <$> _plrProjects])---- | Ad List Response------ /See:/ 'adsListResponse' smart constructor.-data AdsListResponse = AdsListResponse-    { _alrNextPageToken :: !(Maybe Text)-    , _alrKind          :: !Text-    , _alrAds           :: !(Maybe [Ad])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'AdsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'alrNextPageToken'------ * 'alrKind'------ * 'alrAds'-adsListResponse-    :: AdsListResponse-adsListResponse =-    AdsListResponse-    { _alrNextPageToken = Nothing-    , _alrKind = "dfareporting#adsListResponse"-    , _alrAds = Nothing-    }---- | Pagination token to be used for the next list operation.-alrNextPageToken :: Lens' AdsListResponse (Maybe Text)-alrNextPageToken-  = lens _alrNextPageToken-      (\ s a -> s{_alrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#adsListResponse\".-alrKind :: Lens' AdsListResponse Text-alrKind = lens _alrKind (\ s a -> s{_alrKind = a})---- | Ad collection.-alrAds :: Lens' AdsListResponse [Ad]-alrAds-  = lens _alrAds (\ s a -> s{_alrAds = a}) . _Default .-      _Coerce--instance FromJSON AdsListResponse where-        parseJSON-          = withObject "AdsListResponse"-              (\ o ->-                 AdsListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!= "dfareporting#adsListResponse")-                     <*> (o .:? "ads" .!= mempty))--instance ToJSON AdsListResponse where-        toJSON AdsListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _alrNextPageToken,-                  Just ("kind" .= _alrKind), ("ads" .=) <$> _alrAds])---- | Remarketing List Population Rule Term.------ /See:/ 'listPopulationTerm' smart constructor.-data ListPopulationTerm = ListPopulationTerm-    { _lptOperator             :: !(Maybe ListPopulationTermOperator)-    , _lptValue                :: !(Maybe Text)-    , _lptVariableFriendlyName :: !(Maybe Text)-    , _lptNegation             :: !(Maybe Bool)-    , _lptVariableName         :: !(Maybe Text)-    , _lptRemarketingListId    :: !(Maybe (Textual Int64))-    , _lptType                 :: !(Maybe ListPopulationTermType)-    , _lptContains             :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ListPopulationTerm' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lptOperator'------ * 'lptValue'------ * 'lptVariableFriendlyName'------ * 'lptNegation'------ * 'lptVariableName'------ * 'lptRemarketingListId'------ * 'lptType'------ * 'lptContains'-listPopulationTerm-    :: ListPopulationTerm-listPopulationTerm =-    ListPopulationTerm-    { _lptOperator = Nothing-    , _lptValue = Nothing-    , _lptVariableFriendlyName = Nothing-    , _lptNegation = Nothing-    , _lptVariableName = Nothing-    , _lptRemarketingListId = Nothing-    , _lptType = Nothing-    , _lptContains = Nothing-    }---- | Comparison operator of this term. This field is only relevant when type--- is left unset or set to CUSTOM_VARIABLE_TERM or REFERRER_TERM.-lptOperator :: Lens' ListPopulationTerm (Maybe ListPopulationTermOperator)-lptOperator-  = lens _lptOperator (\ s a -> s{_lptOperator = a})---- | Literal to compare the variable to. This field is only relevant when--- type is left unset or set to CUSTOM_VARIABLE_TERM or REFERRER_TERM.-lptValue :: Lens' ListPopulationTerm (Maybe Text)-lptValue = lens _lptValue (\ s a -> s{_lptValue = a})---- | Friendly name of this term\'s variable. This is a read-only,--- auto-generated field. This field is only relevant when type is left--- unset or set to CUSTOM_VARIABLE_TERM.-lptVariableFriendlyName :: Lens' ListPopulationTerm (Maybe Text)-lptVariableFriendlyName-  = lens _lptVariableFriendlyName-      (\ s a -> s{_lptVariableFriendlyName = a})---- | Whether to negate the comparison result of this term during rule--- evaluation. This field is only relevant when type is left unset or set--- to CUSTOM_VARIABLE_TERM or REFERRER_TERM.-lptNegation :: Lens' ListPopulationTerm (Maybe Bool)-lptNegation-  = lens _lptNegation (\ s a -> s{_lptNegation = a})---- | Name of the variable (U1, U2, etc.) being compared in this term. This--- field is only relevant when type is set to null, CUSTOM_VARIABLE_TERM or--- REFERRER_TERM.-lptVariableName :: Lens' ListPopulationTerm (Maybe Text)-lptVariableName-  = lens _lptVariableName-      (\ s a -> s{_lptVariableName = a})---- | ID of the list in question. This field is only relevant when type is set--- to LIST_MEMBERSHIP_TERM.-lptRemarketingListId :: Lens' ListPopulationTerm (Maybe Int64)-lptRemarketingListId-  = lens _lptRemarketingListId-      (\ s a -> s{_lptRemarketingListId = a})-      . mapping _Coerce---- | List population term type determines the applicable fields in this--- object. If left unset or set to CUSTOM_VARIABLE_TERM, then variableName,--- variableFriendlyName, operator, value, and negation are applicable. If--- set to LIST_MEMBERSHIP_TERM then remarketingListId and contains are--- applicable. If set to REFERRER_TERM then operator, value, and negation--- are applicable.-lptType :: Lens' ListPopulationTerm (Maybe ListPopulationTermType)-lptType = lens _lptType (\ s a -> s{_lptType = a})---- | Will be true if the term should check if the user is in the list and--- false if the term should check if the user is not in the list. This--- field is only relevant when type is set to LIST_MEMBERSHIP_TERM. False--- by default.-lptContains :: Lens' ListPopulationTerm (Maybe Bool)-lptContains-  = lens _lptContains (\ s a -> s{_lptContains = a})--instance FromJSON ListPopulationTerm where-        parseJSON-          = withObject "ListPopulationTerm"-              (\ o ->-                 ListPopulationTerm <$>-                   (o .:? "operator") <*> (o .:? "value") <*>-                     (o .:? "variableFriendlyName")-                     <*> (o .:? "negation")-                     <*> (o .:? "variableName")-                     <*> (o .:? "remarketingListId")-                     <*> (o .:? "type")-                     <*> (o .:? "contains"))--instance ToJSON ListPopulationTerm where-        toJSON ListPopulationTerm{..}-          = object-              (catMaybes-                 [("operator" .=) <$> _lptOperator,-                  ("value" .=) <$> _lptValue,-                  ("variableFriendlyName" .=) <$>-                    _lptVariableFriendlyName,-                  ("negation" .=) <$> _lptNegation,-                  ("variableName" .=) <$> _lptVariableName,-                  ("remarketingListId" .=) <$> _lptRemarketingListId,-                  ("type" .=) <$> _lptType,-                  ("contains" .=) <$> _lptContains])---- | Dynamic and Image Tag Settings.------ /See:/ 'tagSettings' smart constructor.-data TagSettings = TagSettings-    { _tsDynamicTagEnabled :: !(Maybe Bool)-    , _tsImageTagEnabled   :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'TagSettings' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tsDynamicTagEnabled'------ * 'tsImageTagEnabled'-tagSettings-    :: TagSettings-tagSettings =-    TagSettings-    { _tsDynamicTagEnabled = Nothing-    , _tsImageTagEnabled = Nothing-    }---- | Whether dynamic floodlight tags are enabled.-tsDynamicTagEnabled :: Lens' TagSettings (Maybe Bool)-tsDynamicTagEnabled-  = lens _tsDynamicTagEnabled-      (\ s a -> s{_tsDynamicTagEnabled = a})---- | Whether image tags are enabled.-tsImageTagEnabled :: Lens' TagSettings (Maybe Bool)-tsImageTagEnabled-  = lens _tsImageTagEnabled-      (\ s a -> s{_tsImageTagEnabled = a})--instance FromJSON TagSettings where-        parseJSON-          = withObject "TagSettings"-              (\ o ->-                 TagSettings <$>-                   (o .:? "dynamicTagEnabled") <*>-                     (o .:? "imageTagEnabled"))--instance ToJSON TagSettings where-        toJSON TagSettings{..}-          = object-              (catMaybes-                 [("dynamicTagEnabled" .=) <$> _tsDynamicTagEnabled,-                  ("imageTagEnabled" .=) <$> _tsImageTagEnabled])---- | Subaccount List Response------ /See:/ 'subAccountsListResponse' smart constructor.-data SubAccountsListResponse = SubAccountsListResponse-    { _salrNextPageToken :: !(Maybe Text)-    , _salrKind          :: !Text-    , _salrSubAccounts   :: !(Maybe [SubAccount])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'SubAccountsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'salrNextPageToken'------ * 'salrKind'------ * 'salrSubAccounts'-subAccountsListResponse-    :: SubAccountsListResponse-subAccountsListResponse =-    SubAccountsListResponse-    { _salrNextPageToken = Nothing-    , _salrKind = "dfareporting#subaccountsListResponse"-    , _salrSubAccounts = Nothing-    }---- | Pagination token to be used for the next list operation.-salrNextPageToken :: Lens' SubAccountsListResponse (Maybe Text)-salrNextPageToken-  = lens _salrNextPageToken-      (\ s a -> s{_salrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#subaccountsListResponse\".-salrKind :: Lens' SubAccountsListResponse Text-salrKind = lens _salrKind (\ s a -> s{_salrKind = a})---- | Subaccount collection.-salrSubAccounts :: Lens' SubAccountsListResponse [SubAccount]-salrSubAccounts-  = lens _salrSubAccounts-      (\ s a -> s{_salrSubAccounts = a})-      . _Default-      . _Coerce--instance FromJSON SubAccountsListResponse where-        parseJSON-          = withObject "SubAccountsListResponse"-              (\ o ->-                 SubAccountsListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!=-                        "dfareporting#subaccountsListResponse")-                     <*> (o .:? "subaccounts" .!= mempty))--instance ToJSON SubAccountsListResponse where-        toJSON SubAccountsListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _salrNextPageToken,-                  Just ("kind" .= _salrKind),-                  ("subaccounts" .=) <$> _salrSubAccounts])---- | Contains properties of a Site Directory contact.------ /See:/ 'directorySiteContact' smart constructor.-data DirectorySiteContact = DirectorySiteContact-    { _dscEmail     :: !(Maybe Text)-    , _dscPhone     :: !(Maybe Text)-    , _dscLastName  :: !(Maybe Text)-    , _dscKind      :: !Text-    , _dscAddress   :: !(Maybe Text)-    , _dscRole      :: !(Maybe DirectorySiteContactRole)-    , _dscFirstName :: !(Maybe Text)-    , _dscId        :: !(Maybe (Textual Int64))-    , _dscTitle     :: !(Maybe Text)-    , _dscType      :: !(Maybe DirectorySiteContactType)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'DirectorySiteContact' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dscEmail'------ * 'dscPhone'------ * 'dscLastName'------ * 'dscKind'------ * 'dscAddress'------ * 'dscRole'------ * 'dscFirstName'------ * 'dscId'------ * 'dscTitle'------ * 'dscType'-directorySiteContact-    :: DirectorySiteContact-directorySiteContact =-    DirectorySiteContact-    { _dscEmail = Nothing-    , _dscPhone = Nothing-    , _dscLastName = Nothing-    , _dscKind = "dfareporting#directorySiteContact"-    , _dscAddress = Nothing-    , _dscRole = Nothing-    , _dscFirstName = Nothing-    , _dscId = Nothing-    , _dscTitle = Nothing-    , _dscType = Nothing-    }---- | Email address of this directory site contact.-dscEmail :: Lens' DirectorySiteContact (Maybe Text)-dscEmail = lens _dscEmail (\ s a -> s{_dscEmail = a})---- | Phone number of this directory site contact.-dscPhone :: Lens' DirectorySiteContact (Maybe Text)-dscPhone = lens _dscPhone (\ s a -> s{_dscPhone = a})---- | Last name of this directory site contact.-dscLastName :: Lens' DirectorySiteContact (Maybe Text)-dscLastName-  = lens _dscLastName (\ s a -> s{_dscLastName = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#directorySiteContact\".-dscKind :: Lens' DirectorySiteContact Text-dscKind = lens _dscKind (\ s a -> s{_dscKind = a})---- | Address of this directory site contact.-dscAddress :: Lens' DirectorySiteContact (Maybe Text)-dscAddress-  = lens _dscAddress (\ s a -> s{_dscAddress = a})---- | Directory site contact role.-dscRole :: Lens' DirectorySiteContact (Maybe DirectorySiteContactRole)-dscRole = lens _dscRole (\ s a -> s{_dscRole = a})---- | First name of this directory site contact.-dscFirstName :: Lens' DirectorySiteContact (Maybe Text)-dscFirstName-  = lens _dscFirstName (\ s a -> s{_dscFirstName = a})---- | ID of this directory site contact. This is a read-only, auto-generated--- field.-dscId :: Lens' DirectorySiteContact (Maybe Int64)-dscId-  = lens _dscId (\ s a -> s{_dscId = a}) .-      mapping _Coerce---- | Title or designation of this directory site contact.-dscTitle :: Lens' DirectorySiteContact (Maybe Text)-dscTitle = lens _dscTitle (\ s a -> s{_dscTitle = a})---- | Directory site contact type.-dscType :: Lens' DirectorySiteContact (Maybe DirectorySiteContactType)-dscType = lens _dscType (\ s a -> s{_dscType = a})--instance FromJSON DirectorySiteContact where-        parseJSON-          = withObject "DirectorySiteContact"-              (\ o ->-                 DirectorySiteContact <$>-                   (o .:? "email") <*> (o .:? "phone") <*>-                     (o .:? "lastName")-                     <*>-                     (o .:? "kind" .!=-                        "dfareporting#directorySiteContact")-                     <*> (o .:? "address")-                     <*> (o .:? "role")-                     <*> (o .:? "firstName")-                     <*> (o .:? "id")-                     <*> (o .:? "title")-                     <*> (o .:? "type"))--instance ToJSON DirectorySiteContact where-        toJSON DirectorySiteContact{..}-          = object-              (catMaybes-                 [("email" .=) <$> _dscEmail,-                  ("phone" .=) <$> _dscPhone,-                  ("lastName" .=) <$> _dscLastName,-                  Just ("kind" .= _dscKind),-                  ("address" .=) <$> _dscAddress,-                  ("role" .=) <$> _dscRole,-                  ("firstName" .=) <$> _dscFirstName,-                  ("id" .=) <$> _dscId, ("title" .=) <$> _dscTitle,-                  ("type" .=) <$> _dscType])---- | Region List Response------ /See:/ 'regionsListResponse' smart constructor.-data RegionsListResponse = RegionsListResponse-    { _rlrKind    :: !Text-    , _rlrRegions :: !(Maybe [Region])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'RegionsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rlrKind'------ * 'rlrRegions'-regionsListResponse-    :: RegionsListResponse-regionsListResponse =-    RegionsListResponse-    { _rlrKind = "dfareporting#regionsListResponse"-    , _rlrRegions = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#regionsListResponse\".-rlrKind :: Lens' RegionsListResponse Text-rlrKind = lens _rlrKind (\ s a -> s{_rlrKind = a})---- | Region collection.-rlrRegions :: Lens' RegionsListResponse [Region]-rlrRegions-  = lens _rlrRegions (\ s a -> s{_rlrRegions = a}) .-      _Default-      . _Coerce--instance FromJSON RegionsListResponse where-        parseJSON-          = withObject "RegionsListResponse"-              (\ o ->-                 RegionsListResponse <$>-                   (o .:? "kind" .!= "dfareporting#regionsListResponse")-                     <*> (o .:? "regions" .!= mempty))--instance ToJSON RegionsListResponse where-        toJSON RegionsListResponse{..}-          = object-              (catMaybes-                 [Just ("kind" .= _rlrKind),-                  ("regions" .=) <$> _rlrRegions])---- | Dynamic Tag------ /See:/ 'floodlightActivityDynamicTag' smart constructor.-data FloodlightActivityDynamicTag = FloodlightActivityDynamicTag-    { _fadtTag  :: !(Maybe Text)-    , _fadtName :: !(Maybe Text)-    , _fadtId   :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'FloodlightActivityDynamicTag' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'fadtTag'------ * 'fadtName'------ * 'fadtId'-floodlightActivityDynamicTag-    :: FloodlightActivityDynamicTag-floodlightActivityDynamicTag =-    FloodlightActivityDynamicTag-    { _fadtTag = Nothing-    , _fadtName = Nothing-    , _fadtId = Nothing-    }---- | Tag code.-fadtTag :: Lens' FloodlightActivityDynamicTag (Maybe Text)-fadtTag = lens _fadtTag (\ s a -> s{_fadtTag = a})---- | Name of this tag.-fadtName :: Lens' FloodlightActivityDynamicTag (Maybe Text)-fadtName = lens _fadtName (\ s a -> s{_fadtName = a})---- | ID of this dynamic tag. This is a read-only, auto-generated field.-fadtId :: Lens' FloodlightActivityDynamicTag (Maybe Int64)-fadtId-  = lens _fadtId (\ s a -> s{_fadtId = a}) .-      mapping _Coerce--instance FromJSON FloodlightActivityDynamicTag where-        parseJSON-          = withObject "FloodlightActivityDynamicTag"-              (\ o ->-                 FloodlightActivityDynamicTag <$>-                   (o .:? "tag") <*> (o .:? "name") <*> (o .:? "id"))--instance ToJSON FloodlightActivityDynamicTag where-        toJSON FloodlightActivityDynamicTag{..}-          = object-              (catMaybes-                 [("tag" .=) <$> _fadtTag, ("name" .=) <$> _fadtName,-                  ("id" .=) <$> _fadtId])---- | DirectorySites contains properties of a website from the Site Directory.--- Sites need to be added to an account via the Sites resource before they--- can be assigned to a placement.------ /See:/ 'directorySite' smart constructor.-data DirectorySite = DirectorySite-    { _dsCurrencyId             :: !(Maybe (Textual Int64))-    , _dsSettings               :: !(Maybe DirectorySiteSettings)-    , _dsInterstitialTagFormats :: !(Maybe [DirectorySiteInterstitialTagFormatsItem])-    , _dsKind                   :: !Text-    , _dsURL                    :: !(Maybe Text)-    , _dsIdDimensionValue       :: !(Maybe DimensionValue)-    , _dsInpageTagFormats       :: !(Maybe [DirectorySiteInpageTagFormatsItem])-    , _dsActive                 :: !(Maybe Bool)-    , _dsName                   :: !(Maybe Text)-    , _dsId                     :: !(Maybe (Textual Int64))-    , _dsCountryId              :: !(Maybe (Textual Int64))-    , _dsContactAssignments     :: !(Maybe [DirectorySiteContactAssignment])-    , _dsDescription            :: !(Maybe Text)-    , _dsParentId               :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'DirectorySite' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dsCurrencyId'------ * 'dsSettings'------ * 'dsInterstitialTagFormats'------ * 'dsKind'------ * 'dsURL'------ * 'dsIdDimensionValue'------ * 'dsInpageTagFormats'------ * 'dsActive'------ * 'dsName'------ * 'dsId'------ * 'dsCountryId'------ * 'dsContactAssignments'------ * 'dsDescription'------ * 'dsParentId'-directorySite-    :: DirectorySite-directorySite =-    DirectorySite-    { _dsCurrencyId = Nothing-    , _dsSettings = Nothing-    , _dsInterstitialTagFormats = Nothing-    , _dsKind = "dfareporting#directorySite"-    , _dsURL = Nothing-    , _dsIdDimensionValue = Nothing-    , _dsInpageTagFormats = Nothing-    , _dsActive = Nothing-    , _dsName = Nothing-    , _dsId = Nothing-    , _dsCountryId = Nothing-    , _dsContactAssignments = Nothing-    , _dsDescription = Nothing-    , _dsParentId = Nothing-    }---- | Currency ID of this directory site. Possible values are: - \"1\" for USD--- - \"2\" for GBP - \"3\" for ESP - \"4\" for SEK - \"5\" for CAD - \"6\"--- for JPY - \"7\" for DEM - \"8\" for AUD - \"9\" for FRF - \"10\" for ITL--- - \"11\" for DKK - \"12\" for NOK - \"13\" for FIM - \"14\" for ZAR ---- \"15\" for IEP - \"16\" for NLG - \"17\" for EUR - \"18\" for KRW ---- \"19\" for TWD - \"20\" for SGD - \"21\" for CNY - \"22\" for HKD ---- \"23\" for NZD - \"24\" for MYR - \"25\" for BRL - \"26\" for PTE ---- \"27\" for MXP - \"28\" for CLP - \"29\" for TRY - \"30\" for ARS ---- \"31\" for PEN - \"32\" for ILS - \"33\" for CHF - \"34\" for VEF ---- \"35\" for COP - \"36\" for GTQ-dsCurrencyId :: Lens' DirectorySite (Maybe Int64)-dsCurrencyId-  = lens _dsCurrencyId (\ s a -> s{_dsCurrencyId = a})-      . mapping _Coerce---- | Directory site settings.-dsSettings :: Lens' DirectorySite (Maybe DirectorySiteSettings)-dsSettings-  = lens _dsSettings (\ s a -> s{_dsSettings = a})---- | Tag types for interstitial placements. Acceptable values are: ---- \"IFRAME_JAVASCRIPT_INTERSTITIAL\" - \"INTERNAL_REDIRECT_INTERSTITIAL\"--- - \"JAVASCRIPT_INTERSTITIAL\"-dsInterstitialTagFormats :: Lens' DirectorySite [DirectorySiteInterstitialTagFormatsItem]-dsInterstitialTagFormats-  = lens _dsInterstitialTagFormats-      (\ s a -> s{_dsInterstitialTagFormats = a})-      . _Default-      . _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#directorySite\".-dsKind :: Lens' DirectorySite Text-dsKind = lens _dsKind (\ s a -> s{_dsKind = a})---- | URL of this directory site.-dsURL :: Lens' DirectorySite (Maybe Text)-dsURL = lens _dsURL (\ s a -> s{_dsURL = a})---- | Dimension value for the ID of this directory site. This is a read-only,--- auto-generated field.-dsIdDimensionValue :: Lens' DirectorySite (Maybe DimensionValue)-dsIdDimensionValue-  = lens _dsIdDimensionValue-      (\ s a -> s{_dsIdDimensionValue = a})---- | Tag types for regular placements. Acceptable values are: - \"STANDARD\"--- - \"IFRAME_JAVASCRIPT_INPAGE\" - \"INTERNAL_REDIRECT_INPAGE\" ---- \"JAVASCRIPT_INPAGE\"-dsInpageTagFormats :: Lens' DirectorySite [DirectorySiteInpageTagFormatsItem]-dsInpageTagFormats-  = lens _dsInpageTagFormats-      (\ s a -> s{_dsInpageTagFormats = a})-      . _Default-      . _Coerce---- | Whether this directory site is active.-dsActive :: Lens' DirectorySite (Maybe Bool)-dsActive = lens _dsActive (\ s a -> s{_dsActive = a})---- | Name of this directory site.-dsName :: Lens' DirectorySite (Maybe Text)-dsName = lens _dsName (\ s a -> s{_dsName = a})---- | ID of this directory site. This is a read-only, auto-generated field.-dsId :: Lens' DirectorySite (Maybe Int64)-dsId-  = lens _dsId (\ s a -> s{_dsId = a}) .-      mapping _Coerce---- | Country ID of this directory site.-dsCountryId :: Lens' DirectorySite (Maybe Int64)-dsCountryId-  = lens _dsCountryId (\ s a -> s{_dsCountryId = a}) .-      mapping _Coerce---- | Directory site contacts.-dsContactAssignments :: Lens' DirectorySite [DirectorySiteContactAssignment]-dsContactAssignments-  = lens _dsContactAssignments-      (\ s a -> s{_dsContactAssignments = a})-      . _Default-      . _Coerce---- | Description of this directory site.-dsDescription :: Lens' DirectorySite (Maybe Text)-dsDescription-  = lens _dsDescription-      (\ s a -> s{_dsDescription = a})---- | Parent directory site ID.-dsParentId :: Lens' DirectorySite (Maybe Int64)-dsParentId-  = lens _dsParentId (\ s a -> s{_dsParentId = a}) .-      mapping _Coerce--instance FromJSON DirectorySite where-        parseJSON-          = withObject "DirectorySite"-              (\ o ->-                 DirectorySite <$>-                   (o .:? "currencyId") <*> (o .:? "settings") <*>-                     (o .:? "interstitialTagFormats" .!= mempty)-                     <*> (o .:? "kind" .!= "dfareporting#directorySite")-                     <*> (o .:? "url")-                     <*> (o .:? "idDimensionValue")-                     <*> (o .:? "inpageTagFormats" .!= mempty)-                     <*> (o .:? "active")-                     <*> (o .:? "name")-                     <*> (o .:? "id")-                     <*> (o .:? "countryId")-                     <*> (o .:? "contactAssignments" .!= mempty)-                     <*> (o .:? "description")-                     <*> (o .:? "parentId"))--instance ToJSON DirectorySite where-        toJSON DirectorySite{..}-          = object-              (catMaybes-                 [("currencyId" .=) <$> _dsCurrencyId,-                  ("settings" .=) <$> _dsSettings,-                  ("interstitialTagFormats" .=) <$>-                    _dsInterstitialTagFormats,-                  Just ("kind" .= _dsKind), ("url" .=) <$> _dsURL,-                  ("idDimensionValue" .=) <$> _dsIdDimensionValue,-                  ("inpageTagFormats" .=) <$> _dsInpageTagFormats,-                  ("active" .=) <$> _dsActive, ("name" .=) <$> _dsName,-                  ("id" .=) <$> _dsId,-                  ("countryId" .=) <$> _dsCountryId,-                  ("contactAssignments" .=) <$> _dsContactAssignments,-                  ("description" .=) <$> _dsDescription,-                  ("parentId" .=) <$> _dsParentId])---- | The properties of the report.------ /See:/ 'reportFloodlightCriteriaReportProperties' smart constructor.-data ReportFloodlightCriteriaReportProperties = ReportFloodlightCriteriaReportProperties-    { _rfcrpIncludeUnattributedIPConversions     :: !(Maybe Bool)-    , _rfcrpIncludeUnattributedCookieConversions :: !(Maybe Bool)-    , _rfcrpIncludeAttributedIPConversions       :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ReportFloodlightCriteriaReportProperties' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rfcrpIncludeUnattributedIPConversions'------ * 'rfcrpIncludeUnattributedCookieConversions'------ * 'rfcrpIncludeAttributedIPConversions'-reportFloodlightCriteriaReportProperties-    :: ReportFloodlightCriteriaReportProperties-reportFloodlightCriteriaReportProperties =-    ReportFloodlightCriteriaReportProperties-    { _rfcrpIncludeUnattributedIPConversions = Nothing-    , _rfcrpIncludeUnattributedCookieConversions = Nothing-    , _rfcrpIncludeAttributedIPConversions = Nothing-    }---- | Include conversions that have no associated cookies and no exposures.--- It’s therefore impossible to know how the user was exposed to your ads--- during the lookback window prior to a conversion.-rfcrpIncludeUnattributedIPConversions :: Lens' ReportFloodlightCriteriaReportProperties (Maybe Bool)-rfcrpIncludeUnattributedIPConversions-  = lens _rfcrpIncludeUnattributedIPConversions-      (\ s a ->-         s{_rfcrpIncludeUnattributedIPConversions = a})---- | Include conversions of users with a DoubleClick cookie but without an--- exposure. That means the user did not click or see an ad from the--- advertiser within the Floodlight group, or that the interaction happened--- outside the lookback window.-rfcrpIncludeUnattributedCookieConversions :: Lens' ReportFloodlightCriteriaReportProperties (Maybe Bool)-rfcrpIncludeUnattributedCookieConversions-  = lens _rfcrpIncludeUnattributedCookieConversions-      (\ s a ->-         s{_rfcrpIncludeUnattributedCookieConversions = a})---- | Include conversions that have no cookie, but do have an exposure path.-rfcrpIncludeAttributedIPConversions :: Lens' ReportFloodlightCriteriaReportProperties (Maybe Bool)-rfcrpIncludeAttributedIPConversions-  = lens _rfcrpIncludeAttributedIPConversions-      (\ s a ->-         s{_rfcrpIncludeAttributedIPConversions = a})--instance FromJSON-         ReportFloodlightCriteriaReportProperties where-        parseJSON-          = withObject-              "ReportFloodlightCriteriaReportProperties"-              (\ o ->-                 ReportFloodlightCriteriaReportProperties <$>-                   (o .:? "includeUnattributedIPConversions") <*>-                     (o .:? "includeUnattributedCookieConversions")-                     <*> (o .:? "includeAttributedIPConversions"))--instance ToJSON-         ReportFloodlightCriteriaReportProperties where-        toJSON ReportFloodlightCriteriaReportProperties{..}-          = object-              (catMaybes-                 [("includeUnattributedIPConversions" .=) <$>-                    _rfcrpIncludeUnattributedIPConversions,-                  ("includeUnattributedCookieConversions" .=) <$>-                    _rfcrpIncludeUnattributedCookieConversions,-                  ("includeAttributedIPConversions" .=) <$>-                    _rfcrpIncludeAttributedIPConversions])---- | Contains properties of a Floodlight activity group.------ /See:/ 'floodlightActivityGroup' smart constructor.-data FloodlightActivityGroup = FloodlightActivityGroup-    { _fagTagString                               :: !(Maybe Text)-    , _fagFloodlightConfigurationId               :: !(Maybe (Textual Int64))-    , _fagKind                                    :: !Text-    , _fagAdvertiserId                            :: !(Maybe (Textual Int64))-    , _fagAdvertiserIdDimensionValue              :: !(Maybe DimensionValue)-    , _fagIdDimensionValue                        :: !(Maybe DimensionValue)-    , _fagAccountId                               :: !(Maybe (Textual Int64))-    , _fagName                                    :: !(Maybe Text)-    , _fagId                                      :: !(Maybe (Textual Int64))-    , _fagSubAccountId                            :: !(Maybe (Textual Int64))-    , _fagType                                    :: !(Maybe FloodlightActivityGroupType)-    , _fagFloodlightConfigurationIdDimensionValue :: !(Maybe DimensionValue)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'FloodlightActivityGroup' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'fagTagString'------ * 'fagFloodlightConfigurationId'------ * 'fagKind'------ * 'fagAdvertiserId'------ * 'fagAdvertiserIdDimensionValue'------ * 'fagIdDimensionValue'------ * 'fagAccountId'------ * 'fagName'------ * 'fagId'------ * 'fagSubAccountId'------ * 'fagType'------ * 'fagFloodlightConfigurationIdDimensionValue'-floodlightActivityGroup-    :: FloodlightActivityGroup-floodlightActivityGroup =-    FloodlightActivityGroup-    { _fagTagString = Nothing-    , _fagFloodlightConfigurationId = Nothing-    , _fagKind = "dfareporting#floodlightActivityGroup"-    , _fagAdvertiserId = Nothing-    , _fagAdvertiserIdDimensionValue = Nothing-    , _fagIdDimensionValue = Nothing-    , _fagAccountId = Nothing-    , _fagName = Nothing-    , _fagId = Nothing-    , _fagSubAccountId = Nothing-    , _fagType = Nothing-    , _fagFloodlightConfigurationIdDimensionValue = Nothing-    }---- | Value of the type= parameter in the floodlight tag, which the ad servers--- use to identify the activity group that the activity belongs to. This is--- optional: if empty, a new tag string will be generated for you. This--- string must be 1 to 8 characters long, with valid characters being--- [a-z][A-Z][0-9][-][ _ ]. This tag string must also be unique among--- activity groups of the same floodlight configuration. This field is--- read-only after insertion.-fagTagString :: Lens' FloodlightActivityGroup (Maybe Text)-fagTagString-  = lens _fagTagString (\ s a -> s{_fagTagString = a})---- | Floodlight configuration ID of this floodlight activity group. This is a--- required field.-fagFloodlightConfigurationId :: Lens' FloodlightActivityGroup (Maybe Int64)-fagFloodlightConfigurationId-  = lens _fagFloodlightConfigurationId-      (\ s a -> s{_fagFloodlightConfigurationId = a})-      . mapping _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#floodlightActivityGroup\".-fagKind :: Lens' FloodlightActivityGroup Text-fagKind = lens _fagKind (\ s a -> s{_fagKind = a})---- | Advertiser ID of this floodlight activity group. If this field is left--- blank, the value will be copied over either from the floodlight--- configuration\'s advertiser or from the existing activity group\'s--- advertiser.-fagAdvertiserId :: Lens' FloodlightActivityGroup (Maybe Int64)-fagAdvertiserId-  = lens _fagAdvertiserId-      (\ s a -> s{_fagAdvertiserId = a})-      . mapping _Coerce---- | Dimension value for the ID of the advertiser. This is a read-only,--- auto-generated field.-fagAdvertiserIdDimensionValue :: Lens' FloodlightActivityGroup (Maybe DimensionValue)-fagAdvertiserIdDimensionValue-  = lens _fagAdvertiserIdDimensionValue-      (\ s a -> s{_fagAdvertiserIdDimensionValue = a})---- | Dimension value for the ID of this floodlight activity group. This is a--- read-only, auto-generated field.-fagIdDimensionValue :: Lens' FloodlightActivityGroup (Maybe DimensionValue)-fagIdDimensionValue-  = lens _fagIdDimensionValue-      (\ s a -> s{_fagIdDimensionValue = a})---- | Account ID of this floodlight activity group. This is a read-only field--- that can be left blank.-fagAccountId :: Lens' FloodlightActivityGroup (Maybe Int64)-fagAccountId-  = lens _fagAccountId (\ s a -> s{_fagAccountId = a})-      . mapping _Coerce---- | Name of this floodlight activity group. This is a required field. Must--- be less than 65 characters long and cannot contain quotes.-fagName :: Lens' FloodlightActivityGroup (Maybe Text)-fagName = lens _fagName (\ s a -> s{_fagName = a})---- | ID of this floodlight activity group. This is a read-only,--- auto-generated field.-fagId :: Lens' FloodlightActivityGroup (Maybe Int64)-fagId-  = lens _fagId (\ s a -> s{_fagId = a}) .-      mapping _Coerce---- | Subaccount ID of this floodlight activity group. This is a read-only--- field that can be left blank.-fagSubAccountId :: Lens' FloodlightActivityGroup (Maybe Int64)-fagSubAccountId-  = lens _fagSubAccountId-      (\ s a -> s{_fagSubAccountId = a})-      . mapping _Coerce---- | Type of the floodlight activity group. This is a required field that is--- read-only after insertion.-fagType :: Lens' FloodlightActivityGroup (Maybe FloodlightActivityGroupType)-fagType = lens _fagType (\ s a -> s{_fagType = a})---- | Dimension value for the ID of the floodlight configuration. This is a--- read-only, auto-generated field.-fagFloodlightConfigurationIdDimensionValue :: Lens' FloodlightActivityGroup (Maybe DimensionValue)-fagFloodlightConfigurationIdDimensionValue-  = lens _fagFloodlightConfigurationIdDimensionValue-      (\ s a ->-         s{_fagFloodlightConfigurationIdDimensionValue = a})--instance FromJSON FloodlightActivityGroup where-        parseJSON-          = withObject "FloodlightActivityGroup"-              (\ o ->-                 FloodlightActivityGroup <$>-                   (o .:? "tagString") <*>-                     (o .:? "floodlightConfigurationId")-                     <*>-                     (o .:? "kind" .!=-                        "dfareporting#floodlightActivityGroup")-                     <*> (o .:? "advertiserId")-                     <*> (o .:? "advertiserIdDimensionValue")-                     <*> (o .:? "idDimensionValue")-                     <*> (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "id")-                     <*> (o .:? "subaccountId")-                     <*> (o .:? "type")-                     <*>-                     (o .:? "floodlightConfigurationIdDimensionValue"))--instance ToJSON FloodlightActivityGroup where-        toJSON FloodlightActivityGroup{..}-          = object-              (catMaybes-                 [("tagString" .=) <$> _fagTagString,-                  ("floodlightConfigurationId" .=) <$>-                    _fagFloodlightConfigurationId,-                  Just ("kind" .= _fagKind),-                  ("advertiserId" .=) <$> _fagAdvertiserId,-                  ("advertiserIdDimensionValue" .=) <$>-                    _fagAdvertiserIdDimensionValue,-                  ("idDimensionValue" .=) <$> _fagIdDimensionValue,-                  ("accountId" .=) <$> _fagAccountId,-                  ("name" .=) <$> _fagName, ("id" .=) <$> _fagId,-                  ("subaccountId" .=) <$> _fagSubAccountId,-                  ("type" .=) <$> _fagType,-                  ("floodlightConfigurationIdDimensionValue" .=) <$>-                    _fagFloodlightConfigurationIdDimensionValue])---- | Represents fields that are compatible to be selected for a report of--- type \"CROSS_DIMENSION_REACH\".------ /See:/ 'crossDimensionReachReportCompatibleFields' smart constructor.-data CrossDimensionReachReportCompatibleFields = CrossDimensionReachReportCompatibleFields-    { _cdrrcfMetrics          :: !(Maybe [Metric])-    , _cdrrcfBreakdown        :: !(Maybe [Dimension])-    , _cdrrcfKind             :: !Text-    , _cdrrcfDimensionFilters :: !(Maybe [Dimension])-    , _cdrrcfOverlapMetrics   :: !(Maybe [Metric])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CrossDimensionReachReportCompatibleFields' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cdrrcfMetrics'------ * 'cdrrcfBreakdown'------ * 'cdrrcfKind'------ * 'cdrrcfDimensionFilters'------ * 'cdrrcfOverlapMetrics'-crossDimensionReachReportCompatibleFields-    :: CrossDimensionReachReportCompatibleFields-crossDimensionReachReportCompatibleFields =-    CrossDimensionReachReportCompatibleFields-    { _cdrrcfMetrics = Nothing-    , _cdrrcfBreakdown = Nothing-    , _cdrrcfKind = "dfareporting#crossDimensionReachReportCompatibleFields"-    , _cdrrcfDimensionFilters = Nothing-    , _cdrrcfOverlapMetrics = Nothing-    }---- | Metrics which are compatible to be selected in the \"metricNames\"--- section of the report.-cdrrcfMetrics :: Lens' CrossDimensionReachReportCompatibleFields [Metric]-cdrrcfMetrics-  = lens _cdrrcfMetrics-      (\ s a -> s{_cdrrcfMetrics = a})-      . _Default-      . _Coerce---- | Dimensions which are compatible to be selected in the \"breakdown\"--- section of the report.-cdrrcfBreakdown :: Lens' CrossDimensionReachReportCompatibleFields [Dimension]-cdrrcfBreakdown-  = lens _cdrrcfBreakdown-      (\ s a -> s{_cdrrcfBreakdown = a})-      . _Default-      . _Coerce---- | The kind of resource this is, in this case--- dfareporting#crossDimensionReachReportCompatibleFields.-cdrrcfKind :: Lens' CrossDimensionReachReportCompatibleFields Text-cdrrcfKind-  = lens _cdrrcfKind (\ s a -> s{_cdrrcfKind = a})---- | Dimensions which are compatible to be selected in the--- \"dimensionFilters\" section of the report.-cdrrcfDimensionFilters :: Lens' CrossDimensionReachReportCompatibleFields [Dimension]-cdrrcfDimensionFilters-  = lens _cdrrcfDimensionFilters-      (\ s a -> s{_cdrrcfDimensionFilters = a})-      . _Default-      . _Coerce---- | Metrics which are compatible to be selected in the--- \"overlapMetricNames\" section of the report.-cdrrcfOverlapMetrics :: Lens' CrossDimensionReachReportCompatibleFields [Metric]-cdrrcfOverlapMetrics-  = lens _cdrrcfOverlapMetrics-      (\ s a -> s{_cdrrcfOverlapMetrics = a})-      . _Default-      . _Coerce--instance FromJSON-         CrossDimensionReachReportCompatibleFields where-        parseJSON-          = withObject-              "CrossDimensionReachReportCompatibleFields"-              (\ o ->-                 CrossDimensionReachReportCompatibleFields <$>-                   (o .:? "metrics" .!= mempty) <*>-                     (o .:? "breakdown" .!= mempty)-                     <*>-                     (o .:? "kind" .!=-                        "dfareporting#crossDimensionReachReportCompatibleFields")-                     <*> (o .:? "dimensionFilters" .!= mempty)-                     <*> (o .:? "overlapMetrics" .!= mempty))--instance ToJSON-         CrossDimensionReachReportCompatibleFields where-        toJSON CrossDimensionReachReportCompatibleFields{..}-          = object-              (catMaybes-                 [("metrics" .=) <$> _cdrrcfMetrics,-                  ("breakdown" .=) <$> _cdrrcfBreakdown,-                  Just ("kind" .= _cdrrcfKind),-                  ("dimensionFilters" .=) <$> _cdrrcfDimensionFilters,-                  ("overlapMetrics" .=) <$> _cdrrcfOverlapMetrics])---- | FsCommand.------ /See:/ 'fsCommand' smart constructor.-data FsCommand = FsCommand-    { _fcPositionOption :: !(Maybe FsCommandPositionOption)-    , _fcLeft           :: !(Maybe (Textual Int32))-    , _fcWindowHeight   :: !(Maybe (Textual Int32))-    , _fcWindowWidth    :: !(Maybe (Textual Int32))-    , _fcTop            :: !(Maybe (Textual Int32))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'FsCommand' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'fcPositionOption'------ * 'fcLeft'------ * 'fcWindowHeight'------ * 'fcWindowWidth'------ * 'fcTop'-fsCommand-    :: FsCommand-fsCommand =-    FsCommand-    { _fcPositionOption = Nothing-    , _fcLeft = Nothing-    , _fcWindowHeight = Nothing-    , _fcWindowWidth = Nothing-    , _fcTop = Nothing-    }---- | Position in the browser where the window will open.-fcPositionOption :: Lens' FsCommand (Maybe FsCommandPositionOption)-fcPositionOption-  = lens _fcPositionOption-      (\ s a -> s{_fcPositionOption = a})---- | Distance from the left of the browser.Applicable when positionOption is--- DISTANCE_FROM_TOP_LEFT_CORNER.-fcLeft :: Lens' FsCommand (Maybe Int32)-fcLeft-  = lens _fcLeft (\ s a -> s{_fcLeft = a}) .-      mapping _Coerce---- | Height of the window.-fcWindowHeight :: Lens' FsCommand (Maybe Int32)-fcWindowHeight-  = lens _fcWindowHeight-      (\ s a -> s{_fcWindowHeight = a})-      . mapping _Coerce---- | Width of the window.-fcWindowWidth :: Lens' FsCommand (Maybe Int32)-fcWindowWidth-  = lens _fcWindowWidth-      (\ s a -> s{_fcWindowWidth = a})-      . mapping _Coerce---- | Distance from the top of the browser. Applicable when positionOption is--- DISTANCE_FROM_TOP_LEFT_CORNER.-fcTop :: Lens' FsCommand (Maybe Int32)-fcTop-  = lens _fcTop (\ s a -> s{_fcTop = a}) .-      mapping _Coerce--instance FromJSON FsCommand where-        parseJSON-          = withObject "FsCommand"-              (\ o ->-                 FsCommand <$>-                   (o .:? "positionOption") <*> (o .:? "left") <*>-                     (o .:? "windowHeight")-                     <*> (o .:? "windowWidth")-                     <*> (o .:? "top"))--instance ToJSON FsCommand where-        toJSON FsCommand{..}-          = object-              (catMaybes-                 [("positionOption" .=) <$> _fcPositionOption,-                  ("left" .=) <$> _fcLeft,-                  ("windowHeight" .=) <$> _fcWindowHeight,-                  ("windowWidth" .=) <$> _fcWindowWidth,-                  ("top" .=) <$> _fcTop])---- | Placement Assignment.------ /See:/ 'placementAssignment' smart constructor.-data PlacementAssignment = PlacementAssignment-    { _paPlacementId               :: !(Maybe (Textual Int64))-    , _paPlacementIdDimensionValue :: !(Maybe DimensionValue)-    , _paActive                    :: !(Maybe Bool)-    , _paSSLRequired               :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'PlacementAssignment' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'paPlacementId'------ * 'paPlacementIdDimensionValue'------ * 'paActive'------ * 'paSSLRequired'-placementAssignment-    :: PlacementAssignment-placementAssignment =-    PlacementAssignment-    { _paPlacementId = Nothing-    , _paPlacementIdDimensionValue = Nothing-    , _paActive = Nothing-    , _paSSLRequired = Nothing-    }---- | ID of the placement to be assigned. This is a required field.-paPlacementId :: Lens' PlacementAssignment (Maybe Int64)-paPlacementId-  = lens _paPlacementId-      (\ s a -> s{_paPlacementId = a})-      . mapping _Coerce---- | Dimension value for the ID of the placement. This is a read-only,--- auto-generated field.-paPlacementIdDimensionValue :: Lens' PlacementAssignment (Maybe DimensionValue)-paPlacementIdDimensionValue-  = lens _paPlacementIdDimensionValue-      (\ s a -> s{_paPlacementIdDimensionValue = a})---- | Whether this placement assignment is active. When true, the placement--- will be included in the ad\'s rotation.-paActive :: Lens' PlacementAssignment (Maybe Bool)-paActive = lens _paActive (\ s a -> s{_paActive = a})---- | Whether the placement to be assigned requires SSL. This is a read-only--- field that is auto-generated when the ad is inserted or updated.-paSSLRequired :: Lens' PlacementAssignment (Maybe Bool)-paSSLRequired-  = lens _paSSLRequired-      (\ s a -> s{_paSSLRequired = a})--instance FromJSON PlacementAssignment where-        parseJSON-          = withObject "PlacementAssignment"-              (\ o ->-                 PlacementAssignment <$>-                   (o .:? "placementId") <*>-                     (o .:? "placementIdDimensionValue")-                     <*> (o .:? "active")-                     <*> (o .:? "sslRequired"))--instance ToJSON PlacementAssignment where-        toJSON PlacementAssignment{..}-          = object-              (catMaybes-                 [("placementId" .=) <$> _paPlacementId,-                  ("placementIdDimensionValue" .=) <$>-                    _paPlacementIdDimensionValue,-                  ("active" .=) <$> _paActive,-                  ("sslRequired" .=) <$> _paSSLRequired])---- | Contains properties of a creative field value.------ /See:/ 'creativeFieldValue' smart constructor.-data CreativeFieldValue = CreativeFieldValue-    { _cfvKind  :: !Text-    , _cfvValue :: !(Maybe Text)-    , _cfvId    :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CreativeFieldValue' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cfvKind'------ * 'cfvValue'------ * 'cfvId'-creativeFieldValue-    :: CreativeFieldValue-creativeFieldValue =-    CreativeFieldValue-    { _cfvKind = "dfareporting#creativeFieldValue"-    , _cfvValue = Nothing-    , _cfvId = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#creativeFieldValue\".-cfvKind :: Lens' CreativeFieldValue Text-cfvKind = lens _cfvKind (\ s a -> s{_cfvKind = a})---- | Value of this creative field value. It needs to be less than 256--- characters in length and unique per creative field.-cfvValue :: Lens' CreativeFieldValue (Maybe Text)-cfvValue = lens _cfvValue (\ s a -> s{_cfvValue = a})---- | ID of this creative field value. This is a read-only, auto-generated--- field.-cfvId :: Lens' CreativeFieldValue (Maybe Int64)-cfvId-  = lens _cfvId (\ s a -> s{_cfvId = a}) .-      mapping _Coerce--instance FromJSON CreativeFieldValue where-        parseJSON-          = withObject "CreativeFieldValue"-              (\ o ->-                 CreativeFieldValue <$>-                   (o .:? "kind" .!= "dfareporting#creativeFieldValue")-                     <*> (o .:? "value")-                     <*> (o .:? "id"))--instance ToJSON CreativeFieldValue where-        toJSON CreativeFieldValue{..}-          = object-              (catMaybes-                 [Just ("kind" .= _cfvKind),-                  ("value" .=) <$> _cfvValue, ("id" .=) <$> _cfvId])---- | Represents a DimensionValuesRequest.------ /See:/ 'dimensionValueRequest' smart constructor.-data DimensionValueRequest = DimensionValueRequest-    { _dvrKind          :: !Text-    , _dvrEndDate       :: !(Maybe Date')-    , _dvrFilters       :: !(Maybe [DimensionFilter])-    , _dvrStartDate     :: !(Maybe Date')-    , _dvrDimensionName :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'DimensionValueRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dvrKind'------ * 'dvrEndDate'------ * 'dvrFilters'------ * 'dvrStartDate'------ * 'dvrDimensionName'-dimensionValueRequest-    :: DimensionValueRequest-dimensionValueRequest =-    DimensionValueRequest-    { _dvrKind = "dfareporting#dimensionValueRequest"-    , _dvrEndDate = Nothing-    , _dvrFilters = Nothing-    , _dvrStartDate = Nothing-    , _dvrDimensionName = Nothing-    }---- | The kind of request this is, in this case--- dfareporting#dimensionValueRequest.-dvrKind :: Lens' DimensionValueRequest Text-dvrKind = lens _dvrKind (\ s a -> s{_dvrKind = a})---- | The end date of the date range for which to retrieve dimension values. A--- string of the format \"yyyy-MM-dd\".-dvrEndDate :: Lens' DimensionValueRequest (Maybe Day)-dvrEndDate-  = lens _dvrEndDate (\ s a -> s{_dvrEndDate = a}) .-      mapping _Date---- | The list of filters by which to filter values. The filters are ANDed.-dvrFilters :: Lens' DimensionValueRequest [DimensionFilter]-dvrFilters-  = lens _dvrFilters (\ s a -> s{_dvrFilters = a}) .-      _Default-      . _Coerce---- | The start date of the date range for which to retrieve dimension values.--- A string of the format \"yyyy-MM-dd\".-dvrStartDate :: Lens' DimensionValueRequest (Maybe Day)-dvrStartDate-  = lens _dvrStartDate (\ s a -> s{_dvrStartDate = a})-      . mapping _Date---- | The name of the dimension for which values should be requested.-dvrDimensionName :: Lens' DimensionValueRequest (Maybe Text)-dvrDimensionName-  = lens _dvrDimensionName-      (\ s a -> s{_dvrDimensionName = a})--instance FromJSON DimensionValueRequest where-        parseJSON-          = withObject "DimensionValueRequest"-              (\ o ->-                 DimensionValueRequest <$>-                   (o .:? "kind" .!=-                      "dfareporting#dimensionValueRequest")-                     <*> (o .:? "endDate")-                     <*> (o .:? "filters" .!= mempty)-                     <*> (o .:? "startDate")-                     <*> (o .:? "dimensionName"))--instance ToJSON DimensionValueRequest where-        toJSON DimensionValueRequest{..}-          = object-              (catMaybes-                 [Just ("kind" .= _dvrKind),-                  ("endDate" .=) <$> _dvrEndDate,-                  ("filters" .=) <$> _dvrFilters,-                  ("startDate" .=) <$> _dvrStartDate,-                  ("dimensionName" .=) <$> _dvrDimensionName])---- | Floodlight Configuration List Response------ /See:/ 'floodlightConfigurationsListResponse' smart constructor.-data FloodlightConfigurationsListResponse = FloodlightConfigurationsListResponse-    { _fclrKind                     :: !Text-    , _fclrFloodlightConfigurations :: !(Maybe [FloodlightConfiguration])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'FloodlightConfigurationsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'fclrKind'------ * 'fclrFloodlightConfigurations'-floodlightConfigurationsListResponse-    :: FloodlightConfigurationsListResponse-floodlightConfigurationsListResponse =-    FloodlightConfigurationsListResponse-    { _fclrKind = "dfareporting#floodlightConfigurationsListResponse"-    , _fclrFloodlightConfigurations = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#floodlightConfigurationsListResponse\".-fclrKind :: Lens' FloodlightConfigurationsListResponse Text-fclrKind = lens _fclrKind (\ s a -> s{_fclrKind = a})---- | Floodlight configuration collection.-fclrFloodlightConfigurations :: Lens' FloodlightConfigurationsListResponse [FloodlightConfiguration]-fclrFloodlightConfigurations-  = lens _fclrFloodlightConfigurations-      (\ s a -> s{_fclrFloodlightConfigurations = a})-      . _Default-      . _Coerce--instance FromJSON-         FloodlightConfigurationsListResponse where-        parseJSON-          = withObject "FloodlightConfigurationsListResponse"-              (\ o ->-                 FloodlightConfigurationsListResponse <$>-                   (o .:? "kind" .!=-                      "dfareporting#floodlightConfigurationsListResponse")-                     <*> (o .:? "floodlightConfigurations" .!= mempty))--instance ToJSON FloodlightConfigurationsListResponse-         where-        toJSON FloodlightConfigurationsListResponse{..}-          = object-              (catMaybes-                 [Just ("kind" .= _fclrKind),-                  ("floodlightConfigurations" .=) <$>-                    _fclrFloodlightConfigurations])---- | Floodlight Activity List Response------ /See:/ 'floodlightActivitiesListResponse' smart constructor.-data FloodlightActivitiesListResponse = FloodlightActivitiesListResponse-    { _falrNextPageToken        :: !(Maybe Text)-    , _falrKind                 :: !Text-    , _falrFloodlightActivities :: !(Maybe [FloodlightActivity])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'FloodlightActivitiesListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'falrNextPageToken'------ * 'falrKind'------ * 'falrFloodlightActivities'-floodlightActivitiesListResponse-    :: FloodlightActivitiesListResponse-floodlightActivitiesListResponse =-    FloodlightActivitiesListResponse-    { _falrNextPageToken = Nothing-    , _falrKind = "dfareporting#floodlightActivitiesListResponse"-    , _falrFloodlightActivities = Nothing-    }---- | Pagination token to be used for the next list operation.-falrNextPageToken :: Lens' FloodlightActivitiesListResponse (Maybe Text)-falrNextPageToken-  = lens _falrNextPageToken-      (\ s a -> s{_falrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#floodlightActivitiesListResponse\".-falrKind :: Lens' FloodlightActivitiesListResponse Text-falrKind = lens _falrKind (\ s a -> s{_falrKind = a})---- | Floodlight activity collection.-falrFloodlightActivities :: Lens' FloodlightActivitiesListResponse [FloodlightActivity]-falrFloodlightActivities-  = lens _falrFloodlightActivities-      (\ s a -> s{_falrFloodlightActivities = a})-      . _Default-      . _Coerce--instance FromJSON FloodlightActivitiesListResponse-         where-        parseJSON-          = withObject "FloodlightActivitiesListResponse"-              (\ o ->-                 FloodlightActivitiesListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!=-                        "dfareporting#floodlightActivitiesListResponse")-                     <*> (o .:? "floodlightActivities" .!= mempty))--instance ToJSON FloodlightActivitiesListResponse-         where-        toJSON FloodlightActivitiesListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _falrNextPageToken,-                  Just ("kind" .= _falrKind),-                  ("floodlightActivities" .=) <$>-                    _falrFloodlightActivities])---- | Creative Field Assignment.------ /See:/ 'creativeFieldAssignment' smart constructor.-data CreativeFieldAssignment = CreativeFieldAssignment-    { _cfaCreativeFieldId      :: !(Maybe (Textual Int64))-    , _cfaCreativeFieldValueId :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CreativeFieldAssignment' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cfaCreativeFieldId'------ * 'cfaCreativeFieldValueId'-creativeFieldAssignment-    :: CreativeFieldAssignment-creativeFieldAssignment =-    CreativeFieldAssignment-    { _cfaCreativeFieldId = Nothing-    , _cfaCreativeFieldValueId = Nothing-    }---- | ID of the creative field.-cfaCreativeFieldId :: Lens' CreativeFieldAssignment (Maybe Int64)-cfaCreativeFieldId-  = lens _cfaCreativeFieldId-      (\ s a -> s{_cfaCreativeFieldId = a})-      . mapping _Coerce---- | ID of the creative field value.-cfaCreativeFieldValueId :: Lens' CreativeFieldAssignment (Maybe Int64)-cfaCreativeFieldValueId-  = lens _cfaCreativeFieldValueId-      (\ s a -> s{_cfaCreativeFieldValueId = a})-      . mapping _Coerce--instance FromJSON CreativeFieldAssignment where-        parseJSON-          = withObject "CreativeFieldAssignment"-              (\ o ->-                 CreativeFieldAssignment <$>-                   (o .:? "creativeFieldId") <*>-                     (o .:? "creativeFieldValueId"))--instance ToJSON CreativeFieldAssignment where-        toJSON CreativeFieldAssignment{..}-          = object-              (catMaybes-                 [("creativeFieldId" .=) <$> _cfaCreativeFieldId,-                  ("creativeFieldValueId" .=) <$>-                    _cfaCreativeFieldValueId])---- | Groups advertisers together so that reports can be generated for the--- entire group at once.------ /See:/ 'advertiserGroup' smart constructor.-data AdvertiserGroup = AdvertiserGroup-    { _agKind      :: !Text-    , _agAccountId :: !(Maybe (Textual Int64))-    , _agName      :: !(Maybe Text)-    , _agId        :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'AdvertiserGroup' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'agKind'------ * 'agAccountId'------ * 'agName'------ * 'agId'-advertiserGroup-    :: AdvertiserGroup-advertiserGroup =-    AdvertiserGroup-    { _agKind = "dfareporting#advertiserGroup"-    , _agAccountId = Nothing-    , _agName = Nothing-    , _agId = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#advertiserGroup\".-agKind :: Lens' AdvertiserGroup Text-agKind = lens _agKind (\ s a -> s{_agKind = a})---- | Account ID of this advertiser group. This is a read-only field that can--- be left blank.-agAccountId :: Lens' AdvertiserGroup (Maybe Int64)-agAccountId-  = lens _agAccountId (\ s a -> s{_agAccountId = a}) .-      mapping _Coerce---- | Name of this advertiser group. This is a required field and must be less--- than 256 characters long and unique among advertiser groups of the same--- account.-agName :: Lens' AdvertiserGroup (Maybe Text)-agName = lens _agName (\ s a -> s{_agName = a})---- | ID of this advertiser group. This is a read-only, auto-generated field.-agId :: Lens' AdvertiserGroup (Maybe Int64)-agId-  = lens _agId (\ s a -> s{_agId = a}) .-      mapping _Coerce--instance FromJSON AdvertiserGroup where-        parseJSON-          = withObject "AdvertiserGroup"-              (\ o ->-                 AdvertiserGroup <$>-                   (o .:? "kind" .!= "dfareporting#advertiserGroup") <*>-                     (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "id"))--instance ToJSON AdvertiserGroup where-        toJSON AdvertiserGroup{..}-          = object-              (catMaybes-                 [Just ("kind" .= _agKind),-                  ("accountId" .=) <$> _agAccountId,-                  ("name" .=) <$> _agName, ("id" .=) <$> _agId])---- | Placement Tag Data------ /See:/ 'tagData' smart constructor.-data TagData = TagData-    { _tdClickTag      :: !(Maybe Text)-    , _tdFormat        :: !(Maybe TagDataFormat)-    , _tdCreativeId    :: !(Maybe (Textual Int64))-    , _tdAdId          :: !(Maybe (Textual Int64))-    , _tdImpressionTag :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'TagData' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tdClickTag'------ * 'tdFormat'------ * 'tdCreativeId'------ * 'tdAdId'------ * 'tdImpressionTag'-tagData-    :: TagData-tagData =-    TagData-    { _tdClickTag = Nothing-    , _tdFormat = Nothing-    , _tdCreativeId = Nothing-    , _tdAdId = Nothing-    , _tdImpressionTag = Nothing-    }---- | Tag string to record a click.-tdClickTag :: Lens' TagData (Maybe Text)-tdClickTag-  = lens _tdClickTag (\ s a -> s{_tdClickTag = a})---- | TagData tag format of this tag.-tdFormat :: Lens' TagData (Maybe TagDataFormat)-tdFormat = lens _tdFormat (\ s a -> s{_tdFormat = a})---- | Creative associated with this placement tag.-tdCreativeId :: Lens' TagData (Maybe Int64)-tdCreativeId-  = lens _tdCreativeId (\ s a -> s{_tdCreativeId = a})-      . mapping _Coerce---- | Ad associated with this placement tag.-tdAdId :: Lens' TagData (Maybe Int64)-tdAdId-  = lens _tdAdId (\ s a -> s{_tdAdId = a}) .-      mapping _Coerce---- | Tag string for serving an ad.-tdImpressionTag :: Lens' TagData (Maybe Text)-tdImpressionTag-  = lens _tdImpressionTag-      (\ s a -> s{_tdImpressionTag = a})--instance FromJSON TagData where-        parseJSON-          = withObject "TagData"-              (\ o ->-                 TagData <$>-                   (o .:? "clickTag") <*> (o .:? "format") <*>-                     (o .:? "creativeId")-                     <*> (o .:? "adId")-                     <*> (o .:? "impressionTag"))--instance ToJSON TagData where-        toJSON TagData{..}-          = object-              (catMaybes-                 [("clickTag" .=) <$> _tdClickTag,-                  ("format" .=) <$> _tdFormat,-                  ("creativeId" .=) <$> _tdCreativeId,-                  ("adId" .=) <$> _tdAdId,-                  ("impressionTag" .=) <$> _tdImpressionTag])---- | Day Part Targeting.------ /See:/ 'dayPartTargeting' smart constructor.-data DayPartTargeting = DayPartTargeting-    { _dptDaysOfWeek    :: !(Maybe [DayPartTargetingDaysOfWeekItem])-    , _dptHoursOfDay    :: !(Maybe [Textual Int32])-    , _dptUserLocalTime :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'DayPartTargeting' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dptDaysOfWeek'------ * 'dptHoursOfDay'------ * 'dptUserLocalTime'-dayPartTargeting-    :: DayPartTargeting-dayPartTargeting =-    DayPartTargeting-    { _dptDaysOfWeek = Nothing-    , _dptHoursOfDay = Nothing-    , _dptUserLocalTime = Nothing-    }---- | Days of the week when the ad will serve. Acceptable values are: ---- \"SUNDAY\" - \"MONDAY\" - \"TUESDAY\" - \"WEDNESDAY\" - \"THURSDAY\" ---- \"FRIDAY\" - \"SATURDAY\"-dptDaysOfWeek :: Lens' DayPartTargeting [DayPartTargetingDaysOfWeekItem]-dptDaysOfWeek-  = lens _dptDaysOfWeek-      (\ s a -> s{_dptDaysOfWeek = a})-      . _Default-      . _Coerce---- | Hours of the day when the ad will serve. Must be an integer between 0--- and 23 (inclusive), where 0 is midnight to 1 AM, and 23 is 11 PM to--- midnight. Can be specified with days of week, in which case the ad would--- serve during these hours on the specified days. For example, if Monday,--- Wednesday, Friday are the days of week specified and 9-10am, 3-5pm--- (hours 9, 15, and 16) is specified, the ad would serve Monday,--- Wednesdays, and Fridays at 9-10am and 3-5pm.-dptHoursOfDay :: Lens' DayPartTargeting [Int32]-dptHoursOfDay-  = lens _dptHoursOfDay-      (\ s a -> s{_dptHoursOfDay = a})-      . _Default-      . _Coerce---- | Whether or not to use the user\'s local time. If false, the America\/New--- York time zone applies.-dptUserLocalTime :: Lens' DayPartTargeting (Maybe Bool)-dptUserLocalTime-  = lens _dptUserLocalTime-      (\ s a -> s{_dptUserLocalTime = a})--instance FromJSON DayPartTargeting where-        parseJSON-          = withObject "DayPartTargeting"-              (\ o ->-                 DayPartTargeting <$>-                   (o .:? "daysOfWeek" .!= mempty) <*>-                     (o .:? "hoursOfDay" .!= mempty)-                     <*> (o .:? "userLocalTime"))--instance ToJSON DayPartTargeting where-        toJSON DayPartTargeting{..}-          = object-              (catMaybes-                 [("daysOfWeek" .=) <$> _dptDaysOfWeek,-                  ("hoursOfDay" .=) <$> _dptHoursOfDay,-                  ("userLocalTime" .=) <$> _dptUserLocalTime])---- | Creative optimization settings.------ /See:/ 'creativeOptimizationConfiguration' smart constructor.-data CreativeOptimizationConfiguration = CreativeOptimizationConfiguration-    { _cocOptimizationModel     :: !(Maybe CreativeOptimizationConfigurationOptimizationModel)-    , _cocName                  :: !(Maybe Text)-    , _cocOptimizationActivitys :: !(Maybe [OptimizationActivity])-    , _cocId                    :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CreativeOptimizationConfiguration' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cocOptimizationModel'------ * 'cocName'------ * 'cocOptimizationActivitys'------ * 'cocId'-creativeOptimizationConfiguration-    :: CreativeOptimizationConfiguration-creativeOptimizationConfiguration =-    CreativeOptimizationConfiguration-    { _cocOptimizationModel = Nothing-    , _cocName = Nothing-    , _cocOptimizationActivitys = Nothing-    , _cocId = Nothing-    }---- | Optimization model for this configuration.-cocOptimizationModel :: Lens' CreativeOptimizationConfiguration (Maybe CreativeOptimizationConfigurationOptimizationModel)-cocOptimizationModel-  = lens _cocOptimizationModel-      (\ s a -> s{_cocOptimizationModel = a})---- | Name of this creative optimization config. This is a required field and--- must be less than 129 characters long.-cocName :: Lens' CreativeOptimizationConfiguration (Maybe Text)-cocName = lens _cocName (\ s a -> s{_cocName = a})---- | List of optimization activities associated with this configuration.-cocOptimizationActivitys :: Lens' CreativeOptimizationConfiguration [OptimizationActivity]-cocOptimizationActivitys-  = lens _cocOptimizationActivitys-      (\ s a -> s{_cocOptimizationActivitys = a})-      . _Default-      . _Coerce---- | ID of this creative optimization config. This field is auto-generated--- when the campaign is inserted or updated. It can be null for existing--- campaigns.-cocId :: Lens' CreativeOptimizationConfiguration (Maybe Int64)-cocId-  = lens _cocId (\ s a -> s{_cocId = a}) .-      mapping _Coerce--instance FromJSON CreativeOptimizationConfiguration-         where-        parseJSON-          = withObject "CreativeOptimizationConfiguration"-              (\ o ->-                 CreativeOptimizationConfiguration <$>-                   (o .:? "optimizationModel") <*> (o .:? "name") <*>-                     (o .:? "optimizationActivitys" .!= mempty)-                     <*> (o .:? "id"))--instance ToJSON CreativeOptimizationConfiguration-         where-        toJSON CreativeOptimizationConfiguration{..}-          = object-              (catMaybes-                 [("optimizationModel" .=) <$> _cocOptimizationModel,-                  ("name" .=) <$> _cocName,-                  ("optimizationActivitys" .=) <$>-                    _cocOptimizationActivitys,-                  ("id" .=) <$> _cocId])---- | The report criteria for a report of type \"STANDARD\".------ /See:/ 'reportCriteria' smart constructor.-data ReportCriteria = ReportCriteria-    { _rcMetricNames           :: !(Maybe [Text])-    , _rcCustomRichMediaEvents :: !(Maybe CustomRichMediaEvents)-    , _rcDimensionFilters      :: !(Maybe [DimensionValue])-    , _rcActivities            :: !(Maybe Activities)-    , _rcDateRange             :: !(Maybe DateRange)-    , _rcDimensions            :: !(Maybe [SortedDimension])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ReportCriteria' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rcMetricNames'------ * 'rcCustomRichMediaEvents'------ * 'rcDimensionFilters'------ * 'rcActivities'------ * 'rcDateRange'------ * 'rcDimensions'-reportCriteria-    :: ReportCriteria-reportCriteria =-    ReportCriteria-    { _rcMetricNames = Nothing-    , _rcCustomRichMediaEvents = Nothing-    , _rcDimensionFilters = Nothing-    , _rcActivities = Nothing-    , _rcDateRange = Nothing-    , _rcDimensions = Nothing-    }---- | The list of names of metrics the report should include.-rcMetricNames :: Lens' ReportCriteria [Text]-rcMetricNames-  = lens _rcMetricNames-      (\ s a -> s{_rcMetricNames = a})-      . _Default-      . _Coerce---- | Custom Rich Media Events group.-rcCustomRichMediaEvents :: Lens' ReportCriteria (Maybe CustomRichMediaEvents)-rcCustomRichMediaEvents-  = lens _rcCustomRichMediaEvents-      (\ s a -> s{_rcCustomRichMediaEvents = a})---- | The list of filters on which dimensions are filtered. Filters for--- different dimensions are ANDed, filters for the same dimension are--- grouped together and ORed.-rcDimensionFilters :: Lens' ReportCriteria [DimensionValue]-rcDimensionFilters-  = lens _rcDimensionFilters-      (\ s a -> s{_rcDimensionFilters = a})-      . _Default-      . _Coerce---- | Activity group.-rcActivities :: Lens' ReportCriteria (Maybe Activities)-rcActivities-  = lens _rcActivities (\ s a -> s{_rcActivities = a})---- | The date range for which this report should be run.-rcDateRange :: Lens' ReportCriteria (Maybe DateRange)-rcDateRange-  = lens _rcDateRange (\ s a -> s{_rcDateRange = a})---- | The list of standard dimensions the report should include.-rcDimensions :: Lens' ReportCriteria [SortedDimension]-rcDimensions-  = lens _rcDimensions (\ s a -> s{_rcDimensions = a})-      . _Default-      . _Coerce--instance FromJSON ReportCriteria where-        parseJSON-          = withObject "ReportCriteria"-              (\ o ->-                 ReportCriteria <$>-                   (o .:? "metricNames" .!= mempty) <*>-                     (o .:? "customRichMediaEvents")-                     <*> (o .:? "dimensionFilters" .!= mempty)-                     <*> (o .:? "activities")-                     <*> (o .:? "dateRange")-                     <*> (o .:? "dimensions" .!= mempty))--instance ToJSON ReportCriteria where-        toJSON ReportCriteria{..}-          = object-              (catMaybes-                 [("metricNames" .=) <$> _rcMetricNames,-                  ("customRichMediaEvents" .=) <$>-                    _rcCustomRichMediaEvents,-                  ("dimensionFilters" .=) <$> _rcDimensionFilters,-                  ("activities" .=) <$> _rcActivities,-                  ("dateRange" .=) <$> _rcDateRange,-                  ("dimensions" .=) <$> _rcDimensions])---- | Placement Strategy List Response------ /See:/ 'placementStrategiesListResponse' smart constructor.-data PlacementStrategiesListResponse = PlacementStrategiesListResponse-    { _pslrPlacementStrategies :: !(Maybe [PlacementStrategy])-    , _pslrNextPageToken       :: !(Maybe Text)-    , _pslrKind                :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'PlacementStrategiesListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pslrPlacementStrategies'------ * 'pslrNextPageToken'------ * 'pslrKind'-placementStrategiesListResponse-    :: PlacementStrategiesListResponse-placementStrategiesListResponse =-    PlacementStrategiesListResponse-    { _pslrPlacementStrategies = Nothing-    , _pslrNextPageToken = Nothing-    , _pslrKind = "dfareporting#placementStrategiesListResponse"-    }---- | Placement strategy collection.-pslrPlacementStrategies :: Lens' PlacementStrategiesListResponse [PlacementStrategy]-pslrPlacementStrategies-  = lens _pslrPlacementStrategies-      (\ s a -> s{_pslrPlacementStrategies = a})-      . _Default-      . _Coerce---- | Pagination token to be used for the next list operation.-pslrNextPageToken :: Lens' PlacementStrategiesListResponse (Maybe Text)-pslrNextPageToken-  = lens _pslrNextPageToken-      (\ s a -> s{_pslrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#placementStrategiesListResponse\".-pslrKind :: Lens' PlacementStrategiesListResponse Text-pslrKind = lens _pslrKind (\ s a -> s{_pslrKind = a})--instance FromJSON PlacementStrategiesListResponse-         where-        parseJSON-          = withObject "PlacementStrategiesListResponse"-              (\ o ->-                 PlacementStrategiesListResponse <$>-                   (o .:? "placementStrategies" .!= mempty) <*>-                     (o .:? "nextPageToken")-                     <*>-                     (o .:? "kind" .!=-                        "dfareporting#placementStrategiesListResponse"))--instance ToJSON PlacementStrategiesListResponse where-        toJSON PlacementStrategiesListResponse{..}-          = object-              (catMaybes-                 [("placementStrategies" .=) <$>-                    _pslrPlacementStrategies,-                  ("nextPageToken" .=) <$> _pslrNextPageToken,-                  Just ("kind" .= _pslrKind)])---- | Contains properties of a DCM subaccount.------ /See:/ 'subAccount' smart constructor.-data SubAccount = SubAccount-    { _saKind                   :: !Text-    , _saAvailablePermissionIds :: !(Maybe [Textual Int64])-    , _saAccountId              :: !(Maybe (Textual Int64))-    , _saName                   :: !(Maybe Text)-    , _saId                     :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'SubAccount' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'saKind'------ * 'saAvailablePermissionIds'------ * 'saAccountId'------ * 'saName'------ * 'saId'-subAccount-    :: SubAccount-subAccount =-    SubAccount-    { _saKind = "dfareporting#subaccount"-    , _saAvailablePermissionIds = Nothing-    , _saAccountId = Nothing-    , _saName = Nothing-    , _saId = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#subaccount\".-saKind :: Lens' SubAccount Text-saKind = lens _saKind (\ s a -> s{_saKind = a})---- | IDs of the available user role permissions for this subaccount.-saAvailablePermissionIds :: Lens' SubAccount [Int64]-saAvailablePermissionIds-  = lens _saAvailablePermissionIds-      (\ s a -> s{_saAvailablePermissionIds = a})-      . _Default-      . _Coerce---- | ID of the account that contains this subaccount. This is a read-only--- field that can be left blank.-saAccountId :: Lens' SubAccount (Maybe Int64)-saAccountId-  = lens _saAccountId (\ s a -> s{_saAccountId = a}) .-      mapping _Coerce---- | Name of this subaccount. This is a required field. Must be less than 128--- characters long and be unique among subaccounts of the same account.-saName :: Lens' SubAccount (Maybe Text)-saName = lens _saName (\ s a -> s{_saName = a})---- | ID of this subaccount. This is a read-only, auto-generated field.-saId :: Lens' SubAccount (Maybe Int64)-saId-  = lens _saId (\ s a -> s{_saId = a}) .-      mapping _Coerce--instance FromJSON SubAccount where-        parseJSON-          = withObject "SubAccount"-              (\ o ->-                 SubAccount <$>-                   (o .:? "kind" .!= "dfareporting#subaccount") <*>-                     (o .:? "availablePermissionIds" .!= mempty)-                     <*> (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "id"))--instance ToJSON SubAccount where-        toJSON SubAccount{..}-          = object-              (catMaybes-                 [Just ("kind" .= _saKind),-                  ("availablePermissionIds" .=) <$>-                    _saAvailablePermissionIds,-                  ("accountId" .=) <$> _saAccountId,-                  ("name" .=) <$> _saName, ("id" .=) <$> _saId])---- | Inventory item List Response------ /See:/ 'inventoryItemsListResponse' smart constructor.-data InventoryItemsListResponse = InventoryItemsListResponse-    { _iilrInventoryItems :: !(Maybe [InventoryItem])-    , _iilrNextPageToken  :: !(Maybe Text)-    , _iilrKind           :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'InventoryItemsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'iilrInventoryItems'------ * 'iilrNextPageToken'------ * 'iilrKind'-inventoryItemsListResponse-    :: InventoryItemsListResponse-inventoryItemsListResponse =-    InventoryItemsListResponse-    { _iilrInventoryItems = Nothing-    , _iilrNextPageToken = Nothing-    , _iilrKind = "dfareporting#inventoryItemsListResponse"-    }---- | Inventory item collection-iilrInventoryItems :: Lens' InventoryItemsListResponse [InventoryItem]-iilrInventoryItems-  = lens _iilrInventoryItems-      (\ s a -> s{_iilrInventoryItems = a})-      . _Default-      . _Coerce---- | Pagination token to be used for the next list operation.-iilrNextPageToken :: Lens' InventoryItemsListResponse (Maybe Text)-iilrNextPageToken-  = lens _iilrNextPageToken-      (\ s a -> s{_iilrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#inventoryItemsListResponse\".-iilrKind :: Lens' InventoryItemsListResponse Text-iilrKind = lens _iilrKind (\ s a -> s{_iilrKind = a})--instance FromJSON InventoryItemsListResponse where-        parseJSON-          = withObject "InventoryItemsListResponse"-              (\ o ->-                 InventoryItemsListResponse <$>-                   (o .:? "inventoryItems" .!= mempty) <*>-                     (o .:? "nextPageToken")-                     <*>-                     (o .:? "kind" .!=-                        "dfareporting#inventoryItemsListResponse"))--instance ToJSON InventoryItemsListResponse where-        toJSON InventoryItemsListResponse{..}-          = object-              (catMaybes-                 [("inventoryItems" .=) <$> _iilrInventoryItems,-                  ("nextPageToken" .=) <$> _iilrNextPageToken,-                  Just ("kind" .= _iilrKind)])---- | Contains properties of a DCM ad.------ /See:/ 'ad' smart constructor.-data Ad = Ad-    { _aCreativeGroupAssignments              :: !(Maybe [CreativeGroupAssignment])-    , _aGeoTargeting                          :: !(Maybe GeoTargeting)-    , _aCreativeRotation                      :: !(Maybe CreativeRotation)-    , _aTechnologyTargeting                   :: !(Maybe TechnologyTargeting)-    , _aAudienceSegmentId                     :: !(Maybe (Textual Int64))-    , _aDayPartTargeting                      :: !(Maybe DayPartTargeting)-    , _aSize                                  :: !(Maybe Size)-    , _aStartTime                             :: !(Maybe DateTime')-    , _aKind                                  :: !Text-    , _aClickThroughURLSuffixProperties       :: !(Maybe ClickThroughURLSuffixProperties)-    , _aCampaignIdDimensionValue              :: !(Maybe DimensionValue)-    , _aAdvertiserId                          :: !(Maybe (Textual Int64))-    , _aAdvertiserIdDimensionValue            :: !(Maybe DimensionValue)-    , _aSSLCompliant                          :: !(Maybe Bool)-    , _aCampaignId                            :: !(Maybe (Textual Int64))-    , _aIdDimensionValue                      :: !(Maybe DimensionValue)-    , _aClickThroughURL                       :: !(Maybe ClickThroughURL)-    , _aDeliverySchedule                      :: !(Maybe DeliverySchedule)-    , _aEventTagOverrides                     :: !(Maybe [EventTagOverride])-    , _aActive                                :: !(Maybe Bool)-    , _aAccountId                             :: !(Maybe (Textual Int64))-    , _aName                                  :: !(Maybe Text)-    , _aKeyValueTargetingExpression           :: !(Maybe KeyValueTargetingExpression)-    , _aEndTime                               :: !(Maybe DateTime')-    , _aCreateInfo                            :: !(Maybe LastModifiedInfo)-    , _aLastModifiedInfo                      :: !(Maybe LastModifiedInfo)-    , _aId                                    :: !(Maybe (Textual Int64))-    , _aSSLRequired                           :: !(Maybe Bool)-    , _aComments                              :: !(Maybe Text)-    , _aSubAccountId                          :: !(Maybe (Textual Int64))-    , _aType                                  :: !(Maybe AdType)-    , _aRemarketingListExpression             :: !(Maybe ListTargetingExpression)-    , _aDynamicClickTracker                   :: !(Maybe Bool)-    , _aCompatibility                         :: !(Maybe AdCompatibility)-    , _aArchived                              :: !(Maybe Bool)-    , _aDefaultClickThroughEventTagProperties :: !(Maybe DefaultClickThroughEventTagProperties)-    , _aPlacementAssignments                  :: !(Maybe [PlacementAssignment])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'Ad' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aCreativeGroupAssignments'------ * 'aGeoTargeting'------ * 'aCreativeRotation'------ * 'aTechnologyTargeting'------ * 'aAudienceSegmentId'------ * 'aDayPartTargeting'------ * 'aSize'------ * 'aStartTime'------ * 'aKind'------ * 'aClickThroughURLSuffixProperties'------ * 'aCampaignIdDimensionValue'------ * 'aAdvertiserId'------ * 'aAdvertiserIdDimensionValue'------ * 'aSSLCompliant'------ * 'aCampaignId'------ * 'aIdDimensionValue'------ * 'aClickThroughURL'------ * 'aDeliverySchedule'------ * 'aEventTagOverrides'------ * 'aActive'------ * 'aAccountId'------ * 'aName'------ * 'aKeyValueTargetingExpression'------ * 'aEndTime'------ * 'aCreateInfo'------ * 'aLastModifiedInfo'------ * 'aId'------ * 'aSSLRequired'------ * 'aComments'------ * 'aSubAccountId'------ * 'aType'------ * 'aRemarketingListExpression'------ * 'aDynamicClickTracker'------ * 'aCompatibility'------ * 'aArchived'------ * 'aDefaultClickThroughEventTagProperties'------ * 'aPlacementAssignments'-ad-    :: Ad-ad =-    Ad-    { _aCreativeGroupAssignments = Nothing-    , _aGeoTargeting = Nothing-    , _aCreativeRotation = Nothing-    , _aTechnologyTargeting = Nothing-    , _aAudienceSegmentId = Nothing-    , _aDayPartTargeting = Nothing-    , _aSize = Nothing-    , _aStartTime = Nothing-    , _aKind = "dfareporting#ad"-    , _aClickThroughURLSuffixProperties = Nothing-    , _aCampaignIdDimensionValue = Nothing-    , _aAdvertiserId = Nothing-    , _aAdvertiserIdDimensionValue = Nothing-    , _aSSLCompliant = Nothing-    , _aCampaignId = Nothing-    , _aIdDimensionValue = Nothing-    , _aClickThroughURL = Nothing-    , _aDeliverySchedule = Nothing-    , _aEventTagOverrides = Nothing-    , _aActive = Nothing-    , _aAccountId = Nothing-    , _aName = Nothing-    , _aKeyValueTargetingExpression = Nothing-    , _aEndTime = Nothing-    , _aCreateInfo = Nothing-    , _aLastModifiedInfo = Nothing-    , _aId = Nothing-    , _aSSLRequired = Nothing-    , _aComments = Nothing-    , _aSubAccountId = Nothing-    , _aType = Nothing-    , _aRemarketingListExpression = Nothing-    , _aDynamicClickTracker = Nothing-    , _aCompatibility = Nothing-    , _aArchived = Nothing-    , _aDefaultClickThroughEventTagProperties = Nothing-    , _aPlacementAssignments = Nothing-    }---- | Creative group assignments for this ad. Applicable when type is--- AD_SERVING_CLICK_TRACKER. Only one assignment per creative group number--- is allowed for a maximum of two assignments.-aCreativeGroupAssignments :: Lens' Ad [CreativeGroupAssignment]-aCreativeGroupAssignments-  = lens _aCreativeGroupAssignments-      (\ s a -> s{_aCreativeGroupAssignments = a})-      . _Default-      . _Coerce---- | Geographical targeting information for this ad.Applicable when type is--- AD_SERVING_STANDARD_AD.-aGeoTargeting :: Lens' Ad (Maybe GeoTargeting)-aGeoTargeting-  = lens _aGeoTargeting-      (\ s a -> s{_aGeoTargeting = a})---- | Creative rotation for this ad. Applicable when type is--- AD_SERVING_DEFAULT_AD, AD_SERVING_STANDARD_AD, or AD_SERVING_TRACKING.--- When type is AD_SERVING_DEFAULT_AD, this field should have exactly one--- creativeAssignment.-aCreativeRotation :: Lens' Ad (Maybe CreativeRotation)-aCreativeRotation-  = lens _aCreativeRotation-      (\ s a -> s{_aCreativeRotation = a})---- | Technology platform targeting information for this ad. Applicable when--- type is AD_SERVING_STANDARD_AD.-aTechnologyTargeting :: Lens' Ad (Maybe TechnologyTargeting)-aTechnologyTargeting-  = lens _aTechnologyTargeting-      (\ s a -> s{_aTechnologyTargeting = a})---- | Audience segment ID that is being targeted for this ad. Applicable when--- type is AD_SERVING_STANDARD_AD.-aAudienceSegmentId :: Lens' Ad (Maybe Int64)-aAudienceSegmentId-  = lens _aAudienceSegmentId-      (\ s a -> s{_aAudienceSegmentId = a})-      . mapping _Coerce---- | Time and day targeting information for this ad. Applicable when type is--- AD_SERVING_STANDARD_AD.-aDayPartTargeting :: Lens' Ad (Maybe DayPartTargeting)-aDayPartTargeting-  = lens _aDayPartTargeting-      (\ s a -> s{_aDayPartTargeting = a})---- | Size of this ad. Applicable when type is AD_SERVING_DEFAULT_AD.-aSize :: Lens' Ad (Maybe Size)-aSize = lens _aSize (\ s a -> s{_aSize = a})---- | Date and time that this ad should start serving. If creating an ad, this--- field must be a time in the future. This is a required field on--- insertion.-aStartTime :: Lens' Ad (Maybe UTCTime)-aStartTime-  = lens _aStartTime (\ s a -> s{_aStartTime = a}) .-      mapping _DateTime---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#ad\".-aKind :: Lens' Ad Text-aKind = lens _aKind (\ s a -> s{_aKind = a})---- | Click-through URL suffix properties for this ad. Applies to the URL in--- the ad or (if overriding ad properties) the URL in the creative.-aClickThroughURLSuffixProperties :: Lens' Ad (Maybe ClickThroughURLSuffixProperties)-aClickThroughURLSuffixProperties-  = lens _aClickThroughURLSuffixProperties-      (\ s a -> s{_aClickThroughURLSuffixProperties = a})---- | Dimension value for the ID of the campaign. This is a read-only,--- auto-generated field.-aCampaignIdDimensionValue :: Lens' Ad (Maybe DimensionValue)-aCampaignIdDimensionValue-  = lens _aCampaignIdDimensionValue-      (\ s a -> s{_aCampaignIdDimensionValue = a})---- | Advertiser ID of this ad. This is a required field on insertion.-aAdvertiserId :: Lens' Ad (Maybe Int64)-aAdvertiserId-  = lens _aAdvertiserId-      (\ s a -> s{_aAdvertiserId = a})-      . mapping _Coerce---- | Dimension value for the ID of the advertiser. This is a read-only,--- auto-generated field.-aAdvertiserIdDimensionValue :: Lens' Ad (Maybe DimensionValue)-aAdvertiserIdDimensionValue-  = lens _aAdvertiserIdDimensionValue-      (\ s a -> s{_aAdvertiserIdDimensionValue = a})---- | Whether this ad is ssl compliant. This is a read-only field that is--- auto-generated when the ad is inserted or updated.-aSSLCompliant :: Lens' Ad (Maybe Bool)-aSSLCompliant-  = lens _aSSLCompliant-      (\ s a -> s{_aSSLCompliant = a})---- | Campaign ID of this ad. This is a required field on insertion.-aCampaignId :: Lens' Ad (Maybe Int64)-aCampaignId-  = lens _aCampaignId (\ s a -> s{_aCampaignId = a}) .-      mapping _Coerce---- | Dimension value for the ID of this ad. This is a read-only,--- auto-generated field.-aIdDimensionValue :: Lens' Ad (Maybe DimensionValue)-aIdDimensionValue-  = lens _aIdDimensionValue-      (\ s a -> s{_aIdDimensionValue = a})---- | Click-through URL for this ad. This is a required field on insertion.--- Applicable when type is AD_SERVING_CLICK_TRACKER.-aClickThroughURL :: Lens' Ad (Maybe ClickThroughURL)-aClickThroughURL-  = lens _aClickThroughURL-      (\ s a -> s{_aClickThroughURL = a})---- | Delivery schedule information for this ad. Applicable when type is--- AD_SERVING_STANDARD_AD or AD_SERVING_TRACKING. This field along with--- subfields priority and impressionRatio are required on insertion when--- type is AD_SERVING_STANDARD_AD.-aDeliverySchedule :: Lens' Ad (Maybe DeliverySchedule)-aDeliverySchedule-  = lens _aDeliverySchedule-      (\ s a -> s{_aDeliverySchedule = a})---- | Event tag overrides for this ad.-aEventTagOverrides :: Lens' Ad [EventTagOverride]-aEventTagOverrides-  = lens _aEventTagOverrides-      (\ s a -> s{_aEventTagOverrides = a})-      . _Default-      . _Coerce---- | Whether this ad is active.-aActive :: Lens' Ad (Maybe Bool)-aActive = lens _aActive (\ s a -> s{_aActive = a})---- | Account ID of this ad. This is a read-only field that can be left blank.-aAccountId :: Lens' Ad (Maybe Int64)-aAccountId-  = lens _aAccountId (\ s a -> s{_aAccountId = a}) .-      mapping _Coerce---- | Name of this ad. This is a required field and must be less than 256--- characters long.-aName :: Lens' Ad (Maybe Text)-aName = lens _aName (\ s a -> s{_aName = a})---- | Key-value targeting information for this ad. Applicable when type is--- AD_SERVING_STANDARD_AD.-aKeyValueTargetingExpression :: Lens' Ad (Maybe KeyValueTargetingExpression)-aKeyValueTargetingExpression-  = lens _aKeyValueTargetingExpression-      (\ s a -> s{_aKeyValueTargetingExpression = a})---- | Date and time that this ad should stop serving. Must be later than the--- start time. This is a required field on insertion.-aEndTime :: Lens' Ad (Maybe UTCTime)-aEndTime-  = lens _aEndTime (\ s a -> s{_aEndTime = a}) .-      mapping _DateTime---- | Information about the creation of this ad.This is a read-only field.-aCreateInfo :: Lens' Ad (Maybe LastModifiedInfo)-aCreateInfo-  = lens _aCreateInfo (\ s a -> s{_aCreateInfo = a})---- | Information about the most recent modification of this ad. This is a--- read-only field.-aLastModifiedInfo :: Lens' Ad (Maybe LastModifiedInfo)-aLastModifiedInfo-  = lens _aLastModifiedInfo-      (\ s a -> s{_aLastModifiedInfo = a})---- | ID of this ad. This is a read-only, auto-generated field.-aId :: Lens' Ad (Maybe Int64)-aId-  = lens _aId (\ s a -> s{_aId = a}) . mapping _Coerce---- | Whether this ad requires ssl. This is a read-only field that is--- auto-generated when the ad is inserted or updated.-aSSLRequired :: Lens' Ad (Maybe Bool)-aSSLRequired-  = lens _aSSLRequired (\ s a -> s{_aSSLRequired = a})---- | Comments for this ad.-aComments :: Lens' Ad (Maybe Text)-aComments-  = lens _aComments (\ s a -> s{_aComments = a})---- | Subaccount ID of this ad. This is a read-only field that can be left--- blank.-aSubAccountId :: Lens' Ad (Maybe Int64)-aSubAccountId-  = lens _aSubAccountId-      (\ s a -> s{_aSubAccountId = a})-      . mapping _Coerce---- | Type of ad. This is a required field on insertion. Note that default ads--- (AD_SERVING_DEFAULT_AD) cannot be created directly (see Creative--- resource).-aType :: Lens' Ad (Maybe AdType)-aType = lens _aType (\ s a -> s{_aType = a})---- | Applicable when type is AD_SERVING_STANDARD_AD. Remarketing list--- targeting expression for this ad.-aRemarketingListExpression :: Lens' Ad (Maybe ListTargetingExpression)-aRemarketingListExpression-  = lens _aRemarketingListExpression-      (\ s a -> s{_aRemarketingListExpression = a})---- | Whether this ad is a dynamic click tracker. Applicable when type is--- AD_SERVING_CLICK_TRACKER. This is a required field on insert, and is--- read-only after insert.-aDynamicClickTracker :: Lens' Ad (Maybe Bool)-aDynamicClickTracker-  = lens _aDynamicClickTracker-      (\ s a -> s{_aDynamicClickTracker = a})---- | Compatibility of this ad. Applicable when type is AD_SERVING_DEFAULT_AD.--- WEB and WEB_INTERSTITIAL refer to rendering either on desktop or on--- mobile devices for regular or interstitial ads, respectively. APP and--- APP_INTERSTITIAL are for rendering in mobile apps. IN_STREAM_VIDEO--- refers to rendering an in-stream video ads developed with the VAST--- standard.-aCompatibility :: Lens' Ad (Maybe AdCompatibility)-aCompatibility-  = lens _aCompatibility-      (\ s a -> s{_aCompatibility = a})---- | Whether this ad is archived.-aArchived :: Lens' Ad (Maybe Bool)-aArchived-  = lens _aArchived (\ s a -> s{_aArchived = a})---- | Default click-through event tag properties for this ad.-aDefaultClickThroughEventTagProperties :: Lens' Ad (Maybe DefaultClickThroughEventTagProperties)-aDefaultClickThroughEventTagProperties-  = lens _aDefaultClickThroughEventTagProperties-      (\ s a ->-         s{_aDefaultClickThroughEventTagProperties = a})---- | Placement assignments for this ad.-aPlacementAssignments :: Lens' Ad [PlacementAssignment]-aPlacementAssignments-  = lens _aPlacementAssignments-      (\ s a -> s{_aPlacementAssignments = a})-      . _Default-      . _Coerce--instance FromJSON Ad where-        parseJSON-          = withObject "Ad"-              (\ o ->-                 Ad <$>-                   (o .:? "creativeGroupAssignments" .!= mempty) <*>-                     (o .:? "geoTargeting")-                     <*> (o .:? "creativeRotation")-                     <*> (o .:? "technologyTargeting")-                     <*> (o .:? "audienceSegmentId")-                     <*> (o .:? "dayPartTargeting")-                     <*> (o .:? "size")-                     <*> (o .:? "startTime")-                     <*> (o .:? "kind" .!= "dfareporting#ad")-                     <*> (o .:? "clickThroughUrlSuffixProperties")-                     <*> (o .:? "campaignIdDimensionValue")-                     <*> (o .:? "advertiserId")-                     <*> (o .:? "advertiserIdDimensionValue")-                     <*> (o .:? "sslCompliant")-                     <*> (o .:? "campaignId")-                     <*> (o .:? "idDimensionValue")-                     <*> (o .:? "clickThroughUrl")-                     <*> (o .:? "deliverySchedule")-                     <*> (o .:? "eventTagOverrides" .!= mempty)-                     <*> (o .:? "active")-                     <*> (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "keyValueTargetingExpression")-                     <*> (o .:? "endTime")-                     <*> (o .:? "createInfo")-                     <*> (o .:? "lastModifiedInfo")-                     <*> (o .:? "id")-                     <*> (o .:? "sslRequired")-                     <*> (o .:? "comments")-                     <*> (o .:? "subaccountId")-                     <*> (o .:? "type")-                     <*> (o .:? "remarketingListExpression")-                     <*> (o .:? "dynamicClickTracker")-                     <*> (o .:? "compatibility")-                     <*> (o .:? "archived")-                     <*> (o .:? "defaultClickThroughEventTagProperties")-                     <*> (o .:? "placementAssignments" .!= mempty))--instance ToJSON Ad where-        toJSON Ad{..}-          = object-              (catMaybes-                 [("creativeGroupAssignments" .=) <$>-                    _aCreativeGroupAssignments,-                  ("geoTargeting" .=) <$> _aGeoTargeting,-                  ("creativeRotation" .=) <$> _aCreativeRotation,-                  ("technologyTargeting" .=) <$> _aTechnologyTargeting,-                  ("audienceSegmentId" .=) <$> _aAudienceSegmentId,-                  ("dayPartTargeting" .=) <$> _aDayPartTargeting,-                  ("size" .=) <$> _aSize,-                  ("startTime" .=) <$> _aStartTime,-                  Just ("kind" .= _aKind),-                  ("clickThroughUrlSuffixProperties" .=) <$>-                    _aClickThroughURLSuffixProperties,-                  ("campaignIdDimensionValue" .=) <$>-                    _aCampaignIdDimensionValue,-                  ("advertiserId" .=) <$> _aAdvertiserId,-                  ("advertiserIdDimensionValue" .=) <$>-                    _aAdvertiserIdDimensionValue,-                  ("sslCompliant" .=) <$> _aSSLCompliant,-                  ("campaignId" .=) <$> _aCampaignId,-                  ("idDimensionValue" .=) <$> _aIdDimensionValue,-                  ("clickThroughUrl" .=) <$> _aClickThroughURL,-                  ("deliverySchedule" .=) <$> _aDeliverySchedule,-                  ("eventTagOverrides" .=) <$> _aEventTagOverrides,-                  ("active" .=) <$> _aActive,-                  ("accountId" .=) <$> _aAccountId,-                  ("name" .=) <$> _aName,-                  ("keyValueTargetingExpression" .=) <$>-                    _aKeyValueTargetingExpression,-                  ("endTime" .=) <$> _aEndTime,-                  ("createInfo" .=) <$> _aCreateInfo,-                  ("lastModifiedInfo" .=) <$> _aLastModifiedInfo,-                  ("id" .=) <$> _aId,-                  ("sslRequired" .=) <$> _aSSLRequired,-                  ("comments" .=) <$> _aComments,-                  ("subaccountId" .=) <$> _aSubAccountId,-                  ("type" .=) <$> _aType,-                  ("remarketingListExpression" .=) <$>-                    _aRemarketingListExpression,-                  ("dynamicClickTracker" .=) <$> _aDynamicClickTracker,-                  ("compatibility" .=) <$> _aCompatibility,-                  ("archived" .=) <$> _aArchived,-                  ("defaultClickThroughEventTagProperties" .=) <$>-                    _aDefaultClickThroughEventTagProperties,-                  ("placementAssignments" .=) <$>-                    _aPlacementAssignments])---- | Contains properties of a DoubleClick Planning project.------ /See:/ 'project' smart constructor.-data Project = Project-    { _pTargetClicks      :: !(Maybe (Textual Int64))-    , _pClientBillingCode :: !(Maybe Text)-    , _pTargetCpmNanos    :: !(Maybe (Textual Int64))-    , _pTargetConversions :: !(Maybe (Textual Int64))-    , _pBudget            :: !(Maybe (Textual Int64))-    , _pKind              :: !Text-    , _pAdvertiserId      :: !(Maybe (Textual Int64))-    , _pEndDate           :: !(Maybe Date')-    , _pOverview          :: !(Maybe Text)-    , _pTargetImpressions :: !(Maybe (Textual Int64))-    , _pStartDate         :: !(Maybe Date')-    , _pTargetCpcNanos    :: !(Maybe (Textual Int64))-    , _pAccountId         :: !(Maybe (Textual Int64))-    , _pName              :: !(Maybe Text)-    , _pLastModifiedInfo  :: !(Maybe LastModifiedInfo)-    , _pId                :: !(Maybe (Textual Int64))-    , _pAudienceAgeGroup  :: !(Maybe ProjectAudienceAgeGroup)-    , _pSubAccountId      :: !(Maybe (Textual Int64))-    , _pAudienceGender    :: !(Maybe ProjectAudienceGender)-    , _pClientName        :: !(Maybe Text)-    , _pTargetCpaNanos    :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'Project' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pTargetClicks'------ * 'pClientBillingCode'------ * 'pTargetCpmNanos'------ * 'pTargetConversions'------ * 'pBudget'------ * 'pKind'------ * 'pAdvertiserId'------ * 'pEndDate'------ * 'pOverview'------ * 'pTargetImpressions'------ * 'pStartDate'------ * 'pTargetCpcNanos'------ * 'pAccountId'------ * 'pName'------ * 'pLastModifiedInfo'------ * 'pId'------ * 'pAudienceAgeGroup'------ * 'pSubAccountId'------ * 'pAudienceGender'------ * 'pClientName'------ * 'pTargetCpaNanos'-project-    :: Project-project =-    Project-    { _pTargetClicks = Nothing-    , _pClientBillingCode = Nothing-    , _pTargetCpmNanos = Nothing-    , _pTargetConversions = Nothing-    , _pBudget = Nothing-    , _pKind = "dfareporting#project"-    , _pAdvertiserId = Nothing-    , _pEndDate = Nothing-    , _pOverview = Nothing-    , _pTargetImpressions = Nothing-    , _pStartDate = Nothing-    , _pTargetCpcNanos = Nothing-    , _pAccountId = Nothing-    , _pName = Nothing-    , _pLastModifiedInfo = Nothing-    , _pId = Nothing-    , _pAudienceAgeGroup = Nothing-    , _pSubAccountId = Nothing-    , _pAudienceGender = Nothing-    , _pClientName = Nothing-    , _pTargetCpaNanos = Nothing-    }---- | Number of clicks that the advertiser is targeting.-pTargetClicks :: Lens' Project (Maybe Int64)-pTargetClicks-  = lens _pTargetClicks-      (\ s a -> s{_pTargetClicks = a})-      . mapping _Coerce---- | Client billing code of this project.-pClientBillingCode :: Lens' Project (Maybe Text)-pClientBillingCode-  = lens _pClientBillingCode-      (\ s a -> s{_pClientBillingCode = a})---- | CPM that the advertiser is targeting.-pTargetCpmNanos :: Lens' Project (Maybe Int64)-pTargetCpmNanos-  = lens _pTargetCpmNanos-      (\ s a -> s{_pTargetCpmNanos = a})-      . mapping _Coerce---- | Number of conversions that the advertiser is targeting.-pTargetConversions :: Lens' Project (Maybe Int64)-pTargetConversions-  = lens _pTargetConversions-      (\ s a -> s{_pTargetConversions = a})-      . mapping _Coerce---- | Budget of this project in the currency specified by the current account.--- The value stored in this field represents only the non-fractional--- amount. For example, for USD, the smallest value that can be represented--- by this field is 1 US dollar.-pBudget :: Lens' Project (Maybe Int64)-pBudget-  = lens _pBudget (\ s a -> s{_pBudget = a}) .-      mapping _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#project\".-pKind :: Lens' Project Text-pKind = lens _pKind (\ s a -> s{_pKind = a})---- | Advertiser ID of this project.-pAdvertiserId :: Lens' Project (Maybe Int64)-pAdvertiserId-  = lens _pAdvertiserId-      (\ s a -> s{_pAdvertiserId = a})-      . mapping _Coerce---- | End date of the project.-pEndDate :: Lens' Project (Maybe Day)-pEndDate-  = lens _pEndDate (\ s a -> s{_pEndDate = a}) .-      mapping _Date---- | Overview of this project.-pOverview :: Lens' Project (Maybe Text)-pOverview-  = lens _pOverview (\ s a -> s{_pOverview = a})---- | Number of impressions that the advertiser is targeting.-pTargetImpressions :: Lens' Project (Maybe Int64)-pTargetImpressions-  = lens _pTargetImpressions-      (\ s a -> s{_pTargetImpressions = a})-      . mapping _Coerce---- | Start date of the project.-pStartDate :: Lens' Project (Maybe Day)-pStartDate-  = lens _pStartDate (\ s a -> s{_pStartDate = a}) .-      mapping _Date---- | CPC that the advertiser is targeting.-pTargetCpcNanos :: Lens' Project (Maybe Int64)-pTargetCpcNanos-  = lens _pTargetCpcNanos-      (\ s a -> s{_pTargetCpcNanos = a})-      . mapping _Coerce---- | Account ID of this project.-pAccountId :: Lens' Project (Maybe Int64)-pAccountId-  = lens _pAccountId (\ s a -> s{_pAccountId = a}) .-      mapping _Coerce---- | Name of this project.-pName :: Lens' Project (Maybe Text)-pName = lens _pName (\ s a -> s{_pName = a})---- | Information about the most recent modification of this project.-pLastModifiedInfo :: Lens' Project (Maybe LastModifiedInfo)-pLastModifiedInfo-  = lens _pLastModifiedInfo-      (\ s a -> s{_pLastModifiedInfo = a})---- | ID of this project. This is a read-only, auto-generated field.-pId :: Lens' Project (Maybe Int64)-pId-  = lens _pId (\ s a -> s{_pId = a}) . mapping _Coerce---- | Audience age group of this project.-pAudienceAgeGroup :: Lens' Project (Maybe ProjectAudienceAgeGroup)-pAudienceAgeGroup-  = lens _pAudienceAgeGroup-      (\ s a -> s{_pAudienceAgeGroup = a})---- | Subaccount ID of this project.-pSubAccountId :: Lens' Project (Maybe Int64)-pSubAccountId-  = lens _pSubAccountId-      (\ s a -> s{_pSubAccountId = a})-      . mapping _Coerce---- | Audience gender of this project.-pAudienceGender :: Lens' Project (Maybe ProjectAudienceGender)-pAudienceGender-  = lens _pAudienceGender-      (\ s a -> s{_pAudienceGender = a})---- | Name of the project client.-pClientName :: Lens' Project (Maybe Text)-pClientName-  = lens _pClientName (\ s a -> s{_pClientName = a})---- | CPA that the advertiser is targeting.-pTargetCpaNanos :: Lens' Project (Maybe Int64)-pTargetCpaNanos-  = lens _pTargetCpaNanos-      (\ s a -> s{_pTargetCpaNanos = a})-      . mapping _Coerce--instance FromJSON Project where-        parseJSON-          = withObject "Project"-              (\ o ->-                 Project <$>-                   (o .:? "targetClicks") <*>-                     (o .:? "clientBillingCode")-                     <*> (o .:? "targetCpmNanos")-                     <*> (o .:? "targetConversions")-                     <*> (o .:? "budget")-                     <*> (o .:? "kind" .!= "dfareporting#project")-                     <*> (o .:? "advertiserId")-                     <*> (o .:? "endDate")-                     <*> (o .:? "overview")-                     <*> (o .:? "targetImpressions")-                     <*> (o .:? "startDate")-                     <*> (o .:? "targetCpcNanos")-                     <*> (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "lastModifiedInfo")-                     <*> (o .:? "id")-                     <*> (o .:? "audienceAgeGroup")-                     <*> (o .:? "subaccountId")-                     <*> (o .:? "audienceGender")-                     <*> (o .:? "clientName")-                     <*> (o .:? "targetCpaNanos"))--instance ToJSON Project where-        toJSON Project{..}-          = object-              (catMaybes-                 [("targetClicks" .=) <$> _pTargetClicks,-                  ("clientBillingCode" .=) <$> _pClientBillingCode,-                  ("targetCpmNanos" .=) <$> _pTargetCpmNanos,-                  ("targetConversions" .=) <$> _pTargetConversions,-                  ("budget" .=) <$> _pBudget, Just ("kind" .= _pKind),-                  ("advertiserId" .=) <$> _pAdvertiserId,-                  ("endDate" .=) <$> _pEndDate,-                  ("overview" .=) <$> _pOverview,-                  ("targetImpressions" .=) <$> _pTargetImpressions,-                  ("startDate" .=) <$> _pStartDate,-                  ("targetCpcNanos" .=) <$> _pTargetCpcNanos,-                  ("accountId" .=) <$> _pAccountId,-                  ("name" .=) <$> _pName,-                  ("lastModifiedInfo" .=) <$> _pLastModifiedInfo,-                  ("id" .=) <$> _pId,-                  ("audienceAgeGroup" .=) <$> _pAudienceAgeGroup,-                  ("subaccountId" .=) <$> _pSubAccountId,-                  ("audienceGender" .=) <$> _pAudienceGender,-                  ("clientName" .=) <$> _pClientName,-                  ("targetCpaNanos" .=) <$> _pTargetCpaNanos])---- | The report criteria for a report of type \"FLOODLIGHT\".------ /See:/ 'reportFloodlightCriteria' smart constructor.-data ReportFloodlightCriteria = ReportFloodlightCriteria-    { _rfcReportProperties      :: !(Maybe ReportFloodlightCriteriaReportProperties)-    , _rfcMetricNames           :: !(Maybe [Text])-    , _rfcCustomRichMediaEvents :: !(Maybe [DimensionValue])-    , _rfcDimensionFilters      :: !(Maybe [DimensionValue])-    , _rfcDateRange             :: !(Maybe DateRange)-    , _rfcFloodlightConfigId    :: !(Maybe DimensionValue)-    , _rfcDimensions            :: !(Maybe [SortedDimension])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ReportFloodlightCriteria' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rfcReportProperties'------ * 'rfcMetricNames'------ * 'rfcCustomRichMediaEvents'------ * 'rfcDimensionFilters'------ * 'rfcDateRange'------ * 'rfcFloodlightConfigId'------ * 'rfcDimensions'-reportFloodlightCriteria-    :: ReportFloodlightCriteria-reportFloodlightCriteria =-    ReportFloodlightCriteria-    { _rfcReportProperties = Nothing-    , _rfcMetricNames = Nothing-    , _rfcCustomRichMediaEvents = Nothing-    , _rfcDimensionFilters = Nothing-    , _rfcDateRange = Nothing-    , _rfcFloodlightConfigId = Nothing-    , _rfcDimensions = Nothing-    }---- | The properties of the report.-rfcReportProperties :: Lens' ReportFloodlightCriteria (Maybe ReportFloodlightCriteriaReportProperties)-rfcReportProperties-  = lens _rfcReportProperties-      (\ s a -> s{_rfcReportProperties = a})---- | The list of names of metrics the report should include.-rfcMetricNames :: Lens' ReportFloodlightCriteria [Text]-rfcMetricNames-  = lens _rfcMetricNames-      (\ s a -> s{_rfcMetricNames = a})-      . _Default-      . _Coerce---- | The list of custom rich media events to include.-rfcCustomRichMediaEvents :: Lens' ReportFloodlightCriteria [DimensionValue]-rfcCustomRichMediaEvents-  = lens _rfcCustomRichMediaEvents-      (\ s a -> s{_rfcCustomRichMediaEvents = a})-      . _Default-      . _Coerce---- | The list of filters on which dimensions are filtered. Filters for--- different dimensions are ANDed, filters for the same dimension are--- grouped together and ORed.-rfcDimensionFilters :: Lens' ReportFloodlightCriteria [DimensionValue]-rfcDimensionFilters-  = lens _rfcDimensionFilters-      (\ s a -> s{_rfcDimensionFilters = a})-      . _Default-      . _Coerce---- | The date range this report should be run for.-rfcDateRange :: Lens' ReportFloodlightCriteria (Maybe DateRange)-rfcDateRange-  = lens _rfcDateRange (\ s a -> s{_rfcDateRange = a})---- | The floodlight ID for which to show data in this report. All advertisers--- associated with that ID will automatically be added. The dimension of--- the value needs to be \'dfa:floodlightConfigId\'.-rfcFloodlightConfigId :: Lens' ReportFloodlightCriteria (Maybe DimensionValue)-rfcFloodlightConfigId-  = lens _rfcFloodlightConfigId-      (\ s a -> s{_rfcFloodlightConfigId = a})---- | The list of dimensions the report should include.-rfcDimensions :: Lens' ReportFloodlightCriteria [SortedDimension]-rfcDimensions-  = lens _rfcDimensions-      (\ s a -> s{_rfcDimensions = a})-      . _Default-      . _Coerce--instance FromJSON ReportFloodlightCriteria where-        parseJSON-          = withObject "ReportFloodlightCriteria"-              (\ o ->-                 ReportFloodlightCriteria <$>-                   (o .:? "reportProperties") <*>-                     (o .:? "metricNames" .!= mempty)-                     <*> (o .:? "customRichMediaEvents" .!= mempty)-                     <*> (o .:? "dimensionFilters" .!= mempty)-                     <*> (o .:? "dateRange")-                     <*> (o .:? "floodlightConfigId")-                     <*> (o .:? "dimensions" .!= mempty))--instance ToJSON ReportFloodlightCriteria where-        toJSON ReportFloodlightCriteria{..}-          = object-              (catMaybes-                 [("reportProperties" .=) <$> _rfcReportProperties,-                  ("metricNames" .=) <$> _rfcMetricNames,-                  ("customRichMediaEvents" .=) <$>-                    _rfcCustomRichMediaEvents,-                  ("dimensionFilters" .=) <$> _rfcDimensionFilters,-                  ("dateRange" .=) <$> _rfcDateRange,-                  ("floodlightConfigId" .=) <$> _rfcFloodlightConfigId,-                  ("dimensions" .=) <$> _rfcDimensions])---- | Represents the dimensions of ads, placements, creatives, or creative--- assets.------ /See:/ 'size' smart constructor.-data Size = Size-    { _sHeight :: !(Maybe (Textual Int32))-    , _sKind   :: !Text-    , _sWidth  :: !(Maybe (Textual Int32))-    , _sIab    :: !(Maybe Bool)-    , _sId     :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'Size' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sHeight'------ * 'sKind'------ * 'sWidth'------ * 'sIab'------ * 'sId'-size-    :: Size-size =-    Size-    { _sHeight = Nothing-    , _sKind = "dfareporting#size"-    , _sWidth = Nothing-    , _sIab = Nothing-    , _sId = Nothing-    }---- | Height of this size.-sHeight :: Lens' Size (Maybe Int32)-sHeight-  = lens _sHeight (\ s a -> s{_sHeight = a}) .-      mapping _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#size\".-sKind :: Lens' Size Text-sKind = lens _sKind (\ s a -> s{_sKind = a})---- | Width of this size.-sWidth :: Lens' Size (Maybe Int32)-sWidth-  = lens _sWidth (\ s a -> s{_sWidth = a}) .-      mapping _Coerce---- | IAB standard size. This is a read-only, auto-generated field.-sIab :: Lens' Size (Maybe Bool)-sIab = lens _sIab (\ s a -> s{_sIab = a})---- | ID of this size. This is a read-only, auto-generated field.-sId :: Lens' Size (Maybe Int64)-sId-  = lens _sId (\ s a -> s{_sId = a}) . mapping _Coerce--instance FromJSON Size where-        parseJSON-          = withObject "Size"-              (\ o ->-                 Size <$>-                   (o .:? "height") <*>-                     (o .:? "kind" .!= "dfareporting#size")-                     <*> (o .:? "width")-                     <*> (o .:? "iab")-                     <*> (o .:? "id"))--instance ToJSON Size where-        toJSON Size{..}-          = object-              (catMaybes-                 [("height" .=) <$> _sHeight, Just ("kind" .= _sKind),-                  ("width" .=) <$> _sWidth, ("iab" .=) <$> _sIab,-                  ("id" .=) <$> _sId])---- | Object Filter.------ /See:/ 'objectFilter' smart constructor.-data ObjectFilter = ObjectFilter-    { _ofStatus    :: !(Maybe ObjectFilterStatus)-    , _ofKind      :: !Text-    , _ofObjectIds :: !(Maybe [Textual Int64])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ObjectFilter' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ofStatus'------ * 'ofKind'------ * 'ofObjectIds'-objectFilter-    :: ObjectFilter-objectFilter =-    ObjectFilter-    { _ofStatus = Nothing-    , _ofKind = "dfareporting#objectFilter"-    , _ofObjectIds = Nothing-    }---- | Status of the filter. NONE means the user has access to none of the--- objects. ALL means the user has access to all objects. ASSIGNED means--- the user has access to the objects with IDs in the objectIds list.-ofStatus :: Lens' ObjectFilter (Maybe ObjectFilterStatus)-ofStatus = lens _ofStatus (\ s a -> s{_ofStatus = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#objectFilter\".-ofKind :: Lens' ObjectFilter Text-ofKind = lens _ofKind (\ s a -> s{_ofKind = a})---- | Applicable when status is ASSIGNED. The user has access to objects with--- these object IDs.-ofObjectIds :: Lens' ObjectFilter [Int64]-ofObjectIds-  = lens _ofObjectIds (\ s a -> s{_ofObjectIds = a}) .-      _Default-      . _Coerce--instance FromJSON ObjectFilter where-        parseJSON-          = withObject "ObjectFilter"-              (\ o ->-                 ObjectFilter <$>-                   (o .:? "status") <*>-                     (o .:? "kind" .!= "dfareporting#objectFilter")-                     <*> (o .:? "objectIds" .!= mempty))--instance ToJSON ObjectFilter where-        toJSON ObjectFilter{..}-          = object-              (catMaybes-                 [("status" .=) <$> _ofStatus,-                  Just ("kind" .= _ofKind),-                  ("objectIds" .=) <$> _ofObjectIds])---- | Reporting Configuration------ /See:/ 'reportsConfiguration' smart constructor.-data ReportsConfiguration = ReportsConfiguration-    { _rcExposureToConversionEnabled :: !(Maybe Bool)-    , _rcReportGenerationTimeZoneId  :: !(Maybe (Textual Int64))-    , _rcLookbackConfiguration       :: !(Maybe LookbackConfiguration)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ReportsConfiguration' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rcExposureToConversionEnabled'------ * 'rcReportGenerationTimeZoneId'------ * 'rcLookbackConfiguration'-reportsConfiguration-    :: ReportsConfiguration-reportsConfiguration =-    ReportsConfiguration-    { _rcExposureToConversionEnabled = Nothing-    , _rcReportGenerationTimeZoneId = Nothing-    , _rcLookbackConfiguration = Nothing-    }---- | Whether the exposure to conversion report is enabled. This report shows--- detailed pathway information on up to 10 of the most recent ad exposures--- seen by a user before converting.-rcExposureToConversionEnabled :: Lens' ReportsConfiguration (Maybe Bool)-rcExposureToConversionEnabled-  = lens _rcExposureToConversionEnabled-      (\ s a -> s{_rcExposureToConversionEnabled = a})---- | Report generation time zone ID of this account. This is a required field--- that can only be changed by a superuser. Acceptable values are: - \"1\"--- for \"America\/New_York\" - \"2\" for \"Europe\/London\" - \"3\" for--- \"Europe\/Paris\" - \"4\" for \"Africa\/Johannesburg\" - \"5\" for--- \"Asia\/Jerusalem\" - \"6\" for \"Asia\/Shanghai\" - \"7\" for--- \"Asia\/Hong_Kong\" - \"8\" for \"Asia\/Tokyo\" - \"9\" for--- \"Australia\/Sydney\" - \"10\" for \"Asia\/Dubai\" - \"11\" for--- \"America\/Los_Angeles\" - \"12\" for \"Pacific\/Auckland\" - \"13\" for--- \"America\/Sao_Paulo\"-rcReportGenerationTimeZoneId :: Lens' ReportsConfiguration (Maybe Int64)-rcReportGenerationTimeZoneId-  = lens _rcReportGenerationTimeZoneId-      (\ s a -> s{_rcReportGenerationTimeZoneId = a})-      . mapping _Coerce---- | Default lookback windows for new advertisers in this account.-rcLookbackConfiguration :: Lens' ReportsConfiguration (Maybe LookbackConfiguration)-rcLookbackConfiguration-  = lens _rcLookbackConfiguration-      (\ s a -> s{_rcLookbackConfiguration = a})--instance FromJSON ReportsConfiguration where-        parseJSON-          = withObject "ReportsConfiguration"-              (\ o ->-                 ReportsConfiguration <$>-                   (o .:? "exposureToConversionEnabled") <*>-                     (o .:? "reportGenerationTimeZoneId")-                     <*> (o .:? "lookbackConfiguration"))--instance ToJSON ReportsConfiguration where-        toJSON ReportsConfiguration{..}-          = object-              (catMaybes-                 [("exposureToConversionEnabled" .=) <$>-                    _rcExposureToConversionEnabled,-                  ("reportGenerationTimeZoneId" .=) <$>-                    _rcReportGenerationTimeZoneId,-                  ("lookbackConfiguration" .=) <$>-                    _rcLookbackConfiguration])---- | Pricing Schedule------ /See:/ 'pricingSchedule' smart constructor.-data PricingSchedule = PricingSchedule-    { _psTestingStartDate      :: !(Maybe Date')-    , _psFloodlightActivityId  :: !(Maybe (Textual Int64))-    , _psEndDate               :: !(Maybe Date')-    , _psDisregardOverdelivery :: !(Maybe Bool)-    , _psStartDate             :: !(Maybe Date')-    , _psCapCostOption         :: !(Maybe PricingScheduleCapCostOption)-    , _psPricingType           :: !(Maybe PricingSchedulePricingType)-    , _psPricingPeriods        :: !(Maybe [PricingSchedulePricingPeriod])-    , _psFlighted              :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'PricingSchedule' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'psTestingStartDate'------ * 'psFloodlightActivityId'------ * 'psEndDate'------ * 'psDisregardOverdelivery'------ * 'psStartDate'------ * 'psCapCostOption'------ * 'psPricingType'------ * 'psPricingPeriods'------ * 'psFlighted'-pricingSchedule-    :: PricingSchedule-pricingSchedule =-    PricingSchedule-    { _psTestingStartDate = Nothing-    , _psFloodlightActivityId = Nothing-    , _psEndDate = Nothing-    , _psDisregardOverdelivery = Nothing-    , _psStartDate = Nothing-    , _psCapCostOption = Nothing-    , _psPricingType = Nothing-    , _psPricingPeriods = Nothing-    , _psFlighted = Nothing-    }---- | Testing start date of this placement. The hours, minutes, and seconds of--- the start date should not be set, as doing so will result in an error.-psTestingStartDate :: Lens' PricingSchedule (Maybe Day)-psTestingStartDate-  = lens _psTestingStartDate-      (\ s a -> s{_psTestingStartDate = a})-      . mapping _Date---- | Floodlight activity ID associated with this placement. This field should--- be set when placement pricing type is set to PRICING_TYPE_CPA.-psFloodlightActivityId :: Lens' PricingSchedule (Maybe Int64)-psFloodlightActivityId-  = lens _psFloodlightActivityId-      (\ s a -> s{_psFloodlightActivityId = a})-      . mapping _Coerce---- | Placement end date. This date must be later than, or the same day as,--- the placement start date, but not later than the campaign end date. If,--- for example, you set 6\/25\/2015 as both the start and end dates, the--- effective placement date is just that day only, 6\/25\/2015. The hours,--- minutes, and seconds of the end date should not be set, as doing so will--- result in an error. This field is required on insertion.-psEndDate :: Lens' PricingSchedule (Maybe Day)-psEndDate-  = lens _psEndDate (\ s a -> s{_psEndDate = a}) .-      mapping _Date---- | Whether cap costs are ignored by ad serving.-psDisregardOverdelivery :: Lens' PricingSchedule (Maybe Bool)-psDisregardOverdelivery-  = lens _psDisregardOverdelivery-      (\ s a -> s{_psDisregardOverdelivery = a})---- | Placement start date. This date must be later than, or the same day as,--- the campaign start date. The hours, minutes, and seconds of the start--- date should not be set, as doing so will result in an error. This field--- is required on insertion.-psStartDate :: Lens' PricingSchedule (Maybe Day)-psStartDate-  = lens _psStartDate (\ s a -> s{_psStartDate = a}) .-      mapping _Date---- | Placement cap cost option.-psCapCostOption :: Lens' PricingSchedule (Maybe PricingScheduleCapCostOption)-psCapCostOption-  = lens _psCapCostOption-      (\ s a -> s{_psCapCostOption = a})---- | Placement pricing type. This field is required on insertion.-psPricingType :: Lens' PricingSchedule (Maybe PricingSchedulePricingType)-psPricingType-  = lens _psPricingType-      (\ s a -> s{_psPricingType = a})---- | Pricing periods for this placement.-psPricingPeriods :: Lens' PricingSchedule [PricingSchedulePricingPeriod]-psPricingPeriods-  = lens _psPricingPeriods-      (\ s a -> s{_psPricingPeriods = a})-      . _Default-      . _Coerce---- | Whether this placement is flighted. If true, pricing periods will be--- computed automatically.-psFlighted :: Lens' PricingSchedule (Maybe Bool)-psFlighted-  = lens _psFlighted (\ s a -> s{_psFlighted = a})--instance FromJSON PricingSchedule where-        parseJSON-          = withObject "PricingSchedule"-              (\ o ->-                 PricingSchedule <$>-                   (o .:? "testingStartDate") <*>-                     (o .:? "floodlightActivityId")-                     <*> (o .:? "endDate")-                     <*> (o .:? "disregardOverdelivery")-                     <*> (o .:? "startDate")-                     <*> (o .:? "capCostOption")-                     <*> (o .:? "pricingType")-                     <*> (o .:? "pricingPeriods" .!= mempty)-                     <*> (o .:? "flighted"))--instance ToJSON PricingSchedule where-        toJSON PricingSchedule{..}-          = object-              (catMaybes-                 [("testingStartDate" .=) <$> _psTestingStartDate,-                  ("floodlightActivityId" .=) <$>-                    _psFloodlightActivityId,-                  ("endDate" .=) <$> _psEndDate,-                  ("disregardOverdelivery" .=) <$>-                    _psDisregardOverdelivery,-                  ("startDate" .=) <$> _psStartDate,-                  ("capCostOption" .=) <$> _psCapCostOption,-                  ("pricingType" .=) <$> _psPricingType,-                  ("pricingPeriods" .=) <$> _psPricingPeriods,-                  ("flighted" .=) <$> _psFlighted])---- | Contains information about a postal code that can be targeted by ads.------ /See:/ 'postalCode' smart constructor.-data PostalCode = PostalCode-    { _pcKind          :: !Text-    , _pcCode          :: !(Maybe Text)-    , _pcCountryCode   :: !(Maybe Text)-    , _pcId            :: !(Maybe Text)-    , _pcCountryDartId :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'PostalCode' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pcKind'------ * 'pcCode'------ * 'pcCountryCode'------ * 'pcId'------ * 'pcCountryDartId'-postalCode-    :: PostalCode-postalCode =-    PostalCode-    { _pcKind = "dfareporting#postalCode"-    , _pcCode = Nothing-    , _pcCountryCode = Nothing-    , _pcId = Nothing-    , _pcCountryDartId = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#postalCode\".-pcKind :: Lens' PostalCode Text-pcKind = lens _pcKind (\ s a -> s{_pcKind = a})---- | Postal code. This is equivalent to the id field.-pcCode :: Lens' PostalCode (Maybe Text)-pcCode = lens _pcCode (\ s a -> s{_pcCode = a})---- | Country code of the country to which this postal code belongs.-pcCountryCode :: Lens' PostalCode (Maybe Text)-pcCountryCode-  = lens _pcCountryCode-      (\ s a -> s{_pcCountryCode = a})---- | ID of this postal code.-pcId :: Lens' PostalCode (Maybe Text)-pcId = lens _pcId (\ s a -> s{_pcId = a})---- | DART ID of the country to which this postal code belongs.-pcCountryDartId :: Lens' PostalCode (Maybe Int64)-pcCountryDartId-  = lens _pcCountryDartId-      (\ s a -> s{_pcCountryDartId = a})-      . mapping _Coerce--instance FromJSON PostalCode where-        parseJSON-          = withObject "PostalCode"-              (\ o ->-                 PostalCode <$>-                   (o .:? "kind" .!= "dfareporting#postalCode") <*>-                     (o .:? "code")-                     <*> (o .:? "countryCode")-                     <*> (o .:? "id")-                     <*> (o .:? "countryDartId"))--instance ToJSON PostalCode where-        toJSON PostalCode{..}-          = object-              (catMaybes-                 [Just ("kind" .= _pcKind), ("code" .=) <$> _pcCode,-                  ("countryCode" .=) <$> _pcCountryCode,-                  ("id" .=) <$> _pcId,-                  ("countryDartId" .=) <$> _pcCountryDartId])---- | Account Permission List Response------ /See:/ 'accountPermissionsListResponse' smart constructor.-data AccountPermissionsListResponse = AccountPermissionsListResponse-    { _aplrKind               :: !Text-    , _aplrAccountPermissions :: !(Maybe [AccountPermission])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'AccountPermissionsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aplrKind'------ * 'aplrAccountPermissions'-accountPermissionsListResponse-    :: AccountPermissionsListResponse-accountPermissionsListResponse =-    AccountPermissionsListResponse-    { _aplrKind = "dfareporting#accountPermissionsListResponse"-    , _aplrAccountPermissions = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#accountPermissionsListResponse\".-aplrKind :: Lens' AccountPermissionsListResponse Text-aplrKind = lens _aplrKind (\ s a -> s{_aplrKind = a})---- | Account permission collection.-aplrAccountPermissions :: Lens' AccountPermissionsListResponse [AccountPermission]-aplrAccountPermissions-  = lens _aplrAccountPermissions-      (\ s a -> s{_aplrAccountPermissions = a})-      . _Default-      . _Coerce--instance FromJSON AccountPermissionsListResponse-         where-        parseJSON-          = withObject "AccountPermissionsListResponse"-              (\ o ->-                 AccountPermissionsListResponse <$>-                   (o .:? "kind" .!=-                      "dfareporting#accountPermissionsListResponse")-                     <*> (o .:? "accountPermissions" .!= mempty))--instance ToJSON AccountPermissionsListResponse where-        toJSON AccountPermissionsListResponse{..}-          = object-              (catMaybes-                 [Just ("kind" .= _aplrKind),-                  ("accountPermissions" .=) <$>-                    _aplrAccountPermissions])---- | Contains information about a country that can be targeted by ads.------ /See:/ 'country' smart constructor.-data Country = Country-    { _cKind        :: !Text-    , _cName        :: !(Maybe Text)-    , _cCountryCode :: !(Maybe Text)-    , _cDartId      :: !(Maybe (Textual Int64))-    , _cSSLEnabled  :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'Country' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cKind'------ * 'cName'------ * 'cCountryCode'------ * 'cDartId'------ * 'cSSLEnabled'-country-    :: Country-country =-    Country-    { _cKind = "dfareporting#country"-    , _cName = Nothing-    , _cCountryCode = Nothing-    , _cDartId = Nothing-    , _cSSLEnabled = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#country\".-cKind :: Lens' Country Text-cKind = lens _cKind (\ s a -> s{_cKind = a})---- | Name of this country.-cName :: Lens' Country (Maybe Text)-cName = lens _cName (\ s a -> s{_cName = a})---- | Country code.-cCountryCode :: Lens' Country (Maybe Text)-cCountryCode-  = lens _cCountryCode (\ s a -> s{_cCountryCode = a})---- | DART ID of this country. This is the ID used for targeting and--- generating reports.-cDartId :: Lens' Country (Maybe Int64)-cDartId-  = lens _cDartId (\ s a -> s{_cDartId = a}) .-      mapping _Coerce---- | Whether ad serving supports secure servers in this country.-cSSLEnabled :: Lens' Country (Maybe Bool)-cSSLEnabled-  = lens _cSSLEnabled (\ s a -> s{_cSSLEnabled = a})--instance FromJSON Country where-        parseJSON-          = withObject "Country"-              (\ o ->-                 Country <$>-                   (o .:? "kind" .!= "dfareporting#country") <*>-                     (o .:? "name")-                     <*> (o .:? "countryCode")-                     <*> (o .:? "dartId")-                     <*> (o .:? "sslEnabled"))--instance ToJSON Country where-        toJSON Country{..}-          = object-              (catMaybes-                 [Just ("kind" .= _cKind), ("name" .=) <$> _cName,-                  ("countryCode" .=) <$> _cCountryCode,-                  ("dartId" .=) <$> _cDartId,-                  ("sslEnabled" .=) <$> _cSSLEnabled])---- | Operating System Version List Response------ /See:/ 'operatingSystemVersionsListResponse' smart constructor.-data OperatingSystemVersionsListResponse = OperatingSystemVersionsListResponse-    { _osvlrKind                    :: !Text-    , _osvlrOperatingSystemVersions :: !(Maybe [OperatingSystemVersion])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'OperatingSystemVersionsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'osvlrKind'------ * 'osvlrOperatingSystemVersions'-operatingSystemVersionsListResponse-    :: OperatingSystemVersionsListResponse-operatingSystemVersionsListResponse =-    OperatingSystemVersionsListResponse-    { _osvlrKind = "dfareporting#operatingSystemVersionsListResponse"-    , _osvlrOperatingSystemVersions = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#operatingSystemVersionsListResponse\".-osvlrKind :: Lens' OperatingSystemVersionsListResponse Text-osvlrKind-  = lens _osvlrKind (\ s a -> s{_osvlrKind = a})---- | Operating system version collection.-osvlrOperatingSystemVersions :: Lens' OperatingSystemVersionsListResponse [OperatingSystemVersion]-osvlrOperatingSystemVersions-  = lens _osvlrOperatingSystemVersions-      (\ s a -> s{_osvlrOperatingSystemVersions = a})-      . _Default-      . _Coerce--instance FromJSON OperatingSystemVersionsListResponse-         where-        parseJSON-          = withObject "OperatingSystemVersionsListResponse"-              (\ o ->-                 OperatingSystemVersionsListResponse <$>-                   (o .:? "kind" .!=-                      "dfareporting#operatingSystemVersionsListResponse")-                     <*> (o .:? "operatingSystemVersions" .!= mempty))--instance ToJSON OperatingSystemVersionsListResponse-         where-        toJSON OperatingSystemVersionsListResponse{..}-          = object-              (catMaybes-                 [Just ("kind" .= _osvlrKind),-                  ("operatingSystemVersions" .=) <$>-                    _osvlrOperatingSystemVersions])---- | Click Through URL Suffix settings.------ /See:/ 'clickThroughURLSuffixProperties' smart constructor.-data ClickThroughURLSuffixProperties = ClickThroughURLSuffixProperties-    { _ctuspOverrideInheritedSuffix :: !(Maybe Bool)-    , _ctuspClickThroughURLSuffix   :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ClickThroughURLSuffixProperties' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ctuspOverrideInheritedSuffix'------ * 'ctuspClickThroughURLSuffix'-clickThroughURLSuffixProperties-    :: ClickThroughURLSuffixProperties-clickThroughURLSuffixProperties =-    ClickThroughURLSuffixProperties-    { _ctuspOverrideInheritedSuffix = Nothing-    , _ctuspClickThroughURLSuffix = Nothing-    }---- | Whether this entity should override the inherited click-through URL--- suffix with its own defined value.-ctuspOverrideInheritedSuffix :: Lens' ClickThroughURLSuffixProperties (Maybe Bool)-ctuspOverrideInheritedSuffix-  = lens _ctuspOverrideInheritedSuffix-      (\ s a -> s{_ctuspOverrideInheritedSuffix = a})---- | Click-through URL suffix to apply to all ads in this entity\'s scope.--- Must be less than 128 characters long.-ctuspClickThroughURLSuffix :: Lens' ClickThroughURLSuffixProperties (Maybe Text)-ctuspClickThroughURLSuffix-  = lens _ctuspClickThroughURLSuffix-      (\ s a -> s{_ctuspClickThroughURLSuffix = a})--instance FromJSON ClickThroughURLSuffixProperties-         where-        parseJSON-          = withObject "ClickThroughURLSuffixProperties"-              (\ o ->-                 ClickThroughURLSuffixProperties <$>-                   (o .:? "overrideInheritedSuffix") <*>-                     (o .:? "clickThroughUrlSuffix"))--instance ToJSON ClickThroughURLSuffixProperties where-        toJSON ClickThroughURLSuffixProperties{..}-          = object-              (catMaybes-                 [("overrideInheritedSuffix" .=) <$>-                    _ctuspOverrideInheritedSuffix,-                  ("clickThroughUrlSuffix" .=) <$>-                    _ctuspClickThroughURLSuffix])---- | Pricing Information------ /See:/ 'pricing' smart constructor.-data Pricing = Pricing-    { _priEndDate     :: !(Maybe Date')-    , _priStartDate   :: !(Maybe Date')-    , _priGroupType   :: !(Maybe PricingGroupType)-    , _priPricingType :: !(Maybe PricingPricingType)-    , _priFlights     :: !(Maybe [Flight])-    , _priCapCostType :: !(Maybe PricingCapCostType)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'Pricing' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'priEndDate'------ * 'priStartDate'------ * 'priGroupType'------ * 'priPricingType'------ * 'priFlights'------ * 'priCapCostType'-pricing-    :: Pricing-pricing =-    Pricing-    { _priEndDate = Nothing-    , _priStartDate = Nothing-    , _priGroupType = Nothing-    , _priPricingType = Nothing-    , _priFlights = Nothing-    , _priCapCostType = Nothing-    }---- | End date of this inventory item.-priEndDate :: Lens' Pricing (Maybe Day)-priEndDate-  = lens _priEndDate (\ s a -> s{_priEndDate = a}) .-      mapping _Date---- | Start date of this inventory item.-priStartDate :: Lens' Pricing (Maybe Day)-priStartDate-  = lens _priStartDate (\ s a -> s{_priStartDate = a})-      . mapping _Date---- | Group type of this inventory item if it represents a placement group. Is--- null otherwise. There are two type of placement groups:--- PLANNING_PLACEMENT_GROUP_TYPE_PACKAGE is a simple group of inventory--- items that acts as a single pricing point for a group of tags.--- PLANNING_PLACEMENT_GROUP_TYPE_ROADBLOCK is a group of inventory items--- that not only acts as a single pricing point, but also assumes that all--- the tags in it will be served at the same time. A roadblock requires one--- of its assigned inventory items to be marked as primary.-priGroupType :: Lens' Pricing (Maybe PricingGroupType)-priGroupType-  = lens _priGroupType (\ s a -> s{_priGroupType = a})---- | Pricing type of this inventory item.-priPricingType :: Lens' Pricing (Maybe PricingPricingType)-priPricingType-  = lens _priPricingType-      (\ s a -> s{_priPricingType = a})---- | Flights of this inventory item. A flight (a.k.a. pricing period)--- represents the inventory item pricing information for a specific period--- of time.-priFlights :: Lens' Pricing [Flight]-priFlights-  = lens _priFlights (\ s a -> s{_priFlights = a}) .-      _Default-      . _Coerce---- | Cap cost type of this inventory item.-priCapCostType :: Lens' Pricing (Maybe PricingCapCostType)-priCapCostType-  = lens _priCapCostType-      (\ s a -> s{_priCapCostType = a})--instance FromJSON Pricing where-        parseJSON-          = withObject "Pricing"-              (\ o ->-                 Pricing <$>-                   (o .:? "endDate") <*> (o .:? "startDate") <*>-                     (o .:? "groupType")-                     <*> (o .:? "pricingType")-                     <*> (o .:? "flights" .!= mempty)-                     <*> (o .:? "capCostType"))--instance ToJSON Pricing where-        toJSON Pricing{..}-          = object-              (catMaybes-                 [("endDate" .=) <$> _priEndDate,-                  ("startDate" .=) <$> _priStartDate,-                  ("groupType" .=) <$> _priGroupType,-                  ("pricingType" .=) <$> _priPricingType,-                  ("flights" .=) <$> _priFlights,-                  ("capCostType" .=) <$> _priCapCostType])---- | Audience Segment Group.------ /See:/ 'audienceSegmentGroup' smart constructor.-data AudienceSegmentGroup = AudienceSegmentGroup-    { _asgAudienceSegments :: !(Maybe [AudienceSegment])-    , _asgName             :: !(Maybe Text)-    , _asgId               :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'AudienceSegmentGroup' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'asgAudienceSegments'------ * 'asgName'------ * 'asgId'-audienceSegmentGroup-    :: AudienceSegmentGroup-audienceSegmentGroup =-    AudienceSegmentGroup-    { _asgAudienceSegments = Nothing-    , _asgName = Nothing-    , _asgId = Nothing-    }---- | Audience segments assigned to this group. The number of segments must be--- between 2 and 100.-asgAudienceSegments :: Lens' AudienceSegmentGroup [AudienceSegment]-asgAudienceSegments-  = lens _asgAudienceSegments-      (\ s a -> s{_asgAudienceSegments = a})-      . _Default-      . _Coerce---- | Name of this audience segment group. This is a required field and must--- be less than 65 characters long.-asgName :: Lens' AudienceSegmentGroup (Maybe Text)-asgName = lens _asgName (\ s a -> s{_asgName = a})---- | ID of this audience segment group. This is a read-only, auto-generated--- field.-asgId :: Lens' AudienceSegmentGroup (Maybe Int64)-asgId-  = lens _asgId (\ s a -> s{_asgId = a}) .-      mapping _Coerce--instance FromJSON AudienceSegmentGroup where-        parseJSON-          = withObject "AudienceSegmentGroup"-              (\ o ->-                 AudienceSegmentGroup <$>-                   (o .:? "audienceSegments" .!= mempty) <*>-                     (o .:? "name")-                     <*> (o .:? "id"))--instance ToJSON AudienceSegmentGroup where-        toJSON AudienceSegmentGroup{..}-          = object-              (catMaybes-                 [("audienceSegments" .=) <$> _asgAudienceSegments,-                  ("name" .=) <$> _asgName, ("id" .=) <$> _asgId])---- | Contains information about an operating system that can be targeted by--- ads.------ /See:/ 'operatingSystem' smart constructor.-data OperatingSystem = OperatingSystem-    { _osDesktop :: !(Maybe Bool)-    , _osKind    :: !Text-    , _osName    :: !(Maybe Text)-    , _osMobile  :: !(Maybe Bool)-    , _osDartId  :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'OperatingSystem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'osDesktop'------ * 'osKind'------ * 'osName'------ * 'osMobile'------ * 'osDartId'-operatingSystem-    :: OperatingSystem-operatingSystem =-    OperatingSystem-    { _osDesktop = Nothing-    , _osKind = "dfareporting#operatingSystem"-    , _osName = Nothing-    , _osMobile = Nothing-    , _osDartId = Nothing-    }---- | Whether this operating system is for desktop.-osDesktop :: Lens' OperatingSystem (Maybe Bool)-osDesktop-  = lens _osDesktop (\ s a -> s{_osDesktop = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#operatingSystem\".-osKind :: Lens' OperatingSystem Text-osKind = lens _osKind (\ s a -> s{_osKind = a})---- | Name of this operating system.-osName :: Lens' OperatingSystem (Maybe Text)-osName = lens _osName (\ s a -> s{_osName = a})---- | Whether this operating system is for mobile.-osMobile :: Lens' OperatingSystem (Maybe Bool)-osMobile = lens _osMobile (\ s a -> s{_osMobile = a})---- | DART ID of this operating system. This is the ID used for targeting.-osDartId :: Lens' OperatingSystem (Maybe Int64)-osDartId-  = lens _osDartId (\ s a -> s{_osDartId = a}) .-      mapping _Coerce--instance FromJSON OperatingSystem where-        parseJSON-          = withObject "OperatingSystem"-              (\ o ->-                 OperatingSystem <$>-                   (o .:? "desktop") <*>-                     (o .:? "kind" .!= "dfareporting#operatingSystem")-                     <*> (o .:? "name")-                     <*> (o .:? "mobile")-                     <*> (o .:? "dartId"))--instance ToJSON OperatingSystem where-        toJSON OperatingSystem{..}-          = object-              (catMaybes-                 [("desktop" .=) <$> _osDesktop,-                  Just ("kind" .= _osKind), ("name" .=) <$> _osName,-                  ("mobile" .=) <$> _osMobile,-                  ("dartId" .=) <$> _osDartId])---- | Flight------ /See:/ 'flight' smart constructor.-data Flight = Flight-    { _fRateOrCost :: !(Maybe (Textual Int64))-    , _fEndDate    :: !(Maybe Date')-    , _fStartDate  :: !(Maybe Date')-    , _fUnits      :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'Flight' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'fRateOrCost'------ * 'fEndDate'------ * 'fStartDate'------ * 'fUnits'-flight-    :: Flight-flight =-    Flight-    { _fRateOrCost = Nothing-    , _fEndDate = Nothing-    , _fStartDate = Nothing-    , _fUnits = Nothing-    }---- | Rate or cost of this flight.-fRateOrCost :: Lens' Flight (Maybe Int64)-fRateOrCost-  = lens _fRateOrCost (\ s a -> s{_fRateOrCost = a}) .-      mapping _Coerce---- | Inventory item flight end date.-fEndDate :: Lens' Flight (Maybe Day)-fEndDate-  = lens _fEndDate (\ s a -> s{_fEndDate = a}) .-      mapping _Date---- | Inventory item flight start date.-fStartDate :: Lens' Flight (Maybe Day)-fStartDate-  = lens _fStartDate (\ s a -> s{_fStartDate = a}) .-      mapping _Date---- | Units of this flight.-fUnits :: Lens' Flight (Maybe Int64)-fUnits-  = lens _fUnits (\ s a -> s{_fUnits = a}) .-      mapping _Coerce--instance FromJSON Flight where-        parseJSON-          = withObject "Flight"-              (\ o ->-                 Flight <$>-                   (o .:? "rateOrCost") <*> (o .:? "endDate") <*>-                     (o .:? "startDate")-                     <*> (o .:? "units"))--instance ToJSON Flight where-        toJSON Flight{..}-          = object-              (catMaybes-                 [("rateOrCost" .=) <$> _fRateOrCost,-                  ("endDate" .=) <$> _fEndDate,-                  ("startDate" .=) <$> _fStartDate,-                  ("units" .=) <$> _fUnits])---- | City List Response------ /See:/ 'citiesListResponse' smart constructor.-data CitiesListResponse = CitiesListResponse-    { _citKind   :: !Text-    , _citCities :: !(Maybe [City])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CitiesListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'citKind'------ * 'citCities'-citiesListResponse-    :: CitiesListResponse-citiesListResponse =-    CitiesListResponse-    { _citKind = "dfareporting#citiesListResponse"-    , _citCities = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#citiesListResponse\".-citKind :: Lens' CitiesListResponse Text-citKind = lens _citKind (\ s a -> s{_citKind = a})---- | City collection.-citCities :: Lens' CitiesListResponse [City]-citCities-  = lens _citCities (\ s a -> s{_citCities = a}) .-      _Default-      . _Coerce--instance FromJSON CitiesListResponse where-        parseJSON-          = withObject "CitiesListResponse"-              (\ o ->-                 CitiesListResponse <$>-                   (o .:? "kind" .!= "dfareporting#citiesListResponse")-                     <*> (o .:? "cities" .!= mempty))--instance ToJSON CitiesListResponse where-        toJSON CitiesListResponse{..}-          = object-              (catMaybes-                 [Just ("kind" .= _citKind),-                  ("cities" .=) <$> _citCities])---- | Represents a dimension.------ /See:/ 'dimension' smart constructor.-data Dimension = Dimension-    { _dKind :: !Text-    , _dName :: !(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:------ * 'dKind'------ * 'dName'-dimension-    :: Dimension-dimension =-    Dimension-    { _dKind = "dfareporting#dimension"-    , _dName = Nothing-    }---- | The kind of resource this is, in this case dfareporting#dimension.-dKind :: Lens' Dimension Text-dKind = lens _dKind (\ s a -> s{_dKind = a})---- | The dimension name, e.g. dfa:advertiser-dName :: Lens' Dimension (Maybe Text)-dName = lens _dName (\ s a -> s{_dName = a})--instance FromJSON Dimension where-        parseJSON-          = withObject "Dimension"-              (\ o ->-                 Dimension <$>-                   (o .:? "kind" .!= "dfareporting#dimension") <*>-                     (o .:? "name"))--instance ToJSON Dimension where-        toJSON Dimension{..}-          = object-              (catMaybes-                 [Just ("kind" .= _dKind), ("name" .=) <$> _dName])---- | The report criteria for a report of type \"REACH\".------ /See:/ 'reportReachCriteria' smart constructor.-data ReportReachCriteria = ReportReachCriteria-    { _rrcReachByFrequencyMetricNames    :: !(Maybe [Text])-    , _rrcEnableAllDimensionCombinations :: !(Maybe Bool)-    , _rrcMetricNames                    :: !(Maybe [Text])-    , _rrcCustomRichMediaEvents          :: !(Maybe CustomRichMediaEvents)-    , _rrcDimensionFilters               :: !(Maybe [DimensionValue])-    , _rrcActivities                     :: !(Maybe Activities)-    , _rrcDateRange                      :: !(Maybe DateRange)-    , _rrcDimensions                     :: !(Maybe [SortedDimension])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ReportReachCriteria' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rrcReachByFrequencyMetricNames'------ * 'rrcEnableAllDimensionCombinations'------ * 'rrcMetricNames'------ * 'rrcCustomRichMediaEvents'------ * 'rrcDimensionFilters'------ * 'rrcActivities'------ * 'rrcDateRange'------ * 'rrcDimensions'-reportReachCriteria-    :: ReportReachCriteria-reportReachCriteria =-    ReportReachCriteria-    { _rrcReachByFrequencyMetricNames = Nothing-    , _rrcEnableAllDimensionCombinations = Nothing-    , _rrcMetricNames = Nothing-    , _rrcCustomRichMediaEvents = Nothing-    , _rrcDimensionFilters = Nothing-    , _rrcActivities = Nothing-    , _rrcDateRange = Nothing-    , _rrcDimensions = Nothing-    }---- | The list of names of Reach By Frequency metrics the report should--- include.-rrcReachByFrequencyMetricNames :: Lens' ReportReachCriteria [Text]-rrcReachByFrequencyMetricNames-  = lens _rrcReachByFrequencyMetricNames-      (\ s a -> s{_rrcReachByFrequencyMetricNames = a})-      . _Default-      . _Coerce---- | Whether to enable all reach dimension combinations in the report.--- Defaults to false. If enabled, the date range of the report should be--- within the last three months.-rrcEnableAllDimensionCombinations :: Lens' ReportReachCriteria (Maybe Bool)-rrcEnableAllDimensionCombinations-  = lens _rrcEnableAllDimensionCombinations-      (\ s a -> s{_rrcEnableAllDimensionCombinations = a})---- | The list of names of metrics the report should include.-rrcMetricNames :: Lens' ReportReachCriteria [Text]-rrcMetricNames-  = lens _rrcMetricNames-      (\ s a -> s{_rrcMetricNames = a})-      . _Default-      . _Coerce---- | Custom Rich Media Events group.-rrcCustomRichMediaEvents :: Lens' ReportReachCriteria (Maybe CustomRichMediaEvents)-rrcCustomRichMediaEvents-  = lens _rrcCustomRichMediaEvents-      (\ s a -> s{_rrcCustomRichMediaEvents = a})---- | The list of filters on which dimensions are filtered. Filters for--- different dimensions are ANDed, filters for the same dimension are--- grouped together and ORed.-rrcDimensionFilters :: Lens' ReportReachCriteria [DimensionValue]-rrcDimensionFilters-  = lens _rrcDimensionFilters-      (\ s a -> s{_rrcDimensionFilters = a})-      . _Default-      . _Coerce---- | Activity group.-rrcActivities :: Lens' ReportReachCriteria (Maybe Activities)-rrcActivities-  = lens _rrcActivities-      (\ s a -> s{_rrcActivities = a})---- | The date range this report should be run for.-rrcDateRange :: Lens' ReportReachCriteria (Maybe DateRange)-rrcDateRange-  = lens _rrcDateRange (\ s a -> s{_rrcDateRange = a})---- | The list of dimensions the report should include.-rrcDimensions :: Lens' ReportReachCriteria [SortedDimension]-rrcDimensions-  = lens _rrcDimensions-      (\ s a -> s{_rrcDimensions = a})-      . _Default-      . _Coerce--instance FromJSON ReportReachCriteria where-        parseJSON-          = withObject "ReportReachCriteria"-              (\ o ->-                 ReportReachCriteria <$>-                   (o .:? "reachByFrequencyMetricNames" .!= mempty) <*>-                     (o .:? "enableAllDimensionCombinations")-                     <*> (o .:? "metricNames" .!= mempty)-                     <*> (o .:? "customRichMediaEvents")-                     <*> (o .:? "dimensionFilters" .!= mempty)-                     <*> (o .:? "activities")-                     <*> (o .:? "dateRange")-                     <*> (o .:? "dimensions" .!= mempty))--instance ToJSON ReportReachCriteria where-        toJSON ReportReachCriteria{..}-          = object-              (catMaybes-                 [("reachByFrequencyMetricNames" .=) <$>-                    _rrcReachByFrequencyMetricNames,-                  ("enableAllDimensionCombinations" .=) <$>-                    _rrcEnableAllDimensionCombinations,-                  ("metricNames" .=) <$> _rrcMetricNames,-                  ("customRichMediaEvents" .=) <$>-                    _rrcCustomRichMediaEvents,-                  ("dimensionFilters" .=) <$> _rrcDimensionFilters,-                  ("activities" .=) <$> _rrcActivities,-                  ("dateRange" .=) <$> _rrcDateRange,-                  ("dimensions" .=) <$> _rrcDimensions])---- | Represents a Custom Rich Media Events group.------ /See:/ 'customRichMediaEvents' smart constructor.-data CustomRichMediaEvents = CustomRichMediaEvents-    { _crmeKind             :: !Text-    , _crmeFilteredEventIds :: !(Maybe [DimensionValue])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CustomRichMediaEvents' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'crmeKind'------ * 'crmeFilteredEventIds'-customRichMediaEvents-    :: CustomRichMediaEvents-customRichMediaEvents =-    CustomRichMediaEvents-    { _crmeKind = "dfareporting#customRichMediaEvents"-    , _crmeFilteredEventIds = Nothing-    }---- | The kind of resource this is, in this case--- dfareporting#customRichMediaEvents.-crmeKind :: Lens' CustomRichMediaEvents Text-crmeKind = lens _crmeKind (\ s a -> s{_crmeKind = a})---- | List of custom rich media event IDs. Dimension values must be all of--- type dfa:richMediaEventTypeIdAndName.-crmeFilteredEventIds :: Lens' CustomRichMediaEvents [DimensionValue]-crmeFilteredEventIds-  = lens _crmeFilteredEventIds-      (\ s a -> s{_crmeFilteredEventIds = a})-      . _Default-      . _Coerce--instance FromJSON CustomRichMediaEvents where-        parseJSON-          = withObject "CustomRichMediaEvents"-              (\ o ->-                 CustomRichMediaEvents <$>-                   (o .:? "kind" .!=-                      "dfareporting#customRichMediaEvents")-                     <*> (o .:? "filteredEventIds" .!= mempty))--instance ToJSON CustomRichMediaEvents where-        toJSON CustomRichMediaEvents{..}-          = object-              (catMaybes-                 [Just ("kind" .= _crmeKind),-                  ("filteredEventIds" .=) <$> _crmeFilteredEventIds])---- | Targetable remarketing list response------ /See:/ 'targetableRemarketingListsListResponse' smart constructor.-data TargetableRemarketingListsListResponse = TargetableRemarketingListsListResponse-    { _trllrNextPageToken              :: !(Maybe Text)-    , _trllrKind                       :: !Text-    , _trllrTargetableRemarketingLists :: !(Maybe [TargetableRemarketingList])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'TargetableRemarketingListsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'trllrNextPageToken'------ * 'trllrKind'------ * 'trllrTargetableRemarketingLists'-targetableRemarketingListsListResponse-    :: TargetableRemarketingListsListResponse-targetableRemarketingListsListResponse =-    TargetableRemarketingListsListResponse-    { _trllrNextPageToken = Nothing-    , _trllrKind = "dfareporting#targetableRemarketingListsListResponse"-    , _trllrTargetableRemarketingLists = Nothing-    }---- | Pagination token to be used for the next list operation.-trllrNextPageToken :: Lens' TargetableRemarketingListsListResponse (Maybe Text)-trllrNextPageToken-  = lens _trllrNextPageToken-      (\ s a -> s{_trllrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#targetableRemarketingListsListResponse\".-trllrKind :: Lens' TargetableRemarketingListsListResponse Text-trllrKind-  = lens _trllrKind (\ s a -> s{_trllrKind = a})---- | Targetable remarketing list collection.-trllrTargetableRemarketingLists :: Lens' TargetableRemarketingListsListResponse [TargetableRemarketingList]-trllrTargetableRemarketingLists-  = lens _trllrTargetableRemarketingLists-      (\ s a -> s{_trllrTargetableRemarketingLists = a})-      . _Default-      . _Coerce--instance FromJSON-         TargetableRemarketingListsListResponse where-        parseJSON-          = withObject "TargetableRemarketingListsListResponse"-              (\ o ->-                 TargetableRemarketingListsListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!=-                        "dfareporting#targetableRemarketingListsListResponse")-                     <*> (o .:? "targetableRemarketingLists" .!= mempty))--instance ToJSON-         TargetableRemarketingListsListResponse where-        toJSON TargetableRemarketingListsListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _trllrNextPageToken,-                  Just ("kind" .= _trllrKind),-                  ("targetableRemarketingLists" .=) <$>-                    _trllrTargetableRemarketingLists])---- | Change Log List Response------ /See:/ 'changeLogsListResponse' smart constructor.-data ChangeLogsListResponse = ChangeLogsListResponse-    { _cllrNextPageToken :: !(Maybe Text)-    , _cllrKind          :: !Text-    , _cllrChangeLogs    :: !(Maybe [ChangeLog])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ChangeLogsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cllrNextPageToken'------ * 'cllrKind'------ * 'cllrChangeLogs'-changeLogsListResponse-    :: ChangeLogsListResponse-changeLogsListResponse =-    ChangeLogsListResponse-    { _cllrNextPageToken = Nothing-    , _cllrKind = "dfareporting#changeLogsListResponse"-    , _cllrChangeLogs = Nothing-    }---- | Pagination token to be used for the next list operation.-cllrNextPageToken :: Lens' ChangeLogsListResponse (Maybe Text)-cllrNextPageToken-  = lens _cllrNextPageToken-      (\ s a -> s{_cllrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#changeLogsListResponse\".-cllrKind :: Lens' ChangeLogsListResponse Text-cllrKind = lens _cllrKind (\ s a -> s{_cllrKind = a})---- | Change log collection.-cllrChangeLogs :: Lens' ChangeLogsListResponse [ChangeLog]-cllrChangeLogs-  = lens _cllrChangeLogs-      (\ s a -> s{_cllrChangeLogs = a})-      . _Default-      . _Coerce--instance FromJSON ChangeLogsListResponse where-        parseJSON-          = withObject "ChangeLogsListResponse"-              (\ o ->-                 ChangeLogsListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!=-                        "dfareporting#changeLogsListResponse")-                     <*> (o .:? "changeLogs" .!= mempty))--instance ToJSON ChangeLogsListResponse where-        toJSON ChangeLogsListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _cllrNextPageToken,-                  Just ("kind" .= _cllrKind),-                  ("changeLogs" .=) <$> _cllrChangeLogs])---- | AccountUserProfiles contains properties of a DCM user profile. This--- resource is specifically for managing user profiles, whereas--- UserProfiles is for accessing the API.------ /See:/ 'accountUserProFile' smart constructor.-data AccountUserProFile = AccountUserProFile-    { _aupfEmail            :: !(Maybe Text)-    , _aupfUserRoleFilter   :: !(Maybe ObjectFilter)-    , _aupfAdvertiserFilter :: !(Maybe ObjectFilter)-    , _aupfUserRoleId       :: !(Maybe (Textual Int64))-    , _aupfKind             :: !Text-    , _aupfLocale           :: !(Maybe Text)-    , _aupfSiteFilter       :: !(Maybe ObjectFilter)-    , _aupfTraffickerType   :: !(Maybe AccountUserProFileTraffickerType)-    , _aupfActive           :: !(Maybe Bool)-    , _aupfAccountId        :: !(Maybe (Textual Int64))-    , _aupfName             :: !(Maybe Text)-    , _aupfId               :: !(Maybe (Textual Int64))-    , _aupfUserAccessType   :: !(Maybe AccountUserProFileUserAccessType)-    , _aupfComments         :: !(Maybe Text)-    , _aupfSubAccountId     :: !(Maybe (Textual Int64))-    , _aupfCampaignFilter   :: !(Maybe ObjectFilter)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'AccountUserProFile' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aupfEmail'------ * 'aupfUserRoleFilter'------ * 'aupfAdvertiserFilter'------ * 'aupfUserRoleId'------ * 'aupfKind'------ * 'aupfLocale'------ * 'aupfSiteFilter'------ * 'aupfTraffickerType'------ * 'aupfActive'------ * 'aupfAccountId'------ * 'aupfName'------ * 'aupfId'------ * 'aupfUserAccessType'------ * 'aupfComments'------ * 'aupfSubAccountId'------ * 'aupfCampaignFilter'-accountUserProFile-    :: AccountUserProFile-accountUserProFile =-    AccountUserProFile-    { _aupfEmail = Nothing-    , _aupfUserRoleFilter = Nothing-    , _aupfAdvertiserFilter = Nothing-    , _aupfUserRoleId = Nothing-    , _aupfKind = "dfareporting#accountUserProfile"-    , _aupfLocale = Nothing-    , _aupfSiteFilter = Nothing-    , _aupfTraffickerType = Nothing-    , _aupfActive = Nothing-    , _aupfAccountId = Nothing-    , _aupfName = Nothing-    , _aupfId = Nothing-    , _aupfUserAccessType = Nothing-    , _aupfComments = Nothing-    , _aupfSubAccountId = Nothing-    , _aupfCampaignFilter = Nothing-    }---- | Email of the user profile. The email addresss must be linked to a Google--- Account. This field is required on insertion and is read-only after--- insertion.-aupfEmail :: Lens' AccountUserProFile (Maybe Text)-aupfEmail-  = lens _aupfEmail (\ s a -> s{_aupfEmail = a})---- | Filter that describes which user roles are visible to the user profile.-aupfUserRoleFilter :: Lens' AccountUserProFile (Maybe ObjectFilter)-aupfUserRoleFilter-  = lens _aupfUserRoleFilter-      (\ s a -> s{_aupfUserRoleFilter = a})---- | Filter that describes which advertisers are visible to the user profile.-aupfAdvertiserFilter :: Lens' AccountUserProFile (Maybe ObjectFilter)-aupfAdvertiserFilter-  = lens _aupfAdvertiserFilter-      (\ s a -> s{_aupfAdvertiserFilter = a})---- | User role ID of the user profile. This is a required field.-aupfUserRoleId :: Lens' AccountUserProFile (Maybe Int64)-aupfUserRoleId-  = lens _aupfUserRoleId-      (\ s a -> s{_aupfUserRoleId = a})-      . mapping _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#accountUserProfile\".-aupfKind :: Lens' AccountUserProFile Text-aupfKind = lens _aupfKind (\ s a -> s{_aupfKind = a})---- | Locale of the user profile. This is a required field. Acceptable values--- are: - \"cs\" (Czech) - \"de\" (German) - \"en\" (English) - \"en-GB\"--- (English United Kingdom) - \"es\" (Spanish) - \"fr\" (French) - \"it\"--- (Italian) - \"ja\" (Japanese) - \"ko\" (Korean) - \"pl\" (Polish) ---- \"pt-BR\" (Portuguese Brazil) - \"ru\" (Russian) - \"sv\" (Swedish) ---- \"tr\" (Turkish) - \"zh-CN\" (Chinese Simplified) - \"zh-TW\" (Chinese--- Traditional)-aupfLocale :: Lens' AccountUserProFile (Maybe Text)-aupfLocale-  = lens _aupfLocale (\ s a -> s{_aupfLocale = a})---- | Filter that describes which sites are visible to the user profile.-aupfSiteFilter :: Lens' AccountUserProFile (Maybe ObjectFilter)-aupfSiteFilter-  = lens _aupfSiteFilter-      (\ s a -> s{_aupfSiteFilter = a})---- | Trafficker type of this user profile.-aupfTraffickerType :: Lens' AccountUserProFile (Maybe AccountUserProFileTraffickerType)-aupfTraffickerType-  = lens _aupfTraffickerType-      (\ s a -> s{_aupfTraffickerType = a})---- | Whether this user profile is active. This defaults to false, and must be--- set true on insert for the user profile to be usable.-aupfActive :: Lens' AccountUserProFile (Maybe Bool)-aupfActive-  = lens _aupfActive (\ s a -> s{_aupfActive = a})---- | Account ID of the user profile. This is a read-only field that can be--- left blank.-aupfAccountId :: Lens' AccountUserProFile (Maybe Int64)-aupfAccountId-  = lens _aupfAccountId-      (\ s a -> s{_aupfAccountId = a})-      . mapping _Coerce---- | Name of the user profile. This is a required field. Must be less than 64--- characters long, must be globally unique, and cannot contain whitespace--- or any of the following characters: \"&;\"#%,\".-aupfName :: Lens' AccountUserProFile (Maybe Text)-aupfName = lens _aupfName (\ s a -> s{_aupfName = a})---- | ID of the user profile. This is a read-only, auto-generated field.-aupfId :: Lens' AccountUserProFile (Maybe Int64)-aupfId-  = lens _aupfId (\ s a -> s{_aupfId = a}) .-      mapping _Coerce---- | User type of the user profile. This is a read-only field that can be--- left blank.-aupfUserAccessType :: Lens' AccountUserProFile (Maybe AccountUserProFileUserAccessType)-aupfUserAccessType-  = lens _aupfUserAccessType-      (\ s a -> s{_aupfUserAccessType = a})---- | Comments for this user profile.-aupfComments :: Lens' AccountUserProFile (Maybe Text)-aupfComments-  = lens _aupfComments (\ s a -> s{_aupfComments = a})---- | Subaccount ID of the user profile. This is a read-only field that can be--- left blank.-aupfSubAccountId :: Lens' AccountUserProFile (Maybe Int64)-aupfSubAccountId-  = lens _aupfSubAccountId-      (\ s a -> s{_aupfSubAccountId = a})-      . mapping _Coerce---- | Filter that describes which campaigns are visible to the user profile.-aupfCampaignFilter :: Lens' AccountUserProFile (Maybe ObjectFilter)-aupfCampaignFilter-  = lens _aupfCampaignFilter-      (\ s a -> s{_aupfCampaignFilter = a})--instance FromJSON AccountUserProFile where-        parseJSON-          = withObject "AccountUserProFile"-              (\ o ->-                 AccountUserProFile <$>-                   (o .:? "email") <*> (o .:? "userRoleFilter") <*>-                     (o .:? "advertiserFilter")-                     <*> (o .:? "userRoleId")-                     <*>-                     (o .:? "kind" .!= "dfareporting#accountUserProfile")-                     <*> (o .:? "locale")-                     <*> (o .:? "siteFilter")-                     <*> (o .:? "traffickerType")-                     <*> (o .:? "active")-                     <*> (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "id")-                     <*> (o .:? "userAccessType")-                     <*> (o .:? "comments")-                     <*> (o .:? "subaccountId")-                     <*> (o .:? "campaignFilter"))--instance ToJSON AccountUserProFile where-        toJSON AccountUserProFile{..}-          = object-              (catMaybes-                 [("email" .=) <$> _aupfEmail,-                  ("userRoleFilter" .=) <$> _aupfUserRoleFilter,-                  ("advertiserFilter" .=) <$> _aupfAdvertiserFilter,-                  ("userRoleId" .=) <$> _aupfUserRoleId,-                  Just ("kind" .= _aupfKind),-                  ("locale" .=) <$> _aupfLocale,-                  ("siteFilter" .=) <$> _aupfSiteFilter,-                  ("traffickerType" .=) <$> _aupfTraffickerType,-                  ("active" .=) <$> _aupfActive,-                  ("accountId" .=) <$> _aupfAccountId,-                  ("name" .=) <$> _aupfName, ("id" .=) <$> _aupfId,-                  ("userAccessType" .=) <$> _aupfUserAccessType,-                  ("comments" .=) <$> _aupfComments,-                  ("subaccountId" .=) <$> _aupfSubAccountId,-                  ("campaignFilter" .=) <$> _aupfCampaignFilter])---- | Represents a DimensionValue resource.------ /See:/ 'dimensionValue' smart constructor.-data DimensionValue = DimensionValue-    { _dvEtag          :: !(Maybe Text)-    , _dvKind          :: !Text-    , _dvValue         :: !(Maybe Text)-    , _dvMatchType     :: !(Maybe DimensionValueMatchType)-    , _dvDimensionName :: !(Maybe Text)-    , _dvId            :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'DimensionValue' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dvEtag'------ * 'dvKind'------ * 'dvValue'------ * 'dvMatchType'------ * 'dvDimensionName'------ * 'dvId'-dimensionValue-    :: DimensionValue-dimensionValue =-    DimensionValue-    { _dvEtag = Nothing-    , _dvKind = "dfareporting#dimensionValue"-    , _dvValue = Nothing-    , _dvMatchType = Nothing-    , _dvDimensionName = Nothing-    , _dvId = Nothing-    }---- | The eTag of this response for caching purposes.-dvEtag :: Lens' DimensionValue (Maybe Text)-dvEtag = lens _dvEtag (\ s a -> s{_dvEtag = a})---- | The kind of resource this is, in this case dfareporting#dimensionValue.-dvKind :: Lens' DimensionValue Text-dvKind = lens _dvKind (\ s a -> s{_dvKind = a})---- | The value of the dimension.-dvValue :: Lens' DimensionValue (Maybe Text)-dvValue = lens _dvValue (\ s a -> s{_dvValue = a})---- | Determines how the \'value\' field is matched when filtering. If not--- specified, defaults to EXACT. If set to WILDCARD_EXPRESSION, \'*\' is--- allowed as a placeholder for variable length character sequences, and it--- can be escaped with a backslash. Note, only paid search dimensions--- (\'dfa:paidSearch*\') allow a matchType other than EXACT.-dvMatchType :: Lens' DimensionValue (Maybe DimensionValueMatchType)-dvMatchType-  = lens _dvMatchType (\ s a -> s{_dvMatchType = a})---- | The name of the dimension.-dvDimensionName :: Lens' DimensionValue (Maybe Text)-dvDimensionName-  = lens _dvDimensionName-      (\ s a -> s{_dvDimensionName = a})---- | The ID associated with the value if available.-dvId :: Lens' DimensionValue (Maybe Text)-dvId = lens _dvId (\ s a -> s{_dvId = a})--instance FromJSON DimensionValue where-        parseJSON-          = withObject "DimensionValue"-              (\ o ->-                 DimensionValue <$>-                   (o .:? "etag") <*>-                     (o .:? "kind" .!= "dfareporting#dimensionValue")-                     <*> (o .:? "value")-                     <*> (o .:? "matchType")-                     <*> (o .:? "dimensionName")-                     <*> (o .:? "id"))--instance ToJSON DimensionValue where-        toJSON DimensionValue{..}-          = object-              (catMaybes-                 [("etag" .=) <$> _dvEtag, Just ("kind" .= _dvKind),-                  ("value" .=) <$> _dvValue,-                  ("matchType" .=) <$> _dvMatchType,-                  ("dimensionName" .=) <$> _dvDimensionName,-                  ("id" .=) <$> _dvId])---- | Represents an activity group.------ /See:/ 'activities' smart constructor.-data Activities = Activities-    { _actKind        :: !Text-    , _actMetricNames :: !(Maybe [Text])-    , _actFilters     :: !(Maybe [DimensionValue])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'Activities' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'actKind'------ * 'actMetricNames'------ * 'actFilters'-activities-    :: Activities-activities =-    Activities-    { _actKind = "dfareporting#activities"-    , _actMetricNames = Nothing-    , _actFilters = Nothing-    }---- | The kind of resource this is, in this case dfareporting#activities.-actKind :: Lens' Activities Text-actKind = lens _actKind (\ s a -> s{_actKind = a})---- | List of names of floodlight activity metrics.-actMetricNames :: Lens' Activities [Text]-actMetricNames-  = lens _actMetricNames-      (\ s a -> s{_actMetricNames = a})-      . _Default-      . _Coerce---- | List of activity filters. The dimension values need to be all either of--- type \"dfa:activity\" or \"dfa:activityGroup\".-actFilters :: Lens' Activities [DimensionValue]-actFilters-  = lens _actFilters (\ s a -> s{_actFilters = a}) .-      _Default-      . _Coerce--instance FromJSON Activities where-        parseJSON-          = withObject "Activities"-              (\ o ->-                 Activities <$>-                   (o .:? "kind" .!= "dfareporting#activities") <*>-                     (o .:? "metricNames" .!= mempty)-                     <*> (o .:? "filters" .!= mempty))--instance ToJSON Activities where-        toJSON Activities{..}-          = object-              (catMaybes-                 [Just ("kind" .= _actKind),-                  ("metricNames" .=) <$> _actMetricNames,-                  ("filters" .=) <$> _actFilters])---- | User Role Permission Group List Response------ /See:/ 'userRolePermissionGroupsListResponse' smart constructor.-data UserRolePermissionGroupsListResponse = UserRolePermissionGroupsListResponse-    { _urpglrUserRolePermissionGroups :: !(Maybe [UserRolePermissionGroup])-    , _urpglrKind                     :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'UserRolePermissionGroupsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'urpglrUserRolePermissionGroups'------ * 'urpglrKind'-userRolePermissionGroupsListResponse-    :: UserRolePermissionGroupsListResponse-userRolePermissionGroupsListResponse =-    UserRolePermissionGroupsListResponse-    { _urpglrUserRolePermissionGroups = Nothing-    , _urpglrKind = "dfareporting#userRolePermissionGroupsListResponse"-    }---- | User role permission group collection.-urpglrUserRolePermissionGroups :: Lens' UserRolePermissionGroupsListResponse [UserRolePermissionGroup]-urpglrUserRolePermissionGroups-  = lens _urpglrUserRolePermissionGroups-      (\ s a -> s{_urpglrUserRolePermissionGroups = a})-      . _Default-      . _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#userRolePermissionGroupsListResponse\".-urpglrKind :: Lens' UserRolePermissionGroupsListResponse Text-urpglrKind-  = lens _urpglrKind (\ s a -> s{_urpglrKind = a})--instance FromJSON-         UserRolePermissionGroupsListResponse where-        parseJSON-          = withObject "UserRolePermissionGroupsListResponse"-              (\ o ->-                 UserRolePermissionGroupsListResponse <$>-                   (o .:? "userRolePermissionGroups" .!= mempty) <*>-                     (o .:? "kind" .!=-                        "dfareporting#userRolePermissionGroupsListResponse"))--instance ToJSON UserRolePermissionGroupsListResponse-         where-        toJSON UserRolePermissionGroupsListResponse{..}-          = object-              (catMaybes-                 [("userRolePermissionGroups" .=) <$>-                    _urpglrUserRolePermissionGroups,-                  Just ("kind" .= _urpglrKind)])---- | Placement Tag------ /See:/ 'placementTag' smart constructor.-data PlacementTag = PlacementTag-    { _ptPlacementId :: !(Maybe (Textual Int64))-    , _ptTagDatas    :: !(Maybe [TagData])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'PlacementTag' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ptPlacementId'------ * 'ptTagDatas'-placementTag-    :: PlacementTag-placementTag =-    PlacementTag-    { _ptPlacementId = Nothing-    , _ptTagDatas = Nothing-    }---- | Placement ID-ptPlacementId :: Lens' PlacementTag (Maybe Int64)-ptPlacementId-  = lens _ptPlacementId-      (\ s a -> s{_ptPlacementId = a})-      . mapping _Coerce---- | Tags generated for this placement.-ptTagDatas :: Lens' PlacementTag [TagData]-ptTagDatas-  = lens _ptTagDatas (\ s a -> s{_ptTagDatas = a}) .-      _Default-      . _Coerce--instance FromJSON PlacementTag where-        parseJSON-          = withObject "PlacementTag"-              (\ o ->-                 PlacementTag <$>-                   (o .:? "placementId") <*>-                     (o .:? "tagDatas" .!= mempty))--instance ToJSON PlacementTag where-        toJSON PlacementTag{..}-          = object-              (catMaybes-                 [("placementId" .=) <$> _ptPlacementId,-                  ("tagDatas" .=) <$> _ptTagDatas])---- | Remarketing list response------ /See:/ 'remarketingListsListResponse' smart constructor.-data RemarketingListsListResponse = RemarketingListsListResponse-    { _rllrNextPageToken    :: !(Maybe Text)-    , _rllrRemarketingLists :: !(Maybe [RemarketingList])-    , _rllrKind             :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'RemarketingListsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rllrNextPageToken'------ * 'rllrRemarketingLists'------ * 'rllrKind'-remarketingListsListResponse-    :: RemarketingListsListResponse-remarketingListsListResponse =-    RemarketingListsListResponse-    { _rllrNextPageToken = Nothing-    , _rllrRemarketingLists = Nothing-    , _rllrKind = "dfareporting#remarketingListsListResponse"-    }---- | Pagination token to be used for the next list operation.-rllrNextPageToken :: Lens' RemarketingListsListResponse (Maybe Text)-rllrNextPageToken-  = lens _rllrNextPageToken-      (\ s a -> s{_rllrNextPageToken = a})---- | Remarketing list collection.-rllrRemarketingLists :: Lens' RemarketingListsListResponse [RemarketingList]-rllrRemarketingLists-  = lens _rllrRemarketingLists-      (\ s a -> s{_rllrRemarketingLists = a})-      . _Default-      . _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#remarketingListsListResponse\".-rllrKind :: Lens' RemarketingListsListResponse Text-rllrKind = lens _rllrKind (\ s a -> s{_rllrKind = a})--instance FromJSON RemarketingListsListResponse where-        parseJSON-          = withObject "RemarketingListsListResponse"-              (\ o ->-                 RemarketingListsListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "remarketingLists" .!= mempty)-                     <*>-                     (o .:? "kind" .!=-                        "dfareporting#remarketingListsListResponse"))--instance ToJSON RemarketingListsListResponse where-        toJSON RemarketingListsListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _rllrNextPageToken,-                  ("remarketingLists" .=) <$> _rllrRemarketingLists,-                  Just ("kind" .= _rllrKind)])---- | Contains properties of a Creative.------ /See:/ 'creative' smart constructor.-data Creative = Creative-    { _creConvertFlashToHTML5                 :: !(Maybe Bool)-    , _creBackupImageTargetWindow             :: !(Maybe TargetWindow)-    , _creRenderingIdDimensionValue           :: !(Maybe DimensionValue)-    , _creCustomKeyValues                     :: !(Maybe [Text])-    , _creVideoDuration                       :: !(Maybe (Textual Double))-    , _creRenderingId                         :: !(Maybe (Textual Int64))-    , _creThirdPartyBackupImageImpressionsURL :: !(Maybe Text)-    , _creFsCommand                           :: !(Maybe FsCommand)-    , _creAllowScriptAccess                   :: !(Maybe Bool)-    , _creHTMLCodeLocked                      :: !(Maybe Bool)-    , _creRequiredFlashPluginVersion          :: !(Maybe Text)-    , _creAuthoringTool                       :: !(Maybe CreativeAuthoringTool)-    , _creSize                                :: !(Maybe Size)-    , _creThirdPartyURLs                      :: !(Maybe [ThirdPartyTrackingURL])-    , _creCounterCustomEvents                 :: !(Maybe [CreativeCustomEvent])-    , _creKind                                :: !Text-    , _creSSLOverride                         :: !(Maybe Bool)-    , _creHTMLCode                            :: !(Maybe Text)-    , _creAdvertiserId                        :: !(Maybe (Textual Int64))-    , _creRequiredFlashVersion                :: !(Maybe (Textual Int32))-    , _creBackgRoundColor                     :: !(Maybe Text)-    , _creAdTagKeys                           :: !(Maybe [Text])-    , _creSkippable                           :: !(Maybe Bool)-    , _creSSLCompliant                        :: !(Maybe Bool)-    , _creIdDimensionValue                    :: !(Maybe DimensionValue)-    , _creBackupImageReportingLabel           :: !(Maybe Text)-    , _creCommercialId                        :: !(Maybe Text)-    , _creActive                              :: !(Maybe Bool)-    , _creExitCustomEvents                    :: !(Maybe [CreativeCustomEvent])-    , _creAccountId                           :: !(Maybe (Textual Int64))-    , _creBackupImageClickThroughURL          :: !(Maybe Text)-    , _creName                                :: !(Maybe Text)-    , _creOverrideCss                         :: !(Maybe Text)-    , _creVideoDescription                    :: !(Maybe Text)-    , _creClickTags                           :: !(Maybe [ClickTag])-    , _creAdParameters                        :: !(Maybe Text)-    , _creVersion                             :: !(Maybe (Textual Int32))-    , _creLatestTraffickedCreativeId          :: !(Maybe (Textual Int64))-    , _creThirdPartyRichMediaImpressionsURL   :: !(Maybe Text)-    , _creLastModifiedInfo                    :: !(Maybe LastModifiedInfo)-    , _creId                                  :: !(Maybe (Textual Int64))-    , _creStudioAdvertiserId                  :: !(Maybe (Textual Int64))-    , _creCreativeAssets                      :: !(Maybe [CreativeAsset])-    , _creSubAccountId                        :: !(Maybe (Textual Int64))-    , _creType                                :: !(Maybe CreativeType)-    , _creTimerCustomEvents                   :: !(Maybe [CreativeCustomEvent])-    , _creStudioCreativeId                    :: !(Maybe (Textual Int64))-    , _creCompatibility                       :: !(Maybe [CreativeCompatibilityItem])-    , _creBackupImageFeatures                 :: !(Maybe [CreativeBackupImageFeaturesItem])-    , _creArtworkType                         :: !(Maybe CreativeArtworkType)-    , _creArchived                            :: !(Maybe Bool)-    , _creCompanionCreatives                  :: !(Maybe [Textual Int64])-    , _creTotalFileSize                       :: !(Maybe (Textual Int64))-    , _creStudioTraffickedCreativeId          :: !(Maybe (Textual Int64))-    , _creRedirectURL                         :: !(Maybe Text)-    , _creAutoAdvanceImages                   :: !(Maybe Bool)-    , _creCreativeFieldAssignments            :: !(Maybe [CreativeFieldAssignment])-    } 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:------ * 'creConvertFlashToHTML5'------ * 'creBackupImageTargetWindow'------ * 'creRenderingIdDimensionValue'------ * 'creCustomKeyValues'------ * 'creVideoDuration'------ * 'creRenderingId'------ * 'creThirdPartyBackupImageImpressionsURL'------ * 'creFsCommand'------ * 'creAllowScriptAccess'------ * 'creHTMLCodeLocked'------ * 'creRequiredFlashPluginVersion'------ * 'creAuthoringTool'------ * 'creSize'------ * 'creThirdPartyURLs'------ * 'creCounterCustomEvents'------ * 'creKind'------ * 'creSSLOverride'------ * 'creHTMLCode'------ * 'creAdvertiserId'------ * 'creRequiredFlashVersion'------ * 'creBackgRoundColor'------ * 'creAdTagKeys'------ * 'creSkippable'------ * 'creSSLCompliant'------ * 'creIdDimensionValue'------ * 'creBackupImageReportingLabel'------ * 'creCommercialId'------ * 'creActive'------ * 'creExitCustomEvents'------ * 'creAccountId'------ * 'creBackupImageClickThroughURL'------ * 'creName'------ * 'creOverrideCss'------ * 'creVideoDescription'------ * 'creClickTags'------ * 'creAdParameters'------ * 'creVersion'------ * 'creLatestTraffickedCreativeId'------ * 'creThirdPartyRichMediaImpressionsURL'------ * 'creLastModifiedInfo'------ * 'creId'------ * 'creStudioAdvertiserId'------ * 'creCreativeAssets'------ * 'creSubAccountId'------ * 'creType'------ * 'creTimerCustomEvents'------ * 'creStudioCreativeId'------ * 'creCompatibility'------ * 'creBackupImageFeatures'------ * 'creArtworkType'------ * 'creArchived'------ * 'creCompanionCreatives'------ * 'creTotalFileSize'------ * 'creStudioTraffickedCreativeId'------ * 'creRedirectURL'------ * 'creAutoAdvanceImages'------ * 'creCreativeFieldAssignments'-creative-    :: Creative-creative =-    Creative-    { _creConvertFlashToHTML5 = Nothing-    , _creBackupImageTargetWindow = Nothing-    , _creRenderingIdDimensionValue = Nothing-    , _creCustomKeyValues = Nothing-    , _creVideoDuration = Nothing-    , _creRenderingId = Nothing-    , _creThirdPartyBackupImageImpressionsURL = Nothing-    , _creFsCommand = Nothing-    , _creAllowScriptAccess = Nothing-    , _creHTMLCodeLocked = Nothing-    , _creRequiredFlashPluginVersion = Nothing-    , _creAuthoringTool = Nothing-    , _creSize = Nothing-    , _creThirdPartyURLs = Nothing-    , _creCounterCustomEvents = Nothing-    , _creKind = "dfareporting#creative"-    , _creSSLOverride = Nothing-    , _creHTMLCode = Nothing-    , _creAdvertiserId = Nothing-    , _creRequiredFlashVersion = Nothing-    , _creBackgRoundColor = Nothing-    , _creAdTagKeys = Nothing-    , _creSkippable = Nothing-    , _creSSLCompliant = Nothing-    , _creIdDimensionValue = Nothing-    , _creBackupImageReportingLabel = Nothing-    , _creCommercialId = Nothing-    , _creActive = Nothing-    , _creExitCustomEvents = Nothing-    , _creAccountId = Nothing-    , _creBackupImageClickThroughURL = Nothing-    , _creName = Nothing-    , _creOverrideCss = Nothing-    , _creVideoDescription = Nothing-    , _creClickTags = Nothing-    , _creAdParameters = Nothing-    , _creVersion = Nothing-    , _creLatestTraffickedCreativeId = Nothing-    , _creThirdPartyRichMediaImpressionsURL = Nothing-    , _creLastModifiedInfo = Nothing-    , _creId = Nothing-    , _creStudioAdvertiserId = Nothing-    , _creCreativeAssets = Nothing-    , _creSubAccountId = Nothing-    , _creType = Nothing-    , _creTimerCustomEvents = Nothing-    , _creStudioCreativeId = Nothing-    , _creCompatibility = Nothing-    , _creBackupImageFeatures = Nothing-    , _creArtworkType = Nothing-    , _creArchived = Nothing-    , _creCompanionCreatives = Nothing-    , _creTotalFileSize = Nothing-    , _creStudioTraffickedCreativeId = Nothing-    , _creRedirectURL = Nothing-    , _creAutoAdvanceImages = Nothing-    , _creCreativeFieldAssignments = Nothing-    }---- | Whether Flash assets associated with the creative need to be--- automatically converted to HTML5. This flag is enabled by default and--- users can choose to disable it if they don\'t want the system to--- generate and use HTML5 asset for this creative. Applicable to the--- following creative types: ENHANCED_BANNER and FLASH_INPAGE.-creConvertFlashToHTML5 :: Lens' Creative (Maybe Bool)-creConvertFlashToHTML5-  = lens _creConvertFlashToHTML5-      (\ s a -> s{_creConvertFlashToHTML5 = a})---- | Target window for backup image. Applicable to the following creative--- types: ENHANCED_BANNER, FLASH_INPAGE, and HTML5_BANNER.-creBackupImageTargetWindow :: Lens' Creative (Maybe TargetWindow)-creBackupImageTargetWindow-  = lens _creBackupImageTargetWindow-      (\ s a -> s{_creBackupImageTargetWindow = a})---- | Dimension value for the rendering ID of this creative. This is a--- read-only field. Applicable to all creative types.-creRenderingIdDimensionValue :: Lens' Creative (Maybe DimensionValue)-creRenderingIdDimensionValue-  = lens _creRenderingIdDimensionValue-      (\ s a -> s{_creRenderingIdDimensionValue = a})---- | Custom key-values for a Rich Media creative. Key-values let you--- customize the creative settings of a Rich Media ad running on your site--- without having to contact the advertiser. You can use key-values to--- dynamically change the look or functionality of a creative. Applicable--- to the following creative types: all RICH_MEDIA, and all VPAID.-creCustomKeyValues :: Lens' Creative [Text]-creCustomKeyValues-  = lens _creCustomKeyValues-      (\ s a -> s{_creCustomKeyValues = a})-      . _Default-      . _Coerce---- | Creative video duration in seconds. This is a read-only field.--- Applicable to the following creative types: INSTREAM_VIDEO, all--- RICH_MEDIA, and all VPAID.-creVideoDuration :: Lens' Creative (Maybe Double)-creVideoDuration-  = lens _creVideoDuration-      (\ s a -> s{_creVideoDuration = a})-      . mapping _Coerce---- | ID of current rendering version. This is a read-only field. Applicable--- to all creative types.-creRenderingId :: Lens' Creative (Maybe Int64)-creRenderingId-  = lens _creRenderingId-      (\ s a -> s{_creRenderingId = a})-      . mapping _Coerce---- | Third-party URL used to record backup image impressions. Applicable to--- the following creative types: all RICH_MEDIA-creThirdPartyBackupImageImpressionsURL :: Lens' Creative (Maybe Text)-creThirdPartyBackupImageImpressionsURL-  = lens _creThirdPartyBackupImageImpressionsURL-      (\ s a ->-         s{_creThirdPartyBackupImageImpressionsURL = a})---- | OpenWindow FSCommand of this creative. This lets the SWF file--- communicate with either Flash Player or the program hosting Flash--- Player, such as a web browser. This is only triggered if--- allowScriptAccess field is true. Applicable to the following creative--- types: FLASH_INPAGE.-creFsCommand :: Lens' Creative (Maybe FsCommand)-creFsCommand-  = lens _creFsCommand (\ s a -> s{_creFsCommand = a})---- | Whether script access is allowed for this creative. This is a read-only--- and deprecated field which will automatically be set to true on update.--- Applicable to the following creative types: FLASH_INPAGE.-creAllowScriptAccess :: Lens' Creative (Maybe Bool)-creAllowScriptAccess-  = lens _creAllowScriptAccess-      (\ s a -> s{_creAllowScriptAccess = a})---- | Whether HTML code is DCM-generated or manually entered. Set to true to--- ignore changes to htmlCode. Applicable to the following creative types:--- FLASH_INPAGE and HTML5_BANNER.-creHTMLCodeLocked :: Lens' Creative (Maybe Bool)-creHTMLCodeLocked-  = lens _creHTMLCodeLocked-      (\ s a -> s{_creHTMLCodeLocked = a})---- | The minimum required Flash plugin version for this creative. For--- example, 11.2.202.235. This is a read-only field. Applicable to the--- following creative types: all RICH_MEDIA, and all VPAID.-creRequiredFlashPluginVersion :: Lens' Creative (Maybe Text)-creRequiredFlashPluginVersion-  = lens _creRequiredFlashPluginVersion-      (\ s a -> s{_creRequiredFlashPluginVersion = a})---- | Authoring tool for HTML5 banner creatives. This is a read-only field.--- Applicable to the following creative types: HTML5_BANNER.-creAuthoringTool :: Lens' Creative (Maybe CreativeAuthoringTool)-creAuthoringTool-  = lens _creAuthoringTool-      (\ s a -> s{_creAuthoringTool = a})---- | Size associated with this creative. When inserting or updating a--- creative either the size ID field or size width and height fields can be--- used. This is a required field when applicable; however for IMAGE and--- FLASH_INPAGE creatives, if left blank, this field will be automatically--- set using the actual size of the associated image assets. Applicable to--- the following creative types: ENHANCED_BANNER, ENHANCED_IMAGE,--- FLASH_INPAGE, HTML5_BANNER, IMAGE, and all RICH_MEDIA.-creSize :: Lens' Creative (Maybe Size)-creSize = lens _creSize (\ s a -> s{_creSize = a})---- | Third-party URLs for tracking in-stream video creative events.--- Applicable to the following creative types: INSTREAM_VIDEO and all--- VPAID.-creThirdPartyURLs :: Lens' Creative [ThirdPartyTrackingURL]-creThirdPartyURLs-  = lens _creThirdPartyURLs-      (\ s a -> s{_creThirdPartyURLs = a})-      . _Default-      . _Coerce---- | List of counter events configured for the creative. Applicable to the--- following creative types: all RICH_MEDIA, and all VPAID.-creCounterCustomEvents :: Lens' Creative [CreativeCustomEvent]-creCounterCustomEvents-  = lens _creCounterCustomEvents-      (\ s a -> s{_creCounterCustomEvents = a})-      . _Default-      . _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#creative\".-creKind :: Lens' Creative Text-creKind = lens _creKind (\ s a -> s{_creKind = a})---- | Whether creative should be treated as SSL compliant even if the system--- scan shows it\'s not.-creSSLOverride :: Lens' Creative (Maybe Bool)-creSSLOverride-  = lens _creSSLOverride-      (\ s a -> s{_creSSLOverride = a})---- | HTML code for the creative. This is a required field when applicable.--- This field is ignored if htmlCodeLocked is false. Applicable to the--- following creative types: all CUSTOM, FLASH_INPAGE, and HTML5_BANNER,--- and all RICH_MEDIA.-creHTMLCode :: Lens' Creative (Maybe Text)-creHTMLCode-  = lens _creHTMLCode (\ s a -> s{_creHTMLCode = a})---- | Advertiser ID of this creative. This is a required field. Applicable to--- all creative types.-creAdvertiserId :: Lens' Creative (Maybe Int64)-creAdvertiserId-  = lens _creAdvertiserId-      (\ s a -> s{_creAdvertiserId = a})-      . mapping _Coerce---- | The internal Flash version for this creative as calculated by--- DoubleClick Studio. This is a read-only field. Applicable to the--- following creative types: FLASH_INPAGE, ENHANCED_BANNER, all RICH_MEDIA,--- and all VPAID.-creRequiredFlashVersion :: Lens' Creative (Maybe Int32)-creRequiredFlashVersion-  = lens _creRequiredFlashVersion-      (\ s a -> s{_creRequiredFlashVersion = a})-      . mapping _Coerce---- | The 6-character HTML color code, beginning with #, for the background of--- the window area where the Flash file is displayed. Default is white.--- Applicable to the following creative types: FLASH_INPAGE.-creBackgRoundColor :: Lens' Creative (Maybe Text)-creBackgRoundColor-  = lens _creBackgRoundColor-      (\ s a -> s{_creBackgRoundColor = a})---- | Keywords for a Rich Media creative. Keywords let you customize the--- creative settings of a Rich Media ad running on your site without having--- to contact the advertiser. You can use keywords to dynamically change--- the look or functionality of a creative. Applicable to the following--- creative types: all RICH_MEDIA, and all VPAID.-creAdTagKeys :: Lens' Creative [Text]-creAdTagKeys-  = lens _creAdTagKeys (\ s a -> s{_creAdTagKeys = a})-      . _Default-      . _Coerce---- | Whether the user can choose to skip the creative. Applicable to the--- following creative types: INSTREAM_VIDEO.-creSkippable :: Lens' Creative (Maybe Bool)-creSkippable-  = lens _creSkippable (\ s a -> s{_creSkippable = a})---- | Whether the creative is SSL-compliant. This is a read-only field.--- Applicable to all creative types.-creSSLCompliant :: Lens' Creative (Maybe Bool)-creSSLCompliant-  = lens _creSSLCompliant-      (\ s a -> s{_creSSLCompliant = a})---- | Dimension value for the ID of this creative. This is a read-only field.--- Applicable to all creative types.-creIdDimensionValue :: Lens' Creative (Maybe DimensionValue)-creIdDimensionValue-  = lens _creIdDimensionValue-      (\ s a -> s{_creIdDimensionValue = a})---- | Reporting label used for HTML5 banner backup image. Applicable to the--- following creative types: ENHANCED_BANNER.-creBackupImageReportingLabel :: Lens' Creative (Maybe Text)-creBackupImageReportingLabel-  = lens _creBackupImageReportingLabel-      (\ s a -> s{_creBackupImageReportingLabel = a})---- | Industry standard ID assigned to creative for reach and frequency.--- Applicable to the following creative types: INSTREAM_VIDEO and all--- VPAID.-creCommercialId :: Lens' Creative (Maybe Text)-creCommercialId-  = lens _creCommercialId-      (\ s a -> s{_creCommercialId = a})---- | Whether the creative is active. Applicable to all creative types.-creActive :: Lens' Creative (Maybe Bool)-creActive-  = lens _creActive (\ s a -> s{_creActive = a})---- | List of exit events configured for the creative. Applicable to the--- following creative types: all RICH_MEDIA, and all VPAID.-creExitCustomEvents :: Lens' Creative [CreativeCustomEvent]-creExitCustomEvents-  = lens _creExitCustomEvents-      (\ s a -> s{_creExitCustomEvents = a})-      . _Default-      . _Coerce---- | Account ID of this creative. This field, if left unset, will be--- auto-generated for both insert and update operations. Applicable to all--- creative types.-creAccountId :: Lens' Creative (Maybe Int64)-creAccountId-  = lens _creAccountId (\ s a -> s{_creAccountId = a})-      . mapping _Coerce---- | Click-through URL for backup image. Applicable to the following creative--- types: ENHANCED_BANNER, FLASH_INPAGE, and HTML5_BANNER.-creBackupImageClickThroughURL :: Lens' Creative (Maybe Text)-creBackupImageClickThroughURL-  = lens _creBackupImageClickThroughURL-      (\ s a -> s{_creBackupImageClickThroughURL = a})---- | Name of the creative. This is a required field and must be less than 256--- characters long. Applicable to all creative types.-creName :: Lens' Creative (Maybe Text)-creName = lens _creName (\ s a -> s{_creName = a})---- | Override CSS value for rich media creatives. Applicable to the following--- creative types: all RICH_MEDIA.-creOverrideCss :: Lens' Creative (Maybe Text)-creOverrideCss-  = lens _creOverrideCss-      (\ s a -> s{_creOverrideCss = a})---- | Description of the video ad. Applicable to the following creative types:--- INSTREAM_VIDEO and all VPAID.-creVideoDescription :: Lens' Creative (Maybe Text)-creVideoDescription-  = lens _creVideoDescription-      (\ s a -> s{_creVideoDescription = a})---- | Click tags of the creative. For ENHANCED_BANNER, FLASH_INPAGE, and--- HTML5_BANNER creatives, this is a subset of detected click tags for the--- assets associated with this creative. After creating a flash asset,--- detected click tags will be returned in the creativeAssetMetadata. When--- inserting the creative, populate the creative clickTags field using the--- creativeAssetMetadata.clickTags field. For ENHANCED_IMAGE creatives,--- there should be exactly one entry in this list for each image creative--- asset. A click tag is matched with a corresponding creative asset by--- matching the clickTag.name field with the--- creativeAsset.assetIdentifier.name field. Applicable to the following--- creative types: ENHANCED_BANNER, ENHANCED_IMAGE, FLASH_INPAGE,--- HTML5_BANNER.-creClickTags :: Lens' Creative [ClickTag]-creClickTags-  = lens _creClickTags (\ s a -> s{_creClickTags = a})-      . _Default-      . _Coerce---- | Ad parameters user for VPAID creative. This is a read-only field.--- Applicable to the following creative types: all VPAID.-creAdParameters :: Lens' Creative (Maybe Text)-creAdParameters-  = lens _creAdParameters-      (\ s a -> s{_creAdParameters = a})---- | The version number helps you keep track of multiple versions of your--- creative in your reports. The version number will always be--- auto-generated during insert operations to start at 1. For tracking--- creatives the version cannot be incremented and will always remain at 1.--- For all other creative types the version can be incremented only by 1--- during update operations. In addition, the version will be automatically--- incremented by 1 when undergoing Rich Media creative merging. Applicable--- to all creative types.-creVersion :: Lens' Creative (Maybe Int32)-creVersion-  = lens _creVersion (\ s a -> s{_creVersion = a}) .-      mapping _Coerce---- | Latest Studio trafficked creative ID associated with rich media and--- VPAID creatives. This is a read-only field. Applicable to the following--- creative types: all RICH_MEDIA, and all VPAID.-creLatestTraffickedCreativeId :: Lens' Creative (Maybe Int64)-creLatestTraffickedCreativeId-  = lens _creLatestTraffickedCreativeId-      (\ s a -> s{_creLatestTraffickedCreativeId = a})-      . mapping _Coerce---- | Third-party URL used to record rich media impressions. Applicable to the--- following creative types: all RICH_MEDIA-creThirdPartyRichMediaImpressionsURL :: Lens' Creative (Maybe Text)-creThirdPartyRichMediaImpressionsURL-  = lens _creThirdPartyRichMediaImpressionsURL-      (\ s a ->-         s{_creThirdPartyRichMediaImpressionsURL = a})---- | Creative last modification information. This is a read-only field.--- Applicable to all creative types.-creLastModifiedInfo :: Lens' Creative (Maybe LastModifiedInfo)-creLastModifiedInfo-  = lens _creLastModifiedInfo-      (\ s a -> s{_creLastModifiedInfo = a})---- | ID of this creative. This is a read-only, auto-generated field.--- Applicable to all creative types.-creId :: Lens' Creative (Maybe Int64)-creId-  = lens _creId (\ s a -> s{_creId = a}) .-      mapping _Coerce---- | Studio advertiser ID associated with rich media and VPAID creatives.--- This is a read-only field. Applicable to the following creative types:--- all RICH_MEDIA, and all VPAID.-creStudioAdvertiserId :: Lens' Creative (Maybe Int64)-creStudioAdvertiserId-  = lens _creStudioAdvertiserId-      (\ s a -> s{_creStudioAdvertiserId = a})-      . mapping _Coerce---- | Assets associated with a creative. Applicable to all but the following--- creative types: INTERNAL_REDIRECT, INTERSTITIAL_INTERNAL_REDIRECT, and--- REDIRECT-creCreativeAssets :: Lens' Creative [CreativeAsset]-creCreativeAssets-  = lens _creCreativeAssets-      (\ s a -> s{_creCreativeAssets = a})-      . _Default-      . _Coerce---- | Subaccount ID of this creative. This field, if left unset, will be--- auto-generated for both insert and update operations. Applicable to all--- creative types.-creSubAccountId :: Lens' Creative (Maybe Int64)-creSubAccountId-  = lens _creSubAccountId-      (\ s a -> s{_creSubAccountId = a})-      . mapping _Coerce---- | Type of this creative.This is a required field. Applicable to all--- creative types.-creType :: Lens' Creative (Maybe CreativeType)-creType = lens _creType (\ s a -> s{_creType = a})---- | List of timer events configured for the creative. Applicable to the--- following creative types: all RICH_MEDIA, and all VPAID.-creTimerCustomEvents :: Lens' Creative [CreativeCustomEvent]-creTimerCustomEvents-  = lens _creTimerCustomEvents-      (\ s a -> s{_creTimerCustomEvents = a})-      . _Default-      . _Coerce---- | Studio creative ID associated with rich media and VPAID creatives. This--- is a read-only field. Applicable to the following creative types: all--- RICH_MEDIA, and all VPAID.-creStudioCreativeId :: Lens' Creative (Maybe Int64)-creStudioCreativeId-  = lens _creStudioCreativeId-      (\ s a -> s{_creStudioCreativeId = a})-      . mapping _Coerce---- | Compatibilities associated with this creative. This is a read-only--- field. WEB and WEB_INTERSTITIAL refer to rendering either on desktop or--- on mobile devices for regular or interstitial ads, respectively. APP and--- APP_INTERSTITIAL are for rendering in mobile apps. IN_STREAM_VIDEO--- refers to rendering in in-stream video ads developed with the VAST--- standard. Applicable to all creative types. Acceptable values are: ---- \"APP\" - \"APP_INTERSTITIAL\" - \"IN_STREAM_VIDEO\" - \"WEB\" ---- \"WEB_INTERSTITIAL\"-creCompatibility :: Lens' Creative [CreativeCompatibilityItem]-creCompatibility-  = lens _creCompatibility-      (\ s a -> s{_creCompatibility = a})-      . _Default-      . _Coerce---- | List of feature dependencies that will cause a backup image to be served--- if the browser that serves the ad does not support them. Feature--- dependencies are features that a browser must be able to support in--- order to render your HTML5 creative asset correctly. This field is--- initially auto-generated to contain all features detected by DCM for all--- the assets of this creative and can then be modified by the client. To--- reset this field, copy over all the creativeAssets\' detected features.--- Applicable to the following creative types: ENHANCED_BANNER and--- HTML5_BANNER.-creBackupImageFeatures :: Lens' Creative [CreativeBackupImageFeaturesItem]-creBackupImageFeatures-  = lens _creBackupImageFeatures-      (\ s a -> s{_creBackupImageFeatures = a})-      . _Default-      . _Coerce---- | Type of artwork used for the creative. This is a read-only field.--- Applicable to the following creative types: all RICH_MEDIA, and all--- VPAID.-creArtworkType :: Lens' Creative (Maybe CreativeArtworkType)-creArtworkType-  = lens _creArtworkType-      (\ s a -> s{_creArtworkType = a})---- | Whether the creative is archived. Applicable to all creative types.-creArchived :: Lens' Creative (Maybe Bool)-creArchived-  = lens _creArchived (\ s a -> s{_creArchived = a})---- | List of companion creatives assigned to an in-Stream videocreative.--- Acceptable values include IDs of existing flash and image creatives.--- Applicable to the following creative types: INSTREAM_VIDEO and all--- VPAID.-creCompanionCreatives :: Lens' Creative [Int64]-creCompanionCreatives-  = lens _creCompanionCreatives-      (\ s a -> s{_creCompanionCreatives = a})-      . _Default-      . _Coerce---- | Combined size of all creative assets. This is a read-only field.--- Applicable to the following creative types: all RICH_MEDIA, and all--- VPAID.-creTotalFileSize :: Lens' Creative (Maybe Int64)-creTotalFileSize-  = lens _creTotalFileSize-      (\ s a -> s{_creTotalFileSize = a})-      . mapping _Coerce---- | Studio trafficked creative ID associated with rich media and VPAID--- creatives. This is a read-only field. Applicable to the following--- creative types: all RICH_MEDIA, and all VPAID.-creStudioTraffickedCreativeId :: Lens' Creative (Maybe Int64)-creStudioTraffickedCreativeId-  = lens _creStudioTraffickedCreativeId-      (\ s a -> s{_creStudioTraffickedCreativeId = a})-      . mapping _Coerce---- | URL of hosted image or another ad tag. This is a required field when--- applicable. Applicable to the following creative types:--- INTERNAL_REDIRECT, INTERSTITIAL_INTERNAL_REDIRECT, and REDIRECT-creRedirectURL :: Lens' Creative (Maybe Text)-creRedirectURL-  = lens _creRedirectURL-      (\ s a -> s{_creRedirectURL = a})---- | Whether images are automatically advanced for enhanced image creatives.--- Applicable to the following creative types: ENHANCED_IMAGE.-creAutoAdvanceImages :: Lens' Creative (Maybe Bool)-creAutoAdvanceImages-  = lens _creAutoAdvanceImages-      (\ s a -> s{_creAutoAdvanceImages = a})---- | Creative field assignments for this creative. Applicable to all creative--- types.-creCreativeFieldAssignments :: Lens' Creative [CreativeFieldAssignment]-creCreativeFieldAssignments-  = lens _creCreativeFieldAssignments-      (\ s a -> s{_creCreativeFieldAssignments = a})-      . _Default-      . _Coerce--instance FromJSON Creative where-        parseJSON-          = withObject "Creative"-              (\ o ->-                 Creative <$>-                   (o .:? "convertFlashToHtml5") <*>-                     (o .:? "backupImageTargetWindow")-                     <*> (o .:? "renderingIdDimensionValue")-                     <*> (o .:? "customKeyValues" .!= mempty)-                     <*> (o .:? "videoDuration")-                     <*> (o .:? "renderingId")-                     <*> (o .:? "thirdPartyBackupImageImpressionsUrl")-                     <*> (o .:? "fsCommand")-                     <*> (o .:? "allowScriptAccess")-                     <*> (o .:? "htmlCodeLocked")-                     <*> (o .:? "requiredFlashPluginVersion")-                     <*> (o .:? "authoringTool")-                     <*> (o .:? "size")-                     <*> (o .:? "thirdPartyUrls" .!= mempty)-                     <*> (o .:? "counterCustomEvents" .!= mempty)-                     <*> (o .:? "kind" .!= "dfareporting#creative")-                     <*> (o .:? "sslOverride")-                     <*> (o .:? "htmlCode")-                     <*> (o .:? "advertiserId")-                     <*> (o .:? "requiredFlashVersion")-                     <*> (o .:? "backgroundColor")-                     <*> (o .:? "adTagKeys" .!= mempty)-                     <*> (o .:? "skippable")-                     <*> (o .:? "sslCompliant")-                     <*> (o .:? "idDimensionValue")-                     <*> (o .:? "backupImageReportingLabel")-                     <*> (o .:? "commercialId")-                     <*> (o .:? "active")-                     <*> (o .:? "exitCustomEvents" .!= mempty)-                     <*> (o .:? "accountId")-                     <*> (o .:? "backupImageClickThroughUrl")-                     <*> (o .:? "name")-                     <*> (o .:? "overrideCss")-                     <*> (o .:? "videoDescription")-                     <*> (o .:? "clickTags" .!= mempty)-                     <*> (o .:? "adParameters")-                     <*> (o .:? "version")-                     <*> (o .:? "latestTraffickedCreativeId")-                     <*> (o .:? "thirdPartyRichMediaImpressionsUrl")-                     <*> (o .:? "lastModifiedInfo")-                     <*> (o .:? "id")-                     <*> (o .:? "studioAdvertiserId")-                     <*> (o .:? "creativeAssets" .!= mempty)-                     <*> (o .:? "subaccountId")-                     <*> (o .:? "type")-                     <*> (o .:? "timerCustomEvents" .!= mempty)-                     <*> (o .:? "studioCreativeId")-                     <*> (o .:? "compatibility" .!= mempty)-                     <*> (o .:? "backupImageFeatures" .!= mempty)-                     <*> (o .:? "artworkType")-                     <*> (o .:? "archived")-                     <*> (o .:? "companionCreatives" .!= mempty)-                     <*> (o .:? "totalFileSize")-                     <*> (o .:? "studioTraffickedCreativeId")-                     <*> (o .:? "redirectUrl")-                     <*> (o .:? "auto_advance_images")-                     <*> (o .:? "creativeFieldAssignments" .!= mempty))--instance ToJSON Creative where-        toJSON Creative{..}-          = object-              (catMaybes-                 [("convertFlashToHtml5" .=) <$>-                    _creConvertFlashToHTML5,-                  ("backupImageTargetWindow" .=) <$>-                    _creBackupImageTargetWindow,-                  ("renderingIdDimensionValue" .=) <$>-                    _creRenderingIdDimensionValue,-                  ("customKeyValues" .=) <$> _creCustomKeyValues,-                  ("videoDuration" .=) <$> _creVideoDuration,-                  ("renderingId" .=) <$> _creRenderingId,-                  ("thirdPartyBackupImageImpressionsUrl" .=) <$>-                    _creThirdPartyBackupImageImpressionsURL,-                  ("fsCommand" .=) <$> _creFsCommand,-                  ("allowScriptAccess" .=) <$> _creAllowScriptAccess,-                  ("htmlCodeLocked" .=) <$> _creHTMLCodeLocked,-                  ("requiredFlashPluginVersion" .=) <$>-                    _creRequiredFlashPluginVersion,-                  ("authoringTool" .=) <$> _creAuthoringTool,-                  ("size" .=) <$> _creSize,-                  ("thirdPartyUrls" .=) <$> _creThirdPartyURLs,-                  ("counterCustomEvents" .=) <$>-                    _creCounterCustomEvents,-                  Just ("kind" .= _creKind),-                  ("sslOverride" .=) <$> _creSSLOverride,-                  ("htmlCode" .=) <$> _creHTMLCode,-                  ("advertiserId" .=) <$> _creAdvertiserId,-                  ("requiredFlashVersion" .=) <$>-                    _creRequiredFlashVersion,-                  ("backgroundColor" .=) <$> _creBackgRoundColor,-                  ("adTagKeys" .=) <$> _creAdTagKeys,-                  ("skippable" .=) <$> _creSkippable,-                  ("sslCompliant" .=) <$> _creSSLCompliant,-                  ("idDimensionValue" .=) <$> _creIdDimensionValue,-                  ("backupImageReportingLabel" .=) <$>-                    _creBackupImageReportingLabel,-                  ("commercialId" .=) <$> _creCommercialId,-                  ("active" .=) <$> _creActive,-                  ("exitCustomEvents" .=) <$> _creExitCustomEvents,-                  ("accountId" .=) <$> _creAccountId,-                  ("backupImageClickThroughUrl" .=) <$>-                    _creBackupImageClickThroughURL,-                  ("name" .=) <$> _creName,-                  ("overrideCss" .=) <$> _creOverrideCss,-                  ("videoDescription" .=) <$> _creVideoDescription,-                  ("clickTags" .=) <$> _creClickTags,-                  ("adParameters" .=) <$> _creAdParameters,-                  ("version" .=) <$> _creVersion,-                  ("latestTraffickedCreativeId" .=) <$>-                    _creLatestTraffickedCreativeId,-                  ("thirdPartyRichMediaImpressionsUrl" .=) <$>-                    _creThirdPartyRichMediaImpressionsURL,-                  ("lastModifiedInfo" .=) <$> _creLastModifiedInfo,-                  ("id" .=) <$> _creId,-                  ("studioAdvertiserId" .=) <$> _creStudioAdvertiserId,-                  ("creativeAssets" .=) <$> _creCreativeAssets,-                  ("subaccountId" .=) <$> _creSubAccountId,-                  ("type" .=) <$> _creType,-                  ("timerCustomEvents" .=) <$> _creTimerCustomEvents,-                  ("studioCreativeId" .=) <$> _creStudioCreativeId,-                  ("compatibility" .=) <$> _creCompatibility,-                  ("backupImageFeatures" .=) <$>-                    _creBackupImageFeatures,-                  ("artworkType" .=) <$> _creArtworkType,-                  ("archived" .=) <$> _creArchived,-                  ("companionCreatives" .=) <$> _creCompanionCreatives,-                  ("totalFileSize" .=) <$> _creTotalFileSize,-                  ("studioTraffickedCreativeId" .=) <$>-                    _creStudioTraffickedCreativeId,-                  ("redirectUrl" .=) <$> _creRedirectURL,-                  ("auto_advance_images" .=) <$> _creAutoAdvanceImages,-                  ("creativeFieldAssignments" .=) <$>-                    _creCreativeFieldAssignments])---- | Site Contact------ /See:/ 'siteContact' smart constructor.-data SiteContact = SiteContact-    { _scEmail       :: !(Maybe Text)-    , _scPhone       :: !(Maybe Text)-    , _scLastName    :: !(Maybe Text)-    , _scAddress     :: !(Maybe Text)-    , _scFirstName   :: !(Maybe Text)-    , _scId          :: !(Maybe (Textual Int64))-    , _scTitle       :: !(Maybe Text)-    , _scContactType :: !(Maybe SiteContactContactType)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'SiteContact' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'scEmail'------ * 'scPhone'------ * 'scLastName'------ * 'scAddress'------ * 'scFirstName'------ * 'scId'------ * 'scTitle'------ * 'scContactType'-siteContact-    :: SiteContact-siteContact =-    SiteContact-    { _scEmail = Nothing-    , _scPhone = Nothing-    , _scLastName = Nothing-    , _scAddress = Nothing-    , _scFirstName = Nothing-    , _scId = Nothing-    , _scTitle = Nothing-    , _scContactType = Nothing-    }---- | Email address of this site contact. This is a required field.-scEmail :: Lens' SiteContact (Maybe Text)-scEmail = lens _scEmail (\ s a -> s{_scEmail = a})---- | Primary phone number of this site contact.-scPhone :: Lens' SiteContact (Maybe Text)-scPhone = lens _scPhone (\ s a -> s{_scPhone = a})---- | Last name of this site contact.-scLastName :: Lens' SiteContact (Maybe Text)-scLastName-  = lens _scLastName (\ s a -> s{_scLastName = a})---- | Address of this site contact.-scAddress :: Lens' SiteContact (Maybe Text)-scAddress-  = lens _scAddress (\ s a -> s{_scAddress = a})---- | First name of this site contact.-scFirstName :: Lens' SiteContact (Maybe Text)-scFirstName-  = lens _scFirstName (\ s a -> s{_scFirstName = a})---- | ID of this site contact. This is a read-only, auto-generated field.-scId :: Lens' SiteContact (Maybe Int64)-scId-  = lens _scId (\ s a -> s{_scId = a}) .-      mapping _Coerce---- | Title or designation of this site contact.-scTitle :: Lens' SiteContact (Maybe Text)-scTitle = lens _scTitle (\ s a -> s{_scTitle = a})---- | Site contact type.-scContactType :: Lens' SiteContact (Maybe SiteContactContactType)-scContactType-  = lens _scContactType-      (\ s a -> s{_scContactType = a})--instance FromJSON SiteContact where-        parseJSON-          = withObject "SiteContact"-              (\ o ->-                 SiteContact <$>-                   (o .:? "email") <*> (o .:? "phone") <*>-                     (o .:? "lastName")-                     <*> (o .:? "address")-                     <*> (o .:? "firstName")-                     <*> (o .:? "id")-                     <*> (o .:? "title")-                     <*> (o .:? "contactType"))--instance ToJSON SiteContact where-        toJSON SiteContact{..}-          = object-              (catMaybes-                 [("email" .=) <$> _scEmail,-                  ("phone" .=) <$> _scPhone,-                  ("lastName" .=) <$> _scLastName,-                  ("address" .=) <$> _scAddress,-                  ("firstName" .=) <$> _scFirstName,-                  ("id" .=) <$> _scId, ("title" .=) <$> _scTitle,-                  ("contactType" .=) <$> _scContactType])---- | Account List Response------ /See:/ 'accountsListResponse' smart constructor.-data AccountsListResponse = AccountsListResponse-    { _accNextPageToken :: !(Maybe Text)-    , _accAccounts      :: !(Maybe [Account])-    , _accKind          :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'AccountsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'accNextPageToken'------ * 'accAccounts'------ * 'accKind'-accountsListResponse-    :: AccountsListResponse-accountsListResponse =-    AccountsListResponse-    { _accNextPageToken = Nothing-    , _accAccounts = Nothing-    , _accKind = "dfareporting#accountsListResponse"-    }---- | Pagination token to be used for the next list operation.-accNextPageToken :: Lens' AccountsListResponse (Maybe Text)-accNextPageToken-  = lens _accNextPageToken-      (\ s a -> s{_accNextPageToken = a})---- | Account collection.-accAccounts :: Lens' AccountsListResponse [Account]-accAccounts-  = lens _accAccounts (\ s a -> s{_accAccounts = a}) .-      _Default-      . _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#accountsListResponse\".-accKind :: Lens' AccountsListResponse Text-accKind = lens _accKind (\ s a -> s{_accKind = a})--instance FromJSON AccountsListResponse where-        parseJSON-          = withObject "AccountsListResponse"-              (\ o ->-                 AccountsListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "accounts" .!= mempty)-                     <*>-                     (o .:? "kind" .!=-                        "dfareporting#accountsListResponse"))--instance ToJSON AccountsListResponse where-        toJSON AccountsListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _accNextPageToken,-                  ("accounts" .=) <$> _accAccounts,-                  Just ("kind" .= _accKind)])---- | Represents a date range.------ /See:/ 'dateRange' smart constructor.-data DateRange = DateRange-    { _drKind              :: !Text-    , _drEndDate           :: !(Maybe Date')-    , _drStartDate         :: !(Maybe Date')-    , _drRelativeDateRange :: !(Maybe DateRangeRelativeDateRange)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'DateRange' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'drKind'------ * 'drEndDate'------ * 'drStartDate'------ * 'drRelativeDateRange'-dateRange-    :: DateRange-dateRange =-    DateRange-    { _drKind = "dfareporting#dateRange"-    , _drEndDate = Nothing-    , _drStartDate = Nothing-    , _drRelativeDateRange = Nothing-    }---- | The kind of resource this is, in this case dfareporting#dateRange.-drKind :: Lens' DateRange Text-drKind = lens _drKind (\ s a -> s{_drKind = a})---- | The end date of the date range, inclusive. A string of the format:--- \"yyyy-MM-dd\".-drEndDate :: Lens' DateRange (Maybe Day)-drEndDate-  = lens _drEndDate (\ s a -> s{_drEndDate = a}) .-      mapping _Date---- | The start date of the date range, inclusive. A string of the format:--- \"yyyy-MM-dd\".-drStartDate :: Lens' DateRange (Maybe Day)-drStartDate-  = lens _drStartDate (\ s a -> s{_drStartDate = a}) .-      mapping _Date---- | The date range relative to the date of when the report is run.-drRelativeDateRange :: Lens' DateRange (Maybe DateRangeRelativeDateRange)-drRelativeDateRange-  = lens _drRelativeDateRange-      (\ s a -> s{_drRelativeDateRange = a})--instance FromJSON DateRange where-        parseJSON-          = withObject "DateRange"-              (\ o ->-                 DateRange <$>-                   (o .:? "kind" .!= "dfareporting#dateRange") <*>-                     (o .:? "endDate")-                     <*> (o .:? "startDate")-                     <*> (o .:? "relativeDateRange"))--instance ToJSON DateRange where-        toJSON DateRange{..}-          = object-              (catMaybes-                 [Just ("kind" .= _drKind),-                  ("endDate" .=) <$> _drEndDate,-                  ("startDate" .=) <$> _drStartDate,-                  ("relativeDateRange" .=) <$> _drRelativeDateRange])---- | Represents a Report resource.------ /See:/ 'report' smart constructor.-data Report = Report-    { _rDelivery                    :: !(Maybe ReportDelivery)-    , _rEtag                        :: !(Maybe Text)-    , _rOwnerProFileId              :: !(Maybe (Textual Int64))-    , _rSchedule                    :: !(Maybe ReportSchedule)-    , _rPathToConversionCriteria    :: !(Maybe ReportPathToConversionCriteria)-    , _rKind                        :: !Text-    , _rFormat                      :: !(Maybe ReportFormat)-    , _rReachCriteria               :: !(Maybe ReportReachCriteria)-    , _rLastModifiedTime            :: !(Maybe (Textual Word64))-    , _rAccountId                   :: !(Maybe (Textual Int64))-    , _rName                        :: !(Maybe Text)-    , _rId                          :: !(Maybe (Textual Int64))-    , _rCrossDimensionReachCriteria :: !(Maybe ReportCrossDimensionReachCriteria)-    , _rType                        :: !(Maybe ReportType)-    , _rSubAccountId                :: !(Maybe (Textual Int64))-    , _rFloodlightCriteria          :: !(Maybe ReportFloodlightCriteria)-    , _rCriteria                    :: !(Maybe ReportCriteria)-    , _rFileName                    :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'Report' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rDelivery'------ * 'rEtag'------ * 'rOwnerProFileId'------ * 'rSchedule'------ * 'rPathToConversionCriteria'------ * 'rKind'------ * 'rFormat'------ * 'rReachCriteria'------ * 'rLastModifiedTime'------ * 'rAccountId'------ * 'rName'------ * 'rId'------ * 'rCrossDimensionReachCriteria'------ * 'rType'------ * 'rSubAccountId'------ * 'rFloodlightCriteria'------ * 'rCriteria'------ * 'rFileName'-report-    :: Report-report =-    Report-    { _rDelivery = Nothing-    , _rEtag = Nothing-    , _rOwnerProFileId = Nothing-    , _rSchedule = Nothing-    , _rPathToConversionCriteria = Nothing-    , _rKind = "dfareporting#report"-    , _rFormat = Nothing-    , _rReachCriteria = Nothing-    , _rLastModifiedTime = Nothing-    , _rAccountId = Nothing-    , _rName = Nothing-    , _rId = Nothing-    , _rCrossDimensionReachCriteria = Nothing-    , _rType = Nothing-    , _rSubAccountId = Nothing-    , _rFloodlightCriteria = Nothing-    , _rCriteria = Nothing-    , _rFileName = Nothing-    }---- | The report\'s email delivery settings.-rDelivery :: Lens' Report (Maybe ReportDelivery)-rDelivery-  = lens _rDelivery (\ s a -> s{_rDelivery = a})---- | The eTag of this response for caching purposes.-rEtag :: Lens' Report (Maybe Text)-rEtag = lens _rEtag (\ s a -> s{_rEtag = a})---- | The user profile id of the owner of this report.-rOwnerProFileId :: Lens' Report (Maybe Int64)-rOwnerProFileId-  = lens _rOwnerProFileId-      (\ s a -> s{_rOwnerProFileId = a})-      . mapping _Coerce---- | The report\'s schedule. Can only be set if the report\'s \'dateRange\'--- is a relative date range and the relative date range is not \"TODAY\".-rSchedule :: Lens' Report (Maybe ReportSchedule)-rSchedule-  = lens _rSchedule (\ s a -> s{_rSchedule = a})---- | The report criteria for a report of type \"PATH_TO_CONVERSION\".-rPathToConversionCriteria :: Lens' Report (Maybe ReportPathToConversionCriteria)-rPathToConversionCriteria-  = lens _rPathToConversionCriteria-      (\ s a -> s{_rPathToConversionCriteria = a})---- | The kind of resource this is, in this case dfareporting#report.-rKind :: Lens' Report Text-rKind = lens _rKind (\ s a -> s{_rKind = a})---- | The output format of the report. If not specified, default format is--- \"CSV\". Note that the actual format in the completed report file might--- differ if for instance the report\'s size exceeds the format\'s--- capabilities. \"CSV\" will then be the fallback format.-rFormat :: Lens' Report (Maybe ReportFormat)-rFormat = lens _rFormat (\ s a -> s{_rFormat = a})---- | The report criteria for a report of type \"REACH\".-rReachCriteria :: Lens' Report (Maybe ReportReachCriteria)-rReachCriteria-  = lens _rReachCriteria-      (\ s a -> s{_rReachCriteria = a})---- | The timestamp (in milliseconds since epoch) of when this report was last--- modified.-rLastModifiedTime :: Lens' Report (Maybe Word64)-rLastModifiedTime-  = lens _rLastModifiedTime-      (\ s a -> s{_rLastModifiedTime = a})-      . mapping _Coerce---- | The account ID to which this report belongs.-rAccountId :: Lens' Report (Maybe Int64)-rAccountId-  = lens _rAccountId (\ s a -> s{_rAccountId = a}) .-      mapping _Coerce---- | The name of the report.-rName :: Lens' Report (Maybe Text)-rName = lens _rName (\ s a -> s{_rName = a})---- | The unique ID identifying this report resource.-rId :: Lens' Report (Maybe Int64)-rId-  = lens _rId (\ s a -> s{_rId = a}) . mapping _Coerce---- | The report criteria for a report of type \"CROSS_DIMENSION_REACH\".-rCrossDimensionReachCriteria :: Lens' Report (Maybe ReportCrossDimensionReachCriteria)-rCrossDimensionReachCriteria-  = lens _rCrossDimensionReachCriteria-      (\ s a -> s{_rCrossDimensionReachCriteria = a})---- | The type of the report.-rType :: Lens' Report (Maybe ReportType)-rType = lens _rType (\ s a -> s{_rType = a})---- | The subaccount ID to which this report belongs if applicable.-rSubAccountId :: Lens' Report (Maybe Int64)-rSubAccountId-  = lens _rSubAccountId-      (\ s a -> s{_rSubAccountId = a})-      . mapping _Coerce---- | The report criteria for a report of type \"FLOODLIGHT\".-rFloodlightCriteria :: Lens' Report (Maybe ReportFloodlightCriteria)-rFloodlightCriteria-  = lens _rFloodlightCriteria-      (\ s a -> s{_rFloodlightCriteria = a})---- | The report criteria for a report of type \"STANDARD\".-rCriteria :: Lens' Report (Maybe ReportCriteria)-rCriteria-  = lens _rCriteria (\ s a -> s{_rCriteria = a})---- | The filename used when generating report files for this report.-rFileName :: Lens' Report (Maybe Text)-rFileName-  = lens _rFileName (\ s a -> s{_rFileName = a})--instance FromJSON Report where-        parseJSON-          = withObject "Report"-              (\ o ->-                 Report <$>-                   (o .:? "delivery") <*> (o .:? "etag") <*>-                     (o .:? "ownerProfileId")-                     <*> (o .:? "schedule")-                     <*> (o .:? "pathToConversionCriteria")-                     <*> (o .:? "kind" .!= "dfareporting#report")-                     <*> (o .:? "format")-                     <*> (o .:? "reachCriteria")-                     <*> (o .:? "lastModifiedTime")-                     <*> (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "id")-                     <*> (o .:? "crossDimensionReachCriteria")-                     <*> (o .:? "type")-                     <*> (o .:? "subAccountId")-                     <*> (o .:? "floodlightCriteria")-                     <*> (o .:? "criteria")-                     <*> (o .:? "fileName"))--instance ToJSON Report where-        toJSON Report{..}-          = object-              (catMaybes-                 [("delivery" .=) <$> _rDelivery,-                  ("etag" .=) <$> _rEtag,-                  ("ownerProfileId" .=) <$> _rOwnerProFileId,-                  ("schedule" .=) <$> _rSchedule,-                  ("pathToConversionCriteria" .=) <$>-                    _rPathToConversionCriteria,-                  Just ("kind" .= _rKind), ("format" .=) <$> _rFormat,-                  ("reachCriteria" .=) <$> _rReachCriteria,-                  ("lastModifiedTime" .=) <$> _rLastModifiedTime,-                  ("accountId" .=) <$> _rAccountId,-                  ("name" .=) <$> _rName, ("id" .=) <$> _rId,-                  ("crossDimensionReachCriteria" .=) <$>-                    _rCrossDimensionReachCriteria,-                  ("type" .=) <$> _rType,-                  ("subAccountId" .=) <$> _rSubAccountId,-                  ("floodlightCriteria" .=) <$> _rFloodlightCriteria,-                  ("criteria" .=) <$> _rCriteria,-                  ("fileName" .=) <$> _rFileName])---- | Contains properties of a DCM campaign.------ /See:/ 'campaign' smart constructor.-data Campaign = Campaign-    { _camCreativeOptimizationConfiguration            :: !(Maybe CreativeOptimizationConfiguration)-    , _camCreativeGroupIds                             :: !(Maybe [Textual Int64])-    , _camNielsenOCREnabled                            :: !(Maybe Bool)-    , _camKind                                         :: !Text-    , _camClickThroughURLSuffixProperties              :: !(Maybe ClickThroughURLSuffixProperties)-    , _camAdvertiserId                                 :: !(Maybe (Textual Int64))-    , _camEndDate                                      :: !(Maybe Date')-    , _camAdvertiserIdDimensionValue                   :: !(Maybe DimensionValue)-    , _camIdDimensionValue                             :: !(Maybe DimensionValue)-    , _camEventTagOverrides                            :: !(Maybe [EventTagOverride])-    , _camLookbackConfiguration                        :: !(Maybe LookbackConfiguration)-    , _camStartDate                                    :: !(Maybe Date')-    , _camAccountId                                    :: !(Maybe (Textual Int64))-    , _camComscoreVceEnabled                           :: !(Maybe Bool)-    , _camName                                         :: !(Maybe Text)-    , _camAdvertiserGroupId                            :: !(Maybe (Textual Int64))-    , _camBillingInvoiceCode                           :: !(Maybe Text)-    , _camCreateInfo                                   :: !(Maybe LastModifiedInfo)-    , _camLastModifiedInfo                             :: !(Maybe LastModifiedInfo)-    , _camId                                           :: !(Maybe (Textual Int64))-    , _camSubAccountId                                 :: !(Maybe (Textual Int64))-    , _camAdditionalCreativeOptimizationConfigurations :: !(Maybe [CreativeOptimizationConfiguration])-    , _camExternalId                                   :: !(Maybe Text)-    , _camComment                                      :: !(Maybe Text)-    , _camAudienceSegmentGroups                        :: !(Maybe [AudienceSegmentGroup])-    , _camArchived                                     :: !(Maybe Bool)-    , _camTraffickerEmails                             :: !(Maybe [Text])-    , _camDefaultClickThroughEventTagProperties        :: !(Maybe DefaultClickThroughEventTagProperties)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'Campaign' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'camCreativeOptimizationConfiguration'------ * 'camCreativeGroupIds'------ * 'camNielsenOCREnabled'------ * 'camKind'------ * 'camClickThroughURLSuffixProperties'------ * 'camAdvertiserId'------ * 'camEndDate'------ * 'camAdvertiserIdDimensionValue'------ * 'camIdDimensionValue'------ * 'camEventTagOverrides'------ * 'camLookbackConfiguration'------ * 'camStartDate'------ * 'camAccountId'------ * 'camComscoreVceEnabled'------ * 'camName'------ * 'camAdvertiserGroupId'------ * 'camBillingInvoiceCode'------ * 'camCreateInfo'------ * 'camLastModifiedInfo'------ * 'camId'------ * 'camSubAccountId'------ * 'camAdditionalCreativeOptimizationConfigurations'------ * 'camExternalId'------ * 'camComment'------ * 'camAudienceSegmentGroups'------ * 'camArchived'------ * 'camTraffickerEmails'------ * 'camDefaultClickThroughEventTagProperties'-campaign-    :: Campaign-campaign =-    Campaign-    { _camCreativeOptimizationConfiguration = Nothing-    , _camCreativeGroupIds = Nothing-    , _camNielsenOCREnabled = Nothing-    , _camKind = "dfareporting#campaign"-    , _camClickThroughURLSuffixProperties = Nothing-    , _camAdvertiserId = Nothing-    , _camEndDate = Nothing-    , _camAdvertiserIdDimensionValue = Nothing-    , _camIdDimensionValue = Nothing-    , _camEventTagOverrides = Nothing-    , _camLookbackConfiguration = Nothing-    , _camStartDate = Nothing-    , _camAccountId = Nothing-    , _camComscoreVceEnabled = Nothing-    , _camName = Nothing-    , _camAdvertiserGroupId = Nothing-    , _camBillingInvoiceCode = Nothing-    , _camCreateInfo = Nothing-    , _camLastModifiedInfo = Nothing-    , _camId = Nothing-    , _camSubAccountId = Nothing-    , _camAdditionalCreativeOptimizationConfigurations = Nothing-    , _camExternalId = Nothing-    , _camComment = Nothing-    , _camAudienceSegmentGroups = Nothing-    , _camArchived = Nothing-    , _camTraffickerEmails = Nothing-    , _camDefaultClickThroughEventTagProperties = Nothing-    }---- | Creative optimization configuration for the campaign.-camCreativeOptimizationConfiguration :: Lens' Campaign (Maybe CreativeOptimizationConfiguration)-camCreativeOptimizationConfiguration-  = lens _camCreativeOptimizationConfiguration-      (\ s a ->-         s{_camCreativeOptimizationConfiguration = a})---- | List of creative group IDs that are assigned to the campaign.-camCreativeGroupIds :: Lens' Campaign [Int64]-camCreativeGroupIds-  = lens _camCreativeGroupIds-      (\ s a -> s{_camCreativeGroupIds = a})-      . _Default-      . _Coerce---- | Whether Nielsen reports are enabled for this campaign.-camNielsenOCREnabled :: Lens' Campaign (Maybe Bool)-camNielsenOCREnabled-  = lens _camNielsenOCREnabled-      (\ s a -> s{_camNielsenOCREnabled = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#campaign\".-camKind :: Lens' Campaign Text-camKind = lens _camKind (\ s a -> s{_camKind = a})---- | Click-through URL suffix override properties for this campaign.-camClickThroughURLSuffixProperties :: Lens' Campaign (Maybe ClickThroughURLSuffixProperties)-camClickThroughURLSuffixProperties-  = lens _camClickThroughURLSuffixProperties-      (\ s a -> s{_camClickThroughURLSuffixProperties = a})---- | Advertiser ID of this campaign. This is a required field.-camAdvertiserId :: Lens' Campaign (Maybe Int64)-camAdvertiserId-  = lens _camAdvertiserId-      (\ s a -> s{_camAdvertiserId = a})-      . mapping _Coerce---- | Date on which the campaign will stop running. On insert, the end date--- must be today or a future date. The end date must be later than or be--- the same as the start date. If, for example, you set 6\/25\/2015 as both--- the start and end dates, the effective campaign run date is just that--- day only, 6\/25\/2015. The hours, minutes, and seconds of the end date--- should not be set, as doing so will result in an error. This is a--- required field.-camEndDate :: Lens' Campaign (Maybe Day)-camEndDate-  = lens _camEndDate (\ s a -> s{_camEndDate = a}) .-      mapping _Date---- | Dimension value for the advertiser ID of this campaign. This is a--- read-only, auto-generated field.-camAdvertiserIdDimensionValue :: Lens' Campaign (Maybe DimensionValue)-camAdvertiserIdDimensionValue-  = lens _camAdvertiserIdDimensionValue-      (\ s a -> s{_camAdvertiserIdDimensionValue = a})---- | Dimension value for the ID of this campaign. This is a read-only,--- auto-generated field.-camIdDimensionValue :: Lens' Campaign (Maybe DimensionValue)-camIdDimensionValue-  = lens _camIdDimensionValue-      (\ s a -> s{_camIdDimensionValue = a})---- | Overrides that can be used to activate or deactivate advertiser event--- tags.-camEventTagOverrides :: Lens' Campaign [EventTagOverride]-camEventTagOverrides-  = lens _camEventTagOverrides-      (\ s a -> s{_camEventTagOverrides = a})-      . _Default-      . _Coerce---- | Lookback window settings for the campaign.-camLookbackConfiguration :: Lens' Campaign (Maybe LookbackConfiguration)-camLookbackConfiguration-  = lens _camLookbackConfiguration-      (\ s a -> s{_camLookbackConfiguration = a})---- | Date on which the campaign starts running. The start date can be any--- date. The hours, minutes, and seconds of the start date should not be--- set, as doing so will result in an error. This is a required field.-camStartDate :: Lens' Campaign (Maybe Day)-camStartDate-  = lens _camStartDate (\ s a -> s{_camStartDate = a})-      . mapping _Date---- | Account ID of this campaign. This is a read-only field that can be left--- blank.-camAccountId :: Lens' Campaign (Maybe Int64)-camAccountId-  = lens _camAccountId (\ s a -> s{_camAccountId = a})-      . mapping _Coerce---- | Whether comScore vCE reports are enabled for this campaign.-camComscoreVceEnabled :: Lens' Campaign (Maybe Bool)-camComscoreVceEnabled-  = lens _camComscoreVceEnabled-      (\ s a -> s{_camComscoreVceEnabled = a})---- | Name of this campaign. This is a required field and must be less than--- 256 characters long and unique among campaigns of the same advertiser.-camName :: Lens' Campaign (Maybe Text)-camName = lens _camName (\ s a -> s{_camName = a})---- | Advertiser group ID of the associated advertiser.-camAdvertiserGroupId :: Lens' Campaign (Maybe Int64)-camAdvertiserGroupId-  = lens _camAdvertiserGroupId-      (\ s a -> s{_camAdvertiserGroupId = a})-      . mapping _Coerce---- | Billing invoice code included in the DCM client billing invoices--- associated with the campaign.-camBillingInvoiceCode :: Lens' Campaign (Maybe Text)-camBillingInvoiceCode-  = lens _camBillingInvoiceCode-      (\ s a -> s{_camBillingInvoiceCode = a})---- | Information about the creation of this campaign. This is a read-only--- field.-camCreateInfo :: Lens' Campaign (Maybe LastModifiedInfo)-camCreateInfo-  = lens _camCreateInfo-      (\ s a -> s{_camCreateInfo = a})---- | Information about the most recent modification of this campaign. This is--- a read-only field.-camLastModifiedInfo :: Lens' Campaign (Maybe LastModifiedInfo)-camLastModifiedInfo-  = lens _camLastModifiedInfo-      (\ s a -> s{_camLastModifiedInfo = a})---- | ID of this campaign. This is a read-only auto-generated field.-camId :: Lens' Campaign (Maybe Int64)-camId-  = lens _camId (\ s a -> s{_camId = a}) .-      mapping _Coerce---- | Subaccount ID of this campaign. This is a read-only field that can be--- left blank.-camSubAccountId :: Lens' Campaign (Maybe Int64)-camSubAccountId-  = lens _camSubAccountId-      (\ s a -> s{_camSubAccountId = a})-      . mapping _Coerce---- | Additional creative optimization configurations for the campaign.-camAdditionalCreativeOptimizationConfigurations :: Lens' Campaign [CreativeOptimizationConfiguration]-camAdditionalCreativeOptimizationConfigurations-  = lens-      _camAdditionalCreativeOptimizationConfigurations-      (\ s a ->-         s{_camAdditionalCreativeOptimizationConfigurations =-             a})-      . _Default-      . _Coerce---- | External ID for this campaign.-camExternalId :: Lens' Campaign (Maybe Text)-camExternalId-  = lens _camExternalId-      (\ s a -> s{_camExternalId = a})---- | Arbitrary comments about this campaign. Must be less than 256 characters--- long.-camComment :: Lens' Campaign (Maybe Text)-camComment-  = lens _camComment (\ s a -> s{_camComment = a})---- | Audience segment groups assigned to this campaign. Cannot have more than--- 300 segment groups.-camAudienceSegmentGroups :: Lens' Campaign [AudienceSegmentGroup]-camAudienceSegmentGroups-  = lens _camAudienceSegmentGroups-      (\ s a -> s{_camAudienceSegmentGroups = a})-      . _Default-      . _Coerce---- | Whether this campaign has been archived.-camArchived :: Lens' Campaign (Maybe Bool)-camArchived-  = lens _camArchived (\ s a -> s{_camArchived = a})---- | Campaign trafficker contact emails.-camTraffickerEmails :: Lens' Campaign [Text]-camTraffickerEmails-  = lens _camTraffickerEmails-      (\ s a -> s{_camTraffickerEmails = a})-      . _Default-      . _Coerce---- | Click-through event tag ID override properties for this campaign.-camDefaultClickThroughEventTagProperties :: Lens' Campaign (Maybe DefaultClickThroughEventTagProperties)-camDefaultClickThroughEventTagProperties-  = lens _camDefaultClickThroughEventTagProperties-      (\ s a ->-         s{_camDefaultClickThroughEventTagProperties = a})--instance FromJSON Campaign where-        parseJSON-          = withObject "Campaign"-              (\ o ->-                 Campaign <$>-                   (o .:? "creativeOptimizationConfiguration") <*>-                     (o .:? "creativeGroupIds" .!= mempty)-                     <*> (o .:? "nielsenOcrEnabled")-                     <*> (o .:? "kind" .!= "dfareporting#campaign")-                     <*> (o .:? "clickThroughUrlSuffixProperties")-                     <*> (o .:? "advertiserId")-                     <*> (o .:? "endDate")-                     <*> (o .:? "advertiserIdDimensionValue")-                     <*> (o .:? "idDimensionValue")-                     <*> (o .:? "eventTagOverrides" .!= mempty)-                     <*> (o .:? "lookbackConfiguration")-                     <*> (o .:? "startDate")-                     <*> (o .:? "accountId")-                     <*> (o .:? "comscoreVceEnabled")-                     <*> (o .:? "name")-                     <*> (o .:? "advertiserGroupId")-                     <*> (o .:? "billingInvoiceCode")-                     <*> (o .:? "createInfo")-                     <*> (o .:? "lastModifiedInfo")-                     <*> (o .:? "id")-                     <*> (o .:? "subaccountId")-                     <*>-                     (o .:? "additionalCreativeOptimizationConfigurations"-                        .!= mempty)-                     <*> (o .:? "externalId")-                     <*> (o .:? "comment")-                     <*> (o .:? "audienceSegmentGroups" .!= mempty)-                     <*> (o .:? "archived")-                     <*> (o .:? "traffickerEmails" .!= mempty)-                     <*> (o .:? "defaultClickThroughEventTagProperties"))--instance ToJSON Campaign where-        toJSON Campaign{..}-          = object-              (catMaybes-                 [("creativeOptimizationConfiguration" .=) <$>-                    _camCreativeOptimizationConfiguration,-                  ("creativeGroupIds" .=) <$> _camCreativeGroupIds,-                  ("nielsenOcrEnabled" .=) <$> _camNielsenOCREnabled,-                  Just ("kind" .= _camKind),-                  ("clickThroughUrlSuffixProperties" .=) <$>-                    _camClickThroughURLSuffixProperties,-                  ("advertiserId" .=) <$> _camAdvertiserId,-                  ("endDate" .=) <$> _camEndDate,-                  ("advertiserIdDimensionValue" .=) <$>-                    _camAdvertiserIdDimensionValue,-                  ("idDimensionValue" .=) <$> _camIdDimensionValue,-                  ("eventTagOverrides" .=) <$> _camEventTagOverrides,-                  ("lookbackConfiguration" .=) <$>-                    _camLookbackConfiguration,-                  ("startDate" .=) <$> _camStartDate,-                  ("accountId" .=) <$> _camAccountId,-                  ("comscoreVceEnabled" .=) <$> _camComscoreVceEnabled,-                  ("name" .=) <$> _camName,-                  ("advertiserGroupId" .=) <$> _camAdvertiserGroupId,-                  ("billingInvoiceCode" .=) <$> _camBillingInvoiceCode,-                  ("createInfo" .=) <$> _camCreateInfo,-                  ("lastModifiedInfo" .=) <$> _camLastModifiedInfo,-                  ("id" .=) <$> _camId,-                  ("subaccountId" .=) <$> _camSubAccountId,-                  ("additionalCreativeOptimizationConfigurations" .=)-                    <$> _camAdditionalCreativeOptimizationConfigurations,-                  ("externalId" .=) <$> _camExternalId,-                  ("comment" .=) <$> _camComment,-                  ("audienceSegmentGroups" .=) <$>-                    _camAudienceSegmentGroups,-                  ("archived" .=) <$> _camArchived,-                  ("traffickerEmails" .=) <$> _camTraffickerEmails,-                  ("defaultClickThroughEventTagProperties" .=) <$>-                    _camDefaultClickThroughEventTagProperties])---- | Third Party Authentication Token------ /See:/ 'thirdPartyAuthenticationToken' smart constructor.-data ThirdPartyAuthenticationToken = ThirdPartyAuthenticationToken-    { _tpatValue :: !(Maybe Text)-    , _tpatName  :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ThirdPartyAuthenticationToken' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tpatValue'------ * 'tpatName'-thirdPartyAuthenticationToken-    :: ThirdPartyAuthenticationToken-thirdPartyAuthenticationToken =-    ThirdPartyAuthenticationToken-    { _tpatValue = Nothing-    , _tpatName = Nothing-    }---- | Value of the third-party authentication token. This is a read-only,--- auto-generated field.-tpatValue :: Lens' ThirdPartyAuthenticationToken (Maybe Text)-tpatValue-  = lens _tpatValue (\ s a -> s{_tpatValue = a})---- | Name of the third-party authentication token.-tpatName :: Lens' ThirdPartyAuthenticationToken (Maybe Text)-tpatName = lens _tpatName (\ s a -> s{_tpatName = a})--instance FromJSON ThirdPartyAuthenticationToken where-        parseJSON-          = withObject "ThirdPartyAuthenticationToken"-              (\ o ->-                 ThirdPartyAuthenticationToken <$>-                   (o .:? "value") <*> (o .:? "name"))--instance ToJSON ThirdPartyAuthenticationToken where-        toJSON ThirdPartyAuthenticationToken{..}-          = object-              (catMaybes-                 [("value" .=) <$> _tpatValue,-                  ("name" .=) <$> _tpatName])---- | Click-through URL------ /See:/ 'clickThroughURL' smart constructor.-data ClickThroughURL = ClickThroughURL-    { _ctuDefaultLandingPage      :: !(Maybe Bool)-    , _ctuComputedClickThroughURL :: !(Maybe Text)-    , _ctuCustomClickThroughURL   :: !(Maybe Text)-    , _ctuLandingPageId           :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ClickThroughURL' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ctuDefaultLandingPage'------ * 'ctuComputedClickThroughURL'------ * 'ctuCustomClickThroughURL'------ * 'ctuLandingPageId'-clickThroughURL-    :: ClickThroughURL-clickThroughURL =-    ClickThroughURL-    { _ctuDefaultLandingPage = Nothing-    , _ctuComputedClickThroughURL = Nothing-    , _ctuCustomClickThroughURL = Nothing-    , _ctuLandingPageId = Nothing-    }---- | Whether the campaign default landing page is used.-ctuDefaultLandingPage :: Lens' ClickThroughURL (Maybe Bool)-ctuDefaultLandingPage-  = lens _ctuDefaultLandingPage-      (\ s a -> s{_ctuDefaultLandingPage = a})---- | Read-only convenience field representing the actual URL that will be--- used for this click-through. The URL is computed as follows: - If--- defaultLandingPage is enabled then the campaign\'s default landing page--- URL is assigned to this field. - If defaultLandingPage is not enabled--- and a landingPageId is specified then that landing page\'s URL is--- assigned to this field. - If neither of the above cases apply, then the--- customClickThroughUrl is assigned to this field.-ctuComputedClickThroughURL :: Lens' ClickThroughURL (Maybe Text)-ctuComputedClickThroughURL-  = lens _ctuComputedClickThroughURL-      (\ s a -> s{_ctuComputedClickThroughURL = a})---- | Custom click-through URL. Applicable if the defaultLandingPage field is--- set to false and the landingPageId field is left unset.-ctuCustomClickThroughURL :: Lens' ClickThroughURL (Maybe Text)-ctuCustomClickThroughURL-  = lens _ctuCustomClickThroughURL-      (\ s a -> s{_ctuCustomClickThroughURL = a})---- | ID of the landing page for the click-through URL. Applicable if the--- defaultLandingPage field is set to false.-ctuLandingPageId :: Lens' ClickThroughURL (Maybe Int64)-ctuLandingPageId-  = lens _ctuLandingPageId-      (\ s a -> s{_ctuLandingPageId = a})-      . mapping _Coerce--instance FromJSON ClickThroughURL where-        parseJSON-          = withObject "ClickThroughURL"-              (\ o ->-                 ClickThroughURL <$>-                   (o .:? "defaultLandingPage") <*>-                     (o .:? "computedClickThroughUrl")-                     <*> (o .:? "customClickThroughUrl")-                     <*> (o .:? "landingPageId"))--instance ToJSON ClickThroughURL where-        toJSON ClickThroughURL{..}-          = object-              (catMaybes-                 [("defaultLandingPage" .=) <$>-                    _ctuDefaultLandingPage,-                  ("computedClickThroughUrl" .=) <$>-                    _ctuComputedClickThroughURL,-                  ("customClickThroughUrl" .=) <$>-                    _ctuCustomClickThroughURL,-                  ("landingPageId" .=) <$> _ctuLandingPageId])---- | Browser List Response------ /See:/ 'browsersListResponse' smart constructor.-data BrowsersListResponse = BrowsersListResponse-    { _blrKind     :: !Text-    , _blrBrowsers :: !(Maybe [Browser])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'BrowsersListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'blrKind'------ * 'blrBrowsers'-browsersListResponse-    :: BrowsersListResponse-browsersListResponse =-    BrowsersListResponse-    { _blrKind = "dfareporting#browsersListResponse"-    , _blrBrowsers = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#browsersListResponse\".-blrKind :: Lens' BrowsersListResponse Text-blrKind = lens _blrKind (\ s a -> s{_blrKind = a})---- | Browser collection.-blrBrowsers :: Lens' BrowsersListResponse [Browser]-blrBrowsers-  = lens _blrBrowsers (\ s a -> s{_blrBrowsers = a}) .-      _Default-      . _Coerce--instance FromJSON BrowsersListResponse where-        parseJSON-          = withObject "BrowsersListResponse"-              (\ o ->-                 BrowsersListResponse <$>-                   (o .:? "kind" .!=-                      "dfareporting#browsersListResponse")-                     <*> (o .:? "browsers" .!= mempty))--instance ToJSON BrowsersListResponse where-        toJSON BrowsersListResponse{..}-          = object-              (catMaybes-                 [Just ("kind" .= _blrKind),-                  ("browsers" .=) <$> _blrBrowsers])---- | Site Settings------ /See:/ 'siteSettings' smart constructor.-data SiteSettings = SiteSettings-    { _ssDisableNewCookie      :: !(Maybe Bool)-    , _ssDisableBrandSafeAds   :: !(Maybe Bool)-    , _ssLookbackConfiguration :: !(Maybe LookbackConfiguration)-    , _ssTagSetting            :: !(Maybe TagSetting)-    , _ssActiveViewOptOut      :: !(Maybe Bool)-    , _ssCreativeSettings      :: !(Maybe CreativeSettings)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'SiteSettings' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ssDisableNewCookie'------ * 'ssDisableBrandSafeAds'------ * 'ssLookbackConfiguration'------ * 'ssTagSetting'------ * 'ssActiveViewOptOut'------ * 'ssCreativeSettings'-siteSettings-    :: SiteSettings-siteSettings =-    SiteSettings-    { _ssDisableNewCookie = Nothing-    , _ssDisableBrandSafeAds = Nothing-    , _ssLookbackConfiguration = Nothing-    , _ssTagSetting = Nothing-    , _ssActiveViewOptOut = Nothing-    , _ssCreativeSettings = Nothing-    }---- | Whether new cookies are disabled for this site.-ssDisableNewCookie :: Lens' SiteSettings (Maybe Bool)-ssDisableNewCookie-  = lens _ssDisableNewCookie-      (\ s a -> s{_ssDisableNewCookie = a})---- | Whether brand safe ads are disabled for this site.-ssDisableBrandSafeAds :: Lens' SiteSettings (Maybe Bool)-ssDisableBrandSafeAds-  = lens _ssDisableBrandSafeAds-      (\ s a -> s{_ssDisableBrandSafeAds = a})---- | Lookback window settings for this site.-ssLookbackConfiguration :: Lens' SiteSettings (Maybe LookbackConfiguration)-ssLookbackConfiguration-  = lens _ssLookbackConfiguration-      (\ s a -> s{_ssLookbackConfiguration = a})---- | Configuration settings for dynamic and image floodlight tags.-ssTagSetting :: Lens' SiteSettings (Maybe TagSetting)-ssTagSetting-  = lens _ssTagSetting (\ s a -> s{_ssTagSetting = a})---- | Whether active view creatives are disabled for this site.-ssActiveViewOptOut :: Lens' SiteSettings (Maybe Bool)-ssActiveViewOptOut-  = lens _ssActiveViewOptOut-      (\ s a -> s{_ssActiveViewOptOut = a})---- | Site-wide creative settings.-ssCreativeSettings :: Lens' SiteSettings (Maybe CreativeSettings)-ssCreativeSettings-  = lens _ssCreativeSettings-      (\ s a -> s{_ssCreativeSettings = a})--instance FromJSON SiteSettings where-        parseJSON-          = withObject "SiteSettings"-              (\ o ->-                 SiteSettings <$>-                   (o .:? "disableNewCookie") <*>-                     (o .:? "disableBrandSafeAds")-                     <*> (o .:? "lookbackConfiguration")-                     <*> (o .:? "tagSetting")-                     <*> (o .:? "activeViewOptOut")-                     <*> (o .:? "creativeSettings"))--instance ToJSON SiteSettings where-        toJSON SiteSettings{..}-          = object-              (catMaybes-                 [("disableNewCookie" .=) <$> _ssDisableNewCookie,-                  ("disableBrandSafeAds" .=) <$>-                    _ssDisableBrandSafeAds,-                  ("lookbackConfiguration" .=) <$>-                    _ssLookbackConfiguration,-                  ("tagSetting" .=) <$> _ssTagSetting,-                  ("activeViewOptOut" .=) <$> _ssActiveViewOptOut,-                  ("creativeSettings" .=) <$> _ssCreativeSettings])---- | Content Category List Response------ /See:/ 'contentCategoriesListResponse' smart constructor.-data ContentCategoriesListResponse = ContentCategoriesListResponse-    { _cclrNextPageToken     :: !(Maybe Text)-    , _cclrKind              :: !Text-    , _cclrContentCategories :: !(Maybe [ContentCategory])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ContentCategoriesListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cclrNextPageToken'------ * 'cclrKind'------ * 'cclrContentCategories'-contentCategoriesListResponse-    :: ContentCategoriesListResponse-contentCategoriesListResponse =-    ContentCategoriesListResponse-    { _cclrNextPageToken = Nothing-    , _cclrKind = "dfareporting#contentCategoriesListResponse"-    , _cclrContentCategories = Nothing-    }---- | Pagination token to be used for the next list operation.-cclrNextPageToken :: Lens' ContentCategoriesListResponse (Maybe Text)-cclrNextPageToken-  = lens _cclrNextPageToken-      (\ s a -> s{_cclrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#contentCategoriesListResponse\".-cclrKind :: Lens' ContentCategoriesListResponse Text-cclrKind = lens _cclrKind (\ s a -> s{_cclrKind = a})---- | Content category collection.-cclrContentCategories :: Lens' ContentCategoriesListResponse [ContentCategory]-cclrContentCategories-  = lens _cclrContentCategories-      (\ s a -> s{_cclrContentCategories = a})-      . _Default-      . _Coerce--instance FromJSON ContentCategoriesListResponse where-        parseJSON-          = withObject "ContentCategoriesListResponse"-              (\ o ->-                 ContentCategoriesListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!=-                        "dfareporting#contentCategoriesListResponse")-                     <*> (o .:? "contentCategories" .!= mempty))--instance ToJSON ContentCategoriesListResponse where-        toJSON ContentCategoriesListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _cclrNextPageToken,-                  Just ("kind" .= _cclrKind),-                  ("contentCategories" .=) <$> _cclrContentCategories])---- | Creative List Response------ /See:/ 'creativesListResponse' smart constructor.-data CreativesListResponse = CreativesListResponse-    { _clrlNextPageToken :: !(Maybe Text)-    , _clrlKind          :: !Text-    , _clrlCreatives     :: !(Maybe [Creative])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CreativesListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'clrlNextPageToken'------ * 'clrlKind'------ * 'clrlCreatives'-creativesListResponse-    :: CreativesListResponse-creativesListResponse =-    CreativesListResponse-    { _clrlNextPageToken = Nothing-    , _clrlKind = "dfareporting#creativesListResponse"-    , _clrlCreatives = Nothing-    }---- | Pagination token to be used for the next list operation.-clrlNextPageToken :: Lens' CreativesListResponse (Maybe Text)-clrlNextPageToken-  = lens _clrlNextPageToken-      (\ s a -> s{_clrlNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#creativesListResponse\".-clrlKind :: Lens' CreativesListResponse Text-clrlKind = lens _clrlKind (\ s a -> s{_clrlKind = a})---- | Creative collection.-clrlCreatives :: Lens' CreativesListResponse [Creative]-clrlCreatives-  = lens _clrlCreatives-      (\ s a -> s{_clrlCreatives = a})-      . _Default-      . _Coerce--instance FromJSON CreativesListResponse where-        parseJSON-          = withObject "CreativesListResponse"-              (\ o ->-                 CreativesListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!=-                        "dfareporting#creativesListResponse")-                     <*> (o .:? "creatives" .!= mempty))--instance ToJSON CreativesListResponse where-        toJSON CreativesListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _clrlNextPageToken,-                  Just ("kind" .= _clrlKind),-                  ("creatives" .=) <$> _clrlCreatives])---- | Contains properties of a DCM account.------ /See:/ 'account' smart constructor.-data Account = Account-    { _aaAccountPermissionIds   :: !(Maybe [Textual Int64])-    , _aaMaximumImageSize       :: !(Maybe (Textual Int64))-    , _aaCurrencyId             :: !(Maybe (Textual Int64))-    , _aaReportsConfiguration   :: !(Maybe ReportsConfiguration)-    , _aaNielsenOCREnabled      :: !(Maybe Bool)-    , _aaKind                   :: !Text-    , _aaLocale                 :: !(Maybe Text)-    , _aaActive                 :: !(Maybe Bool)-    , _aaAvailablePermissionIds :: !(Maybe [Textual Int64])-    , _aaTeaserSizeLimit        :: !(Maybe (Textual Int64))-    , _aaComscoreVceEnabled     :: !(Maybe Bool)-    , _aaActiveViewOptOut       :: !(Maybe Bool)-    , _aaName                   :: !(Maybe Text)-    , _aaAccountProFile         :: !(Maybe AccountAccountProFile)-    , _aaId                     :: !(Maybe (Textual Int64))-    , _aaCountryId              :: !(Maybe (Textual Int64))-    , _aaActiveAdsLimitTier     :: !(Maybe AccountActiveAdsLimitTier)-    , _aaDefaultCreativeSizeId  :: !(Maybe (Textual Int64))-    , _aaDescription            :: !(Maybe Text)-    } 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:------ * 'aaAccountPermissionIds'------ * 'aaMaximumImageSize'------ * 'aaCurrencyId'------ * 'aaReportsConfiguration'------ * 'aaNielsenOCREnabled'------ * 'aaKind'------ * 'aaLocale'------ * 'aaActive'------ * 'aaAvailablePermissionIds'------ * 'aaTeaserSizeLimit'------ * 'aaComscoreVceEnabled'------ * 'aaActiveViewOptOut'------ * 'aaName'------ * 'aaAccountProFile'------ * 'aaId'------ * 'aaCountryId'------ * 'aaActiveAdsLimitTier'------ * 'aaDefaultCreativeSizeId'------ * 'aaDescription'-account-    :: Account-account =-    Account-    { _aaAccountPermissionIds = Nothing-    , _aaMaximumImageSize = Nothing-    , _aaCurrencyId = Nothing-    , _aaReportsConfiguration = Nothing-    , _aaNielsenOCREnabled = Nothing-    , _aaKind = "dfareporting#account"-    , _aaLocale = Nothing-    , _aaActive = Nothing-    , _aaAvailablePermissionIds = Nothing-    , _aaTeaserSizeLimit = Nothing-    , _aaComscoreVceEnabled = Nothing-    , _aaActiveViewOptOut = Nothing-    , _aaName = Nothing-    , _aaAccountProFile = Nothing-    , _aaId = Nothing-    , _aaCountryId = Nothing-    , _aaActiveAdsLimitTier = Nothing-    , _aaDefaultCreativeSizeId = Nothing-    , _aaDescription = Nothing-    }---- | Account permissions assigned to this account.-aaAccountPermissionIds :: Lens' Account [Int64]-aaAccountPermissionIds-  = lens _aaAccountPermissionIds-      (\ s a -> s{_aaAccountPermissionIds = a})-      . _Default-      . _Coerce---- | Maximum image size allowed for this account.-aaMaximumImageSize :: Lens' Account (Maybe Int64)-aaMaximumImageSize-  = lens _aaMaximumImageSize-      (\ s a -> s{_aaMaximumImageSize = a})-      . mapping _Coerce---- | ID of currency associated with this account. This is a required field.--- Acceptable values are: - \"1\" for USD - \"2\" for GBP - \"3\" for ESP ---- \"4\" for SEK - \"5\" for CAD - \"6\" for JPY - \"7\" for DEM - \"8\"--- for AUD - \"9\" for FRF - \"10\" for ITL - \"11\" for DKK - \"12\" for--- NOK - \"13\" for FIM - \"14\" for ZAR - \"15\" for IEP - \"16\" for NLG--- - \"17\" for EUR - \"18\" for KRW - \"19\" for TWD - \"20\" for SGD ---- \"21\" for CNY - \"22\" for HKD - \"23\" for NZD - \"24\" for MYR ---- \"25\" for BRL - \"26\" for PTE - \"27\" for MXP - \"28\" for CLP ---- \"29\" for TRY - \"30\" for ARS - \"31\" for PEN - \"32\" for ILS ---- \"33\" for CHF - \"34\" for VEF - \"35\" for COP - \"36\" for GTQ-aaCurrencyId :: Lens' Account (Maybe Int64)-aaCurrencyId-  = lens _aaCurrencyId (\ s a -> s{_aaCurrencyId = a})-      . mapping _Coerce---- | Reporting configuration of this account.-aaReportsConfiguration :: Lens' Account (Maybe ReportsConfiguration)-aaReportsConfiguration-  = lens _aaReportsConfiguration-      (\ s a -> s{_aaReportsConfiguration = a})---- | Whether campaigns created in this account will be enabled for Nielsen--- OCR reach ratings by default.-aaNielsenOCREnabled :: Lens' Account (Maybe Bool)-aaNielsenOCREnabled-  = lens _aaNielsenOCREnabled-      (\ s a -> s{_aaNielsenOCREnabled = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#account\".-aaKind :: Lens' Account Text-aaKind = lens _aaKind (\ s a -> s{_aaKind = a})---- | Locale of this account. Acceptable values are: - \"cs\" (Czech) - \"de\"--- (German) - \"en\" (English) - \"en-GB\" (English United Kingdom) ---- \"es\" (Spanish) - \"fr\" (French) - \"it\" (Italian) - \"ja\"--- (Japanese) - \"ko\" (Korean) - \"pl\" (Polish) - \"pt-BR\" (Portuguese--- Brazil) - \"ru\" (Russian) - \"sv\" (Swedish) - \"tr\" (Turkish) ---- \"zh-CN\" (Chinese Simplified) - \"zh-TW\" (Chinese Traditional)-aaLocale :: Lens' Account (Maybe Text)-aaLocale = lens _aaLocale (\ s a -> s{_aaLocale = a})---- | Whether this account is active.-aaActive :: Lens' Account (Maybe Bool)-aaActive = lens _aaActive (\ s a -> s{_aaActive = a})---- | User role permissions available to the user roles of this account.-aaAvailablePermissionIds :: Lens' Account [Int64]-aaAvailablePermissionIds-  = lens _aaAvailablePermissionIds-      (\ s a -> s{_aaAvailablePermissionIds = a})-      . _Default-      . _Coerce---- | File size limit in kilobytes of Rich Media teaser creatives. Must be--- between 1 and 10240.-aaTeaserSizeLimit :: Lens' Account (Maybe Int64)-aaTeaserSizeLimit-  = lens _aaTeaserSizeLimit-      (\ s a -> s{_aaTeaserSizeLimit = a})-      . mapping _Coerce---- | Whether campaigns created in this account will be enabled for comScore--- vCE by default.-aaComscoreVceEnabled :: Lens' Account (Maybe Bool)-aaComscoreVceEnabled-  = lens _aaComscoreVceEnabled-      (\ s a -> s{_aaComscoreVceEnabled = a})---- | Whether to serve creatives with Active View tags. If disabled,--- viewability data will not be available for any impressions.-aaActiveViewOptOut :: Lens' Account (Maybe Bool)-aaActiveViewOptOut-  = lens _aaActiveViewOptOut-      (\ s a -> s{_aaActiveViewOptOut = a})---- | Name of this account. This is a required field, and must be less than--- 128 characters long and be globally unique.-aaName :: Lens' Account (Maybe Text)-aaName = lens _aaName (\ s a -> s{_aaName = a})---- | Profile for this account. This is a read-only field that can be left--- blank.-aaAccountProFile :: Lens' Account (Maybe AccountAccountProFile)-aaAccountProFile-  = lens _aaAccountProFile-      (\ s a -> s{_aaAccountProFile = a})---- | ID of this account. This is a read-only, auto-generated field.-aaId :: Lens' Account (Maybe Int64)-aaId-  = lens _aaId (\ s a -> s{_aaId = a}) .-      mapping _Coerce---- | ID of the country associated with this account.-aaCountryId :: Lens' Account (Maybe Int64)-aaCountryId-  = lens _aaCountryId (\ s a -> s{_aaCountryId = a}) .-      mapping _Coerce---- | Maximum number of active ads allowed for this account.-aaActiveAdsLimitTier :: Lens' Account (Maybe AccountActiveAdsLimitTier)-aaActiveAdsLimitTier-  = lens _aaActiveAdsLimitTier-      (\ s a -> s{_aaActiveAdsLimitTier = a})---- | Default placement dimensions for this account.-aaDefaultCreativeSizeId :: Lens' Account (Maybe Int64)-aaDefaultCreativeSizeId-  = lens _aaDefaultCreativeSizeId-      (\ s a -> s{_aaDefaultCreativeSizeId = a})-      . mapping _Coerce---- | Description of this account.-aaDescription :: Lens' Account (Maybe Text)-aaDescription-  = lens _aaDescription-      (\ s a -> s{_aaDescription = a})--instance FromJSON Account where-        parseJSON-          = withObject "Account"-              (\ o ->-                 Account <$>-                   (o .:? "accountPermissionIds" .!= mempty) <*>-                     (o .:? "maximumImageSize")-                     <*> (o .:? "currencyId")-                     <*> (o .:? "reportsConfiguration")-                     <*> (o .:? "nielsenOcrEnabled")-                     <*> (o .:? "kind" .!= "dfareporting#account")-                     <*> (o .:? "locale")-                     <*> (o .:? "active")-                     <*> (o .:? "availablePermissionIds" .!= mempty)-                     <*> (o .:? "teaserSizeLimit")-                     <*> (o .:? "comscoreVceEnabled")-                     <*> (o .:? "activeViewOptOut")-                     <*> (o .:? "name")-                     <*> (o .:? "accountProfile")-                     <*> (o .:? "id")-                     <*> (o .:? "countryId")-                     <*> (o .:? "activeAdsLimitTier")-                     <*> (o .:? "defaultCreativeSizeId")-                     <*> (o .:? "description"))--instance ToJSON Account where-        toJSON Account{..}-          = object-              (catMaybes-                 [("accountPermissionIds" .=) <$>-                    _aaAccountPermissionIds,-                  ("maximumImageSize" .=) <$> _aaMaximumImageSize,-                  ("currencyId" .=) <$> _aaCurrencyId,-                  ("reportsConfiguration" .=) <$>-                    _aaReportsConfiguration,-                  ("nielsenOcrEnabled" .=) <$> _aaNielsenOCREnabled,-                  Just ("kind" .= _aaKind),-                  ("locale" .=) <$> _aaLocale,-                  ("active" .=) <$> _aaActive,-                  ("availablePermissionIds" .=) <$>-                    _aaAvailablePermissionIds,-                  ("teaserSizeLimit" .=) <$> _aaTeaserSizeLimit,-                  ("comscoreVceEnabled" .=) <$> _aaComscoreVceEnabled,-                  ("activeViewOptOut" .=) <$> _aaActiveViewOptOut,-                  ("name" .=) <$> _aaName,-                  ("accountProfile" .=) <$> _aaAccountProFile,-                  ("id" .=) <$> _aaId,-                  ("countryId" .=) <$> _aaCountryId,-                  ("activeAdsLimitTier" .=) <$> _aaActiveAdsLimitTier,-                  ("defaultCreativeSizeId" .=) <$>-                    _aaDefaultCreativeSizeId,-                  ("description" .=) <$> _aaDescription])---- | Account User Profile List Response------ /See:/ 'accountUserProFilesListResponse' smart constructor.-data AccountUserProFilesListResponse = AccountUserProFilesListResponse-    { _aupflrNextPageToken       :: !(Maybe Text)-    , _aupflrAccountUserProFiles :: !(Maybe [AccountUserProFile])-    , _aupflrKind                :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'AccountUserProFilesListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aupflrNextPageToken'------ * 'aupflrAccountUserProFiles'------ * 'aupflrKind'-accountUserProFilesListResponse-    :: AccountUserProFilesListResponse-accountUserProFilesListResponse =-    AccountUserProFilesListResponse-    { _aupflrNextPageToken = Nothing-    , _aupflrAccountUserProFiles = Nothing-    , _aupflrKind = "dfareporting#accountUserProfilesListResponse"-    }---- | Pagination token to be used for the next list operation.-aupflrNextPageToken :: Lens' AccountUserProFilesListResponse (Maybe Text)-aupflrNextPageToken-  = lens _aupflrNextPageToken-      (\ s a -> s{_aupflrNextPageToken = a})---- | Account user profile collection.-aupflrAccountUserProFiles :: Lens' AccountUserProFilesListResponse [AccountUserProFile]-aupflrAccountUserProFiles-  = lens _aupflrAccountUserProFiles-      (\ s a -> s{_aupflrAccountUserProFiles = a})-      . _Default-      . _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#accountUserProfilesListResponse\".-aupflrKind :: Lens' AccountUserProFilesListResponse Text-aupflrKind-  = lens _aupflrKind (\ s a -> s{_aupflrKind = a})--instance FromJSON AccountUserProFilesListResponse-         where-        parseJSON-          = withObject "AccountUserProFilesListResponse"-              (\ o ->-                 AccountUserProFilesListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "accountUserProfiles" .!= mempty)-                     <*>-                     (o .:? "kind" .!=-                        "dfareporting#accountUserProfilesListResponse"))--instance ToJSON AccountUserProFilesListResponse where-        toJSON AccountUserProFilesListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _aupflrNextPageToken,-                  ("accountUserProfiles" .=) <$>-                    _aupflrAccountUserProFiles,-                  Just ("kind" .= _aupflrKind)])---- | Organizes placements according to the contents of their associated--- webpages.------ /See:/ 'contentCategory' smart constructor.-data ContentCategory = ContentCategory-    { _conKind      :: !Text-    , _conAccountId :: !(Maybe (Textual Int64))-    , _conName      :: !(Maybe Text)-    , _conId        :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ContentCategory' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'conKind'------ * 'conAccountId'------ * 'conName'------ * 'conId'-contentCategory-    :: ContentCategory-contentCategory =-    ContentCategory-    { _conKind = "dfareporting#contentCategory"-    , _conAccountId = Nothing-    , _conName = Nothing-    , _conId = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#contentCategory\".-conKind :: Lens' ContentCategory Text-conKind = lens _conKind (\ s a -> s{_conKind = a})---- | Account ID of this content category. This is a read-only field that can--- be left blank.-conAccountId :: Lens' ContentCategory (Maybe Int64)-conAccountId-  = lens _conAccountId (\ s a -> s{_conAccountId = a})-      . mapping _Coerce---- | Name of this content category. This is a required field and must be less--- than 256 characters long and unique among content categories of the same--- account.-conName :: Lens' ContentCategory (Maybe Text)-conName = lens _conName (\ s a -> s{_conName = a})---- | ID of this content category. This is a read-only, auto-generated field.-conId :: Lens' ContentCategory (Maybe Int64)-conId-  = lens _conId (\ s a -> s{_conId = a}) .-      mapping _Coerce--instance FromJSON ContentCategory where-        parseJSON-          = withObject "ContentCategory"-              (\ o ->-                 ContentCategory <$>-                   (o .:? "kind" .!= "dfareporting#contentCategory") <*>-                     (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "id"))--instance ToJSON ContentCategory where-        toJSON ContentCategory{..}-          = object-              (catMaybes-                 [Just ("kind" .= _conKind),-                  ("accountId" .=) <$> _conAccountId,-                  ("name" .=) <$> _conName, ("id" .=) <$> _conId])---- | Represents fields that are compatible to be selected for a report of--- type \"STANDARD\".------ /See:/ 'reportCompatibleFields' smart constructor.-data ReportCompatibleFields = ReportCompatibleFields-    { _rcfMetrics                :: !(Maybe [Metric])-    , _rcfKind                   :: !Text-    , _rcfDimensionFilters       :: !(Maybe [Dimension])-    , _rcfPivotedActivityMetrics :: !(Maybe [Metric])-    , _rcfDimensions             :: !(Maybe [Dimension])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ReportCompatibleFields' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rcfMetrics'------ * 'rcfKind'------ * 'rcfDimensionFilters'------ * 'rcfPivotedActivityMetrics'------ * 'rcfDimensions'-reportCompatibleFields-    :: ReportCompatibleFields-reportCompatibleFields =-    ReportCompatibleFields-    { _rcfMetrics = Nothing-    , _rcfKind = "dfareporting#reportCompatibleFields"-    , _rcfDimensionFilters = Nothing-    , _rcfPivotedActivityMetrics = Nothing-    , _rcfDimensions = Nothing-    }---- | Metrics which are compatible to be selected in the \"metricNames\"--- section of the report.-rcfMetrics :: Lens' ReportCompatibleFields [Metric]-rcfMetrics-  = lens _rcfMetrics (\ s a -> s{_rcfMetrics = a}) .-      _Default-      . _Coerce---- | The kind of resource this is, in this case--- dfareporting#reportCompatibleFields.-rcfKind :: Lens' ReportCompatibleFields Text-rcfKind = lens _rcfKind (\ s a -> s{_rcfKind = a})---- | Dimensions which are compatible to be selected in the--- \"dimensionFilters\" section of the report.-rcfDimensionFilters :: Lens' ReportCompatibleFields [Dimension]-rcfDimensionFilters-  = lens _rcfDimensionFilters-      (\ s a -> s{_rcfDimensionFilters = a})-      . _Default-      . _Coerce---- | Metrics which are compatible to be selected as activity metrics to pivot--- on in the \"activities\" section of the report.-rcfPivotedActivityMetrics :: Lens' ReportCompatibleFields [Metric]-rcfPivotedActivityMetrics-  = lens _rcfPivotedActivityMetrics-      (\ s a -> s{_rcfPivotedActivityMetrics = a})-      . _Default-      . _Coerce---- | Dimensions which are compatible to be selected in the \"dimensions\"--- section of the report.-rcfDimensions :: Lens' ReportCompatibleFields [Dimension]-rcfDimensions-  = lens _rcfDimensions-      (\ s a -> s{_rcfDimensions = a})-      . _Default-      . _Coerce--instance FromJSON ReportCompatibleFields where-        parseJSON-          = withObject "ReportCompatibleFields"-              (\ o ->-                 ReportCompatibleFields <$>-                   (o .:? "metrics" .!= mempty) <*>-                     (o .:? "kind" .!=-                        "dfareporting#reportCompatibleFields")-                     <*> (o .:? "dimensionFilters" .!= mempty)-                     <*> (o .:? "pivotedActivityMetrics" .!= mempty)-                     <*> (o .:? "dimensions" .!= mempty))--instance ToJSON ReportCompatibleFields where-        toJSON ReportCompatibleFields{..}-          = object-              (catMaybes-                 [("metrics" .=) <$> _rcfMetrics,-                  Just ("kind" .= _rcfKind),-                  ("dimensionFilters" .=) <$> _rcfDimensionFilters,-                  ("pivotedActivityMetrics" .=) <$>-                    _rcfPivotedActivityMetrics,-                  ("dimensions" .=) <$> _rcfDimensions])---- | Delivery Schedule.------ /See:/ 'deliverySchedule' smart constructor.-data DeliverySchedule = DeliverySchedule-    { _dsHardCutoff      :: !(Maybe Bool)-    , _dsPriority        :: !(Maybe DeliverySchedulePriority)-    , _dsImpressionRatio :: !(Maybe (Textual Int64))-    , _dsFrequencyCap    :: !(Maybe FrequencyCap)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'DeliverySchedule' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dsHardCutoff'------ * 'dsPriority'------ * 'dsImpressionRatio'------ * 'dsFrequencyCap'-deliverySchedule-    :: DeliverySchedule-deliverySchedule =-    DeliverySchedule-    { _dsHardCutoff = Nothing-    , _dsPriority = Nothing-    , _dsImpressionRatio = Nothing-    , _dsFrequencyCap = Nothing-    }---- | Whether or not hard cutoff is enabled. If true, the ad will not serve--- after the end date and time. Otherwise the ad will continue to be served--- until it has reached its delivery goals.-dsHardCutoff :: Lens' DeliverySchedule (Maybe Bool)-dsHardCutoff-  = lens _dsHardCutoff (\ s a -> s{_dsHardCutoff = a})---- | Serving priority of an ad, with respect to other ads. The lower the--- priority number, the greater the priority with which it is served.-dsPriority :: Lens' DeliverySchedule (Maybe DeliverySchedulePriority)-dsPriority-  = lens _dsPriority (\ s a -> s{_dsPriority = a})---- | Impression ratio for this ad. This ratio determines how often each ad is--- served relative to the others. For example, if ad A has an impression--- ratio of 1 and ad B has an impression ratio of 3, then DCM will serve ad--- B three times as often as ad A. Must be between 1 and 10.-dsImpressionRatio :: Lens' DeliverySchedule (Maybe Int64)-dsImpressionRatio-  = lens _dsImpressionRatio-      (\ s a -> s{_dsImpressionRatio = a})-      . mapping _Coerce---- | Limit on the number of times an individual user can be served the ad--- within a specified period of time.-dsFrequencyCap :: Lens' DeliverySchedule (Maybe FrequencyCap)-dsFrequencyCap-  = lens _dsFrequencyCap-      (\ s a -> s{_dsFrequencyCap = a})--instance FromJSON DeliverySchedule where-        parseJSON-          = withObject "DeliverySchedule"-              (\ o ->-                 DeliverySchedule <$>-                   (o .:? "hardCutoff") <*> (o .:? "priority") <*>-                     (o .:? "impressionRatio")-                     <*> (o .:? "frequencyCap"))--instance ToJSON DeliverySchedule where-        toJSON DeliverySchedule{..}-          = object-              (catMaybes-                 [("hardCutoff" .=) <$> _dsHardCutoff,-                  ("priority" .=) <$> _dsPriority,-                  ("impressionRatio" .=) <$> _dsImpressionRatio,-                  ("frequencyCap" .=) <$> _dsFrequencyCap])---- | Contains properties of a remarketing list. Remarketing enables you to--- create lists of users who have performed specific actions on a site,--- then target ads to members of those lists. This resource can be used to--- manage remarketing lists that are owned by your advertisers. To see all--- remarketing lists that are visible to your advertisers, including those--- that are shared to your advertiser or account, use the--- TargetableRemarketingLists resource.------ /See:/ 'remarketingList' smart constructor.-data RemarketingList = RemarketingList-    { _rlListSize                   :: !(Maybe (Textual Int64))-    , _rlListPopulationRule         :: !(Maybe ListPopulationRule)-    , _rlLifeSpan                   :: !(Maybe (Textual Int64))-    , _rlKind                       :: !Text-    , _rlAdvertiserId               :: !(Maybe (Textual Int64))-    , _rlAdvertiserIdDimensionValue :: !(Maybe DimensionValue)-    , _rlActive                     :: !(Maybe Bool)-    , _rlAccountId                  :: !(Maybe (Textual Int64))-    , _rlName                       :: !(Maybe Text)-    , _rlListSource                 :: !(Maybe RemarketingListListSource)-    , _rlId                         :: !(Maybe (Textual Int64))-    , _rlSubAccountId               :: !(Maybe (Textual Int64))-    , _rlDescription                :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'RemarketingList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rlListSize'------ * 'rlListPopulationRule'------ * 'rlLifeSpan'------ * 'rlKind'------ * 'rlAdvertiserId'------ * 'rlAdvertiserIdDimensionValue'------ * 'rlActive'------ * 'rlAccountId'------ * 'rlName'------ * 'rlListSource'------ * 'rlId'------ * 'rlSubAccountId'------ * 'rlDescription'-remarketingList-    :: RemarketingList-remarketingList =-    RemarketingList-    { _rlListSize = Nothing-    , _rlListPopulationRule = Nothing-    , _rlLifeSpan = Nothing-    , _rlKind = "dfareporting#remarketingList"-    , _rlAdvertiserId = Nothing-    , _rlAdvertiserIdDimensionValue = Nothing-    , _rlActive = Nothing-    , _rlAccountId = Nothing-    , _rlName = Nothing-    , _rlListSource = Nothing-    , _rlId = Nothing-    , _rlSubAccountId = Nothing-    , _rlDescription = Nothing-    }---- | Number of users currently in the list. This is a read-only field.-rlListSize :: Lens' RemarketingList (Maybe Int64)-rlListSize-  = lens _rlListSize (\ s a -> s{_rlListSize = a}) .-      mapping _Coerce---- | Rule used to populate the remarketing list with users.-rlListPopulationRule :: Lens' RemarketingList (Maybe ListPopulationRule)-rlListPopulationRule-  = lens _rlListPopulationRule-      (\ s a -> s{_rlListPopulationRule = a})---- | Number of days that a user should remain in the remarketing list without--- an impression.-rlLifeSpan :: Lens' RemarketingList (Maybe Int64)-rlLifeSpan-  = lens _rlLifeSpan (\ s a -> s{_rlLifeSpan = a}) .-      mapping _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#remarketingList\".-rlKind :: Lens' RemarketingList Text-rlKind = lens _rlKind (\ s a -> s{_rlKind = a})---- | Dimension value for the advertiser ID that owns this remarketing list.--- This is a required field.-rlAdvertiserId :: Lens' RemarketingList (Maybe Int64)-rlAdvertiserId-  = lens _rlAdvertiserId-      (\ s a -> s{_rlAdvertiserId = a})-      . mapping _Coerce---- | Dimension value for the ID of the advertiser. This is a read-only,--- auto-generated field.-rlAdvertiserIdDimensionValue :: Lens' RemarketingList (Maybe DimensionValue)-rlAdvertiserIdDimensionValue-  = lens _rlAdvertiserIdDimensionValue-      (\ s a -> s{_rlAdvertiserIdDimensionValue = a})---- | Whether this remarketing list is active.-rlActive :: Lens' RemarketingList (Maybe Bool)-rlActive = lens _rlActive (\ s a -> s{_rlActive = a})---- | Account ID of this remarketing list. This is a read-only, auto-generated--- field that is only returned in GET requests.-rlAccountId :: Lens' RemarketingList (Maybe Int64)-rlAccountId-  = lens _rlAccountId (\ s a -> s{_rlAccountId = a}) .-      mapping _Coerce---- | Name of the remarketing list. This is a required field. Must be no--- greater than 128 characters long.-rlName :: Lens' RemarketingList (Maybe Text)-rlName = lens _rlName (\ s a -> s{_rlName = a})---- | Product from which this remarketing list was originated.-rlListSource :: Lens' RemarketingList (Maybe RemarketingListListSource)-rlListSource-  = lens _rlListSource (\ s a -> s{_rlListSource = a})---- | Remarketing list ID. This is a read-only, auto-generated field.-rlId :: Lens' RemarketingList (Maybe Int64)-rlId-  = lens _rlId (\ s a -> s{_rlId = a}) .-      mapping _Coerce---- | Subaccount ID of this remarketing list. This is a read-only,--- auto-generated field that is only returned in GET requests.-rlSubAccountId :: Lens' RemarketingList (Maybe Int64)-rlSubAccountId-  = lens _rlSubAccountId-      (\ s a -> s{_rlSubAccountId = a})-      . mapping _Coerce---- | Remarketing list description.-rlDescription :: Lens' RemarketingList (Maybe Text)-rlDescription-  = lens _rlDescription-      (\ s a -> s{_rlDescription = a})--instance FromJSON RemarketingList where-        parseJSON-          = withObject "RemarketingList"-              (\ o ->-                 RemarketingList <$>-                   (o .:? "listSize") <*> (o .:? "listPopulationRule")-                     <*> (o .:? "lifeSpan")-                     <*> (o .:? "kind" .!= "dfareporting#remarketingList")-                     <*> (o .:? "advertiserId")-                     <*> (o .:? "advertiserIdDimensionValue")-                     <*> (o .:? "active")-                     <*> (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "listSource")-                     <*> (o .:? "id")-                     <*> (o .:? "subaccountId")-                     <*> (o .:? "description"))--instance ToJSON RemarketingList where-        toJSON RemarketingList{..}-          = object-              (catMaybes-                 [("listSize" .=) <$> _rlListSize,-                  ("listPopulationRule" .=) <$> _rlListPopulationRule,-                  ("lifeSpan" .=) <$> _rlLifeSpan,-                  Just ("kind" .= _rlKind),-                  ("advertiserId" .=) <$> _rlAdvertiserId,-                  ("advertiserIdDimensionValue" .=) <$>-                    _rlAdvertiserIdDimensionValue,-                  ("active" .=) <$> _rlActive,-                  ("accountId" .=) <$> _rlAccountId,-                  ("name" .=) <$> _rlName,-                  ("listSource" .=) <$> _rlListSource,-                  ("id" .=) <$> _rlId,-                  ("subaccountId" .=) <$> _rlSubAccountId,-                  ("description" .=) <$> _rlDescription])---- | Represents the list of DimensionValue resources.------ /See:/ 'dimensionValueList' smart constructor.-data DimensionValueList = DimensionValueList-    { _dvlEtag          :: !(Maybe Text)-    , _dvlNextPageToken :: !(Maybe Text)-    , _dvlKind          :: !Text-    , _dvlItems         :: !(Maybe [DimensionValue])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'DimensionValueList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dvlEtag'------ * 'dvlNextPageToken'------ * 'dvlKind'------ * 'dvlItems'-dimensionValueList-    :: DimensionValueList-dimensionValueList =-    DimensionValueList-    { _dvlEtag = Nothing-    , _dvlNextPageToken = Nothing-    , _dvlKind = "dfareporting#dimensionValueList"-    , _dvlItems = Nothing-    }---- | The eTag of this response for caching purposes.-dvlEtag :: Lens' DimensionValueList (Maybe Text)-dvlEtag = lens _dvlEtag (\ s a -> s{_dvlEtag = a})---- | Continuation token used to page through dimension values. To retrieve--- the next page of results, set the next request\'s \"pageToken\" to the--- value of this field. The page token is only valid for a limited amount--- of time and should not be persisted.-dvlNextPageToken :: Lens' DimensionValueList (Maybe Text)-dvlNextPageToken-  = lens _dvlNextPageToken-      (\ s a -> s{_dvlNextPageToken = a})---- | The kind of list this is, in this case dfareporting#dimensionValueList.-dvlKind :: Lens' DimensionValueList Text-dvlKind = lens _dvlKind (\ s a -> s{_dvlKind = a})---- | The dimension values returned in this response.-dvlItems :: Lens' DimensionValueList [DimensionValue]-dvlItems-  = lens _dvlItems (\ s a -> s{_dvlItems = a}) .-      _Default-      . _Coerce--instance FromJSON DimensionValueList where-        parseJSON-          = withObject "DimensionValueList"-              (\ o ->-                 DimensionValueList <$>-                   (o .:? "etag") <*> (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!= "dfareporting#dimensionValueList")-                     <*> (o .:? "items" .!= mempty))--instance ToJSON DimensionValueList where-        toJSON DimensionValueList{..}-          = object-              (catMaybes-                 [("etag" .=) <$> _dvlEtag,-                  ("nextPageToken" .=) <$> _dvlNextPageToken,-                  Just ("kind" .= _dvlKind),-                  ("items" .=) <$> _dvlItems])---- | Represents fields that are compatible to be selected for a report of--- type \"FlOODLIGHT\".------ /See:/ 'floodlightReportCompatibleFields' smart constructor.-data FloodlightReportCompatibleFields = FloodlightReportCompatibleFields-    { _frcfMetrics          :: !(Maybe [Metric])-    , _frcfKind             :: !Text-    , _frcfDimensionFilters :: !(Maybe [Dimension])-    , _frcfDimensions       :: !(Maybe [Dimension])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'FloodlightReportCompatibleFields' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'frcfMetrics'------ * 'frcfKind'------ * 'frcfDimensionFilters'------ * 'frcfDimensions'-floodlightReportCompatibleFields-    :: FloodlightReportCompatibleFields-floodlightReportCompatibleFields =-    FloodlightReportCompatibleFields-    { _frcfMetrics = Nothing-    , _frcfKind = "dfareporting#floodlightReportCompatibleFields"-    , _frcfDimensionFilters = Nothing-    , _frcfDimensions = Nothing-    }---- | Metrics which are compatible to be selected in the \"metricNames\"--- section of the report.-frcfMetrics :: Lens' FloodlightReportCompatibleFields [Metric]-frcfMetrics-  = lens _frcfMetrics (\ s a -> s{_frcfMetrics = a}) .-      _Default-      . _Coerce---- | The kind of resource this is, in this case--- dfareporting#floodlightReportCompatibleFields.-frcfKind :: Lens' FloodlightReportCompatibleFields Text-frcfKind = lens _frcfKind (\ s a -> s{_frcfKind = a})---- | Dimensions which are compatible to be selected in the--- \"dimensionFilters\" section of the report.-frcfDimensionFilters :: Lens' FloodlightReportCompatibleFields [Dimension]-frcfDimensionFilters-  = lens _frcfDimensionFilters-      (\ s a -> s{_frcfDimensionFilters = a})-      . _Default-      . _Coerce---- | Dimensions which are compatible to be selected in the \"dimensions\"--- section of the report.-frcfDimensions :: Lens' FloodlightReportCompatibleFields [Dimension]-frcfDimensions-  = lens _frcfDimensions-      (\ s a -> s{_frcfDimensions = a})-      . _Default-      . _Coerce--instance FromJSON FloodlightReportCompatibleFields-         where-        parseJSON-          = withObject "FloodlightReportCompatibleFields"-              (\ o ->-                 FloodlightReportCompatibleFields <$>-                   (o .:? "metrics" .!= mempty) <*>-                     (o .:? "kind" .!=-                        "dfareporting#floodlightReportCompatibleFields")-                     <*> (o .:? "dimensionFilters" .!= mempty)-                     <*> (o .:? "dimensions" .!= mempty))--instance ToJSON FloodlightReportCompatibleFields-         where-        toJSON FloodlightReportCompatibleFields{..}-          = object-              (catMaybes-                 [("metrics" .=) <$> _frcfMetrics,-                  Just ("kind" .= _frcfKind),-                  ("dimensionFilters" .=) <$> _frcfDimensionFilters,-                  ("dimensions" .=) <$> _frcfDimensions])---- | Represents a grouping of related user role permissions.------ /See:/ 'userRolePermissionGroup' smart constructor.-data UserRolePermissionGroup = UserRolePermissionGroup-    { _urpgKind :: !Text-    , _urpgName :: !(Maybe Text)-    , _urpgId   :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'UserRolePermissionGroup' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'urpgKind'------ * 'urpgName'------ * 'urpgId'-userRolePermissionGroup-    :: UserRolePermissionGroup-userRolePermissionGroup =-    UserRolePermissionGroup-    { _urpgKind = "dfareporting#userRolePermissionGroup"-    , _urpgName = Nothing-    , _urpgId = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#userRolePermissionGroup\".-urpgKind :: Lens' UserRolePermissionGroup Text-urpgKind = lens _urpgKind (\ s a -> s{_urpgKind = a})---- | Name of this user role permission group.-urpgName :: Lens' UserRolePermissionGroup (Maybe Text)-urpgName = lens _urpgName (\ s a -> s{_urpgName = a})---- | ID of this user role permission.-urpgId :: Lens' UserRolePermissionGroup (Maybe Int64)-urpgId-  = lens _urpgId (\ s a -> s{_urpgId = a}) .-      mapping _Coerce--instance FromJSON UserRolePermissionGroup where-        parseJSON-          = withObject "UserRolePermissionGroup"-              (\ o ->-                 UserRolePermissionGroup <$>-                   (o .:? "kind" .!=-                      "dfareporting#userRolePermissionGroup")-                     <*> (o .:? "name")-                     <*> (o .:? "id"))--instance ToJSON UserRolePermissionGroup where-        toJSON UserRolePermissionGroup{..}-          = object-              (catMaybes-                 [Just ("kind" .= _urpgKind),-                  ("name" .=) <$> _urpgName, ("id" .=) <$> _urpgId])---- | Tag Settings------ /See:/ 'tagSetting' smart constructor.-data TagSetting = TagSetting-    { _tsKeywordOption           :: !(Maybe TagSettingKeywordOption)-    , _tsIncludeClickThroughURLs :: !(Maybe Bool)-    , _tsIncludeClickTracking    :: !(Maybe Bool)-    , _tsAdditionalKeyValues     :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'TagSetting' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tsKeywordOption'------ * 'tsIncludeClickThroughURLs'------ * 'tsIncludeClickTracking'------ * 'tsAdditionalKeyValues'-tagSetting-    :: TagSetting-tagSetting =-    TagSetting-    { _tsKeywordOption = Nothing-    , _tsIncludeClickThroughURLs = Nothing-    , _tsIncludeClickTracking = Nothing-    , _tsAdditionalKeyValues = Nothing-    }---- | Option specifying how keywords are embedded in ad tags. This setting can--- be used to specify whether keyword placeholders are inserted in--- placement tags for this site. Publishers can then add keywords to those--- placeholders.-tsKeywordOption :: Lens' TagSetting (Maybe TagSettingKeywordOption)-tsKeywordOption-  = lens _tsKeywordOption-      (\ s a -> s{_tsKeywordOption = a})---- | Whether static landing page URLs should be included in the tags. This--- setting applies only to placements.-tsIncludeClickThroughURLs :: Lens' TagSetting (Maybe Bool)-tsIncludeClickThroughURLs-  = lens _tsIncludeClickThroughURLs-      (\ s a -> s{_tsIncludeClickThroughURLs = a})---- | Whether click-tracking string should be included in the tags.-tsIncludeClickTracking :: Lens' TagSetting (Maybe Bool)-tsIncludeClickTracking-  = lens _tsIncludeClickTracking-      (\ s a -> s{_tsIncludeClickTracking = a})---- | Additional key-values to be included in tags. Each key-value pair must--- be of the form key=value, and pairs must be separated by a semicolon--- (;). Keys and values must not contain commas. For example,--- id=2;color=red is a valid value for this field.-tsAdditionalKeyValues :: Lens' TagSetting (Maybe Text)-tsAdditionalKeyValues-  = lens _tsAdditionalKeyValues-      (\ s a -> s{_tsAdditionalKeyValues = a})--instance FromJSON TagSetting where-        parseJSON-          = withObject "TagSetting"-              (\ o ->-                 TagSetting <$>-                   (o .:? "keywordOption") <*>-                     (o .:? "includeClickThroughUrls")-                     <*> (o .:? "includeClickTracking")-                     <*> (o .:? "additionalKeyValues"))--instance ToJSON TagSetting where-        toJSON TagSetting{..}-          = object-              (catMaybes-                 [("keywordOption" .=) <$> _tsKeywordOption,-                  ("includeClickThroughUrls" .=) <$>-                    _tsIncludeClickThroughURLs,-                  ("includeClickTracking" .=) <$>-                    _tsIncludeClickTracking,-                  ("additionalKeyValues" .=) <$>-                    _tsAdditionalKeyValues])---- | The properties of the report.------ /See:/ 'reportPathToConversionCriteriaReportProperties' smart constructor.-data ReportPathToConversionCriteriaReportProperties = ReportPathToConversionCriteriaReportProperties-    { _rptccrpMaximumInteractionGap                :: !(Maybe (Textual Int32))-    , _rptccrpMaximumClickInteractions             :: !(Maybe (Textual Int32))-    , _rptccrpPivotOnInteractionPath               :: !(Maybe Bool)-    , _rptccrpMaximumImpressionInteractions        :: !(Maybe (Textual Int32))-    , _rptccrpIncludeUnattributedIPConversions     :: !(Maybe Bool)-    , _rptccrpImpressionsLookbackWindow            :: !(Maybe (Textual Int32))-    , _rptccrpClicksLookbackWindow                 :: !(Maybe (Textual Int32))-    , _rptccrpIncludeUnattributedCookieConversions :: !(Maybe Bool)-    , _rptccrpIncludeAttributedIPConversions       :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ReportPathToConversionCriteriaReportProperties' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rptccrpMaximumInteractionGap'------ * 'rptccrpMaximumClickInteractions'------ * 'rptccrpPivotOnInteractionPath'------ * 'rptccrpMaximumImpressionInteractions'------ * 'rptccrpIncludeUnattributedIPConversions'------ * 'rptccrpImpressionsLookbackWindow'------ * 'rptccrpClicksLookbackWindow'------ * 'rptccrpIncludeUnattributedCookieConversions'------ * 'rptccrpIncludeAttributedIPConversions'-reportPathToConversionCriteriaReportProperties-    :: ReportPathToConversionCriteriaReportProperties-reportPathToConversionCriteriaReportProperties =-    ReportPathToConversionCriteriaReportProperties-    { _rptccrpMaximumInteractionGap = Nothing-    , _rptccrpMaximumClickInteractions = Nothing-    , _rptccrpPivotOnInteractionPath = Nothing-    , _rptccrpMaximumImpressionInteractions = Nothing-    , _rptccrpIncludeUnattributedIPConversions = Nothing-    , _rptccrpImpressionsLookbackWindow = Nothing-    , _rptccrpClicksLookbackWindow = Nothing-    , _rptccrpIncludeUnattributedCookieConversions = Nothing-    , _rptccrpIncludeAttributedIPConversions = Nothing-    }---- | The maximum amount of time that can take place between interactions--- (clicks or impressions) by the same user. Valid values: 1-90.-rptccrpMaximumInteractionGap :: Lens' ReportPathToConversionCriteriaReportProperties (Maybe Int32)-rptccrpMaximumInteractionGap-  = lens _rptccrpMaximumInteractionGap-      (\ s a -> s{_rptccrpMaximumInteractionGap = a})-      . mapping _Coerce---- | The maximum number of click interactions to include in the report.--- Advertisers currently paying for E2C reports get up to 200 (100 clicks,--- 100 impressions). If another advertiser in your network is paying for--- E2C, you can have up to 5 total exposures per report.-rptccrpMaximumClickInteractions :: Lens' ReportPathToConversionCriteriaReportProperties (Maybe Int32)-rptccrpMaximumClickInteractions-  = lens _rptccrpMaximumClickInteractions-      (\ s a -> s{_rptccrpMaximumClickInteractions = a})-      . mapping _Coerce---- | Enable pivoting on interaction path.-rptccrpPivotOnInteractionPath :: Lens' ReportPathToConversionCriteriaReportProperties (Maybe Bool)-rptccrpPivotOnInteractionPath-  = lens _rptccrpPivotOnInteractionPath-      (\ s a -> s{_rptccrpPivotOnInteractionPath = a})---- | The maximum number of click interactions to include in the report.--- Advertisers currently paying for E2C reports get up to 200 (100 clicks,--- 100 impressions). If another advertiser in your network is paying for--- E2C, you can have up to 5 total exposures per report.-rptccrpMaximumImpressionInteractions :: Lens' ReportPathToConversionCriteriaReportProperties (Maybe Int32)-rptccrpMaximumImpressionInteractions-  = lens _rptccrpMaximumImpressionInteractions-      (\ s a ->-         s{_rptccrpMaximumImpressionInteractions = a})-      . mapping _Coerce---- | Include conversions that have no associated cookies and no exposures.--- It’s therefore impossible to know how the user was exposed to your ads--- during the lookback window prior to a conversion.-rptccrpIncludeUnattributedIPConversions :: Lens' ReportPathToConversionCriteriaReportProperties (Maybe Bool)-rptccrpIncludeUnattributedIPConversions-  = lens _rptccrpIncludeUnattributedIPConversions-      (\ s a ->-         s{_rptccrpIncludeUnattributedIPConversions = a})---- | DFA checks to see if an impression interaction occurred within the--- specified period of time before a conversion. By default the value is--- pulled from Floodlight or you can manually enter a custom value. Valid--- values: 1-90.-rptccrpImpressionsLookbackWindow :: Lens' ReportPathToConversionCriteriaReportProperties (Maybe Int32)-rptccrpImpressionsLookbackWindow-  = lens _rptccrpImpressionsLookbackWindow-      (\ s a -> s{_rptccrpImpressionsLookbackWindow = a})-      . mapping _Coerce---- | DFA checks to see if a click interaction occurred within the specified--- period of time before a conversion. By default the value is pulled from--- Floodlight or you can manually enter a custom value. Valid values: 1-90.-rptccrpClicksLookbackWindow :: Lens' ReportPathToConversionCriteriaReportProperties (Maybe Int32)-rptccrpClicksLookbackWindow-  = lens _rptccrpClicksLookbackWindow-      (\ s a -> s{_rptccrpClicksLookbackWindow = a})-      . mapping _Coerce---- | Include conversions of users with a DoubleClick cookie but without an--- exposure. That means the user did not click or see an ad from the--- advertiser within the Floodlight group, or that the interaction happened--- outside the lookback window.-rptccrpIncludeUnattributedCookieConversions :: Lens' ReportPathToConversionCriteriaReportProperties (Maybe Bool)-rptccrpIncludeUnattributedCookieConversions-  = lens _rptccrpIncludeUnattributedCookieConversions-      (\ s a ->-         s{_rptccrpIncludeUnattributedCookieConversions = a})---- | Deprecated: has no effect.-rptccrpIncludeAttributedIPConversions :: Lens' ReportPathToConversionCriteriaReportProperties (Maybe Bool)-rptccrpIncludeAttributedIPConversions-  = lens _rptccrpIncludeAttributedIPConversions-      (\ s a ->-         s{_rptccrpIncludeAttributedIPConversions = a})--instance FromJSON-         ReportPathToConversionCriteriaReportProperties where-        parseJSON-          = withObject-              "ReportPathToConversionCriteriaReportProperties"-              (\ o ->-                 ReportPathToConversionCriteriaReportProperties <$>-                   (o .:? "maximumInteractionGap") <*>-                     (o .:? "maximumClickInteractions")-                     <*> (o .:? "pivotOnInteractionPath")-                     <*> (o .:? "maximumImpressionInteractions")-                     <*> (o .:? "includeUnattributedIPConversions")-                     <*> (o .:? "impressionsLookbackWindow")-                     <*> (o .:? "clicksLookbackWindow")-                     <*> (o .:? "includeUnattributedCookieConversions")-                     <*> (o .:? "includeAttributedIPConversions"))--instance ToJSON-         ReportPathToConversionCriteriaReportProperties where-        toJSON-          ReportPathToConversionCriteriaReportProperties{..}-          = object-              (catMaybes-                 [("maximumInteractionGap" .=) <$>-                    _rptccrpMaximumInteractionGap,-                  ("maximumClickInteractions" .=) <$>-                    _rptccrpMaximumClickInteractions,-                  ("pivotOnInteractionPath" .=) <$>-                    _rptccrpPivotOnInteractionPath,-                  ("maximumImpressionInteractions" .=) <$>-                    _rptccrpMaximumImpressionInteractions,-                  ("includeUnattributedIPConversions" .=) <$>-                    _rptccrpIncludeUnattributedIPConversions,-                  ("impressionsLookbackWindow" .=) <$>-                    _rptccrpImpressionsLookbackWindow,-                  ("clicksLookbackWindow" .=) <$>-                    _rptccrpClicksLookbackWindow,-                  ("includeUnattributedCookieConversions" .=) <$>-                    _rptccrpIncludeUnattributedCookieConversions,-                  ("includeAttributedIPConversions" .=) <$>-                    _rptccrpIncludeAttributedIPConversions])---- | User Role Permission List Response------ /See:/ 'userRolePermissionsListResponse' smart constructor.-data UserRolePermissionsListResponse = UserRolePermissionsListResponse-    { _urplrKind                :: !Text-    , _urplrUserRolePermissions :: !(Maybe [UserRolePermission])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'UserRolePermissionsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'urplrKind'------ * 'urplrUserRolePermissions'-userRolePermissionsListResponse-    :: UserRolePermissionsListResponse-userRolePermissionsListResponse =-    UserRolePermissionsListResponse-    { _urplrKind = "dfareporting#userRolePermissionsListResponse"-    , _urplrUserRolePermissions = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#userRolePermissionsListResponse\".-urplrKind :: Lens' UserRolePermissionsListResponse Text-urplrKind-  = lens _urplrKind (\ s a -> s{_urplrKind = a})---- | User role permission collection.-urplrUserRolePermissions :: Lens' UserRolePermissionsListResponse [UserRolePermission]-urplrUserRolePermissions-  = lens _urplrUserRolePermissions-      (\ s a -> s{_urplrUserRolePermissions = a})-      . _Default-      . _Coerce--instance FromJSON UserRolePermissionsListResponse-         where-        parseJSON-          = withObject "UserRolePermissionsListResponse"-              (\ o ->-                 UserRolePermissionsListResponse <$>-                   (o .:? "kind" .!=-                      "dfareporting#userRolePermissionsListResponse")-                     <*> (o .:? "userRolePermissions" .!= mempty))--instance ToJSON UserRolePermissionsListResponse where-        toJSON UserRolePermissionsListResponse{..}-          = object-              (catMaybes-                 [Just ("kind" .= _urplrKind),-                  ("userRolePermissions" .=) <$>-                    _urplrUserRolePermissions])---- | Placement Group List Response------ /See:/ 'placementGroupsListResponse' smart constructor.-data PlacementGroupsListResponse = PlacementGroupsListResponse-    { _pglrNextPageToken   :: !(Maybe Text)-    , _pglrKind            :: !Text-    , _pglrPlacementGroups :: !(Maybe [PlacementGroup])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'PlacementGroupsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pglrNextPageToken'------ * 'pglrKind'------ * 'pglrPlacementGroups'-placementGroupsListResponse-    :: PlacementGroupsListResponse-placementGroupsListResponse =-    PlacementGroupsListResponse-    { _pglrNextPageToken = Nothing-    , _pglrKind = "dfareporting#placementGroupsListResponse"-    , _pglrPlacementGroups = Nothing-    }---- | Pagination token to be used for the next list operation.-pglrNextPageToken :: Lens' PlacementGroupsListResponse (Maybe Text)-pglrNextPageToken-  = lens _pglrNextPageToken-      (\ s a -> s{_pglrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#placementGroupsListResponse\".-pglrKind :: Lens' PlacementGroupsListResponse Text-pglrKind = lens _pglrKind (\ s a -> s{_pglrKind = a})---- | Placement group collection.-pglrPlacementGroups :: Lens' PlacementGroupsListResponse [PlacementGroup]-pglrPlacementGroups-  = lens _pglrPlacementGroups-      (\ s a -> s{_pglrPlacementGroups = a})-      . _Default-      . _Coerce--instance FromJSON PlacementGroupsListResponse where-        parseJSON-          = withObject "PlacementGroupsListResponse"-              (\ o ->-                 PlacementGroupsListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!=-                        "dfareporting#placementGroupsListResponse")-                     <*> (o .:? "placementGroups" .!= mempty))--instance ToJSON PlacementGroupsListResponse where-        toJSON PlacementGroupsListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _pglrNextPageToken,-                  Just ("kind" .= _pglrKind),-                  ("placementGroups" .=) <$> _pglrPlacementGroups])---- | Contains information about a mobile carrier that can be targeted by ads.------ /See:/ 'mobileCarrier' smart constructor.-data MobileCarrier = MobileCarrier-    { _mcKind          :: !Text-    , _mcName          :: !(Maybe Text)-    , _mcCountryCode   :: !(Maybe Text)-    , _mcId            :: !(Maybe (Textual Int64))-    , _mcCountryDartId :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'MobileCarrier' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mcKind'------ * 'mcName'------ * 'mcCountryCode'------ * 'mcId'------ * 'mcCountryDartId'-mobileCarrier-    :: MobileCarrier-mobileCarrier =-    MobileCarrier-    { _mcKind = "dfareporting#mobileCarrier"-    , _mcName = Nothing-    , _mcCountryCode = Nothing-    , _mcId = Nothing-    , _mcCountryDartId = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#mobileCarrier\".-mcKind :: Lens' MobileCarrier Text-mcKind = lens _mcKind (\ s a -> s{_mcKind = a})---- | Name of this mobile carrier.-mcName :: Lens' MobileCarrier (Maybe Text)-mcName = lens _mcName (\ s a -> s{_mcName = a})---- | Country code of the country to which this mobile carrier belongs.-mcCountryCode :: Lens' MobileCarrier (Maybe Text)-mcCountryCode-  = lens _mcCountryCode-      (\ s a -> s{_mcCountryCode = a})---- | ID of this mobile carrier.-mcId :: Lens' MobileCarrier (Maybe Int64)-mcId-  = lens _mcId (\ s a -> s{_mcId = a}) .-      mapping _Coerce---- | DART ID of the country to which this mobile carrier belongs.-mcCountryDartId :: Lens' MobileCarrier (Maybe Int64)-mcCountryDartId-  = lens _mcCountryDartId-      (\ s a -> s{_mcCountryDartId = a})-      . mapping _Coerce--instance FromJSON MobileCarrier where-        parseJSON-          = withObject "MobileCarrier"-              (\ o ->-                 MobileCarrier <$>-                   (o .:? "kind" .!= "dfareporting#mobileCarrier") <*>-                     (o .:? "name")-                     <*> (o .:? "countryCode")-                     <*> (o .:? "id")-                     <*> (o .:? "countryDartId"))--instance ToJSON MobileCarrier where-        toJSON MobileCarrier{..}-          = object-              (catMaybes-                 [Just ("kind" .= _mcKind), ("name" .=) <$> _mcName,-                  ("countryCode" .=) <$> _mcCountryCode,-                  ("id" .=) <$> _mcId,-                  ("countryDartId" .=) <$> _mcCountryDartId])---- | Contains information about where a user\'s browser is taken after the--- user clicks an ad.------ /See:/ 'landingPage' smart constructor.-data LandingPage = LandingPage-    { _lpKind    :: !Text-    , _lpDefault :: !(Maybe Bool)-    , _lpURL     :: !(Maybe Text)-    , _lpName    :: !(Maybe Text)-    , _lpId      :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'LandingPage' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lpKind'------ * 'lpDefault'------ * 'lpURL'------ * 'lpName'------ * 'lpId'-landingPage-    :: LandingPage-landingPage =-    LandingPage-    { _lpKind = "dfareporting#landingPage"-    , _lpDefault = Nothing-    , _lpURL = Nothing-    , _lpName = Nothing-    , _lpId = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#landingPage\".-lpKind :: Lens' LandingPage Text-lpKind = lens _lpKind (\ s a -> s{_lpKind = a})---- | Whether or not this landing page will be assigned to any ads or--- creatives that do not have a landing page assigned explicitly. Only one--- default landing page is allowed per campaign.-lpDefault :: Lens' LandingPage (Maybe Bool)-lpDefault-  = lens _lpDefault (\ s a -> s{_lpDefault = a})---- | URL of this landing page. This is a required field.-lpURL :: Lens' LandingPage (Maybe Text)-lpURL = lens _lpURL (\ s a -> s{_lpURL = a})---- | Name of this landing page. This is a required field. It must be less--- than 256 characters long, and must be unique among landing pages of the--- same campaign.-lpName :: Lens' LandingPage (Maybe Text)-lpName = lens _lpName (\ s a -> s{_lpName = a})---- | ID of this landing page. This is a read-only, auto-generated field.-lpId :: Lens' LandingPage (Maybe Int64)-lpId-  = lens _lpId (\ s a -> s{_lpId = a}) .-      mapping _Coerce--instance FromJSON LandingPage where-        parseJSON-          = withObject "LandingPage"-              (\ o ->-                 LandingPage <$>-                   (o .:? "kind" .!= "dfareporting#landingPage") <*>-                     (o .:? "default")-                     <*> (o .:? "url")-                     <*> (o .:? "name")-                     <*> (o .:? "id"))--instance ToJSON LandingPage where-        toJSON LandingPage{..}-          = object-              (catMaybes-                 [Just ("kind" .= _lpKind),-                  ("default" .=) <$> _lpDefault, ("url" .=) <$> _lpURL,-                  ("name" .=) <$> _lpName, ("id" .=) <$> _lpId])---- | Connection Type List Response------ /See:/ 'connectionTypesListResponse' smart constructor.-data ConnectionTypesListResponse = ConnectionTypesListResponse-    { _ctlrKind            :: !Text-    , _ctlrConnectionTypes :: !(Maybe [ConnectionType])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ConnectionTypesListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ctlrKind'------ * 'ctlrConnectionTypes'-connectionTypesListResponse-    :: ConnectionTypesListResponse-connectionTypesListResponse =-    ConnectionTypesListResponse-    { _ctlrKind = "dfareporting#connectionTypesListResponse"-    , _ctlrConnectionTypes = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#connectionTypesListResponse\".-ctlrKind :: Lens' ConnectionTypesListResponse Text-ctlrKind = lens _ctlrKind (\ s a -> s{_ctlrKind = a})---- | Collection of connection types such as broadband and mobile.-ctlrConnectionTypes :: Lens' ConnectionTypesListResponse [ConnectionType]-ctlrConnectionTypes-  = lens _ctlrConnectionTypes-      (\ s a -> s{_ctlrConnectionTypes = a})-      . _Default-      . _Coerce--instance FromJSON ConnectionTypesListResponse where-        parseJSON-          = withObject "ConnectionTypesListResponse"-              (\ o ->-                 ConnectionTypesListResponse <$>-                   (o .:? "kind" .!=-                      "dfareporting#connectionTypesListResponse")-                     <*> (o .:? "connectionTypes" .!= mempty))--instance ToJSON ConnectionTypesListResponse where-        toJSON ConnectionTypesListResponse{..}-          = object-              (catMaybes-                 [Just ("kind" .= _ctlrKind),-                  ("connectionTypes" .=) <$> _ctlrConnectionTypes])---- | Order List Response------ /See:/ 'ordersListResponse' smart constructor.-data OrdersListResponse = OrdersListResponse-    { _olrNextPageToken :: !(Maybe Text)-    , _olrKind          :: !Text-    , _olrOrders        :: !(Maybe [Order])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'OrdersListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'olrNextPageToken'------ * 'olrKind'------ * 'olrOrders'-ordersListResponse-    :: OrdersListResponse-ordersListResponse =-    OrdersListResponse-    { _olrNextPageToken = Nothing-    , _olrKind = "dfareporting#ordersListResponse"-    , _olrOrders = Nothing-    }---- | Pagination token to be used for the next list operation.-olrNextPageToken :: Lens' OrdersListResponse (Maybe Text)-olrNextPageToken-  = lens _olrNextPageToken-      (\ s a -> s{_olrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#ordersListResponse\".-olrKind :: Lens' OrdersListResponse Text-olrKind = lens _olrKind (\ s a -> s{_olrKind = a})---- | Order collection.-olrOrders :: Lens' OrdersListResponse [Order]-olrOrders-  = lens _olrOrders (\ s a -> s{_olrOrders = a}) .-      _Default-      . _Coerce--instance FromJSON OrdersListResponse where-        parseJSON-          = withObject "OrdersListResponse"-              (\ o ->-                 OrdersListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!= "dfareporting#ordersListResponse")-                     <*> (o .:? "orders" .!= mempty))--instance ToJSON OrdersListResponse where-        toJSON OrdersListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _olrNextPageToken,-                  Just ("kind" .= _olrKind),-                  ("orders" .=) <$> _olrOrders])---- | Represents the list of reports.------ /See:/ 'reportList' smart constructor.-data ReportList = ReportList-    { _repEtag          :: !(Maybe Text)-    , _repNextPageToken :: !(Maybe Text)-    , _repKind          :: !Text-    , _repItems         :: !(Maybe [Report])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ReportList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'repEtag'------ * 'repNextPageToken'------ * 'repKind'------ * 'repItems'-reportList-    :: ReportList-reportList =-    ReportList-    { _repEtag = Nothing-    , _repNextPageToken = Nothing-    , _repKind = "dfareporting#reportList"-    , _repItems = Nothing-    }---- | The eTag of this response for caching purposes.-repEtag :: Lens' ReportList (Maybe Text)-repEtag = lens _repEtag (\ s a -> s{_repEtag = a})---- | Continuation token used to page through reports. To retrieve the next--- page of results, set the next request\'s \"pageToken\" to the value of--- this field. The page token is only valid for a limited amount of time--- and should not be persisted.-repNextPageToken :: Lens' ReportList (Maybe Text)-repNextPageToken-  = lens _repNextPageToken-      (\ s a -> s{_repNextPageToken = a})---- | The kind of list this is, in this case dfareporting#reportList.-repKind :: Lens' ReportList Text-repKind = lens _repKind (\ s a -> s{_repKind = a})---- | The reports returned in this response.-repItems :: Lens' ReportList [Report]-repItems-  = lens _repItems (\ s a -> s{_repItems = a}) .-      _Default-      . _Coerce--instance FromJSON ReportList where-        parseJSON-          = withObject "ReportList"-              (\ o ->-                 ReportList <$>-                   (o .:? "etag") <*> (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!= "dfareporting#reportList")-                     <*> (o .:? "items" .!= mempty))--instance ToJSON ReportList where-        toJSON ReportList{..}-          = object-              (catMaybes-                 [("etag" .=) <$> _repEtag,-                  ("nextPageToken" .=) <$> _repNextPageToken,-                  Just ("kind" .= _repKind),-                  ("items" .=) <$> _repItems])---- | Contains properties of a creative group.------ /See:/ 'creativeGroup' smart constructor.-data CreativeGroup = CreativeGroup-    { _cgKind                       :: !Text-    , _cgAdvertiserId               :: !(Maybe (Textual Int64))-    , _cgAdvertiserIdDimensionValue :: !(Maybe DimensionValue)-    , _cgGroupNumber                :: !(Maybe (Textual Int32))-    , _cgAccountId                  :: !(Maybe (Textual Int64))-    , _cgName                       :: !(Maybe Text)-    , _cgId                         :: !(Maybe (Textual Int64))-    , _cgSubAccountId               :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CreativeGroup' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cgKind'------ * 'cgAdvertiserId'------ * 'cgAdvertiserIdDimensionValue'------ * 'cgGroupNumber'------ * 'cgAccountId'------ * 'cgName'------ * 'cgId'------ * 'cgSubAccountId'-creativeGroup-    :: CreativeGroup-creativeGroup =-    CreativeGroup-    { _cgKind = "dfareporting#creativeGroup"-    , _cgAdvertiserId = Nothing-    , _cgAdvertiserIdDimensionValue = Nothing-    , _cgGroupNumber = Nothing-    , _cgAccountId = Nothing-    , _cgName = Nothing-    , _cgId = Nothing-    , _cgSubAccountId = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#creativeGroup\".-cgKind :: Lens' CreativeGroup Text-cgKind = lens _cgKind (\ s a -> s{_cgKind = a})---- | Advertiser ID of this creative group. This is a required field on--- insertion.-cgAdvertiserId :: Lens' CreativeGroup (Maybe Int64)-cgAdvertiserId-  = lens _cgAdvertiserId-      (\ s a -> s{_cgAdvertiserId = a})-      . mapping _Coerce---- | Dimension value for the ID of the advertiser. This is a read-only,--- auto-generated field.-cgAdvertiserIdDimensionValue :: Lens' CreativeGroup (Maybe DimensionValue)-cgAdvertiserIdDimensionValue-  = lens _cgAdvertiserIdDimensionValue-      (\ s a -> s{_cgAdvertiserIdDimensionValue = a})---- | Subgroup of the creative group. Assign your creative groups to one of--- the following subgroups in order to filter or manage them more easily.--- This field is required on insertion and is read-only after insertion.--- Acceptable values are: - 1 - 2-cgGroupNumber :: Lens' CreativeGroup (Maybe Int32)-cgGroupNumber-  = lens _cgGroupNumber-      (\ s a -> s{_cgGroupNumber = a})-      . mapping _Coerce---- | Account ID of this creative group. This is a read-only field that can be--- left blank.-cgAccountId :: Lens' CreativeGroup (Maybe Int64)-cgAccountId-  = lens _cgAccountId (\ s a -> s{_cgAccountId = a}) .-      mapping _Coerce---- | Name of this creative group. This is a required field and must be less--- than 256 characters long and unique among creative groups of the same--- advertiser.-cgName :: Lens' CreativeGroup (Maybe Text)-cgName = lens _cgName (\ s a -> s{_cgName = a})---- | ID of this creative group. This is a read-only, auto-generated field.-cgId :: Lens' CreativeGroup (Maybe Int64)-cgId-  = lens _cgId (\ s a -> s{_cgId = a}) .-      mapping _Coerce---- | Subaccount ID of this creative group. This is a read-only field that can--- be left blank.-cgSubAccountId :: Lens' CreativeGroup (Maybe Int64)-cgSubAccountId-  = lens _cgSubAccountId-      (\ s a -> s{_cgSubAccountId = a})-      . mapping _Coerce--instance FromJSON CreativeGroup where-        parseJSON-          = withObject "CreativeGroup"-              (\ o ->-                 CreativeGroup <$>-                   (o .:? "kind" .!= "dfareporting#creativeGroup") <*>-                     (o .:? "advertiserId")-                     <*> (o .:? "advertiserIdDimensionValue")-                     <*> (o .:? "groupNumber")-                     <*> (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "id")-                     <*> (o .:? "subaccountId"))--instance ToJSON CreativeGroup where-        toJSON CreativeGroup{..}-          = object-              (catMaybes-                 [Just ("kind" .= _cgKind),-                  ("advertiserId" .=) <$> _cgAdvertiserId,-                  ("advertiserIdDimensionValue" .=) <$>-                    _cgAdvertiserIdDimensionValue,-                  ("groupNumber" .=) <$> _cgGroupNumber,-                  ("accountId" .=) <$> _cgAccountId,-                  ("name" .=) <$> _cgName, ("id" .=) <$> _cgId,-                  ("subaccountId" .=) <$> _cgSubAccountId])---- | Identifies a creative which has been associated with a given campaign.------ /See:/ 'campaignCreativeAssociation' smart constructor.-data CampaignCreativeAssociation = CampaignCreativeAssociation-    { _ccaKind       :: !Text-    , _ccaCreativeId :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CampaignCreativeAssociation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ccaKind'------ * 'ccaCreativeId'-campaignCreativeAssociation-    :: CampaignCreativeAssociation-campaignCreativeAssociation =-    CampaignCreativeAssociation-    { _ccaKind = "dfareporting#campaignCreativeAssociation"-    , _ccaCreativeId = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#campaignCreativeAssociation\".-ccaKind :: Lens' CampaignCreativeAssociation Text-ccaKind = lens _ccaKind (\ s a -> s{_ccaKind = a})---- | ID of the creative associated with the campaign. This is a required--- field.-ccaCreativeId :: Lens' CampaignCreativeAssociation (Maybe Int64)-ccaCreativeId-  = lens _ccaCreativeId-      (\ s a -> s{_ccaCreativeId = a})-      . mapping _Coerce--instance FromJSON CampaignCreativeAssociation where-        parseJSON-          = withObject "CampaignCreativeAssociation"-              (\ o ->-                 CampaignCreativeAssociation <$>-                   (o .:? "kind" .!=-                      "dfareporting#campaignCreativeAssociation")-                     <*> (o .:? "creativeId"))--instance ToJSON CampaignCreativeAssociation where-        toJSON CampaignCreativeAssociation{..}-          = object-              (catMaybes-                 [Just ("kind" .= _ccaKind),-                  ("creativeId" .=) <$> _ccaCreativeId])---- | Lookback configuration settings.------ /See:/ 'lookbackConfiguration' smart constructor.-data LookbackConfiguration = LookbackConfiguration-    { _lcClickDuration                    :: !(Maybe (Textual Int32))-    , _lcPostImpressionActivitiesDuration :: !(Maybe (Textual Int32))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'LookbackConfiguration' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lcClickDuration'------ * 'lcPostImpressionActivitiesDuration'-lookbackConfiguration-    :: LookbackConfiguration-lookbackConfiguration =-    LookbackConfiguration-    { _lcClickDuration = Nothing-    , _lcPostImpressionActivitiesDuration = Nothing-    }---- | Lookback window, in days, from the last time a given user clicked on one--- of your ads. If you enter 0, clicks will not be considered as triggering--- events for floodlight tracking. If you leave this field blank, the--- default value for your account will be used.-lcClickDuration :: Lens' LookbackConfiguration (Maybe Int32)-lcClickDuration-  = lens _lcClickDuration-      (\ s a -> s{_lcClickDuration = a})-      . mapping _Coerce---- | Lookback window, in days, from the last time a given user viewed one of--- your ads. If you enter 0, impressions will not be considered as--- triggering events for floodlight tracking. If you leave this field--- blank, the default value for your account will be used.-lcPostImpressionActivitiesDuration :: Lens' LookbackConfiguration (Maybe Int32)-lcPostImpressionActivitiesDuration-  = lens _lcPostImpressionActivitiesDuration-      (\ s a -> s{_lcPostImpressionActivitiesDuration = a})-      . mapping _Coerce--instance FromJSON LookbackConfiguration where-        parseJSON-          = withObject "LookbackConfiguration"-              (\ o ->-                 LookbackConfiguration <$>-                   (o .:? "clickDuration") <*>-                     (o .:? "postImpressionActivitiesDuration"))--instance ToJSON LookbackConfiguration where-        toJSON LookbackConfiguration{..}-          = object-              (catMaybes-                 [("clickDuration" .=) <$> _lcClickDuration,-                  ("postImpressionActivitiesDuration" .=) <$>-                    _lcPostImpressionActivitiesDuration])---- | Publisher Dynamic Tag------ /See:/ 'floodlightActivityPublisherDynamicTag' smart constructor.-data FloodlightActivityPublisherDynamicTag = FloodlightActivityPublisherDynamicTag-    { _fapdtClickThrough         :: !(Maybe Bool)-    , _fapdtSiteIdDimensionValue :: !(Maybe DimensionValue)-    , _fapdtDynamicTag           :: !(Maybe FloodlightActivityDynamicTag)-    , _fapdtDirectorySiteId      :: !(Maybe (Textual Int64))-    , _fapdtSiteId               :: !(Maybe (Textual Int64))-    , _fapdtViewThrough          :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'FloodlightActivityPublisherDynamicTag' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'fapdtClickThrough'------ * 'fapdtSiteIdDimensionValue'------ * 'fapdtDynamicTag'------ * 'fapdtDirectorySiteId'------ * 'fapdtSiteId'------ * 'fapdtViewThrough'-floodlightActivityPublisherDynamicTag-    :: FloodlightActivityPublisherDynamicTag-floodlightActivityPublisherDynamicTag =-    FloodlightActivityPublisherDynamicTag-    { _fapdtClickThrough = Nothing-    , _fapdtSiteIdDimensionValue = Nothing-    , _fapdtDynamicTag = Nothing-    , _fapdtDirectorySiteId = Nothing-    , _fapdtSiteId = Nothing-    , _fapdtViewThrough = Nothing-    }---- | Whether this tag is applicable only for click-throughs.-fapdtClickThrough :: Lens' FloodlightActivityPublisherDynamicTag (Maybe Bool)-fapdtClickThrough-  = lens _fapdtClickThrough-      (\ s a -> s{_fapdtClickThrough = a})---- | Dimension value for the ID of the site. This is a read-only,--- auto-generated field.-fapdtSiteIdDimensionValue :: Lens' FloodlightActivityPublisherDynamicTag (Maybe DimensionValue)-fapdtSiteIdDimensionValue-  = lens _fapdtSiteIdDimensionValue-      (\ s a -> s{_fapdtSiteIdDimensionValue = a})---- | Dynamic floodlight tag.-fapdtDynamicTag :: Lens' FloodlightActivityPublisherDynamicTag (Maybe FloodlightActivityDynamicTag)-fapdtDynamicTag-  = lens _fapdtDynamicTag-      (\ s a -> s{_fapdtDynamicTag = a})---- | Directory site ID of this dynamic tag. This is a write-only field that--- can be used as an alternative to the siteId field. When this resource is--- retrieved, only the siteId field will be populated.-fapdtDirectorySiteId :: Lens' FloodlightActivityPublisherDynamicTag (Maybe Int64)-fapdtDirectorySiteId-  = lens _fapdtDirectorySiteId-      (\ s a -> s{_fapdtDirectorySiteId = a})-      . mapping _Coerce---- | Site ID of this dynamic tag.-fapdtSiteId :: Lens' FloodlightActivityPublisherDynamicTag (Maybe Int64)-fapdtSiteId-  = lens _fapdtSiteId (\ s a -> s{_fapdtSiteId = a}) .-      mapping _Coerce---- | Whether this tag is applicable only for view-throughs.-fapdtViewThrough :: Lens' FloodlightActivityPublisherDynamicTag (Maybe Bool)-fapdtViewThrough-  = lens _fapdtViewThrough-      (\ s a -> s{_fapdtViewThrough = a})--instance FromJSON-         FloodlightActivityPublisherDynamicTag where-        parseJSON-          = withObject "FloodlightActivityPublisherDynamicTag"-              (\ o ->-                 FloodlightActivityPublisherDynamicTag <$>-                   (o .:? "clickThrough") <*>-                     (o .:? "siteIdDimensionValue")-                     <*> (o .:? "dynamicTag")-                     <*> (o .:? "directorySiteId")-                     <*> (o .:? "siteId")-                     <*> (o .:? "viewThrough"))--instance ToJSON FloodlightActivityPublisherDynamicTag-         where-        toJSON FloodlightActivityPublisherDynamicTag{..}-          = object-              (catMaybes-                 [("clickThrough" .=) <$> _fapdtClickThrough,-                  ("siteIdDimensionValue" .=) <$>-                    _fapdtSiteIdDimensionValue,-                  ("dynamicTag" .=) <$> _fapdtDynamicTag,-                  ("directorySiteId" .=) <$> _fapdtDirectorySiteId,-                  ("siteId" .=) <$> _fapdtSiteId,-                  ("viewThrough" .=) <$> _fapdtViewThrough])---- | Gets a summary of active ads in an account.------ /See:/ 'accountActiveAdSummary' smart constructor.-data AccountActiveAdSummary = AccountActiveAdSummary-    { _aaasAvailableAds       :: !(Maybe (Textual Int64))-    , _aaasKind               :: !Text-    , _aaasAccountId          :: !(Maybe (Textual Int64))-    , _aaasActiveAds          :: !(Maybe (Textual Int64))-    , _aaasActiveAdsLimitTier :: !(Maybe AccountActiveAdSummaryActiveAdsLimitTier)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'AccountActiveAdSummary' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aaasAvailableAds'------ * 'aaasKind'------ * 'aaasAccountId'------ * 'aaasActiveAds'------ * 'aaasActiveAdsLimitTier'-accountActiveAdSummary-    :: AccountActiveAdSummary-accountActiveAdSummary =-    AccountActiveAdSummary-    { _aaasAvailableAds = Nothing-    , _aaasKind = "dfareporting#accountActiveAdSummary"-    , _aaasAccountId = Nothing-    , _aaasActiveAds = Nothing-    , _aaasActiveAdsLimitTier = Nothing-    }---- | Ads that can be activated for the account.-aaasAvailableAds :: Lens' AccountActiveAdSummary (Maybe Int64)-aaasAvailableAds-  = lens _aaasAvailableAds-      (\ s a -> s{_aaasAvailableAds = a})-      . mapping _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#accountActiveAdSummary\".-aaasKind :: Lens' AccountActiveAdSummary Text-aaasKind = lens _aaasKind (\ s a -> s{_aaasKind = a})---- | ID of the account.-aaasAccountId :: Lens' AccountActiveAdSummary (Maybe Int64)-aaasAccountId-  = lens _aaasAccountId-      (\ s a -> s{_aaasAccountId = a})-      . mapping _Coerce---- | Ads that have been activated for the account-aaasActiveAds :: Lens' AccountActiveAdSummary (Maybe Int64)-aaasActiveAds-  = lens _aaasActiveAds-      (\ s a -> s{_aaasActiveAds = a})-      . mapping _Coerce---- | Maximum number of active ads allowed for the account.-aaasActiveAdsLimitTier :: Lens' AccountActiveAdSummary (Maybe AccountActiveAdSummaryActiveAdsLimitTier)-aaasActiveAdsLimitTier-  = lens _aaasActiveAdsLimitTier-      (\ s a -> s{_aaasActiveAdsLimitTier = a})--instance FromJSON AccountActiveAdSummary where-        parseJSON-          = withObject "AccountActiveAdSummary"-              (\ o ->-                 AccountActiveAdSummary <$>-                   (o .:? "availableAds") <*>-                     (o .:? "kind" .!=-                        "dfareporting#accountActiveAdSummary")-                     <*> (o .:? "accountId")-                     <*> (o .:? "activeAds")-                     <*> (o .:? "activeAdsLimitTier"))--instance ToJSON AccountActiveAdSummary where-        toJSON AccountActiveAdSummary{..}-          = object-              (catMaybes-                 [("availableAds" .=) <$> _aaasAvailableAds,-                  Just ("kind" .= _aaasKind),-                  ("accountId" .=) <$> _aaasAccountId,-                  ("activeAds" .=) <$> _aaasActiveAds,-                  ("activeAdsLimitTier" .=) <$>-                    _aaasActiveAdsLimitTier])---- | Offset Position.------ /See:/ 'offSetPosition' smart constructor.-data OffSetPosition = OffSetPosition-    { _ospLeft :: !(Maybe (Textual Int32))-    , _ospTop  :: !(Maybe (Textual Int32))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'OffSetPosition' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ospLeft'------ * 'ospTop'-offSetPosition-    :: OffSetPosition-offSetPosition =-    OffSetPosition-    { _ospLeft = Nothing-    , _ospTop = Nothing-    }---- | Offset distance from left side of an asset or a window.-ospLeft :: Lens' OffSetPosition (Maybe Int32)-ospLeft-  = lens _ospLeft (\ s a -> s{_ospLeft = a}) .-      mapping _Coerce---- | Offset distance from top side of an asset or a window.-ospTop :: Lens' OffSetPosition (Maybe Int32)-ospTop-  = lens _ospTop (\ s a -> s{_ospTop = a}) .-      mapping _Coerce--instance FromJSON OffSetPosition where-        parseJSON-          = withObject "OffSetPosition"-              (\ o ->-                 OffSetPosition <$> (o .:? "left") <*> (o .:? "top"))--instance ToJSON OffSetPosition where-        toJSON OffSetPosition{..}-          = object-              (catMaybes-                 [("left" .=) <$> _ospLeft, ("top" .=) <$> _ospTop])---- | Represents a metric.------ /See:/ 'metric' smart constructor.-data Metric = Metric-    { _mKind :: !Text-    , _mName :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'Metric' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mKind'------ * 'mName'-metric-    :: Metric-metric =-    Metric-    { _mKind = "dfareporting#metric"-    , _mName = Nothing-    }---- | The kind of resource this is, in this case dfareporting#metric.-mKind :: Lens' Metric Text-mKind = lens _mKind (\ s a -> s{_mKind = a})---- | The metric name, e.g. dfa:impressions-mName :: Lens' Metric (Maybe Text)-mName = lens _mName (\ s a -> s{_mName = a})--instance FromJSON Metric where-        parseJSON-          = withObject "Metric"-              (\ o ->-                 Metric <$>-                   (o .:? "kind" .!= "dfareporting#metric") <*>-                     (o .:? "name"))--instance ToJSON Metric where-        toJSON Metric{..}-          = object-              (catMaybes-                 [Just ("kind" .= _mKind), ("name" .=) <$> _mName])---- | Contains properties of a remarketing list\'s sharing information.--- Sharing allows other accounts or advertisers to target to your--- remarketing lists. This resource can be used to manage remarketing list--- sharing to other accounts and advertisers.------ /See:/ 'remarketingListShare' smart constructor.-data RemarketingListShare = RemarketingListShare-    { _rlsSharedAdvertiserIds :: !(Maybe [Textual Int64])-    , _rlsKind                :: !Text-    , _rlsRemarketingListId   :: !(Maybe (Textual Int64))-    , _rlsSharedAccountIds    :: !(Maybe [Textual Int64])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'RemarketingListShare' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rlsSharedAdvertiserIds'------ * 'rlsKind'------ * 'rlsRemarketingListId'------ * 'rlsSharedAccountIds'-remarketingListShare-    :: RemarketingListShare-remarketingListShare =-    RemarketingListShare-    { _rlsSharedAdvertiserIds = Nothing-    , _rlsKind = "dfareporting#remarketingListShare"-    , _rlsRemarketingListId = Nothing-    , _rlsSharedAccountIds = Nothing-    }---- | Advertisers that the remarketing list is shared with.-rlsSharedAdvertiserIds :: Lens' RemarketingListShare [Int64]-rlsSharedAdvertiserIds-  = lens _rlsSharedAdvertiserIds-      (\ s a -> s{_rlsSharedAdvertiserIds = a})-      . _Default-      . _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#remarketingListShare\".-rlsKind :: Lens' RemarketingListShare Text-rlsKind = lens _rlsKind (\ s a -> s{_rlsKind = a})---- | Remarketing list ID. This is a read-only, auto-generated field.-rlsRemarketingListId :: Lens' RemarketingListShare (Maybe Int64)-rlsRemarketingListId-  = lens _rlsRemarketingListId-      (\ s a -> s{_rlsRemarketingListId = a})-      . mapping _Coerce---- | Accounts that the remarketing list is shared with.-rlsSharedAccountIds :: Lens' RemarketingListShare [Int64]-rlsSharedAccountIds-  = lens _rlsSharedAccountIds-      (\ s a -> s{_rlsSharedAccountIds = a})-      . _Default-      . _Coerce--instance FromJSON RemarketingListShare where-        parseJSON-          = withObject "RemarketingListShare"-              (\ o ->-                 RemarketingListShare <$>-                   (o .:? "sharedAdvertiserIds" .!= mempty) <*>-                     (o .:? "kind" .!=-                        "dfareporting#remarketingListShare")-                     <*> (o .:? "remarketingListId")-                     <*> (o .:? "sharedAccountIds" .!= mempty))--instance ToJSON RemarketingListShare where-        toJSON RemarketingListShare{..}-          = object-              (catMaybes-                 [("sharedAdvertiserIds" .=) <$>-                    _rlsSharedAdvertiserIds,-                  Just ("kind" .= _rlsKind),-                  ("remarketingListId" .=) <$> _rlsRemarketingListId,-                  ("sharedAccountIds" .=) <$> _rlsSharedAccountIds])---- | Event Tag List Response------ /See:/ 'eventTagsListResponse' smart constructor.-data EventTagsListResponse = EventTagsListResponse-    { _etlrKind      :: !Text-    , _etlrEventTags :: !(Maybe [EventTag])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'EventTagsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'etlrKind'------ * 'etlrEventTags'-eventTagsListResponse-    :: EventTagsListResponse-eventTagsListResponse =-    EventTagsListResponse-    { _etlrKind = "dfareporting#eventTagsListResponse"-    , _etlrEventTags = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#eventTagsListResponse\".-etlrKind :: Lens' EventTagsListResponse Text-etlrKind = lens _etlrKind (\ s a -> s{_etlrKind = a})---- | Event tag collection.-etlrEventTags :: Lens' EventTagsListResponse [EventTag]-etlrEventTags-  = lens _etlrEventTags-      (\ s a -> s{_etlrEventTags = a})-      . _Default-      . _Coerce--instance FromJSON EventTagsListResponse where-        parseJSON-          = withObject "EventTagsListResponse"-              (\ o ->-                 EventTagsListResponse <$>-                   (o .:? "kind" .!=-                      "dfareporting#eventTagsListResponse")-                     <*> (o .:? "eventTags" .!= mempty))--instance ToJSON EventTagsListResponse where-        toJSON EventTagsListResponse{..}-          = object-              (catMaybes-                 [Just ("kind" .= _etlrKind),-                  ("eventTags" .=) <$> _etlrEventTags])---- | User Role List Response------ /See:/ 'userRolesListResponse' smart constructor.-data UserRolesListResponse = UserRolesListResponse-    { _urlrNextPageToken :: !(Maybe Text)-    , _urlrKind          :: !Text-    , _urlrUserRoles     :: !(Maybe [UserRole])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'UserRolesListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'urlrNextPageToken'------ * 'urlrKind'------ * 'urlrUserRoles'-userRolesListResponse-    :: UserRolesListResponse-userRolesListResponse =-    UserRolesListResponse-    { _urlrNextPageToken = Nothing-    , _urlrKind = "dfareporting#userRolesListResponse"-    , _urlrUserRoles = Nothing-    }---- | Pagination token to be used for the next list operation.-urlrNextPageToken :: Lens' UserRolesListResponse (Maybe Text)-urlrNextPageToken-  = lens _urlrNextPageToken-      (\ s a -> s{_urlrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#userRolesListResponse\".-urlrKind :: Lens' UserRolesListResponse Text-urlrKind = lens _urlrKind (\ s a -> s{_urlrKind = a})---- | User role collection.-urlrUserRoles :: Lens' UserRolesListResponse [UserRole]-urlrUserRoles-  = lens _urlrUserRoles-      (\ s a -> s{_urlrUserRoles = a})-      . _Default-      . _Coerce--instance FromJSON UserRolesListResponse where-        parseJSON-          = withObject "UserRolesListResponse"-              (\ o ->-                 UserRolesListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!=-                        "dfareporting#userRolesListResponse")-                     <*> (o .:? "userRoles" .!= mempty))--instance ToJSON UserRolesListResponse where-        toJSON UserRolesListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _urlrNextPageToken,-                  Just ("kind" .= _urlrKind),-                  ("userRoles" .=) <$> _urlrUserRoles])---- | Represents a response to the queryCompatibleFields method.------ /See:/ 'compatibleFields' smart constructor.-data CompatibleFields = CompatibleFields-    { _cfReachReportCompatibleFields               :: !(Maybe ReachReportCompatibleFields)-    , _cfCrossDimensionReachReportCompatibleFields :: !(Maybe CrossDimensionReachReportCompatibleFields)-    , _cfKind                                      :: !Text-    , _cfFloodlightReportCompatibleFields          :: !(Maybe FloodlightReportCompatibleFields)-    , _cfReportCompatibleFields                    :: !(Maybe ReportCompatibleFields)-    , _cfPathToConversionReportCompatibleFields    :: !(Maybe PathToConversionReportCompatibleFields)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CompatibleFields' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cfReachReportCompatibleFields'------ * 'cfCrossDimensionReachReportCompatibleFields'------ * 'cfKind'------ * 'cfFloodlightReportCompatibleFields'------ * 'cfReportCompatibleFields'------ * 'cfPathToConversionReportCompatibleFields'-compatibleFields-    :: CompatibleFields-compatibleFields =-    CompatibleFields-    { _cfReachReportCompatibleFields = Nothing-    , _cfCrossDimensionReachReportCompatibleFields = Nothing-    , _cfKind = "dfareporting#compatibleFields"-    , _cfFloodlightReportCompatibleFields = Nothing-    , _cfReportCompatibleFields = Nothing-    , _cfPathToConversionReportCompatibleFields = Nothing-    }---- | Contains items that are compatible to be selected for a report of type--- \"REACH\".-cfReachReportCompatibleFields :: Lens' CompatibleFields (Maybe ReachReportCompatibleFields)-cfReachReportCompatibleFields-  = lens _cfReachReportCompatibleFields-      (\ s a -> s{_cfReachReportCompatibleFields = a})---- | Contains items that are compatible to be selected for a report of type--- \"CROSS_DIMENSION_REACH\".-cfCrossDimensionReachReportCompatibleFields :: Lens' CompatibleFields (Maybe CrossDimensionReachReportCompatibleFields)-cfCrossDimensionReachReportCompatibleFields-  = lens _cfCrossDimensionReachReportCompatibleFields-      (\ s a ->-         s{_cfCrossDimensionReachReportCompatibleFields = a})---- | The kind of resource this is, in this case--- dfareporting#compatibleFields.-cfKind :: Lens' CompatibleFields Text-cfKind = lens _cfKind (\ s a -> s{_cfKind = a})---- | Contains items that are compatible to be selected for a report of type--- \"FLOODLIGHT\".-cfFloodlightReportCompatibleFields :: Lens' CompatibleFields (Maybe FloodlightReportCompatibleFields)-cfFloodlightReportCompatibleFields-  = lens _cfFloodlightReportCompatibleFields-      (\ s a -> s{_cfFloodlightReportCompatibleFields = a})---- | Contains items that are compatible to be selected for a report of type--- \"STANDARD\".-cfReportCompatibleFields :: Lens' CompatibleFields (Maybe ReportCompatibleFields)-cfReportCompatibleFields-  = lens _cfReportCompatibleFields-      (\ s a -> s{_cfReportCompatibleFields = a})---- | Contains items that are compatible to be selected for a report of type--- \"PATH_TO_CONVERSION\".-cfPathToConversionReportCompatibleFields :: Lens' CompatibleFields (Maybe PathToConversionReportCompatibleFields)-cfPathToConversionReportCompatibleFields-  = lens _cfPathToConversionReportCompatibleFields-      (\ s a ->-         s{_cfPathToConversionReportCompatibleFields = a})--instance FromJSON CompatibleFields where-        parseJSON-          = withObject "CompatibleFields"-              (\ o ->-                 CompatibleFields <$>-                   (o .:? "reachReportCompatibleFields") <*>-                     (o .:? "crossDimensionReachReportCompatibleFields")-                     <*>-                     (o .:? "kind" .!= "dfareporting#compatibleFields")-                     <*> (o .:? "floodlightReportCompatibleFields")-                     <*> (o .:? "reportCompatibleFields")-                     <*> (o .:? "pathToConversionReportCompatibleFields"))--instance ToJSON CompatibleFields where-        toJSON CompatibleFields{..}-          = object-              (catMaybes-                 [("reachReportCompatibleFields" .=) <$>-                    _cfReachReportCompatibleFields,-                  ("crossDimensionReachReportCompatibleFields" .=) <$>-                    _cfCrossDimensionReachReportCompatibleFields,-                  Just ("kind" .= _cfKind),-                  ("floodlightReportCompatibleFields" .=) <$>-                    _cfFloodlightReportCompatibleFields,-                  ("reportCompatibleFields" .=) <$>-                    _cfReportCompatibleFields,-                  ("pathToConversionReportCompatibleFields" .=) <$>-                    _cfPathToConversionReportCompatibleFields])---- | Audience Segment.------ /See:/ 'audienceSegment' smart constructor.-data AudienceSegment = AudienceSegment-    { _asName       :: !(Maybe Text)-    , _asId         :: !(Maybe (Textual Int64))-    , _asAllocation :: !(Maybe (Textual Int32))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'AudienceSegment' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'asName'------ * 'asId'------ * 'asAllocation'-audienceSegment-    :: AudienceSegment-audienceSegment =-    AudienceSegment-    { _asName = Nothing-    , _asId = Nothing-    , _asAllocation = Nothing-    }---- | Name of this audience segment. This is a required field and must be less--- than 65 characters long.-asName :: Lens' AudienceSegment (Maybe Text)-asName = lens _asName (\ s a -> s{_asName = a})---- | ID of this audience segment. This is a read-only, auto-generated field.-asId :: Lens' AudienceSegment (Maybe Int64)-asId-  = lens _asId (\ s a -> s{_asId = a}) .-      mapping _Coerce---- | Weight allocated to this segment. Must be between 1 and 1000. The weight--- assigned will be understood in proportion to the weights assigned to--- other segments in the same segment group.-asAllocation :: Lens' AudienceSegment (Maybe Int32)-asAllocation-  = lens _asAllocation (\ s a -> s{_asAllocation = a})-      . mapping _Coerce--instance FromJSON AudienceSegment where-        parseJSON-          = withObject "AudienceSegment"-              (\ o ->-                 AudienceSegment <$>-                   (o .:? "name") <*> (o .:? "id") <*>-                     (o .:? "allocation"))--instance ToJSON AudienceSegment where-        toJSON AudienceSegment{..}-          = object-              (catMaybes-                 [("name" .=) <$> _asName, ("id" .=) <$> _asId,-                  ("allocation" .=) <$> _asAllocation])---- | DFP Settings------ /See:/ 'dfpSettings' smart constructor.-data DfpSettings = DfpSettings-    { _dsPubPaidPlacementAccepted      :: !(Maybe Bool)-    , _dsDfpNetworkName                :: !(Maybe Text)-    , _dsPublisherPortalOnly           :: !(Maybe Bool)-    , _dsProgrammaticPlacementAccepted :: !(Maybe Bool)-    , _dsDfpNetworkCode                :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'DfpSettings' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dsPubPaidPlacementAccepted'------ * 'dsDfpNetworkName'------ * 'dsPublisherPortalOnly'------ * 'dsProgrammaticPlacementAccepted'------ * 'dsDfpNetworkCode'-dfpSettings-    :: DfpSettings-dfpSettings =-    DfpSettings-    { _dsPubPaidPlacementAccepted = Nothing-    , _dsDfpNetworkName = Nothing-    , _dsPublisherPortalOnly = Nothing-    , _dsProgrammaticPlacementAccepted = Nothing-    , _dsDfpNetworkCode = Nothing-    }---- | Whether this directory site accepts publisher-paid tags.-dsPubPaidPlacementAccepted :: Lens' DfpSettings (Maybe Bool)-dsPubPaidPlacementAccepted-  = lens _dsPubPaidPlacementAccepted-      (\ s a -> s{_dsPubPaidPlacementAccepted = a})---- | DFP network name for this directory site.-dsDfpNetworkName :: Lens' DfpSettings (Maybe Text)-dsDfpNetworkName-  = lens _dsDfpNetworkName-      (\ s a -> s{_dsDfpNetworkName = a})---- | Whether this directory site is available only via DoubleClick Publisher--- Portal.-dsPublisherPortalOnly :: Lens' DfpSettings (Maybe Bool)-dsPublisherPortalOnly-  = lens _dsPublisherPortalOnly-      (\ s a -> s{_dsPublisherPortalOnly = a})---- | Whether this directory site accepts programmatic placements.-dsProgrammaticPlacementAccepted :: Lens' DfpSettings (Maybe Bool)-dsProgrammaticPlacementAccepted-  = lens _dsProgrammaticPlacementAccepted-      (\ s a -> s{_dsProgrammaticPlacementAccepted = a})---- | DFP network code for this directory site.-dsDfpNetworkCode :: Lens' DfpSettings (Maybe Text)-dsDfpNetworkCode-  = lens _dsDfpNetworkCode-      (\ s a -> s{_dsDfpNetworkCode = a})--instance FromJSON DfpSettings where-        parseJSON-          = withObject "DfpSettings"-              (\ o ->-                 DfpSettings <$>-                   (o .:? "pubPaidPlacementAccepted") <*>-                     (o .:? "dfp_network_name")-                     <*> (o .:? "publisherPortalOnly")-                     <*> (o .:? "programmaticPlacementAccepted")-                     <*> (o .:? "dfp_network_code"))--instance ToJSON DfpSettings where-        toJSON DfpSettings{..}-          = object-              (catMaybes-                 [("pubPaidPlacementAccepted" .=) <$>-                    _dsPubPaidPlacementAccepted,-                  ("dfp_network_name" .=) <$> _dsDfpNetworkName,-                  ("publisherPortalOnly" .=) <$>-                    _dsPublisherPortalOnly,-                  ("programmaticPlacementAccepted" .=) <$>-                    _dsProgrammaticPlacementAccepted,-                  ("dfp_network_code" .=) <$> _dsDfpNetworkCode])---- | Represents fields that are compatible to be selected for a report of--- type \"PATH_TO_CONVERSION\".------ /See:/ 'pathToConversionReportCompatibleFields' smart constructor.-data PathToConversionReportCompatibleFields = PathToConversionReportCompatibleFields-    { _ptcrcfMetrics                   :: !(Maybe [Metric])-    , _ptcrcfKind                      :: !Text-    , _ptcrcfConversionDimensions      :: !(Maybe [Dimension])-    , _ptcrcfCustomFloodlightVariables :: !(Maybe [Dimension])-    , _ptcrcfPerInteractionDimensions  :: !(Maybe [Dimension])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'PathToConversionReportCompatibleFields' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ptcrcfMetrics'------ * 'ptcrcfKind'------ * 'ptcrcfConversionDimensions'------ * 'ptcrcfCustomFloodlightVariables'------ * 'ptcrcfPerInteractionDimensions'-pathToConversionReportCompatibleFields-    :: PathToConversionReportCompatibleFields-pathToConversionReportCompatibleFields =-    PathToConversionReportCompatibleFields-    { _ptcrcfMetrics = Nothing-    , _ptcrcfKind = "dfareporting#pathToConversionReportCompatibleFields"-    , _ptcrcfConversionDimensions = Nothing-    , _ptcrcfCustomFloodlightVariables = Nothing-    , _ptcrcfPerInteractionDimensions = Nothing-    }---- | Metrics which are compatible to be selected in the \"metricNames\"--- section of the report.-ptcrcfMetrics :: Lens' PathToConversionReportCompatibleFields [Metric]-ptcrcfMetrics-  = lens _ptcrcfMetrics-      (\ s a -> s{_ptcrcfMetrics = a})-      . _Default-      . _Coerce---- | The kind of resource this is, in this case--- dfareporting#pathToConversionReportCompatibleFields.-ptcrcfKind :: Lens' PathToConversionReportCompatibleFields Text-ptcrcfKind-  = lens _ptcrcfKind (\ s a -> s{_ptcrcfKind = a})---- | Conversion dimensions which are compatible to be selected in the--- \"conversionDimensions\" section of the report.-ptcrcfConversionDimensions :: Lens' PathToConversionReportCompatibleFields [Dimension]-ptcrcfConversionDimensions-  = lens _ptcrcfConversionDimensions-      (\ s a -> s{_ptcrcfConversionDimensions = a})-      . _Default-      . _Coerce---- | Custom floodlight variables which are compatible to be selected in the--- \"customFloodlightVariables\" section of the report.-ptcrcfCustomFloodlightVariables :: Lens' PathToConversionReportCompatibleFields [Dimension]-ptcrcfCustomFloodlightVariables-  = lens _ptcrcfCustomFloodlightVariables-      (\ s a -> s{_ptcrcfCustomFloodlightVariables = a})-      . _Default-      . _Coerce---- | Per-interaction dimensions which are compatible to be selected in the--- \"perInteractionDimensions\" section of the report.-ptcrcfPerInteractionDimensions :: Lens' PathToConversionReportCompatibleFields [Dimension]-ptcrcfPerInteractionDimensions-  = lens _ptcrcfPerInteractionDimensions-      (\ s a -> s{_ptcrcfPerInteractionDimensions = a})-      . _Default-      . _Coerce--instance FromJSON-         PathToConversionReportCompatibleFields where-        parseJSON-          = withObject "PathToConversionReportCompatibleFields"-              (\ o ->-                 PathToConversionReportCompatibleFields <$>-                   (o .:? "metrics" .!= mempty) <*>-                     (o .:? "kind" .!=-                        "dfareporting#pathToConversionReportCompatibleFields")-                     <*> (o .:? "conversionDimensions" .!= mempty)-                     <*> (o .:? "customFloodlightVariables" .!= mempty)-                     <*> (o .:? "perInteractionDimensions" .!= mempty))--instance ToJSON-         PathToConversionReportCompatibleFields where-        toJSON PathToConversionReportCompatibleFields{..}-          = object-              (catMaybes-                 [("metrics" .=) <$> _ptcrcfMetrics,-                  Just ("kind" .= _ptcrcfKind),-                  ("conversionDimensions" .=) <$>-                    _ptcrcfConversionDimensions,-                  ("customFloodlightVariables" .=) <$>-                    _ptcrcfCustomFloodlightVariables,-                  ("perInteractionDimensions" .=) <$>-                    _ptcrcfPerInteractionDimensions])---- | Contains information about a city that can be targeted by ads.------ /See:/ 'city' smart constructor.-data City = City-    { _ccMetroCode     :: !(Maybe Text)-    , _ccRegionCode    :: !(Maybe Text)-    , _ccKind          :: !Text-    , _ccRegionDartId  :: !(Maybe (Textual Int64))-    , _ccMetroDmaId    :: !(Maybe (Textual Int64))-    , _ccName          :: !(Maybe Text)-    , _ccCountryCode   :: !(Maybe Text)-    , _ccCountryDartId :: !(Maybe (Textual Int64))-    , _ccDartId        :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'City' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ccMetroCode'------ * 'ccRegionCode'------ * 'ccKind'------ * 'ccRegionDartId'------ * 'ccMetroDmaId'------ * 'ccName'------ * 'ccCountryCode'------ * 'ccCountryDartId'------ * 'ccDartId'-city-    :: City-city =-    City-    { _ccMetroCode = Nothing-    , _ccRegionCode = Nothing-    , _ccKind = "dfareporting#city"-    , _ccRegionDartId = Nothing-    , _ccMetroDmaId = Nothing-    , _ccName = Nothing-    , _ccCountryCode = Nothing-    , _ccCountryDartId = Nothing-    , _ccDartId = Nothing-    }---- | Metro region code of the metro region (DMA) to which this city belongs.-ccMetroCode :: Lens' City (Maybe Text)-ccMetroCode-  = lens _ccMetroCode (\ s a -> s{_ccMetroCode = a})---- | Region code of the region to which this city belongs.-ccRegionCode :: Lens' City (Maybe Text)-ccRegionCode-  = lens _ccRegionCode (\ s a -> s{_ccRegionCode = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#city\".-ccKind :: Lens' City Text-ccKind = lens _ccKind (\ s a -> s{_ccKind = a})---- | DART ID of the region to which this city belongs.-ccRegionDartId :: Lens' City (Maybe Int64)-ccRegionDartId-  = lens _ccRegionDartId-      (\ s a -> s{_ccRegionDartId = a})-      . mapping _Coerce---- | ID of the metro region (DMA) to which this city belongs.-ccMetroDmaId :: Lens' City (Maybe Int64)-ccMetroDmaId-  = lens _ccMetroDmaId (\ s a -> s{_ccMetroDmaId = a})-      . mapping _Coerce---- | Name of this city.-ccName :: Lens' City (Maybe Text)-ccName = lens _ccName (\ s a -> s{_ccName = a})---- | Country code of the country to which this city belongs.-ccCountryCode :: Lens' City (Maybe Text)-ccCountryCode-  = lens _ccCountryCode-      (\ s a -> s{_ccCountryCode = a})---- | DART ID of the country to which this city belongs.-ccCountryDartId :: Lens' City (Maybe Int64)-ccCountryDartId-  = lens _ccCountryDartId-      (\ s a -> s{_ccCountryDartId = a})-      . mapping _Coerce---- | DART ID of this city. This is the ID used for targeting and generating--- reports.-ccDartId :: Lens' City (Maybe Int64)-ccDartId-  = lens _ccDartId (\ s a -> s{_ccDartId = a}) .-      mapping _Coerce--instance FromJSON City where-        parseJSON-          = withObject "City"-              (\ o ->-                 City <$>-                   (o .:? "metroCode") <*> (o .:? "regionCode") <*>-                     (o .:? "kind" .!= "dfareporting#city")-                     <*> (o .:? "regionDartId")-                     <*> (o .:? "metroDmaId")-                     <*> (o .:? "name")-                     <*> (o .:? "countryCode")-                     <*> (o .:? "countryDartId")-                     <*> (o .:? "dartId"))--instance ToJSON City where-        toJSON City{..}-          = object-              (catMaybes-                 [("metroCode" .=) <$> _ccMetroCode,-                  ("regionCode" .=) <$> _ccRegionCode,-                  Just ("kind" .= _ccKind),-                  ("regionDartId" .=) <$> _ccRegionDartId,-                  ("metroDmaId" .=) <$> _ccMetroDmaId,-                  ("name" .=) <$> _ccName,-                  ("countryCode" .=) <$> _ccCountryCode,-                  ("countryDartId" .=) <$> _ccCountryDartId,-                  ("dartId" .=) <$> _ccDartId])---- | Contains information about a platform type that can be targeted by ads.------ /See:/ 'platformType' smart constructor.-data PlatformType = PlatformType-    { _ptKind :: !Text-    , _ptName :: !(Maybe Text)-    , _ptId   :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'PlatformType' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ptKind'------ * 'ptName'------ * 'ptId'-platformType-    :: PlatformType-platformType =-    PlatformType-    { _ptKind = "dfareporting#platformType"-    , _ptName = Nothing-    , _ptId = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#platformType\".-ptKind :: Lens' PlatformType Text-ptKind = lens _ptKind (\ s a -> s{_ptKind = a})---- | Name of this platform type.-ptName :: Lens' PlatformType (Maybe Text)-ptName = lens _ptName (\ s a -> s{_ptName = a})---- | ID of this platform type.-ptId :: Lens' PlatformType (Maybe Int64)-ptId-  = lens _ptId (\ s a -> s{_ptId = a}) .-      mapping _Coerce--instance FromJSON PlatformType where-        parseJSON-          = withObject "PlatformType"-              (\ o ->-                 PlatformType <$>-                   (o .:? "kind" .!= "dfareporting#platformType") <*>-                     (o .:? "name")-                     <*> (o .:? "id"))--instance ToJSON PlatformType where-        toJSON PlatformType{..}-          = object-              (catMaybes-                 [Just ("kind" .= _ptKind), ("name" .=) <$> _ptName,-                  ("id" .=) <$> _ptId])---- | Key Value Targeting Expression.------ /See:/ 'keyValueTargetingExpression' smart constructor.-newtype KeyValueTargetingExpression = KeyValueTargetingExpression-    { _kvteExpression :: Maybe Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'KeyValueTargetingExpression' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'kvteExpression'-keyValueTargetingExpression-    :: KeyValueTargetingExpression-keyValueTargetingExpression =-    KeyValueTargetingExpression-    { _kvteExpression = Nothing-    }---- | Keyword expression being targeted by the ad.-kvteExpression :: Lens' KeyValueTargetingExpression (Maybe Text)-kvteExpression-  = lens _kvteExpression-      (\ s a -> s{_kvteExpression = a})--instance FromJSON KeyValueTargetingExpression where-        parseJSON-          = withObject "KeyValueTargetingExpression"-              (\ o ->-                 KeyValueTargetingExpression <$> (o .:? "expression"))--instance ToJSON KeyValueTargetingExpression where-        toJSON KeyValueTargetingExpression{..}-          = object-              (catMaybes [("expression" .=) <$> _kvteExpression])---- | Companion Click-through override.------ /See:/ 'companionClickThroughOverride' smart constructor.-data CompanionClickThroughOverride = CompanionClickThroughOverride-    { _cctoCreativeId      :: !(Maybe (Textual Int64))-    , _cctoClickThroughURL :: !(Maybe ClickThroughURL)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CompanionClickThroughOverride' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cctoCreativeId'------ * 'cctoClickThroughURL'-companionClickThroughOverride-    :: CompanionClickThroughOverride-companionClickThroughOverride =-    CompanionClickThroughOverride-    { _cctoCreativeId = Nothing-    , _cctoClickThroughURL = Nothing-    }---- | ID of the creative for this companion click-through override.-cctoCreativeId :: Lens' CompanionClickThroughOverride (Maybe Int64)-cctoCreativeId-  = lens _cctoCreativeId-      (\ s a -> s{_cctoCreativeId = a})-      . mapping _Coerce---- | Click-through URL of this companion click-through override.-cctoClickThroughURL :: Lens' CompanionClickThroughOverride (Maybe ClickThroughURL)-cctoClickThroughURL-  = lens _cctoClickThroughURL-      (\ s a -> s{_cctoClickThroughURL = a})--instance FromJSON CompanionClickThroughOverride where-        parseJSON-          = withObject "CompanionClickThroughOverride"-              (\ o ->-                 CompanionClickThroughOverride <$>-                   (o .:? "creativeId") <*> (o .:? "clickThroughUrl"))--instance ToJSON CompanionClickThroughOverride where-        toJSON CompanionClickThroughOverride{..}-          = object-              (catMaybes-                 [("creativeId" .=) <$> _cctoCreativeId,-                  ("clickThroughUrl" .=) <$> _cctoClickThroughURL])---- | Advertiser List Response------ /See:/ 'advertisersListResponse' smart constructor.-data AdvertisersListResponse = AdvertisersListResponse-    { _advNextPageToken :: !(Maybe Text)-    , _advKind          :: !Text-    , _advAdvertisers   :: !(Maybe [Advertiser])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'AdvertisersListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'advNextPageToken'------ * 'advKind'------ * 'advAdvertisers'-advertisersListResponse-    :: AdvertisersListResponse-advertisersListResponse =-    AdvertisersListResponse-    { _advNextPageToken = Nothing-    , _advKind = "dfareporting#advertisersListResponse"-    , _advAdvertisers = Nothing-    }---- | Pagination token to be used for the next list operation.-advNextPageToken :: Lens' AdvertisersListResponse (Maybe Text)-advNextPageToken-  = lens _advNextPageToken-      (\ s a -> s{_advNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#advertisersListResponse\".-advKind :: Lens' AdvertisersListResponse Text-advKind = lens _advKind (\ s a -> s{_advKind = a})---- | Advertiser collection.-advAdvertisers :: Lens' AdvertisersListResponse [Advertiser]-advAdvertisers-  = lens _advAdvertisers-      (\ s a -> s{_advAdvertisers = a})-      . _Default-      . _Coerce--instance FromJSON AdvertisersListResponse where-        parseJSON-          = withObject "AdvertisersListResponse"-              (\ o ->-                 AdvertisersListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!=-                        "dfareporting#advertisersListResponse")-                     <*> (o .:? "advertisers" .!= mempty))--instance ToJSON AdvertisersListResponse where-        toJSON AdvertisersListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _advNextPageToken,-                  Just ("kind" .= _advKind),-                  ("advertisers" .=) <$> _advAdvertisers])---- | Country List Response------ /See:/ 'countriesListResponse' smart constructor.-data CountriesListResponse = CountriesListResponse-    { _couKind      :: !Text-    , _couCountries :: !(Maybe [Country])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CountriesListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'couKind'------ * 'couCountries'-countriesListResponse-    :: CountriesListResponse-countriesListResponse =-    CountriesListResponse-    { _couKind = "dfareporting#countriesListResponse"-    , _couCountries = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#countriesListResponse\".-couKind :: Lens' CountriesListResponse Text-couKind = lens _couKind (\ s a -> s{_couKind = a})---- | Country collection.-couCountries :: Lens' CountriesListResponse [Country]-couCountries-  = lens _couCountries (\ s a -> s{_couCountries = a})-      . _Default-      . _Coerce--instance FromJSON CountriesListResponse where-        parseJSON-          = withObject "CountriesListResponse"-              (\ o ->-                 CountriesListResponse <$>-                   (o .:? "kind" .!=-                      "dfareporting#countriesListResponse")-                     <*> (o .:? "countries" .!= mempty))--instance ToJSON CountriesListResponse where-        toJSON CountriesListResponse{..}-          = object-              (catMaybes-                 [Just ("kind" .= _couKind),-                  ("countries" .=) <$> _couCountries])---- | Account Permission Group List Response------ /See:/ 'accountPermissionGroupsListResponse' smart constructor.-data AccountPermissionGroupsListResponse = AccountPermissionGroupsListResponse-    { _apglrKind                    :: !Text-    , _apglrAccountPermissionGroups :: !(Maybe [AccountPermissionGroup])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'AccountPermissionGroupsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'apglrKind'------ * 'apglrAccountPermissionGroups'-accountPermissionGroupsListResponse-    :: AccountPermissionGroupsListResponse-accountPermissionGroupsListResponse =-    AccountPermissionGroupsListResponse-    { _apglrKind = "dfareporting#accountPermissionGroupsListResponse"-    , _apglrAccountPermissionGroups = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#accountPermissionGroupsListResponse\".-apglrKind :: Lens' AccountPermissionGroupsListResponse Text-apglrKind-  = lens _apglrKind (\ s a -> s{_apglrKind = a})---- | Account permission group collection.-apglrAccountPermissionGroups :: Lens' AccountPermissionGroupsListResponse [AccountPermissionGroup]-apglrAccountPermissionGroups-  = lens _apglrAccountPermissionGroups-      (\ s a -> s{_apglrAccountPermissionGroups = a})-      . _Default-      . _Coerce--instance FromJSON AccountPermissionGroupsListResponse-         where-        parseJSON-          = withObject "AccountPermissionGroupsListResponse"-              (\ o ->-                 AccountPermissionGroupsListResponse <$>-                   (o .:? "kind" .!=-                      "dfareporting#accountPermissionGroupsListResponse")-                     <*> (o .:? "accountPermissionGroups" .!= mempty))--instance ToJSON AccountPermissionGroupsListResponse-         where-        toJSON AccountPermissionGroupsListResponse{..}-          = object-              (catMaybes-                 [Just ("kind" .= _apglrKind),-                  ("accountPermissionGroups" .=) <$>-                    _apglrAccountPermissionGroups])---- | Popup Window Properties.------ /See:/ 'popupWindowProperties' smart constructor.-data PopupWindowProperties = PopupWindowProperties-    { _pwpOffSet         :: !(Maybe OffSetPosition)-    , _pwpDimension      :: !(Maybe Size)-    , _pwpShowStatusBar  :: !(Maybe Bool)-    , _pwpShowMenuBar    :: !(Maybe Bool)-    , _pwpPositionType   :: !(Maybe PopupWindowPropertiesPositionType)-    , _pwpShowAddressBar :: !(Maybe Bool)-    , _pwpShowScrollBar  :: !(Maybe Bool)-    , _pwpShowToolBar    :: !(Maybe Bool)-    , _pwpTitle          :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'PopupWindowProperties' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pwpOffSet'------ * 'pwpDimension'------ * 'pwpShowStatusBar'------ * 'pwpShowMenuBar'------ * 'pwpPositionType'------ * 'pwpShowAddressBar'------ * 'pwpShowScrollBar'------ * 'pwpShowToolBar'------ * 'pwpTitle'-popupWindowProperties-    :: PopupWindowProperties-popupWindowProperties =-    PopupWindowProperties-    { _pwpOffSet = Nothing-    , _pwpDimension = Nothing-    , _pwpShowStatusBar = Nothing-    , _pwpShowMenuBar = Nothing-    , _pwpPositionType = Nothing-    , _pwpShowAddressBar = Nothing-    , _pwpShowScrollBar = Nothing-    , _pwpShowToolBar = Nothing-    , _pwpTitle = Nothing-    }---- | Upper-left corner coordinates of the popup window. Applicable if--- positionType is COORDINATES.-pwpOffSet :: Lens' PopupWindowProperties (Maybe OffSetPosition)-pwpOffSet-  = lens _pwpOffSet (\ s a -> s{_pwpOffSet = a})---- | Popup dimension for a creative. This is a read-only field. Applicable to--- the following creative types: all RICH_MEDIA and all VPAID-pwpDimension :: Lens' PopupWindowProperties (Maybe Size)-pwpDimension-  = lens _pwpDimension (\ s a -> s{_pwpDimension = a})---- | Whether to display the browser status bar.-pwpShowStatusBar :: Lens' PopupWindowProperties (Maybe Bool)-pwpShowStatusBar-  = lens _pwpShowStatusBar-      (\ s a -> s{_pwpShowStatusBar = a})---- | Whether to display the browser menu bar.-pwpShowMenuBar :: Lens' PopupWindowProperties (Maybe Bool)-pwpShowMenuBar-  = lens _pwpShowMenuBar-      (\ s a -> s{_pwpShowMenuBar = a})---- | Popup window position either centered or at specific coordinate.-pwpPositionType :: Lens' PopupWindowProperties (Maybe PopupWindowPropertiesPositionType)-pwpPositionType-  = lens _pwpPositionType-      (\ s a -> s{_pwpPositionType = a})---- | Whether to display the browser address bar.-pwpShowAddressBar :: Lens' PopupWindowProperties (Maybe Bool)-pwpShowAddressBar-  = lens _pwpShowAddressBar-      (\ s a -> s{_pwpShowAddressBar = a})---- | Whether to display the browser scroll bar.-pwpShowScrollBar :: Lens' PopupWindowProperties (Maybe Bool)-pwpShowScrollBar-  = lens _pwpShowScrollBar-      (\ s a -> s{_pwpShowScrollBar = a})---- | Whether to display the browser tool bar.-pwpShowToolBar :: Lens' PopupWindowProperties (Maybe Bool)-pwpShowToolBar-  = lens _pwpShowToolBar-      (\ s a -> s{_pwpShowToolBar = a})---- | Title of popup window.-pwpTitle :: Lens' PopupWindowProperties (Maybe Text)-pwpTitle = lens _pwpTitle (\ s a -> s{_pwpTitle = a})--instance FromJSON PopupWindowProperties where-        parseJSON-          = withObject "PopupWindowProperties"-              (\ o ->-                 PopupWindowProperties <$>-                   (o .:? "offset") <*> (o .:? "dimension") <*>-                     (o .:? "showStatusBar")-                     <*> (o .:? "showMenuBar")-                     <*> (o .:? "positionType")-                     <*> (o .:? "showAddressBar")-                     <*> (o .:? "showScrollBar")-                     <*> (o .:? "showToolBar")-                     <*> (o .:? "title"))--instance ToJSON PopupWindowProperties where-        toJSON PopupWindowProperties{..}-          = object-              (catMaybes-                 [("offset" .=) <$> _pwpOffSet,-                  ("dimension" .=) <$> _pwpDimension,-                  ("showStatusBar" .=) <$> _pwpShowStatusBar,-                  ("showMenuBar" .=) <$> _pwpShowMenuBar,-                  ("positionType" .=) <$> _pwpPositionType,-                  ("showAddressBar" .=) <$> _pwpShowAddressBar,-                  ("showScrollBar" .=) <$> _pwpShowScrollBar,-                  ("showToolBar" .=) <$> _pwpShowToolBar,-                  ("title" .=) <$> _pwpTitle])---- | Event tag override information.------ /See:/ 'eventTagOverride' smart constructor.-data EventTagOverride = EventTagOverride-    { _etoEnabled :: !(Maybe Bool)-    , _etoId      :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'EventTagOverride' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'etoEnabled'------ * 'etoId'-eventTagOverride-    :: EventTagOverride-eventTagOverride =-    EventTagOverride-    { _etoEnabled = Nothing-    , _etoId = Nothing-    }---- | Whether this override is enabled.-etoEnabled :: Lens' EventTagOverride (Maybe Bool)-etoEnabled-  = lens _etoEnabled (\ s a -> s{_etoEnabled = a})---- | ID of this event tag override. This is a read-only, auto-generated--- field.-etoId :: Lens' EventTagOverride (Maybe Int64)-etoId-  = lens _etoId (\ s a -> s{_etoId = a}) .-      mapping _Coerce--instance FromJSON EventTagOverride where-        parseJSON-          = withObject "EventTagOverride"-              (\ o ->-                 EventTagOverride <$>-                   (o .:? "enabled") <*> (o .:? "id"))--instance ToJSON EventTagOverride where-        toJSON EventTagOverride{..}-          = object-              (catMaybes-                 [("enabled" .=) <$> _etoEnabled,-                  ("id" .=) <$> _etoId])---- | Contains information about a particular version of an operating system--- that can be targeted by ads.------ /See:/ 'operatingSystemVersion' smart constructor.-data OperatingSystemVersion = OperatingSystemVersion-    { _osvMinorVersion    :: !(Maybe Text)-    , _osvKind            :: !Text-    , _osvOperatingSystem :: !(Maybe OperatingSystem)-    , _osvMajorVersion    :: !(Maybe Text)-    , _osvName            :: !(Maybe Text)-    , _osvId              :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'OperatingSystemVersion' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'osvMinorVersion'------ * 'osvKind'------ * 'osvOperatingSystem'------ * 'osvMajorVersion'------ * 'osvName'------ * 'osvId'-operatingSystemVersion-    :: OperatingSystemVersion-operatingSystemVersion =-    OperatingSystemVersion-    { _osvMinorVersion = Nothing-    , _osvKind = "dfareporting#operatingSystemVersion"-    , _osvOperatingSystem = Nothing-    , _osvMajorVersion = Nothing-    , _osvName = Nothing-    , _osvId = Nothing-    }---- | Minor version (number after the first dot) of this operating system--- version.-osvMinorVersion :: Lens' OperatingSystemVersion (Maybe Text)-osvMinorVersion-  = lens _osvMinorVersion-      (\ s a -> s{_osvMinorVersion = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#operatingSystemVersion\".-osvKind :: Lens' OperatingSystemVersion Text-osvKind = lens _osvKind (\ s a -> s{_osvKind = a})---- | Operating system of this operating system version.-osvOperatingSystem :: Lens' OperatingSystemVersion (Maybe OperatingSystem)-osvOperatingSystem-  = lens _osvOperatingSystem-      (\ s a -> s{_osvOperatingSystem = a})---- | Major version (leftmost number) of this operating system version.-osvMajorVersion :: Lens' OperatingSystemVersion (Maybe Text)-osvMajorVersion-  = lens _osvMajorVersion-      (\ s a -> s{_osvMajorVersion = a})---- | Name of this operating system version.-osvName :: Lens' OperatingSystemVersion (Maybe Text)-osvName = lens _osvName (\ s a -> s{_osvName = a})---- | ID of this operating system version.-osvId :: Lens' OperatingSystemVersion (Maybe Int64)-osvId-  = lens _osvId (\ s a -> s{_osvId = a}) .-      mapping _Coerce--instance FromJSON OperatingSystemVersion where-        parseJSON-          = withObject "OperatingSystemVersion"-              (\ o ->-                 OperatingSystemVersion <$>-                   (o .:? "minorVersion") <*>-                     (o .:? "kind" .!=-                        "dfareporting#operatingSystemVersion")-                     <*> (o .:? "operatingSystem")-                     <*> (o .:? "majorVersion")-                     <*> (o .:? "name")-                     <*> (o .:? "id"))--instance ToJSON OperatingSystemVersion where-        toJSON OperatingSystemVersion{..}-          = object-              (catMaybes-                 [("minorVersion" .=) <$> _osvMinorVersion,-                  Just ("kind" .= _osvKind),-                  ("operatingSystem" .=) <$> _osvOperatingSystem,-                  ("majorVersion" .=) <$> _osvMajorVersion,-                  ("name" .=) <$> _osvName, ("id" .=) <$> _osvId])---- | AccountPermissions contains information about a particular account--- permission. Some features of DCM require an account permission to be--- present in the account.------ /See:/ 'accountPermission' smart constructor.-data AccountPermission = AccountPermission-    { _acccKind              :: !Text-    , _acccAccountProFiles   :: !(Maybe [AccountPermissionAccountProFilesItem])-    , _acccName              :: !(Maybe Text)-    , _acccId                :: !(Maybe (Textual Int64))-    , _acccLevel             :: !(Maybe AccountPermissionLevel)-    , _acccPermissionGroupId :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'AccountPermission' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'acccKind'------ * 'acccAccountProFiles'------ * 'acccName'------ * 'acccId'------ * 'acccLevel'------ * 'acccPermissionGroupId'-accountPermission-    :: AccountPermission-accountPermission =-    AccountPermission-    { _acccKind = "dfareporting#accountPermission"-    , _acccAccountProFiles = Nothing-    , _acccName = Nothing-    , _acccId = Nothing-    , _acccLevel = Nothing-    , _acccPermissionGroupId = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#accountPermission\".-acccKind :: Lens' AccountPermission Text-acccKind = lens _acccKind (\ s a -> s{_acccKind = a})---- | Account profiles associated with this account permission. Possible--- values are: - \"ACCOUNT_PROFILE_BASIC\" - \"ACCOUNT_PROFILE_STANDARD\"-acccAccountProFiles :: Lens' AccountPermission [AccountPermissionAccountProFilesItem]-acccAccountProFiles-  = lens _acccAccountProFiles-      (\ s a -> s{_acccAccountProFiles = a})-      . _Default-      . _Coerce---- | Name of this account permission.-acccName :: Lens' AccountPermission (Maybe Text)-acccName = lens _acccName (\ s a -> s{_acccName = a})---- | ID of this account permission.-acccId :: Lens' AccountPermission (Maybe Int64)-acccId-  = lens _acccId (\ s a -> s{_acccId = a}) .-      mapping _Coerce---- | Administrative level required to enable this account permission.-acccLevel :: Lens' AccountPermission (Maybe AccountPermissionLevel)-acccLevel-  = lens _acccLevel (\ s a -> s{_acccLevel = a})---- | Permission group of this account permission.-acccPermissionGroupId :: Lens' AccountPermission (Maybe Int64)-acccPermissionGroupId-  = lens _acccPermissionGroupId-      (\ s a -> s{_acccPermissionGroupId = a})-      . mapping _Coerce--instance FromJSON AccountPermission where-        parseJSON-          = withObject "AccountPermission"-              (\ o ->-                 AccountPermission <$>-                   (o .:? "kind" .!= "dfareporting#accountPermission")-                     <*> (o .:? "accountProfiles" .!= mempty)-                     <*> (o .:? "name")-                     <*> (o .:? "id")-                     <*> (o .:? "level")-                     <*> (o .:? "permissionGroupId"))--instance ToJSON AccountPermission where-        toJSON AccountPermission{..}-          = object-              (catMaybes-                 [Just ("kind" .= _acccKind),-                  ("accountProfiles" .=) <$> _acccAccountProFiles,-                  ("name" .=) <$> _acccName, ("id" .=) <$> _acccId,-                  ("level" .=) <$> _acccLevel,-                  ("permissionGroupId" .=) <$> _acccPermissionGroupId])---- | Represents a UserProfile resource.------ /See:/ 'userProFile' smart constructor.-data UserProFile = UserProFile-    { _upfEtag           :: !(Maybe Text)-    , _upfKind           :: !Text-    , _upfAccountName    :: !(Maybe Text)-    , _upfProFileId      :: !(Maybe (Textual Int64))-    , _upfUserName       :: !(Maybe Text)-    , _upfAccountId      :: !(Maybe (Textual Int64))-    , _upfSubAccountName :: !(Maybe Text)-    , _upfSubAccountId   :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'UserProFile' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'upfEtag'------ * 'upfKind'------ * 'upfAccountName'------ * 'upfProFileId'------ * 'upfUserName'------ * 'upfAccountId'------ * 'upfSubAccountName'------ * 'upfSubAccountId'-userProFile-    :: UserProFile-userProFile =-    UserProFile-    { _upfEtag = Nothing-    , _upfKind = "dfareporting#userProfile"-    , _upfAccountName = Nothing-    , _upfProFileId = Nothing-    , _upfUserName = Nothing-    , _upfAccountId = Nothing-    , _upfSubAccountName = Nothing-    , _upfSubAccountId = Nothing-    }---- | The eTag of this response for caching purposes.-upfEtag :: Lens' UserProFile (Maybe Text)-upfEtag = lens _upfEtag (\ s a -> s{_upfEtag = a})---- | The kind of resource this is, in this case dfareporting#userProfile.-upfKind :: Lens' UserProFile Text-upfKind = lens _upfKind (\ s a -> s{_upfKind = a})---- | The account name this profile belongs to.-upfAccountName :: Lens' UserProFile (Maybe Text)-upfAccountName-  = lens _upfAccountName-      (\ s a -> s{_upfAccountName = a})---- | The unique ID of the user profile.-upfProFileId :: Lens' UserProFile (Maybe Int64)-upfProFileId-  = lens _upfProFileId (\ s a -> s{_upfProFileId = a})-      . mapping _Coerce---- | The user name.-upfUserName :: Lens' UserProFile (Maybe Text)-upfUserName-  = lens _upfUserName (\ s a -> s{_upfUserName = a})---- | The account ID to which this profile belongs.-upfAccountId :: Lens' UserProFile (Maybe Int64)-upfAccountId-  = lens _upfAccountId (\ s a -> s{_upfAccountId = a})-      . mapping _Coerce---- | The sub account name this profile belongs to if applicable.-upfSubAccountName :: Lens' UserProFile (Maybe Text)-upfSubAccountName-  = lens _upfSubAccountName-      (\ s a -> s{_upfSubAccountName = a})---- | The sub account ID this profile belongs to if applicable.-upfSubAccountId :: Lens' UserProFile (Maybe Int64)-upfSubAccountId-  = lens _upfSubAccountId-      (\ s a -> s{_upfSubAccountId = a})-      . mapping _Coerce--instance FromJSON UserProFile where-        parseJSON-          = withObject "UserProFile"-              (\ o ->-                 UserProFile <$>-                   (o .:? "etag") <*>-                     (o .:? "kind" .!= "dfareporting#userProfile")-                     <*> (o .:? "accountName")-                     <*> (o .:? "profileId")-                     <*> (o .:? "userName")-                     <*> (o .:? "accountId")-                     <*> (o .:? "subAccountName")-                     <*> (o .:? "subAccountId"))--instance ToJSON UserProFile where-        toJSON UserProFile{..}-          = object-              (catMaybes-                 [("etag" .=) <$> _upfEtag, Just ("kind" .= _upfKind),-                  ("accountName" .=) <$> _upfAccountName,-                  ("profileId" .=) <$> _upfProFileId,-                  ("userName" .=) <$> _upfUserName,-                  ("accountId" .=) <$> _upfAccountId,-                  ("subAccountName" .=) <$> _upfSubAccountName,-                  ("subAccountId" .=) <$> _upfSubAccountId])---- | Operating System List Response------ /See:/ 'operatingSystemsListResponse' smart constructor.-data OperatingSystemsListResponse = OperatingSystemsListResponse-    { _oslrKind             :: !Text-    , _oslrOperatingSystems :: !(Maybe [OperatingSystem])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'OperatingSystemsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'oslrKind'------ * 'oslrOperatingSystems'-operatingSystemsListResponse-    :: OperatingSystemsListResponse-operatingSystemsListResponse =-    OperatingSystemsListResponse-    { _oslrKind = "dfareporting#operatingSystemsListResponse"-    , _oslrOperatingSystems = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#operatingSystemsListResponse\".-oslrKind :: Lens' OperatingSystemsListResponse Text-oslrKind = lens _oslrKind (\ s a -> s{_oslrKind = a})---- | Operating system collection.-oslrOperatingSystems :: Lens' OperatingSystemsListResponse [OperatingSystem]-oslrOperatingSystems-  = lens _oslrOperatingSystems-      (\ s a -> s{_oslrOperatingSystems = a})-      . _Default-      . _Coerce--instance FromJSON OperatingSystemsListResponse where-        parseJSON-          = withObject "OperatingSystemsListResponse"-              (\ o ->-                 OperatingSystemsListResponse <$>-                   (o .:? "kind" .!=-                      "dfareporting#operatingSystemsListResponse")-                     <*> (o .:? "operatingSystems" .!= mempty))--instance ToJSON OperatingSystemsListResponse where-        toJSON OperatingSystemsListResponse{..}-          = object-              (catMaybes-                 [Just ("kind" .= _oslrKind),-                  ("operatingSystems" .=) <$> _oslrOperatingSystems])---- | The report\'s email delivery settings.------ /See:/ 'reportDelivery' smart constructor.-data ReportDelivery = ReportDelivery-    { _rdEmailOwner             :: !(Maybe Bool)-    , _rdRecipients             :: !(Maybe [Recipient])-    , _rdMessage                :: !(Maybe Text)-    , _rdEmailOwnerDeliveryType :: !(Maybe ReportDeliveryEmailOwnerDeliveryType)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ReportDelivery' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rdEmailOwner'------ * 'rdRecipients'------ * 'rdMessage'------ * 'rdEmailOwnerDeliveryType'-reportDelivery-    :: ReportDelivery-reportDelivery =-    ReportDelivery-    { _rdEmailOwner = Nothing-    , _rdRecipients = Nothing-    , _rdMessage = Nothing-    , _rdEmailOwnerDeliveryType = Nothing-    }---- | Whether the report should be emailed to the report owner.-rdEmailOwner :: Lens' ReportDelivery (Maybe Bool)-rdEmailOwner-  = lens _rdEmailOwner (\ s a -> s{_rdEmailOwner = a})---- | The list of recipients to which to email the report.-rdRecipients :: Lens' ReportDelivery [Recipient]-rdRecipients-  = lens _rdRecipients (\ s a -> s{_rdRecipients = a})-      . _Default-      . _Coerce---- | The message to be sent with each email.-rdMessage :: Lens' ReportDelivery (Maybe Text)-rdMessage-  = lens _rdMessage (\ s a -> s{_rdMessage = a})---- | The type of delivery for the owner to receive, if enabled.-rdEmailOwnerDeliveryType :: Lens' ReportDelivery (Maybe ReportDeliveryEmailOwnerDeliveryType)-rdEmailOwnerDeliveryType-  = lens _rdEmailOwnerDeliveryType-      (\ s a -> s{_rdEmailOwnerDeliveryType = a})--instance FromJSON ReportDelivery where-        parseJSON-          = withObject "ReportDelivery"-              (\ o ->-                 ReportDelivery <$>-                   (o .:? "emailOwner") <*>-                     (o .:? "recipients" .!= mempty)-                     <*> (o .:? "message")-                     <*> (o .:? "emailOwnerDeliveryType"))--instance ToJSON ReportDelivery where-        toJSON ReportDelivery{..}-          = object-              (catMaybes-                 [("emailOwner" .=) <$> _rdEmailOwner,-                  ("recipients" .=) <$> _rdRecipients,-                  ("message" .=) <$> _rdMessage,-                  ("emailOwnerDeliveryType" .=) <$>-                    _rdEmailOwnerDeliveryType])---- | Contains properties of a targetable remarketing list. Remarketing--- enables you to create lists of users who have performed specific actions--- on a site, then target ads to members of those lists. This resource is a--- read-only view of a remarketing list to be used to faciliate targeting--- ads to specific lists. Remarketing lists that are owned by your--- advertisers and those that are shared to your advertisers or account are--- accessible via this resource. To manage remarketing lists that are owned--- by your advertisers, use the RemarketingLists resource.------ /See:/ 'targetableRemarketingList' smart constructor.-data TargetableRemarketingList = TargetableRemarketingList-    { _trlListSize                   :: !(Maybe (Textual Int64))-    , _trlLifeSpan                   :: !(Maybe (Textual Int64))-    , _trlKind                       :: !Text-    , _trlAdvertiserId               :: !(Maybe (Textual Int64))-    , _trlAdvertiserIdDimensionValue :: !(Maybe DimensionValue)-    , _trlActive                     :: !(Maybe Bool)-    , _trlAccountId                  :: !(Maybe (Textual Int64))-    , _trlName                       :: !(Maybe Text)-    , _trlListSource                 :: !(Maybe TargetableRemarketingListListSource)-    , _trlId                         :: !(Maybe (Textual Int64))-    , _trlSubAccountId               :: !(Maybe (Textual Int64))-    , _trlDescription                :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'TargetableRemarketingList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'trlListSize'------ * 'trlLifeSpan'------ * 'trlKind'------ * 'trlAdvertiserId'------ * 'trlAdvertiserIdDimensionValue'------ * 'trlActive'------ * 'trlAccountId'------ * 'trlName'------ * 'trlListSource'------ * 'trlId'------ * 'trlSubAccountId'------ * 'trlDescription'-targetableRemarketingList-    :: TargetableRemarketingList-targetableRemarketingList =-    TargetableRemarketingList-    { _trlListSize = Nothing-    , _trlLifeSpan = Nothing-    , _trlKind = "dfareporting#targetableRemarketingList"-    , _trlAdvertiserId = Nothing-    , _trlAdvertiserIdDimensionValue = Nothing-    , _trlActive = Nothing-    , _trlAccountId = Nothing-    , _trlName = Nothing-    , _trlListSource = Nothing-    , _trlId = Nothing-    , _trlSubAccountId = Nothing-    , _trlDescription = Nothing-    }---- | Number of users currently in the list. This is a read-only field.-trlListSize :: Lens' TargetableRemarketingList (Maybe Int64)-trlListSize-  = lens _trlListSize (\ s a -> s{_trlListSize = a}) .-      mapping _Coerce---- | Number of days that a user should remain in the targetable remarketing--- list without an impression.-trlLifeSpan :: Lens' TargetableRemarketingList (Maybe Int64)-trlLifeSpan-  = lens _trlLifeSpan (\ s a -> s{_trlLifeSpan = a}) .-      mapping _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#targetableRemarketingList\".-trlKind :: Lens' TargetableRemarketingList Text-trlKind = lens _trlKind (\ s a -> s{_trlKind = a})---- | Dimension value for the advertiser ID that owns this targetable--- remarketing list.-trlAdvertiserId :: Lens' TargetableRemarketingList (Maybe Int64)-trlAdvertiserId-  = lens _trlAdvertiserId-      (\ s a -> s{_trlAdvertiserId = a})-      . mapping _Coerce---- | Dimension value for the ID of the advertiser.-trlAdvertiserIdDimensionValue :: Lens' TargetableRemarketingList (Maybe DimensionValue)-trlAdvertiserIdDimensionValue-  = lens _trlAdvertiserIdDimensionValue-      (\ s a -> s{_trlAdvertiserIdDimensionValue = a})---- | Whether this targetable remarketing list is active.-trlActive :: Lens' TargetableRemarketingList (Maybe Bool)-trlActive-  = lens _trlActive (\ s a -> s{_trlActive = a})---- | Account ID of this remarketing list. This is a read-only, auto-generated--- field that is only returned in GET requests.-trlAccountId :: Lens' TargetableRemarketingList (Maybe Int64)-trlAccountId-  = lens _trlAccountId (\ s a -> s{_trlAccountId = a})-      . mapping _Coerce---- | Name of the targetable remarketing list. Is no greater than 128--- characters long.-trlName :: Lens' TargetableRemarketingList (Maybe Text)-trlName = lens _trlName (\ s a -> s{_trlName = a})---- | Product from which this targetable remarketing list was originated.-trlListSource :: Lens' TargetableRemarketingList (Maybe TargetableRemarketingListListSource)-trlListSource-  = lens _trlListSource-      (\ s a -> s{_trlListSource = a})---- | Targetable remarketing list ID.-trlId :: Lens' TargetableRemarketingList (Maybe Int64)-trlId-  = lens _trlId (\ s a -> s{_trlId = a}) .-      mapping _Coerce---- | Subaccount ID of this remarketing list. This is a read-only,--- auto-generated field that is only returned in GET requests.-trlSubAccountId :: Lens' TargetableRemarketingList (Maybe Int64)-trlSubAccountId-  = lens _trlSubAccountId-      (\ s a -> s{_trlSubAccountId = a})-      . mapping _Coerce---- | Targetable remarketing list description.-trlDescription :: Lens' TargetableRemarketingList (Maybe Text)-trlDescription-  = lens _trlDescription-      (\ s a -> s{_trlDescription = a})--instance FromJSON TargetableRemarketingList where-        parseJSON-          = withObject "TargetableRemarketingList"-              (\ o ->-                 TargetableRemarketingList <$>-                   (o .:? "listSize") <*> (o .:? "lifeSpan") <*>-                     (o .:? "kind" .!=-                        "dfareporting#targetableRemarketingList")-                     <*> (o .:? "advertiserId")-                     <*> (o .:? "advertiserIdDimensionValue")-                     <*> (o .:? "active")-                     <*> (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "listSource")-                     <*> (o .:? "id")-                     <*> (o .:? "subaccountId")-                     <*> (o .:? "description"))--instance ToJSON TargetableRemarketingList where-        toJSON TargetableRemarketingList{..}-          = object-              (catMaybes-                 [("listSize" .=) <$> _trlListSize,-                  ("lifeSpan" .=) <$> _trlLifeSpan,-                  Just ("kind" .= _trlKind),-                  ("advertiserId" .=) <$> _trlAdvertiserId,-                  ("advertiserIdDimensionValue" .=) <$>-                    _trlAdvertiserIdDimensionValue,-                  ("active" .=) <$> _trlActive,-                  ("accountId" .=) <$> _trlAccountId,-                  ("name" .=) <$> _trlName,-                  ("listSource" .=) <$> _trlListSource,-                  ("id" .=) <$> _trlId,-                  ("subaccountId" .=) <$> _trlSubAccountId,-                  ("description" .=) <$> _trlDescription])---- | Postal Code List Response------ /See:/ 'postalCodesListResponse' smart constructor.-data PostalCodesListResponse = PostalCodesListResponse-    { _pclrKind        :: !Text-    , _pclrPostalCodes :: !(Maybe [PostalCode])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'PostalCodesListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pclrKind'------ * 'pclrPostalCodes'-postalCodesListResponse-    :: PostalCodesListResponse-postalCodesListResponse =-    PostalCodesListResponse-    { _pclrKind = "dfareporting#postalCodesListResponse"-    , _pclrPostalCodes = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#postalCodesListResponse\".-pclrKind :: Lens' PostalCodesListResponse Text-pclrKind = lens _pclrKind (\ s a -> s{_pclrKind = a})---- | Postal code collection.-pclrPostalCodes :: Lens' PostalCodesListResponse [PostalCode]-pclrPostalCodes-  = lens _pclrPostalCodes-      (\ s a -> s{_pclrPostalCodes = a})-      . _Default-      . _Coerce--instance FromJSON PostalCodesListResponse where-        parseJSON-          = withObject "PostalCodesListResponse"-              (\ o ->-                 PostalCodesListResponse <$>-                   (o .:? "kind" .!=-                      "dfareporting#postalCodesListResponse")-                     <*> (o .:? "postalCodes" .!= mempty))--instance ToJSON PostalCodesListResponse where-        toJSON PostalCodesListResponse{..}-          = object-              (catMaybes-                 [Just ("kind" .= _pclrKind),-                  ("postalCodes" .=) <$> _pclrPostalCodes])---- | Describes a change that a user has made to a resource.------ /See:/ 'changeLog' smart constructor.-data ChangeLog = ChangeLog-    { _chaUserProFileId   :: !(Maybe (Textual Int64))-    , _chaObjectType      :: !(Maybe Text)-    , _chaUserProFileName :: !(Maybe Text)-    , _chaKind            :: !Text-    , _chaObjectId        :: !(Maybe (Textual Int64))-    , _chaAction          :: !(Maybe Text)-    , _chaTransactionId   :: !(Maybe (Textual Int64))-    , _chaOldValue        :: !(Maybe Text)-    , _chaAccountId       :: !(Maybe (Textual Int64))-    , _chaNewValue        :: !(Maybe Text)-    , _chaFieldName       :: !(Maybe Text)-    , _chaId              :: !(Maybe (Textual Int64))-    , _chaSubAccountId    :: !(Maybe (Textual Int64))-    , _chaChangeTime      :: !(Maybe DateTime')-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ChangeLog' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'chaUserProFileId'------ * 'chaObjectType'------ * 'chaUserProFileName'------ * 'chaKind'------ * 'chaObjectId'------ * 'chaAction'------ * 'chaTransactionId'------ * 'chaOldValue'------ * 'chaAccountId'------ * 'chaNewValue'------ * 'chaFieldName'------ * 'chaId'------ * 'chaSubAccountId'------ * 'chaChangeTime'-changeLog-    :: ChangeLog-changeLog =-    ChangeLog-    { _chaUserProFileId = Nothing-    , _chaObjectType = Nothing-    , _chaUserProFileName = Nothing-    , _chaKind = "dfareporting#changeLog"-    , _chaObjectId = Nothing-    , _chaAction = Nothing-    , _chaTransactionId = Nothing-    , _chaOldValue = Nothing-    , _chaAccountId = Nothing-    , _chaNewValue = Nothing-    , _chaFieldName = Nothing-    , _chaId = Nothing-    , _chaSubAccountId = Nothing-    , _chaChangeTime = Nothing-    }---- | ID of the user who modified the object.-chaUserProFileId :: Lens' ChangeLog (Maybe Int64)-chaUserProFileId-  = lens _chaUserProFileId-      (\ s a -> s{_chaUserProFileId = a})-      . mapping _Coerce---- | Object type of the change log.-chaObjectType :: Lens' ChangeLog (Maybe Text)-chaObjectType-  = lens _chaObjectType-      (\ s a -> s{_chaObjectType = a})---- | User profile name of the user who modified the object.-chaUserProFileName :: Lens' ChangeLog (Maybe Text)-chaUserProFileName-  = lens _chaUserProFileName-      (\ s a -> s{_chaUserProFileName = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#changeLog\".-chaKind :: Lens' ChangeLog Text-chaKind = lens _chaKind (\ s a -> s{_chaKind = a})---- | ID of the object of this change log. The object could be a campaign,--- placement, ad, or other type.-chaObjectId :: Lens' ChangeLog (Maybe Int64)-chaObjectId-  = lens _chaObjectId (\ s a -> s{_chaObjectId = a}) .-      mapping _Coerce---- | Action which caused the change.-chaAction :: Lens' ChangeLog (Maybe Text)-chaAction-  = lens _chaAction (\ s a -> s{_chaAction = a})---- | Transaction ID of this change log. When a single API call results in--- many changes, each change will have a separate ID in the change log but--- will share the same transactionId.-chaTransactionId :: Lens' ChangeLog (Maybe Int64)-chaTransactionId-  = lens _chaTransactionId-      (\ s a -> s{_chaTransactionId = a})-      . mapping _Coerce---- | Old value of the object field.-chaOldValue :: Lens' ChangeLog (Maybe Text)-chaOldValue-  = lens _chaOldValue (\ s a -> s{_chaOldValue = a})---- | Account ID of the modified object.-chaAccountId :: Lens' ChangeLog (Maybe Int64)-chaAccountId-  = lens _chaAccountId (\ s a -> s{_chaAccountId = a})-      . mapping _Coerce---- | New value of the object field.-chaNewValue :: Lens' ChangeLog (Maybe Text)-chaNewValue-  = lens _chaNewValue (\ s a -> s{_chaNewValue = a})---- | Field name of the object which changed.-chaFieldName :: Lens' ChangeLog (Maybe Text)-chaFieldName-  = lens _chaFieldName (\ s a -> s{_chaFieldName = a})---- | ID of this change log.-chaId :: Lens' ChangeLog (Maybe Int64)-chaId-  = lens _chaId (\ s a -> s{_chaId = a}) .-      mapping _Coerce---- | Subaccount ID of the modified object.-chaSubAccountId :: Lens' ChangeLog (Maybe Int64)-chaSubAccountId-  = lens _chaSubAccountId-      (\ s a -> s{_chaSubAccountId = a})-      . mapping _Coerce---- | Time when the object was modified.-chaChangeTime :: Lens' ChangeLog (Maybe UTCTime)-chaChangeTime-  = lens _chaChangeTime-      (\ s a -> s{_chaChangeTime = a})-      . mapping _DateTime--instance FromJSON ChangeLog where-        parseJSON-          = withObject "ChangeLog"-              (\ o ->-                 ChangeLog <$>-                   (o .:? "userProfileId") <*> (o .:? "objectType") <*>-                     (o .:? "userProfileName")-                     <*> (o .:? "kind" .!= "dfareporting#changeLog")-                     <*> (o .:? "objectId")-                     <*> (o .:? "action")-                     <*> (o .:? "transactionId")-                     <*> (o .:? "oldValue")-                     <*> (o .:? "accountId")-                     <*> (o .:? "newValue")-                     <*> (o .:? "fieldName")-                     <*> (o .:? "id")-                     <*> (o .:? "subaccountId")-                     <*> (o .:? "changeTime"))--instance ToJSON ChangeLog where-        toJSON ChangeLog{..}-          = object-              (catMaybes-                 [("userProfileId" .=) <$> _chaUserProFileId,-                  ("objectType" .=) <$> _chaObjectType,-                  ("userProfileName" .=) <$> _chaUserProFileName,-                  Just ("kind" .= _chaKind),-                  ("objectId" .=) <$> _chaObjectId,-                  ("action" .=) <$> _chaAction,-                  ("transactionId" .=) <$> _chaTransactionId,-                  ("oldValue" .=) <$> _chaOldValue,-                  ("accountId" .=) <$> _chaAccountId,-                  ("newValue" .=) <$> _chaNewValue,-                  ("fieldName" .=) <$> _chaFieldName,-                  ("id" .=) <$> _chaId,-                  ("subaccountId" .=) <$> _chaSubAccountId,-                  ("changeTime" .=) <$> _chaChangeTime])---- | Contains properties of a placement strategy.------ /See:/ 'placementStrategy' smart constructor.-data PlacementStrategy = PlacementStrategy-    { _psKind      :: !Text-    , _psAccountId :: !(Maybe (Textual Int64))-    , _psName      :: !(Maybe Text)-    , _psId        :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'PlacementStrategy' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'psKind'------ * 'psAccountId'------ * 'psName'------ * 'psId'-placementStrategy-    :: PlacementStrategy-placementStrategy =-    PlacementStrategy-    { _psKind = "dfareporting#placementStrategy"-    , _psAccountId = Nothing-    , _psName = Nothing-    , _psId = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#placementStrategy\".-psKind :: Lens' PlacementStrategy Text-psKind = lens _psKind (\ s a -> s{_psKind = a})---- | Account ID of this placement strategy.This is a read-only field that can--- be left blank.-psAccountId :: Lens' PlacementStrategy (Maybe Int64)-psAccountId-  = lens _psAccountId (\ s a -> s{_psAccountId = a}) .-      mapping _Coerce---- | Name of this placement strategy. This is a required field. It must be--- less than 256 characters long and unique among placement strategies of--- the same account.-psName :: Lens' PlacementStrategy (Maybe Text)-psName = lens _psName (\ s a -> s{_psName = a})---- | ID of this placement strategy. This is a read-only, auto-generated--- field.-psId :: Lens' PlacementStrategy (Maybe Int64)-psId-  = lens _psId (\ s a -> s{_psId = a}) .-      mapping _Coerce--instance FromJSON PlacementStrategy where-        parseJSON-          = withObject "PlacementStrategy"-              (\ o ->-                 PlacementStrategy <$>-                   (o .:? "kind" .!= "dfareporting#placementStrategy")-                     <*> (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "id"))--instance ToJSON PlacementStrategy where-        toJSON PlacementStrategy{..}-          = object-              (catMaybes-                 [Just ("kind" .= _psKind),-                  ("accountId" .=) <$> _psAccountId,-                  ("name" .=) <$> _psName, ("id" .=) <$> _psId])---- | Contains properties of a Floodlight activity.------ /See:/ 'floodlightActivity' smart constructor.-data FloodlightActivity = FloodlightActivity-    { _faCountingMethod                          :: !(Maybe FloodlightActivityCountingMethod)-    , _faTagString                               :: !(Maybe Text)-    , _faSecure                                  :: !(Maybe Bool)-    , _faExpectedURL                             :: !(Maybe Text)-    , _faFloodlightActivityGroupTagString        :: !(Maybe Text)-    , _faFloodlightConfigurationId               :: !(Maybe (Textual Int64))-    , _faKind                                    :: !Text-    , _faImageTagEnabled                         :: !(Maybe Bool)-    , _faAdvertiserId                            :: !(Maybe (Textual Int64))-    , _faAdvertiserIdDimensionValue              :: !(Maybe DimensionValue)-    , _faSSLCompliant                            :: !(Maybe Bool)-    , _faIdDimensionValue                        :: !(Maybe DimensionValue)-    , _faTagFormat                               :: !(Maybe FloodlightActivityTagFormat)-    , _faCacheBustingType                        :: !(Maybe FloodlightActivityCacheBustingType)-    , _faAccountId                               :: !(Maybe (Textual Int64))-    , _faName                                    :: !(Maybe Text)-    , _faPublisherTags                           :: !(Maybe [FloodlightActivityPublisherDynamicTag])-    , _faFloodlightActivityGroupId               :: !(Maybe (Textual Int64))-    , _faHidden                                  :: !(Maybe Bool)-    , _faFloodlightActivityGroupType             :: !(Maybe FloodlightActivityFloodlightActivityGroupType)-    , _faDefaultTags                             :: !(Maybe [FloodlightActivityDynamicTag])-    , _faFloodlightActivityGroupName             :: !(Maybe Text)-    , _faId                                      :: !(Maybe (Textual Int64))-    , _faSSLRequired                             :: !(Maybe Bool)-    , _faUserDefinedVariableTypes                :: !(Maybe [FloodlightActivityUserDefinedVariableTypesItem])-    , _faSubAccountId                            :: !(Maybe (Textual Int64))-    , _faNotes                                   :: !(Maybe Text)-    , _faFloodlightConfigurationIdDimensionValue :: !(Maybe DimensionValue)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'FloodlightActivity' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'faCountingMethod'------ * 'faTagString'------ * 'faSecure'------ * 'faExpectedURL'------ * 'faFloodlightActivityGroupTagString'------ * 'faFloodlightConfigurationId'------ * 'faKind'------ * 'faImageTagEnabled'------ * 'faAdvertiserId'------ * 'faAdvertiserIdDimensionValue'------ * 'faSSLCompliant'------ * 'faIdDimensionValue'------ * 'faTagFormat'------ * 'faCacheBustingType'------ * 'faAccountId'------ * 'faName'------ * 'faPublisherTags'------ * 'faFloodlightActivityGroupId'------ * 'faHidden'------ * 'faFloodlightActivityGroupType'------ * 'faDefaultTags'------ * 'faFloodlightActivityGroupName'------ * 'faId'------ * 'faSSLRequired'------ * 'faUserDefinedVariableTypes'------ * 'faSubAccountId'------ * 'faNotes'------ * 'faFloodlightConfigurationIdDimensionValue'-floodlightActivity-    :: FloodlightActivity-floodlightActivity =-    FloodlightActivity-    { _faCountingMethod = Nothing-    , _faTagString = Nothing-    , _faSecure = Nothing-    , _faExpectedURL = Nothing-    , _faFloodlightActivityGroupTagString = Nothing-    , _faFloodlightConfigurationId = Nothing-    , _faKind = "dfareporting#floodlightActivity"-    , _faImageTagEnabled = Nothing-    , _faAdvertiserId = Nothing-    , _faAdvertiserIdDimensionValue = Nothing-    , _faSSLCompliant = Nothing-    , _faIdDimensionValue = Nothing-    , _faTagFormat = Nothing-    , _faCacheBustingType = Nothing-    , _faAccountId = Nothing-    , _faName = Nothing-    , _faPublisherTags = Nothing-    , _faFloodlightActivityGroupId = Nothing-    , _faHidden = Nothing-    , _faFloodlightActivityGroupType = Nothing-    , _faDefaultTags = Nothing-    , _faFloodlightActivityGroupName = Nothing-    , _faId = Nothing-    , _faSSLRequired = Nothing-    , _faUserDefinedVariableTypes = Nothing-    , _faSubAccountId = Nothing-    , _faNotes = Nothing-    , _faFloodlightConfigurationIdDimensionValue = Nothing-    }---- | Counting method for conversions for this floodlight activity. This is a--- required field.-faCountingMethod :: Lens' FloodlightActivity (Maybe FloodlightActivityCountingMethod)-faCountingMethod-  = lens _faCountingMethod-      (\ s a -> s{_faCountingMethod = a})---- | Value of the cat= paramter in the floodlight tag, which the ad servers--- use to identify the activity. This is optional: if empty, a new tag--- string will be generated for you. This string must be 1 to 8 characters--- long, with valid characters being [a-z][A-Z][0-9][-][ _ ]. This tag--- string must also be unique among activities of the same activity group.--- This field is read-only after insertion.-faTagString :: Lens' FloodlightActivity (Maybe Text)-faTagString-  = lens _faTagString (\ s a -> s{_faTagString = a})---- | Whether this tag should use SSL.-faSecure :: Lens' FloodlightActivity (Maybe Bool)-faSecure = lens _faSecure (\ s a -> s{_faSecure = a})---- | URL where this tag will be deployed. If specified, must be less than 256--- characters long.-faExpectedURL :: Lens' FloodlightActivity (Maybe Text)-faExpectedURL-  = lens _faExpectedURL-      (\ s a -> s{_faExpectedURL = a})---- | Tag string of the associated floodlight activity group. This is a--- read-only field.-faFloodlightActivityGroupTagString :: Lens' FloodlightActivity (Maybe Text)-faFloodlightActivityGroupTagString-  = lens _faFloodlightActivityGroupTagString-      (\ s a -> s{_faFloodlightActivityGroupTagString = a})---- | Floodlight configuration ID of this floodlight activity. If this field--- is left blank, the value will be copied over either from the activity--- group\'s floodlight configuration or from the existing activity\'s--- floodlight configuration.-faFloodlightConfigurationId :: Lens' FloodlightActivity (Maybe Int64)-faFloodlightConfigurationId-  = lens _faFloodlightConfigurationId-      (\ s a -> s{_faFloodlightConfigurationId = a})-      . mapping _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#floodlightActivity\".-faKind :: Lens' FloodlightActivity Text-faKind = lens _faKind (\ s a -> s{_faKind = a})---- | Whether the image tag is enabled for this activity.-faImageTagEnabled :: Lens' FloodlightActivity (Maybe Bool)-faImageTagEnabled-  = lens _faImageTagEnabled-      (\ s a -> s{_faImageTagEnabled = a})---- | Advertiser ID of this floodlight activity. If this field is left blank,--- the value will be copied over either from the activity group\'s--- advertiser or the existing activity\'s advertiser.-faAdvertiserId :: Lens' FloodlightActivity (Maybe Int64)-faAdvertiserId-  = lens _faAdvertiserId-      (\ s a -> s{_faAdvertiserId = a})-      . mapping _Coerce---- | Dimension value for the ID of the advertiser. This is a read-only,--- auto-generated field.-faAdvertiserIdDimensionValue :: Lens' FloodlightActivity (Maybe DimensionValue)-faAdvertiserIdDimensionValue-  = lens _faAdvertiserIdDimensionValue-      (\ s a -> s{_faAdvertiserIdDimensionValue = a})---- | Whether the floodlight activity is SSL-compliant. This is a read-only--- field, its value detected by the system from the floodlight tags.-faSSLCompliant :: Lens' FloodlightActivity (Maybe Bool)-faSSLCompliant-  = lens _faSSLCompliant-      (\ s a -> s{_faSSLCompliant = a})---- | Dimension value for the ID of this floodlight activity. This is a--- read-only, auto-generated field.-faIdDimensionValue :: Lens' FloodlightActivity (Maybe DimensionValue)-faIdDimensionValue-  = lens _faIdDimensionValue-      (\ s a -> s{_faIdDimensionValue = a})---- | Tag format type for the floodlight activity. If left blank, the tag--- format will default to HTML.-faTagFormat :: Lens' FloodlightActivity (Maybe FloodlightActivityTagFormat)-faTagFormat-  = lens _faTagFormat (\ s a -> s{_faTagFormat = a})---- | Code type used for cache busting in the generated tag.-faCacheBustingType :: Lens' FloodlightActivity (Maybe FloodlightActivityCacheBustingType)-faCacheBustingType-  = lens _faCacheBustingType-      (\ s a -> s{_faCacheBustingType = a})---- | Account ID of this floodlight activity. This is a read-only field that--- can be left blank.-faAccountId :: Lens' FloodlightActivity (Maybe Int64)-faAccountId-  = lens _faAccountId (\ s a -> s{_faAccountId = a}) .-      mapping _Coerce---- | Name of this floodlight activity. This is a required field. Must be less--- than 129 characters long and cannot contain quotes.-faName :: Lens' FloodlightActivity (Maybe Text)-faName = lens _faName (\ s a -> s{_faName = a})---- | Publisher dynamic floodlight tags.-faPublisherTags :: Lens' FloodlightActivity [FloodlightActivityPublisherDynamicTag]-faPublisherTags-  = lens _faPublisherTags-      (\ s a -> s{_faPublisherTags = a})-      . _Default-      . _Coerce---- | Floodlight activity group ID of this floodlight activity. This is a--- required field.-faFloodlightActivityGroupId :: Lens' FloodlightActivity (Maybe Int64)-faFloodlightActivityGroupId-  = lens _faFloodlightActivityGroupId-      (\ s a -> s{_faFloodlightActivityGroupId = a})-      . mapping _Coerce---- | Whether this activity is archived.-faHidden :: Lens' FloodlightActivity (Maybe Bool)-faHidden = lens _faHidden (\ s a -> s{_faHidden = a})---- | Type of the associated floodlight activity group. This is a read-only--- field.-faFloodlightActivityGroupType :: Lens' FloodlightActivity (Maybe FloodlightActivityFloodlightActivityGroupType)-faFloodlightActivityGroupType-  = lens _faFloodlightActivityGroupType-      (\ s a -> s{_faFloodlightActivityGroupType = a})---- | Dynamic floodlight tags.-faDefaultTags :: Lens' FloodlightActivity [FloodlightActivityDynamicTag]-faDefaultTags-  = lens _faDefaultTags-      (\ s a -> s{_faDefaultTags = a})-      . _Default-      . _Coerce---- | Name of the associated floodlight activity group. This is a read-only--- field.-faFloodlightActivityGroupName :: Lens' FloodlightActivity (Maybe Text)-faFloodlightActivityGroupName-  = lens _faFloodlightActivityGroupName-      (\ s a -> s{_faFloodlightActivityGroupName = a})---- | ID of this floodlight activity. This is a read-only, auto-generated--- field.-faId :: Lens' FloodlightActivity (Maybe Int64)-faId-  = lens _faId (\ s a -> s{_faId = a}) .-      mapping _Coerce---- | Whether this floodlight activity must be SSL-compliant.-faSSLRequired :: Lens' FloodlightActivity (Maybe Bool)-faSSLRequired-  = lens _faSSLRequired-      (\ s a -> s{_faSSLRequired = a})---- | List of the user-defined variables used by this conversion tag. These--- map to the \"u[1-20]=\" in the tags. Each of these can have a user--- defined type. Acceptable values are: - \"U1\" - \"U2\" - \"U3\" - \"U4\"--- - \"U5\" - \"U6\" - \"U7\" - \"U8\" - \"U9\" - \"U10\" - \"U11\" ---- \"U12\" - \"U13\" - \"U14\" - \"U15\" - \"U16\" - \"U17\" - \"U18\" ---- \"U19\" - \"U20\"-faUserDefinedVariableTypes :: Lens' FloodlightActivity [FloodlightActivityUserDefinedVariableTypesItem]-faUserDefinedVariableTypes-  = lens _faUserDefinedVariableTypes-      (\ s a -> s{_faUserDefinedVariableTypes = a})-      . _Default-      . _Coerce---- | Subaccount ID of this floodlight activity. This is a read-only field--- that can be left blank.-faSubAccountId :: Lens' FloodlightActivity (Maybe Int64)-faSubAccountId-  = lens _faSubAccountId-      (\ s a -> s{_faSubAccountId = a})-      . mapping _Coerce---- | General notes or implementation instructions for the tag.-faNotes :: Lens' FloodlightActivity (Maybe Text)-faNotes = lens _faNotes (\ s a -> s{_faNotes = a})---- | Dimension value for the ID of the floodlight configuration. This is a--- read-only, auto-generated field.-faFloodlightConfigurationIdDimensionValue :: Lens' FloodlightActivity (Maybe DimensionValue)-faFloodlightConfigurationIdDimensionValue-  = lens _faFloodlightConfigurationIdDimensionValue-      (\ s a ->-         s{_faFloodlightConfigurationIdDimensionValue = a})--instance FromJSON FloodlightActivity where-        parseJSON-          = withObject "FloodlightActivity"-              (\ o ->-                 FloodlightActivity <$>-                   (o .:? "countingMethod") <*> (o .:? "tagString") <*>-                     (o .:? "secure")-                     <*> (o .:? "expectedUrl")-                     <*> (o .:? "floodlightActivityGroupTagString")-                     <*> (o .:? "floodlightConfigurationId")-                     <*>-                     (o .:? "kind" .!= "dfareporting#floodlightActivity")-                     <*> (o .:? "imageTagEnabled")-                     <*> (o .:? "advertiserId")-                     <*> (o .:? "advertiserIdDimensionValue")-                     <*> (o .:? "sslCompliant")-                     <*> (o .:? "idDimensionValue")-                     <*> (o .:? "tagFormat")-                     <*> (o .:? "cacheBustingType")-                     <*> (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "publisherTags" .!= mempty)-                     <*> (o .:? "floodlightActivityGroupId")-                     <*> (o .:? "hidden")-                     <*> (o .:? "floodlightActivityGroupType")-                     <*> (o .:? "defaultTags" .!= mempty)-                     <*> (o .:? "floodlightActivityGroupName")-                     <*> (o .:? "id")-                     <*> (o .:? "sslRequired")-                     <*> (o .:? "userDefinedVariableTypes" .!= mempty)-                     <*> (o .:? "subaccountId")-                     <*> (o .:? "notes")-                     <*>-                     (o .:? "floodlightConfigurationIdDimensionValue"))--instance ToJSON FloodlightActivity where-        toJSON FloodlightActivity{..}-          = object-              (catMaybes-                 [("countingMethod" .=) <$> _faCountingMethod,-                  ("tagString" .=) <$> _faTagString,-                  ("secure" .=) <$> _faSecure,-                  ("expectedUrl" .=) <$> _faExpectedURL,-                  ("floodlightActivityGroupTagString" .=) <$>-                    _faFloodlightActivityGroupTagString,-                  ("floodlightConfigurationId" .=) <$>-                    _faFloodlightConfigurationId,-                  Just ("kind" .= _faKind),-                  ("imageTagEnabled" .=) <$> _faImageTagEnabled,-                  ("advertiserId" .=) <$> _faAdvertiserId,-                  ("advertiserIdDimensionValue" .=) <$>-                    _faAdvertiserIdDimensionValue,-                  ("sslCompliant" .=) <$> _faSSLCompliant,-                  ("idDimensionValue" .=) <$> _faIdDimensionValue,-                  ("tagFormat" .=) <$> _faTagFormat,-                  ("cacheBustingType" .=) <$> _faCacheBustingType,-                  ("accountId" .=) <$> _faAccountId,-                  ("name" .=) <$> _faName,-                  ("publisherTags" .=) <$> _faPublisherTags,-                  ("floodlightActivityGroupId" .=) <$>-                    _faFloodlightActivityGroupId,-                  ("hidden" .=) <$> _faHidden,-                  ("floodlightActivityGroupType" .=) <$>-                    _faFloodlightActivityGroupType,-                  ("defaultTags" .=) <$> _faDefaultTags,-                  ("floodlightActivityGroupName" .=) <$>-                    _faFloodlightActivityGroupName,-                  ("id" .=) <$> _faId,-                  ("sslRequired" .=) <$> _faSSLRequired,-                  ("userDefinedVariableTypes" .=) <$>-                    _faUserDefinedVariableTypes,-                  ("subaccountId" .=) <$> _faSubAccountId,-                  ("notes" .=) <$> _faNotes,-                  ("floodlightConfigurationIdDimensionValue" .=) <$>-                    _faFloodlightConfigurationIdDimensionValue])---- | Platform Type List Response------ /See:/ 'platformTypesListResponse' smart constructor.-data PlatformTypesListResponse = PlatformTypesListResponse-    { _ptlrKind          :: !Text-    , _ptlrPlatformTypes :: !(Maybe [PlatformType])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'PlatformTypesListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ptlrKind'------ * 'ptlrPlatformTypes'-platformTypesListResponse-    :: PlatformTypesListResponse-platformTypesListResponse =-    PlatformTypesListResponse-    { _ptlrKind = "dfareporting#platformTypesListResponse"-    , _ptlrPlatformTypes = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#platformTypesListResponse\".-ptlrKind :: Lens' PlatformTypesListResponse Text-ptlrKind = lens _ptlrKind (\ s a -> s{_ptlrKind = a})---- | Platform type collection.-ptlrPlatformTypes :: Lens' PlatformTypesListResponse [PlatformType]-ptlrPlatformTypes-  = lens _ptlrPlatformTypes-      (\ s a -> s{_ptlrPlatformTypes = a})-      . _Default-      . _Coerce--instance FromJSON PlatformTypesListResponse where-        parseJSON-          = withObject "PlatformTypesListResponse"-              (\ o ->-                 PlatformTypesListResponse <$>-                   (o .:? "kind" .!=-                      "dfareporting#platformTypesListResponse")-                     <*> (o .:? "platformTypes" .!= mempty))--instance ToJSON PlatformTypesListResponse where-        toJSON PlatformTypesListResponse{..}-          = object-              (catMaybes-                 [Just ("kind" .= _ptlrKind),-                  ("platformTypes" .=) <$> _ptlrPlatformTypes])---- | Modification timestamp.------ /See:/ 'lastModifiedInfo' smart constructor.-newtype LastModifiedInfo = LastModifiedInfo-    { _lmiTime :: Maybe (Textual Int64)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'LastModifiedInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lmiTime'-lastModifiedInfo-    :: LastModifiedInfo-lastModifiedInfo =-    LastModifiedInfo-    { _lmiTime = Nothing-    }---- | Timestamp of the last change in milliseconds since epoch.-lmiTime :: Lens' LastModifiedInfo (Maybe Int64)-lmiTime-  = lens _lmiTime (\ s a -> s{_lmiTime = a}) .-      mapping _Coerce--instance FromJSON LastModifiedInfo where-        parseJSON-          = withObject "LastModifiedInfo"-              (\ o -> LastModifiedInfo <$> (o .:? "time"))--instance ToJSON LastModifiedInfo where-        toJSON LastModifiedInfo{..}-          = object (catMaybes [("time" .=) <$> _lmiTime])---- | Target Window.------ /See:/ 'targetWindow' smart constructor.-data TargetWindow = TargetWindow-    { _twCustomHTML         :: !(Maybe Text)-    , _twTargetWindowOption :: !(Maybe TargetWindowTargetWindowOption)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'TargetWindow' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'twCustomHTML'------ * 'twTargetWindowOption'-targetWindow-    :: TargetWindow-targetWindow =-    TargetWindow-    { _twCustomHTML = Nothing-    , _twTargetWindowOption = Nothing-    }---- | User-entered value.-twCustomHTML :: Lens' TargetWindow (Maybe Text)-twCustomHTML-  = lens _twCustomHTML (\ s a -> s{_twCustomHTML = a})---- | Type of browser window for which the backup image of the flash creative--- can be displayed.-twTargetWindowOption :: Lens' TargetWindow (Maybe TargetWindowTargetWindowOption)-twTargetWindowOption-  = lens _twTargetWindowOption-      (\ s a -> s{_twTargetWindowOption = a})--instance FromJSON TargetWindow where-        parseJSON-          = withObject "TargetWindow"-              (\ o ->-                 TargetWindow <$>-                   (o .:? "customHtml") <*>-                     (o .:? "targetWindowOption"))--instance ToJSON TargetWindow where-        toJSON TargetWindow{..}-          = object-              (catMaybes-                 [("customHtml" .=) <$> _twCustomHTML,-                  ("targetWindowOption" .=) <$> _twTargetWindowOption])---- | AccountPermissionGroups contains a mapping of permission group IDs to--- names. A permission group is a grouping of account permissions.------ /See:/ 'accountPermissionGroup' smart constructor.-data AccountPermissionGroup = AccountPermissionGroup-    { _apgpKind :: !Text-    , _apgpName :: !(Maybe Text)-    , _apgpId   :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'AccountPermissionGroup' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'apgpKind'------ * 'apgpName'------ * 'apgpId'-accountPermissionGroup-    :: AccountPermissionGroup-accountPermissionGroup =-    AccountPermissionGroup-    { _apgpKind = "dfareporting#accountPermissionGroup"-    , _apgpName = Nothing-    , _apgpId = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#accountPermissionGroup\".-apgpKind :: Lens' AccountPermissionGroup Text-apgpKind = lens _apgpKind (\ s a -> s{_apgpKind = a})---- | Name of this account permission group.-apgpName :: Lens' AccountPermissionGroup (Maybe Text)-apgpName = lens _apgpName (\ s a -> s{_apgpName = a})---- | ID of this account permission group.-apgpId :: Lens' AccountPermissionGroup (Maybe Int64)-apgpId-  = lens _apgpId (\ s a -> s{_apgpId = a}) .-      mapping _Coerce--instance FromJSON AccountPermissionGroup where-        parseJSON-          = withObject "AccountPermissionGroup"-              (\ o ->-                 AccountPermissionGroup <$>-                   (o .:? "kind" .!=-                      "dfareporting#accountPermissionGroup")-                     <*> (o .:? "name")-                     <*> (o .:? "id"))--instance ToJSON AccountPermissionGroup where-        toJSON AccountPermissionGroup{..}-          = object-              (catMaybes-                 [Just ("kind" .= _apgpKind),-                  ("name" .=) <$> _apgpName, ("id" .=) <$> _apgpId])---- | Contains properties of a DCM advertiser.------ /See:/ 'advertiser' smart constructor.-data Advertiser = Advertiser-    { _advdOriginalFloodlightConfigurationId       :: !(Maybe (Textual Int64))-    , _advdStatus                                  :: !(Maybe AdvertiserStatus)-    , _advdFloodlightConfigurationId               :: !(Maybe (Textual Int64))-    , _advdKind                                    :: !Text-    , _advdSuspended                               :: !(Maybe Bool)-    , _advdIdDimensionValue                        :: !(Maybe DimensionValue)-    , _advdAccountId                               :: !(Maybe (Textual Int64))-    , _advdDefaultEmail                            :: !(Maybe Text)-    , _advdName                                    :: !(Maybe Text)-    , _advdAdvertiserGroupId                       :: !(Maybe (Textual Int64))-    , _advdDefaultClickThroughEventTagId           :: !(Maybe (Textual Int64))-    , _advdId                                      :: !(Maybe (Textual Int64))-    , _advdSubAccountId                            :: !(Maybe (Textual Int64))-    , _advdFloodlightConfigurationIdDimensionValue :: !(Maybe DimensionValue)-    , _advdClickThroughURLSuffix                   :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'Advertiser' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'advdOriginalFloodlightConfigurationId'------ * 'advdStatus'------ * 'advdFloodlightConfigurationId'------ * 'advdKind'------ * 'advdSuspended'------ * 'advdIdDimensionValue'------ * 'advdAccountId'------ * 'advdDefaultEmail'------ * 'advdName'------ * 'advdAdvertiserGroupId'------ * 'advdDefaultClickThroughEventTagId'------ * 'advdId'------ * 'advdSubAccountId'------ * 'advdFloodlightConfigurationIdDimensionValue'------ * 'advdClickThroughURLSuffix'-advertiser-    :: Advertiser-advertiser =-    Advertiser-    { _advdOriginalFloodlightConfigurationId = Nothing-    , _advdStatus = Nothing-    , _advdFloodlightConfigurationId = Nothing-    , _advdKind = "dfareporting#advertiser"-    , _advdSuspended = Nothing-    , _advdIdDimensionValue = Nothing-    , _advdAccountId = Nothing-    , _advdDefaultEmail = Nothing-    , _advdName = Nothing-    , _advdAdvertiserGroupId = Nothing-    , _advdDefaultClickThroughEventTagId = Nothing-    , _advdId = Nothing-    , _advdSubAccountId = Nothing-    , _advdFloodlightConfigurationIdDimensionValue = Nothing-    , _advdClickThroughURLSuffix = Nothing-    }---- | Original floodlight configuration before any sharing occurred. Set the--- floodlightConfigurationId of this advertiser to--- originalFloodlightConfigurationId to unshare the advertiser\'s current--- floodlight configuration. You cannot unshare an advertiser\'s floodlight--- configuration if the shared configuration has activities associated with--- any campaign or placement.-advdOriginalFloodlightConfigurationId :: Lens' Advertiser (Maybe Int64)-advdOriginalFloodlightConfigurationId-  = lens _advdOriginalFloodlightConfigurationId-      (\ s a ->-         s{_advdOriginalFloodlightConfigurationId = a})-      . mapping _Coerce---- | Status of this advertiser.-advdStatus :: Lens' Advertiser (Maybe AdvertiserStatus)-advdStatus-  = lens _advdStatus (\ s a -> s{_advdStatus = a})---- | Floodlight configuration ID of this advertiser. The floodlight--- configuration ID will be created automatically, so on insert this field--- should be left blank. This field can be set to another advertiser\'s--- floodlight configuration ID in order to share that advertiser\'s--- floodlight configuration with this advertiser, so long as: - This--- advertiser\'s original floodlight configuration is not already--- associated with floodlight activities or floodlight activity groups. ---- This advertiser\'s original floodlight configuration is not already--- shared with another advertiser.-advdFloodlightConfigurationId :: Lens' Advertiser (Maybe Int64)-advdFloodlightConfigurationId-  = lens _advdFloodlightConfigurationId-      (\ s a -> s{_advdFloodlightConfigurationId = a})-      . mapping _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#advertiser\".-advdKind :: Lens' Advertiser Text-advdKind = lens _advdKind (\ s a -> s{_advdKind = a})---- | Suspension status of this advertiser.-advdSuspended :: Lens' Advertiser (Maybe Bool)-advdSuspended-  = lens _advdSuspended-      (\ s a -> s{_advdSuspended = a})---- | Dimension value for the ID of this advertiser. This is a read-only,--- auto-generated field.-advdIdDimensionValue :: Lens' Advertiser (Maybe DimensionValue)-advdIdDimensionValue-  = lens _advdIdDimensionValue-      (\ s a -> s{_advdIdDimensionValue = a})---- | Account ID of this advertiser.This is a read-only field that can be left--- blank.-advdAccountId :: Lens' Advertiser (Maybe Int64)-advdAccountId-  = lens _advdAccountId-      (\ s a -> s{_advdAccountId = a})-      . mapping _Coerce---- | Default email address used in sender field for tag emails.-advdDefaultEmail :: Lens' Advertiser (Maybe Text)-advdDefaultEmail-  = lens _advdDefaultEmail-      (\ s a -> s{_advdDefaultEmail = a})---- | Name of this advertiser. This is a required field and must be less than--- 256 characters long and unique among advertisers of the same account.-advdName :: Lens' Advertiser (Maybe Text)-advdName = lens _advdName (\ s a -> s{_advdName = a})---- | ID of the advertiser group this advertiser belongs to. You can group--- advertisers for reporting purposes, allowing you to see aggregated--- information for all advertisers in each group.-advdAdvertiserGroupId :: Lens' Advertiser (Maybe Int64)-advdAdvertiserGroupId-  = lens _advdAdvertiserGroupId-      (\ s a -> s{_advdAdvertiserGroupId = a})-      . mapping _Coerce---- | ID of the click-through event tag to apply by default to the landing--- pages of this advertiser\'s campaigns.-advdDefaultClickThroughEventTagId :: Lens' Advertiser (Maybe Int64)-advdDefaultClickThroughEventTagId-  = lens _advdDefaultClickThroughEventTagId-      (\ s a -> s{_advdDefaultClickThroughEventTagId = a})-      . mapping _Coerce---- | ID of this advertiser. This is a read-only, auto-generated field.-advdId :: Lens' Advertiser (Maybe Int64)-advdId-  = lens _advdId (\ s a -> s{_advdId = a}) .-      mapping _Coerce---- | Subaccount ID of this advertiser.This is a read-only field that can be--- left blank.-advdSubAccountId :: Lens' Advertiser (Maybe Int64)-advdSubAccountId-  = lens _advdSubAccountId-      (\ s a -> s{_advdSubAccountId = a})-      . mapping _Coerce---- | Dimension value for the ID of the floodlight configuration. This is a--- read-only, auto-generated field.-advdFloodlightConfigurationIdDimensionValue :: Lens' Advertiser (Maybe DimensionValue)-advdFloodlightConfigurationIdDimensionValue-  = lens _advdFloodlightConfigurationIdDimensionValue-      (\ s a ->-         s{_advdFloodlightConfigurationIdDimensionValue = a})---- | Suffix added to click-through URL of ad creative associations under this--- advertiser. Must be less than 129 characters long.-advdClickThroughURLSuffix :: Lens' Advertiser (Maybe Text)-advdClickThroughURLSuffix-  = lens _advdClickThroughURLSuffix-      (\ s a -> s{_advdClickThroughURLSuffix = a})--instance FromJSON Advertiser where-        parseJSON-          = withObject "Advertiser"-              (\ o ->-                 Advertiser <$>-                   (o .:? "originalFloodlightConfigurationId") <*>-                     (o .:? "status")-                     <*> (o .:? "floodlightConfigurationId")-                     <*> (o .:? "kind" .!= "dfareporting#advertiser")-                     <*> (o .:? "suspended")-                     <*> (o .:? "idDimensionValue")-                     <*> (o .:? "accountId")-                     <*> (o .:? "defaultEmail")-                     <*> (o .:? "name")-                     <*> (o .:? "advertiserGroupId")-                     <*> (o .:? "defaultClickThroughEventTagId")-                     <*> (o .:? "id")-                     <*> (o .:? "subaccountId")-                     <*> (o .:? "floodlightConfigurationIdDimensionValue")-                     <*> (o .:? "clickThroughUrlSuffix"))--instance ToJSON Advertiser where-        toJSON Advertiser{..}-          = object-              (catMaybes-                 [("originalFloodlightConfigurationId" .=) <$>-                    _advdOriginalFloodlightConfigurationId,-                  ("status" .=) <$> _advdStatus,-                  ("floodlightConfigurationId" .=) <$>-                    _advdFloodlightConfigurationId,-                  Just ("kind" .= _advdKind),-                  ("suspended" .=) <$> _advdSuspended,-                  ("idDimensionValue" .=) <$> _advdIdDimensionValue,-                  ("accountId" .=) <$> _advdAccountId,-                  ("defaultEmail" .=) <$> _advdDefaultEmail,-                  ("name" .=) <$> _advdName,-                  ("advertiserGroupId" .=) <$> _advdAdvertiserGroupId,-                  ("defaultClickThroughEventTagId" .=) <$>-                    _advdDefaultClickThroughEventTagId,-                  ("id" .=) <$> _advdId,-                  ("subaccountId" .=) <$> _advdSubAccountId,-                  ("floodlightConfigurationIdDimensionValue" .=) <$>-                    _advdFloodlightConfigurationIdDimensionValue,-                  ("clickThroughUrlSuffix" .=) <$>-                    _advdClickThroughURLSuffix])---- | Contains properties of auser role, which is used to manage user access.------ /See:/ 'userRole' smart constructor.-data UserRole = UserRole-    { _urParentUserRoleId :: !(Maybe (Textual Int64))-    , _urKind             :: !Text-    , _urDefaultUserRole  :: !(Maybe Bool)-    , _urAccountId        :: !(Maybe (Textual Int64))-    , _urName             :: !(Maybe Text)-    , _urId               :: !(Maybe (Textual Int64))-    , _urPermissions      :: !(Maybe [UserRolePermission])-    , _urSubAccountId     :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'UserRole' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'urParentUserRoleId'------ * 'urKind'------ * 'urDefaultUserRole'------ * 'urAccountId'------ * 'urName'------ * 'urId'------ * 'urPermissions'------ * 'urSubAccountId'-userRole-    :: UserRole-userRole =-    UserRole-    { _urParentUserRoleId = Nothing-    , _urKind = "dfareporting#userRole"-    , _urDefaultUserRole = Nothing-    , _urAccountId = Nothing-    , _urName = Nothing-    , _urId = Nothing-    , _urPermissions = Nothing-    , _urSubAccountId = Nothing-    }---- | ID of the user role that this user role is based on or copied from. This--- is a required field.-urParentUserRoleId :: Lens' UserRole (Maybe Int64)-urParentUserRoleId-  = lens _urParentUserRoleId-      (\ s a -> s{_urParentUserRoleId = a})-      . mapping _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#userRole\".-urKind :: Lens' UserRole Text-urKind = lens _urKind (\ s a -> s{_urKind = a})---- | Whether this is a default user role. Default user roles are created by--- the system for the account\/subaccount and cannot be modified or--- deleted. Each default user role comes with a basic set of preassigned--- permissions.-urDefaultUserRole :: Lens' UserRole (Maybe Bool)-urDefaultUserRole-  = lens _urDefaultUserRole-      (\ s a -> s{_urDefaultUserRole = a})---- | Account ID of this user role. This is a read-only field that can be left--- blank.-urAccountId :: Lens' UserRole (Maybe Int64)-urAccountId-  = lens _urAccountId (\ s a -> s{_urAccountId = a}) .-      mapping _Coerce---- | Name of this user role. This is a required field. Must be less than 256--- characters long. If this user role is under a subaccount, the name must--- be unique among sites of the same subaccount. Otherwise, this user role--- is a top-level user role, and the name must be unique among top-level--- user roles of the same account.-urName :: Lens' UserRole (Maybe Text)-urName = lens _urName (\ s a -> s{_urName = a})---- | ID of this user role. This is a read-only, auto-generated field.-urId :: Lens' UserRole (Maybe Int64)-urId-  = lens _urId (\ s a -> s{_urId = a}) .-      mapping _Coerce---- | List of permissions associated with this user role.-urPermissions :: Lens' UserRole [UserRolePermission]-urPermissions-  = lens _urPermissions-      (\ s a -> s{_urPermissions = a})-      . _Default-      . _Coerce---- | Subaccount ID of this user role. This is a read-only field that can be--- left blank.-urSubAccountId :: Lens' UserRole (Maybe Int64)-urSubAccountId-  = lens _urSubAccountId-      (\ s a -> s{_urSubAccountId = a})-      . mapping _Coerce--instance FromJSON UserRole where-        parseJSON-          = withObject "UserRole"-              (\ o ->-                 UserRole <$>-                   (o .:? "parentUserRoleId") <*>-                     (o .:? "kind" .!= "dfareporting#userRole")-                     <*> (o .:? "defaultUserRole")-                     <*> (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "id")-                     <*> (o .:? "permissions" .!= mempty)-                     <*> (o .:? "subaccountId"))--instance ToJSON UserRole where-        toJSON UserRole{..}-          = object-              (catMaybes-                 [("parentUserRoleId" .=) <$> _urParentUserRoleId,-                  Just ("kind" .= _urKind),-                  ("defaultUserRole" .=) <$> _urDefaultUserRole,-                  ("accountId" .=) <$> _urAccountId,-                  ("name" .=) <$> _urName, ("id" .=) <$> _urId,-                  ("permissions" .=) <$> _urPermissions,-                  ("subaccountId" .=) <$> _urSubAccountId])---- | Directory Site List Response------ /See:/ 'directorySitesListResponse' smart constructor.-data DirectorySitesListResponse = DirectorySitesListResponse-    { _dslrNextPageToken  :: !(Maybe Text)-    , _dslrKind           :: !Text-    , _dslrDirectorySites :: !(Maybe [DirectorySite])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'DirectorySitesListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dslrNextPageToken'------ * 'dslrKind'------ * 'dslrDirectorySites'-directorySitesListResponse-    :: DirectorySitesListResponse-directorySitesListResponse =-    DirectorySitesListResponse-    { _dslrNextPageToken = Nothing-    , _dslrKind = "dfareporting#directorySitesListResponse"-    , _dslrDirectorySites = Nothing-    }---- | Pagination token to be used for the next list operation.-dslrNextPageToken :: Lens' DirectorySitesListResponse (Maybe Text)-dslrNextPageToken-  = lens _dslrNextPageToken-      (\ s a -> s{_dslrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#directorySitesListResponse\".-dslrKind :: Lens' DirectorySitesListResponse Text-dslrKind = lens _dslrKind (\ s a -> s{_dslrKind = a})---- | Directory site collection.-dslrDirectorySites :: Lens' DirectorySitesListResponse [DirectorySite]-dslrDirectorySites-  = lens _dslrDirectorySites-      (\ s a -> s{_dslrDirectorySites = a})-      . _Default-      . _Coerce--instance FromJSON DirectorySitesListResponse where-        parseJSON-          = withObject "DirectorySitesListResponse"-              (\ o ->-                 DirectorySitesListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!=-                        "dfareporting#directorySitesListResponse")-                     <*> (o .:? "directorySites" .!= mempty))--instance ToJSON DirectorySitesListResponse where-        toJSON DirectorySitesListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _dslrNextPageToken,-                  Just ("kind" .= _dslrKind),-                  ("directorySites" .=) <$> _dslrDirectorySites])---- | Pricing Period------ /See:/ 'pricingSchedulePricingPeriod' smart constructor.-data PricingSchedulePricingPeriod = PricingSchedulePricingPeriod-    { _psppEndDate         :: !(Maybe Date')-    , _psppRateOrCostNanos :: !(Maybe (Textual Int64))-    , _psppStartDate       :: !(Maybe Date')-    , _psppUnits           :: !(Maybe (Textual Int64))-    , _psppPricingComment  :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'PricingSchedulePricingPeriod' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'psppEndDate'------ * 'psppRateOrCostNanos'------ * 'psppStartDate'------ * 'psppUnits'------ * 'psppPricingComment'-pricingSchedulePricingPeriod-    :: PricingSchedulePricingPeriod-pricingSchedulePricingPeriod =-    PricingSchedulePricingPeriod-    { _psppEndDate = Nothing-    , _psppRateOrCostNanos = Nothing-    , _psppStartDate = Nothing-    , _psppUnits = Nothing-    , _psppPricingComment = Nothing-    }---- | Pricing period end date. This date must be later than, or the same day--- as, the pricing period start date, but not later than the placement end--- date. The period end date can be the same date as the period start date.--- If, for example, you set 6\/25\/2015 as both the start and end dates,--- the effective pricing period date is just that day only, 6\/25\/2015.--- The hours, minutes, and seconds of the end date should not be set, as--- doing so will result in an error.-psppEndDate :: Lens' PricingSchedulePricingPeriod (Maybe Day)-psppEndDate-  = lens _psppEndDate (\ s a -> s{_psppEndDate = a}) .-      mapping _Date---- | Rate or cost of this pricing period.-psppRateOrCostNanos :: Lens' PricingSchedulePricingPeriod (Maybe Int64)-psppRateOrCostNanos-  = lens _psppRateOrCostNanos-      (\ s a -> s{_psppRateOrCostNanos = a})-      . mapping _Coerce---- | Pricing period start date. This date must be later than, or the same day--- as, the placement start date. The hours, minutes, and seconds of the--- start date should not be set, as doing so will result in an error.-psppStartDate :: Lens' PricingSchedulePricingPeriod (Maybe Day)-psppStartDate-  = lens _psppStartDate-      (\ s a -> s{_psppStartDate = a})-      . mapping _Date---- | Units of this pricing period.-psppUnits :: Lens' PricingSchedulePricingPeriod (Maybe Int64)-psppUnits-  = lens _psppUnits (\ s a -> s{_psppUnits = a}) .-      mapping _Coerce---- | Comments for this pricing period.-psppPricingComment :: Lens' PricingSchedulePricingPeriod (Maybe Text)-psppPricingComment-  = lens _psppPricingComment-      (\ s a -> s{_psppPricingComment = a})--instance FromJSON PricingSchedulePricingPeriod where-        parseJSON-          = withObject "PricingSchedulePricingPeriod"-              (\ o ->-                 PricingSchedulePricingPeriod <$>-                   (o .:? "endDate") <*> (o .:? "rateOrCostNanos") <*>-                     (o .:? "startDate")-                     <*> (o .:? "units")-                     <*> (o .:? "pricingComment"))--instance ToJSON PricingSchedulePricingPeriod where-        toJSON PricingSchedulePricingPeriod{..}-          = object-              (catMaybes-                 [("endDate" .=) <$> _psppEndDate,-                  ("rateOrCostNanos" .=) <$> _psppRateOrCostNanos,-                  ("startDate" .=) <$> _psppStartDate,-                  ("units" .=) <$> _psppUnits,-                  ("pricingComment" .=) <$> _psppPricingComment])---- | Directory Site Contact List Response------ /See:/ 'directorySiteContactsListResponse' smart constructor.-data DirectorySiteContactsListResponse = DirectorySiteContactsListResponse-    { _dsclrNextPageToken         :: !(Maybe Text)-    , _dsclrKind                  :: !Text-    , _dsclrDirectorySiteContacts :: !(Maybe [DirectorySiteContact])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'DirectorySiteContactsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dsclrNextPageToken'------ * 'dsclrKind'------ * 'dsclrDirectorySiteContacts'-directorySiteContactsListResponse-    :: DirectorySiteContactsListResponse-directorySiteContactsListResponse =-    DirectorySiteContactsListResponse-    { _dsclrNextPageToken = Nothing-    , _dsclrKind = "dfareporting#directorySiteContactsListResponse"-    , _dsclrDirectorySiteContacts = Nothing-    }---- | Pagination token to be used for the next list operation.-dsclrNextPageToken :: Lens' DirectorySiteContactsListResponse (Maybe Text)-dsclrNextPageToken-  = lens _dsclrNextPageToken-      (\ s a -> s{_dsclrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#directorySiteContactsListResponse\".-dsclrKind :: Lens' DirectorySiteContactsListResponse Text-dsclrKind-  = lens _dsclrKind (\ s a -> s{_dsclrKind = a})---- | Directory site contact collection-dsclrDirectorySiteContacts :: Lens' DirectorySiteContactsListResponse [DirectorySiteContact]-dsclrDirectorySiteContacts-  = lens _dsclrDirectorySiteContacts-      (\ s a -> s{_dsclrDirectorySiteContacts = a})-      . _Default-      . _Coerce--instance FromJSON DirectorySiteContactsListResponse-         where-        parseJSON-          = withObject "DirectorySiteContactsListResponse"-              (\ o ->-                 DirectorySiteContactsListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!=-                        "dfareporting#directorySiteContactsListResponse")-                     <*> (o .:? "directorySiteContacts" .!= mempty))--instance ToJSON DirectorySiteContactsListResponse-         where-        toJSON DirectorySiteContactsListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _dsclrNextPageToken,-                  Just ("kind" .= _dsclrKind),-                  ("directorySiteContacts" .=) <$>-                    _dsclrDirectorySiteContacts])---- | Contains information about a region that can be targeted by ads.------ /See:/ 'region' smart constructor.-data Region = Region-    { _regRegionCode    :: !(Maybe Text)-    , _regKind          :: !Text-    , _regName          :: !(Maybe Text)-    , _regCountryCode   :: !(Maybe Text)-    , _regCountryDartId :: !(Maybe (Textual Int64))-    , _regDartId        :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'Region' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'regRegionCode'------ * 'regKind'------ * 'regName'------ * 'regCountryCode'------ * 'regCountryDartId'------ * 'regDartId'-region-    :: Region-region =-    Region-    { _regRegionCode = Nothing-    , _regKind = "dfareporting#region"-    , _regName = Nothing-    , _regCountryCode = Nothing-    , _regCountryDartId = Nothing-    , _regDartId = Nothing-    }---- | Region code.-regRegionCode :: Lens' Region (Maybe Text)-regRegionCode-  = lens _regRegionCode-      (\ s a -> s{_regRegionCode = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#region\".-regKind :: Lens' Region Text-regKind = lens _regKind (\ s a -> s{_regKind = a})---- | Name of this region.-regName :: Lens' Region (Maybe Text)-regName = lens _regName (\ s a -> s{_regName = a})---- | Country code of the country to which this region belongs.-regCountryCode :: Lens' Region (Maybe Text)-regCountryCode-  = lens _regCountryCode-      (\ s a -> s{_regCountryCode = a})---- | DART ID of the country to which this region belongs.-regCountryDartId :: Lens' Region (Maybe Int64)-regCountryDartId-  = lens _regCountryDartId-      (\ s a -> s{_regCountryDartId = a})-      . mapping _Coerce---- | DART ID of this region.-regDartId :: Lens' Region (Maybe Int64)-regDartId-  = lens _regDartId (\ s a -> s{_regDartId = a}) .-      mapping _Coerce--instance FromJSON Region where-        parseJSON-          = withObject "Region"-              (\ o ->-                 Region <$>-                   (o .:? "regionCode") <*>-                     (o .:? "kind" .!= "dfareporting#region")-                     <*> (o .:? "name")-                     <*> (o .:? "countryCode")-                     <*> (o .:? "countryDartId")-                     <*> (o .:? "dartId"))--instance ToJSON Region where-        toJSON Region{..}-          = object-              (catMaybes-                 [("regionCode" .=) <$> _regRegionCode,-                  Just ("kind" .= _regKind), ("name" .=) <$> _regName,-                  ("countryCode" .=) <$> _regCountryCode,-                  ("countryDartId" .=) <$> _regCountryDartId,-                  ("dartId" .=) <$> _regDartId])---- | Advertiser Group List Response------ /See:/ 'advertiserGroupsListResponse' smart constructor.-data AdvertiserGroupsListResponse = AdvertiserGroupsListResponse-    { _aglrNextPageToken    :: !(Maybe Text)-    , _aglrKind             :: !Text-    , _aglrAdvertiserGroups :: !(Maybe [AdvertiserGroup])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'AdvertiserGroupsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aglrNextPageToken'------ * 'aglrKind'------ * 'aglrAdvertiserGroups'-advertiserGroupsListResponse-    :: AdvertiserGroupsListResponse-advertiserGroupsListResponse =-    AdvertiserGroupsListResponse-    { _aglrNextPageToken = Nothing-    , _aglrKind = "dfareporting#advertiserGroupsListResponse"-    , _aglrAdvertiserGroups = Nothing-    }---- | Pagination token to be used for the next list operation.-aglrNextPageToken :: Lens' AdvertiserGroupsListResponse (Maybe Text)-aglrNextPageToken-  = lens _aglrNextPageToken-      (\ s a -> s{_aglrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#advertiserGroupsListResponse\".-aglrKind :: Lens' AdvertiserGroupsListResponse Text-aglrKind = lens _aglrKind (\ s a -> s{_aglrKind = a})---- | Advertiser group collection.-aglrAdvertiserGroups :: Lens' AdvertiserGroupsListResponse [AdvertiserGroup]-aglrAdvertiserGroups-  = lens _aglrAdvertiserGroups-      (\ s a -> s{_aglrAdvertiserGroups = a})-      . _Default-      . _Coerce--instance FromJSON AdvertiserGroupsListResponse where-        parseJSON-          = withObject "AdvertiserGroupsListResponse"-              (\ o ->-                 AdvertiserGroupsListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!=-                        "dfareporting#advertiserGroupsListResponse")-                     <*> (o .:? "advertiserGroups" .!= mempty))--instance ToJSON AdvertiserGroupsListResponse where-        toJSON AdvertiserGroupsListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _aglrNextPageToken,-                  Just ("kind" .= _aglrKind),-                  ("advertiserGroups" .=) <$> _aglrAdvertiserGroups])---- | Creative Assignment.------ /See:/ 'creativeAssignment' smart constructor.-data CreativeAssignment = CreativeAssignment-    { _caCreativeGroupAssignments   :: !(Maybe [CreativeGroupAssignment])-    , _caStartTime                  :: !(Maybe DateTime')-    , _caWeight                     :: !(Maybe (Textual Int32))-    , _caRichMediaExitOverrides     :: !(Maybe [RichMediaExitOverride])-    , _caSSLCompliant               :: !(Maybe Bool)-    , _caCreativeId                 :: !(Maybe (Textual Int64))-    , _caClickThroughURL            :: !(Maybe ClickThroughURL)-    , _caApplyEventTags             :: !(Maybe Bool)-    , _caActive                     :: !(Maybe Bool)-    , _caSequence                   :: !(Maybe (Textual Int32))-    , _caEndTime                    :: !(Maybe DateTime')-    , _caCompanionCreativeOverrides :: !(Maybe [CompanionClickThroughOverride])-    , _caCreativeIdDimensionValue   :: !(Maybe DimensionValue)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CreativeAssignment' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'caCreativeGroupAssignments'------ * 'caStartTime'------ * 'caWeight'------ * 'caRichMediaExitOverrides'------ * 'caSSLCompliant'------ * 'caCreativeId'------ * 'caClickThroughURL'------ * 'caApplyEventTags'------ * 'caActive'------ * 'caSequence'------ * 'caEndTime'------ * 'caCompanionCreativeOverrides'------ * 'caCreativeIdDimensionValue'-creativeAssignment-    :: CreativeAssignment-creativeAssignment =-    CreativeAssignment-    { _caCreativeGroupAssignments = Nothing-    , _caStartTime = Nothing-    , _caWeight = Nothing-    , _caRichMediaExitOverrides = Nothing-    , _caSSLCompliant = Nothing-    , _caCreativeId = Nothing-    , _caClickThroughURL = Nothing-    , _caApplyEventTags = Nothing-    , _caActive = Nothing-    , _caSequence = Nothing-    , _caEndTime = Nothing-    , _caCompanionCreativeOverrides = Nothing-    , _caCreativeIdDimensionValue = Nothing-    }---- | Creative group assignments for this creative assignment. Only one--- assignment per creative group number is allowed for a maximum of two--- assignments.-caCreativeGroupAssignments :: Lens' CreativeAssignment [CreativeGroupAssignment]-caCreativeGroupAssignments-  = lens _caCreativeGroupAssignments-      (\ s a -> s{_caCreativeGroupAssignments = a})-      . _Default-      . _Coerce---- | Date and time that the assigned creative should start serving.-caStartTime :: Lens' CreativeAssignment (Maybe UTCTime)-caStartTime-  = lens _caStartTime (\ s a -> s{_caStartTime = a}) .-      mapping _DateTime---- | Weight of the creative assignment, applicable when the rotation type is--- CREATIVE_ROTATION_TYPE_RANDOM.-caWeight :: Lens' CreativeAssignment (Maybe Int32)-caWeight-  = lens _caWeight (\ s a -> s{_caWeight = a}) .-      mapping _Coerce---- | Rich media exit overrides for this creative assignment. Applicable when--- the creative type is any of the following: - RICH_MEDIA_INPAGE ---- RICH_MEDIA_INPAGE_FLOATING - RICH_MEDIA_IM_EXPAND - RICH_MEDIA_EXPANDING--- - RICH_MEDIA_INTERSTITIAL_FLOAT - RICH_MEDIA_MOBILE_IN_APP ---- RICH_MEDIA_MULTI_FLOATING - RICH_MEDIA_PEEL_DOWN - ADVANCED_BANNER ---- VPAID_LINEAR - VPAID_NON_LINEAR-caRichMediaExitOverrides :: Lens' CreativeAssignment [RichMediaExitOverride]-caRichMediaExitOverrides-  = lens _caRichMediaExitOverrides-      (\ s a -> s{_caRichMediaExitOverrides = a})-      . _Default-      . _Coerce---- | Whether the creative to be assigned is SSL-compliant. This is a--- read-only field that is auto-generated when the ad is inserted or--- updated.-caSSLCompliant :: Lens' CreativeAssignment (Maybe Bool)-caSSLCompliant-  = lens _caSSLCompliant-      (\ s a -> s{_caSSLCompliant = a})---- | ID of the creative to be assigned. This is a required field.-caCreativeId :: Lens' CreativeAssignment (Maybe Int64)-caCreativeId-  = lens _caCreativeId (\ s a -> s{_caCreativeId = a})-      . mapping _Coerce---- | Click-through URL of the creative assignment.-caClickThroughURL :: Lens' CreativeAssignment (Maybe ClickThroughURL)-caClickThroughURL-  = lens _caClickThroughURL-      (\ s a -> s{_caClickThroughURL = a})---- | Whether applicable event tags should fire when this creative assignment--- is rendered. If this value is unset when the ad is inserted or updated,--- it will default to true for all creative types EXCEPT for--- INTERNAL_REDIRECT, INTERSTITIAL_INTERNAL_REDIRECT, and INSTREAM_VIDEO.-caApplyEventTags :: Lens' CreativeAssignment (Maybe Bool)-caApplyEventTags-  = lens _caApplyEventTags-      (\ s a -> s{_caApplyEventTags = a})---- | Whether this creative assignment is active. When true, the creative will--- be included in the ad\'s rotation.-caActive :: Lens' CreativeAssignment (Maybe Bool)-caActive = lens _caActive (\ s a -> s{_caActive = a})---- | Sequence number of the creative assignment, applicable when the rotation--- type is CREATIVE_ROTATION_TYPE_SEQUENTIAL.-caSequence :: Lens' CreativeAssignment (Maybe Int32)-caSequence-  = lens _caSequence (\ s a -> s{_caSequence = a}) .-      mapping _Coerce---- | Date and time that the assigned creative should stop serving. Must be--- later than the start time.-caEndTime :: Lens' CreativeAssignment (Maybe UTCTime)-caEndTime-  = lens _caEndTime (\ s a -> s{_caEndTime = a}) .-      mapping _DateTime---- | Companion creative overrides for this creative assignment. Applicable to--- video ads.-caCompanionCreativeOverrides :: Lens' CreativeAssignment [CompanionClickThroughOverride]-caCompanionCreativeOverrides-  = lens _caCompanionCreativeOverrides-      (\ s a -> s{_caCompanionCreativeOverrides = a})-      . _Default-      . _Coerce---- | Dimension value for the ID of the creative. This is a read-only,--- auto-generated field.-caCreativeIdDimensionValue :: Lens' CreativeAssignment (Maybe DimensionValue)-caCreativeIdDimensionValue-  = lens _caCreativeIdDimensionValue-      (\ s a -> s{_caCreativeIdDimensionValue = a})--instance FromJSON CreativeAssignment where-        parseJSON-          = withObject "CreativeAssignment"-              (\ o ->-                 CreativeAssignment <$>-                   (o .:? "creativeGroupAssignments" .!= mempty) <*>-                     (o .:? "startTime")-                     <*> (o .:? "weight")-                     <*> (o .:? "richMediaExitOverrides" .!= mempty)-                     <*> (o .:? "sslCompliant")-                     <*> (o .:? "creativeId")-                     <*> (o .:? "clickThroughUrl")-                     <*> (o .:? "applyEventTags")-                     <*> (o .:? "active")-                     <*> (o .:? "sequence")-                     <*> (o .:? "endTime")-                     <*> (o .:? "companionCreativeOverrides" .!= mempty)-                     <*> (o .:? "creativeIdDimensionValue"))--instance ToJSON CreativeAssignment where-        toJSON CreativeAssignment{..}-          = object-              (catMaybes-                 [("creativeGroupAssignments" .=) <$>-                    _caCreativeGroupAssignments,-                  ("startTime" .=) <$> _caStartTime,-                  ("weight" .=) <$> _caWeight,-                  ("richMediaExitOverrides" .=) <$>-                    _caRichMediaExitOverrides,-                  ("sslCompliant" .=) <$> _caSSLCompliant,-                  ("creativeId" .=) <$> _caCreativeId,-                  ("clickThroughUrl" .=) <$> _caClickThroughURL,-                  ("applyEventTags" .=) <$> _caApplyEventTags,-                  ("active" .=) <$> _caActive,-                  ("sequence" .=) <$> _caSequence,-                  ("endTime" .=) <$> _caEndTime,-                  ("companionCreativeOverrides" .=) <$>-                    _caCompanionCreativeOverrides,-                  ("creativeIdDimensionValue" .=) <$>-                    _caCreativeIdDimensionValue])---- | Represents a dimension filter.------ /See:/ 'dimensionFilter' smart constructor.-data DimensionFilter = DimensionFilter-    { _dfKind          :: !Text-    , _dfValue         :: !(Maybe Text)-    , _dfDimensionName :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'DimensionFilter' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dfKind'------ * 'dfValue'------ * 'dfDimensionName'-dimensionFilter-    :: DimensionFilter-dimensionFilter =-    DimensionFilter-    { _dfKind = "dfareporting#dimensionFilter"-    , _dfValue = Nothing-    , _dfDimensionName = Nothing-    }---- | The kind of resource this is, in this case dfareporting#dimensionFilter.-dfKind :: Lens' DimensionFilter Text-dfKind = lens _dfKind (\ s a -> s{_dfKind = a})---- | The value of the dimension to filter.-dfValue :: Lens' DimensionFilter (Maybe Text)-dfValue = lens _dfValue (\ s a -> s{_dfValue = a})---- | The name of the dimension to filter.-dfDimensionName :: Lens' DimensionFilter (Maybe Text)-dfDimensionName-  = lens _dfDimensionName-      (\ s a -> s{_dfDimensionName = a})--instance FromJSON DimensionFilter where-        parseJSON-          = withObject "DimensionFilter"-              (\ o ->-                 DimensionFilter <$>-                   (o .:? "kind" .!= "dfareporting#dimensionFilter") <*>-                     (o .:? "value")-                     <*> (o .:? "dimensionName"))--instance ToJSON DimensionFilter where-        toJSON DimensionFilter{..}-          = object-              (catMaybes-                 [Just ("kind" .= _dfKind), ("value" .=) <$> _dfValue,-                  ("dimensionName" .=) <$> _dfDimensionName])---- | Represents the list of user profiles.------ /See:/ 'userProFileList' smart constructor.-data UserProFileList = UserProFileList-    { _upflEtag  :: !(Maybe Text)-    , _upflKind  :: !Text-    , _upflItems :: !(Maybe [UserProFile])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'UserProFileList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'upflEtag'------ * 'upflKind'------ * 'upflItems'-userProFileList-    :: UserProFileList-userProFileList =-    UserProFileList-    { _upflEtag = Nothing-    , _upflKind = "dfareporting#userProfileList"-    , _upflItems = Nothing-    }---- | The eTag of this response for caching purposes.-upflEtag :: Lens' UserProFileList (Maybe Text)-upflEtag = lens _upflEtag (\ s a -> s{_upflEtag = a})---- | The kind of list this is, in this case dfareporting#userProfileList.-upflKind :: Lens' UserProFileList Text-upflKind = lens _upflKind (\ s a -> s{_upflKind = a})---- | The user profiles returned in this response.-upflItems :: Lens' UserProFileList [UserProFile]-upflItems-  = lens _upflItems (\ s a -> s{_upflItems = a}) .-      _Default-      . _Coerce--instance FromJSON UserProFileList where-        parseJSON-          = withObject "UserProFileList"-              (\ o ->-                 UserProFileList <$>-                   (o .:? "etag") <*>-                     (o .:? "kind" .!= "dfareporting#userProfileList")-                     <*> (o .:? "items" .!= mempty))--instance ToJSON UserProFileList where-        toJSON UserProFileList{..}-          = object-              (catMaybes-                 [("etag" .=) <$> _upflEtag,-                  Just ("kind" .= _upflKind),-                  ("items" .=) <$> _upflItems])---- | Contains properties of a Floodlight configuration.------ /See:/ 'floodlightConfiguration' smart constructor.-data FloodlightConfiguration = FloodlightConfiguration-    { _fcTagSettings                              :: !(Maybe TagSettings)-    , _fcExposureToConversionEnabled              :: !(Maybe Bool)-    , _fcInAppAttributionTrackingEnabled          :: !(Maybe Bool)-    , _fcThirdPartyAuthenticationTokens           :: !(Maybe [ThirdPartyAuthenticationToken])-    , _fcKind                                     :: !Text-    , _fcAdvertiserId                             :: !(Maybe (Textual Int64))-    , _fcAnalyticsDataSharingEnabled              :: !(Maybe Bool)-    , _fcAdvertiserIdDimensionValue               :: !(Maybe DimensionValue)-    , _fcIdDimensionValue                         :: !(Maybe DimensionValue)-    , _fcLookbackConfiguration                    :: !(Maybe LookbackConfiguration)-    , _fcAccountId                                :: !(Maybe (Textual Int64))-    , _fcId                                       :: !(Maybe (Textual Int64))-    , _fcSSLRequired                              :: !(Maybe Bool)-    , _fcNATuralSearchConversionAttributionOption :: !(Maybe FloodlightConfigurationNATuralSearchConversionAttributionOption)-    , _fcUserDefinedVariableConfigurations        :: !(Maybe [UserDefinedVariableConfiguration])-    , _fcSubAccountId                             :: !(Maybe (Textual Int64))-    , _fcFirstDayOfWeek                           :: !(Maybe FloodlightConfigurationFirstDayOfWeek)-    , _fcOmnitureSettings                         :: !(Maybe OmnitureSettings)-    , _fcStandardVariableTypes                    :: !(Maybe [FloodlightConfigurationStandardVariableTypesItem])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'FloodlightConfiguration' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'fcTagSettings'------ * 'fcExposureToConversionEnabled'------ * 'fcInAppAttributionTrackingEnabled'------ * 'fcThirdPartyAuthenticationTokens'------ * 'fcKind'------ * 'fcAdvertiserId'------ * 'fcAnalyticsDataSharingEnabled'------ * 'fcAdvertiserIdDimensionValue'------ * 'fcIdDimensionValue'------ * 'fcLookbackConfiguration'------ * 'fcAccountId'------ * 'fcId'------ * 'fcSSLRequired'------ * 'fcNATuralSearchConversionAttributionOption'------ * 'fcUserDefinedVariableConfigurations'------ * 'fcSubAccountId'------ * 'fcFirstDayOfWeek'------ * 'fcOmnitureSettings'------ * 'fcStandardVariableTypes'-floodlightConfiguration-    :: FloodlightConfiguration-floodlightConfiguration =-    FloodlightConfiguration-    { _fcTagSettings = Nothing-    , _fcExposureToConversionEnabled = Nothing-    , _fcInAppAttributionTrackingEnabled = Nothing-    , _fcThirdPartyAuthenticationTokens = Nothing-    , _fcKind = "dfareporting#floodlightConfiguration"-    , _fcAdvertiserId = Nothing-    , _fcAnalyticsDataSharingEnabled = Nothing-    , _fcAdvertiserIdDimensionValue = Nothing-    , _fcIdDimensionValue = Nothing-    , _fcLookbackConfiguration = Nothing-    , _fcAccountId = Nothing-    , _fcId = Nothing-    , _fcSSLRequired = Nothing-    , _fcNATuralSearchConversionAttributionOption = Nothing-    , _fcUserDefinedVariableConfigurations = Nothing-    , _fcSubAccountId = Nothing-    , _fcFirstDayOfWeek = Nothing-    , _fcOmnitureSettings = Nothing-    , _fcStandardVariableTypes = Nothing-    }---- | Configuration settings for dynamic and image floodlight tags.-fcTagSettings :: Lens' FloodlightConfiguration (Maybe TagSettings)-fcTagSettings-  = lens _fcTagSettings-      (\ s a -> s{_fcTagSettings = a})---- | Whether the exposure-to-conversion report is enabled. This report shows--- detailed pathway information on up to 10 of the most recent ad exposures--- seen by a user before converting.-fcExposureToConversionEnabled :: Lens' FloodlightConfiguration (Maybe Bool)-fcExposureToConversionEnabled-  = lens _fcExposureToConversionEnabled-      (\ s a -> s{_fcExposureToConversionEnabled = a})---- | Whether in-app attribution tracking is enabled.-fcInAppAttributionTrackingEnabled :: Lens' FloodlightConfiguration (Maybe Bool)-fcInAppAttributionTrackingEnabled-  = lens _fcInAppAttributionTrackingEnabled-      (\ s a -> s{_fcInAppAttributionTrackingEnabled = a})---- | List of third-party authentication tokens enabled for this--- configuration.-fcThirdPartyAuthenticationTokens :: Lens' FloodlightConfiguration [ThirdPartyAuthenticationToken]-fcThirdPartyAuthenticationTokens-  = lens _fcThirdPartyAuthenticationTokens-      (\ s a -> s{_fcThirdPartyAuthenticationTokens = a})-      . _Default-      . _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#floodlightConfiguration\".-fcKind :: Lens' FloodlightConfiguration Text-fcKind = lens _fcKind (\ s a -> s{_fcKind = a})---- | Advertiser ID of the parent advertiser of this floodlight configuration.-fcAdvertiserId :: Lens' FloodlightConfiguration (Maybe Int64)-fcAdvertiserId-  = lens _fcAdvertiserId-      (\ s a -> s{_fcAdvertiserId = a})-      . mapping _Coerce---- | Whether advertiser data is shared with Google Analytics.-fcAnalyticsDataSharingEnabled :: Lens' FloodlightConfiguration (Maybe Bool)-fcAnalyticsDataSharingEnabled-  = lens _fcAnalyticsDataSharingEnabled-      (\ s a -> s{_fcAnalyticsDataSharingEnabled = a})---- | Dimension value for the ID of the advertiser. This is a read-only,--- auto-generated field.-fcAdvertiserIdDimensionValue :: Lens' FloodlightConfiguration (Maybe DimensionValue)-fcAdvertiserIdDimensionValue-  = lens _fcAdvertiserIdDimensionValue-      (\ s a -> s{_fcAdvertiserIdDimensionValue = a})---- | Dimension value for the ID of this floodlight configuration. This is a--- read-only, auto-generated field.-fcIdDimensionValue :: Lens' FloodlightConfiguration (Maybe DimensionValue)-fcIdDimensionValue-  = lens _fcIdDimensionValue-      (\ s a -> s{_fcIdDimensionValue = a})---- | Lookback window settings for this floodlight configuration.-fcLookbackConfiguration :: Lens' FloodlightConfiguration (Maybe LookbackConfiguration)-fcLookbackConfiguration-  = lens _fcLookbackConfiguration-      (\ s a -> s{_fcLookbackConfiguration = a})---- | Account ID of this floodlight configuration. This is a read-only field--- that can be left blank.-fcAccountId :: Lens' FloodlightConfiguration (Maybe Int64)-fcAccountId-  = lens _fcAccountId (\ s a -> s{_fcAccountId = a}) .-      mapping _Coerce---- | ID of this floodlight configuration. This is a read-only, auto-generated--- field.-fcId :: Lens' FloodlightConfiguration (Maybe Int64)-fcId-  = lens _fcId (\ s a -> s{_fcId = a}) .-      mapping _Coerce---- | Whether floodlight activities owned by this configuration are required--- to be SSL-compliant.-fcSSLRequired :: Lens' FloodlightConfiguration (Maybe Bool)-fcSSLRequired-  = lens _fcSSLRequired-      (\ s a -> s{_fcSSLRequired = a})---- | Types of attribution options for natural search conversions.-fcNATuralSearchConversionAttributionOption :: Lens' FloodlightConfiguration (Maybe FloodlightConfigurationNATuralSearchConversionAttributionOption)-fcNATuralSearchConversionAttributionOption-  = lens _fcNATuralSearchConversionAttributionOption-      (\ s a ->-         s{_fcNATuralSearchConversionAttributionOption = a})---- | List of user defined variables enabled for this configuration.-fcUserDefinedVariableConfigurations :: Lens' FloodlightConfiguration [UserDefinedVariableConfiguration]-fcUserDefinedVariableConfigurations-  = lens _fcUserDefinedVariableConfigurations-      (\ s a ->-         s{_fcUserDefinedVariableConfigurations = a})-      . _Default-      . _Coerce---- | Subaccount ID of this floodlight configuration. This is a read-only--- field that can be left blank.-fcSubAccountId :: Lens' FloodlightConfiguration (Maybe Int64)-fcSubAccountId-  = lens _fcSubAccountId-      (\ s a -> s{_fcSubAccountId = a})-      . mapping _Coerce---- | Day that will be counted as the first day of the week in reports. This--- is a required field.-fcFirstDayOfWeek :: Lens' FloodlightConfiguration (Maybe FloodlightConfigurationFirstDayOfWeek)-fcFirstDayOfWeek-  = lens _fcFirstDayOfWeek-      (\ s a -> s{_fcFirstDayOfWeek = a})---- | Settings for DCM Omniture integration.-fcOmnitureSettings :: Lens' FloodlightConfiguration (Maybe OmnitureSettings)-fcOmnitureSettings-  = lens _fcOmnitureSettings-      (\ s a -> s{_fcOmnitureSettings = a})---- | List of standard variables enabled for this configuration. Acceptable--- values are: - \"ORD\" - \"NUM\"-fcStandardVariableTypes :: Lens' FloodlightConfiguration [FloodlightConfigurationStandardVariableTypesItem]-fcStandardVariableTypes-  = lens _fcStandardVariableTypes-      (\ s a -> s{_fcStandardVariableTypes = a})-      . _Default-      . _Coerce--instance FromJSON FloodlightConfiguration where-        parseJSON-          = withObject "FloodlightConfiguration"-              (\ o ->-                 FloodlightConfiguration <$>-                   (o .:? "tagSettings") <*>-                     (o .:? "exposureToConversionEnabled")-                     <*> (o .:? "inAppAttributionTrackingEnabled")-                     <*>-                     (o .:? "thirdPartyAuthenticationTokens" .!= mempty)-                     <*>-                     (o .:? "kind" .!=-                        "dfareporting#floodlightConfiguration")-                     <*> (o .:? "advertiserId")-                     <*> (o .:? "analyticsDataSharingEnabled")-                     <*> (o .:? "advertiserIdDimensionValue")-                     <*> (o .:? "idDimensionValue")-                     <*> (o .:? "lookbackConfiguration")-                     <*> (o .:? "accountId")-                     <*> (o .:? "id")-                     <*> (o .:? "sslRequired")-                     <*>-                     (o .:? "naturalSearchConversionAttributionOption")-                     <*>-                     (o .:? "userDefinedVariableConfigurations" .!=-                        mempty)-                     <*> (o .:? "subaccountId")-                     <*> (o .:? "firstDayOfWeek")-                     <*> (o .:? "omnitureSettings")-                     <*> (o .:? "standardVariableTypes" .!= mempty))--instance ToJSON FloodlightConfiguration where-        toJSON FloodlightConfiguration{..}-          = object-              (catMaybes-                 [("tagSettings" .=) <$> _fcTagSettings,-                  ("exposureToConversionEnabled" .=) <$>-                    _fcExposureToConversionEnabled,-                  ("inAppAttributionTrackingEnabled" .=) <$>-                    _fcInAppAttributionTrackingEnabled,-                  ("thirdPartyAuthenticationTokens" .=) <$>-                    _fcThirdPartyAuthenticationTokens,-                  Just ("kind" .= _fcKind),-                  ("advertiserId" .=) <$> _fcAdvertiserId,-                  ("analyticsDataSharingEnabled" .=) <$>-                    _fcAnalyticsDataSharingEnabled,-                  ("advertiserIdDimensionValue" .=) <$>-                    _fcAdvertiserIdDimensionValue,-                  ("idDimensionValue" .=) <$> _fcIdDimensionValue,-                  ("lookbackConfiguration" .=) <$>-                    _fcLookbackConfiguration,-                  ("accountId" .=) <$> _fcAccountId,-                  ("id" .=) <$> _fcId,-                  ("sslRequired" .=) <$> _fcSSLRequired,-                  ("naturalSearchConversionAttributionOption" .=) <$>-                    _fcNATuralSearchConversionAttributionOption,-                  ("userDefinedVariableConfigurations" .=) <$>-                    _fcUserDefinedVariableConfigurations,-                  ("subaccountId" .=) <$> _fcSubAccountId,-                  ("firstDayOfWeek" .=) <$> _fcFirstDayOfWeek,-                  ("omnitureSettings" .=) <$> _fcOmnitureSettings,-                  ("standardVariableTypes" .=) <$>-                    _fcStandardVariableTypes])---- | Floodlight Activity Group List Response------ /See:/ 'floodlightActivityGroupsListResponse' smart constructor.-data FloodlightActivityGroupsListResponse = FloodlightActivityGroupsListResponse-    { _faglrNextPageToken            :: !(Maybe Text)-    , _faglrKind                     :: !Text-    , _faglrFloodlightActivityGroups :: !(Maybe [FloodlightActivityGroup])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'FloodlightActivityGroupsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'faglrNextPageToken'------ * 'faglrKind'------ * 'faglrFloodlightActivityGroups'-floodlightActivityGroupsListResponse-    :: FloodlightActivityGroupsListResponse-floodlightActivityGroupsListResponse =-    FloodlightActivityGroupsListResponse-    { _faglrNextPageToken = Nothing-    , _faglrKind = "dfareporting#floodlightActivityGroupsListResponse"-    , _faglrFloodlightActivityGroups = Nothing-    }---- | Pagination token to be used for the next list operation.-faglrNextPageToken :: Lens' FloodlightActivityGroupsListResponse (Maybe Text)-faglrNextPageToken-  = lens _faglrNextPageToken-      (\ s a -> s{_faglrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#floodlightActivityGroupsListResponse\".-faglrKind :: Lens' FloodlightActivityGroupsListResponse Text-faglrKind-  = lens _faglrKind (\ s a -> s{_faglrKind = a})---- | Floodlight activity group collection.-faglrFloodlightActivityGroups :: Lens' FloodlightActivityGroupsListResponse [FloodlightActivityGroup]-faglrFloodlightActivityGroups-  = lens _faglrFloodlightActivityGroups-      (\ s a -> s{_faglrFloodlightActivityGroups = a})-      . _Default-      . _Coerce--instance FromJSON-         FloodlightActivityGroupsListResponse where-        parseJSON-          = withObject "FloodlightActivityGroupsListResponse"-              (\ o ->-                 FloodlightActivityGroupsListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!=-                        "dfareporting#floodlightActivityGroupsListResponse")-                     <*> (o .:? "floodlightActivityGroups" .!= mempty))--instance ToJSON FloodlightActivityGroupsListResponse-         where-        toJSON FloodlightActivityGroupsListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _faglrNextPageToken,-                  Just ("kind" .= _faglrKind),-                  ("floodlightActivityGroups" .=) <$>-                    _faglrFloodlightActivityGroups])---- | Creative Field Value List Response------ /See:/ 'creativeFieldValuesListResponse' smart constructor.-data CreativeFieldValuesListResponse = CreativeFieldValuesListResponse-    { _cfvlrNextPageToken       :: !(Maybe Text)-    , _cfvlrKind                :: !Text-    , _cfvlrCreativeFieldValues :: !(Maybe [CreativeFieldValue])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CreativeFieldValuesListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cfvlrNextPageToken'------ * 'cfvlrKind'------ * 'cfvlrCreativeFieldValues'-creativeFieldValuesListResponse-    :: CreativeFieldValuesListResponse-creativeFieldValuesListResponse =-    CreativeFieldValuesListResponse-    { _cfvlrNextPageToken = Nothing-    , _cfvlrKind = "dfareporting#creativeFieldValuesListResponse"-    , _cfvlrCreativeFieldValues = Nothing-    }---- | Pagination token to be used for the next list operation.-cfvlrNextPageToken :: Lens' CreativeFieldValuesListResponse (Maybe Text)-cfvlrNextPageToken-  = lens _cfvlrNextPageToken-      (\ s a -> s{_cfvlrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#creativeFieldValuesListResponse\".-cfvlrKind :: Lens' CreativeFieldValuesListResponse Text-cfvlrKind-  = lens _cfvlrKind (\ s a -> s{_cfvlrKind = a})---- | Creative field value collection.-cfvlrCreativeFieldValues :: Lens' CreativeFieldValuesListResponse [CreativeFieldValue]-cfvlrCreativeFieldValues-  = lens _cfvlrCreativeFieldValues-      (\ s a -> s{_cfvlrCreativeFieldValues = a})-      . _Default-      . _Coerce--instance FromJSON CreativeFieldValuesListResponse-         where-        parseJSON-          = withObject "CreativeFieldValuesListResponse"-              (\ o ->-                 CreativeFieldValuesListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!=-                        "dfareporting#creativeFieldValuesListResponse")-                     <*> (o .:? "creativeFieldValues" .!= mempty))--instance ToJSON CreativeFieldValuesListResponse where-        toJSON CreativeFieldValuesListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _cfvlrNextPageToken,-                  Just ("kind" .= _cfvlrKind),-                  ("creativeFieldValues" .=) <$>-                    _cfvlrCreativeFieldValues])---- | Rich Media Exit Override.------ /See:/ 'richMediaExitOverride' smart constructor.-data RichMediaExitOverride = RichMediaExitOverride-    { _rmeoUseCustomExitURL :: !(Maybe Bool)-    , _rmeoExitId           :: !(Maybe (Textual Int64))-    , _rmeoCustomExitURL    :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'RichMediaExitOverride' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rmeoUseCustomExitURL'------ * 'rmeoExitId'------ * 'rmeoCustomExitURL'-richMediaExitOverride-    :: RichMediaExitOverride-richMediaExitOverride =-    RichMediaExitOverride-    { _rmeoUseCustomExitURL = Nothing-    , _rmeoExitId = Nothing-    , _rmeoCustomExitURL = Nothing-    }---- | Whether to use the custom exit URL.-rmeoUseCustomExitURL :: Lens' RichMediaExitOverride (Maybe Bool)-rmeoUseCustomExitURL-  = lens _rmeoUseCustomExitURL-      (\ s a -> s{_rmeoUseCustomExitURL = a})---- | ID for the override to refer to a specific exit in the creative.-rmeoExitId :: Lens' RichMediaExitOverride (Maybe Int64)-rmeoExitId-  = lens _rmeoExitId (\ s a -> s{_rmeoExitId = a}) .-      mapping _Coerce---- | Click-through URL to override the default exit URL. Applicable if the--- useCustomExitUrl field is set to true.-rmeoCustomExitURL :: Lens' RichMediaExitOverride (Maybe Text)-rmeoCustomExitURL-  = lens _rmeoCustomExitURL-      (\ s a -> s{_rmeoCustomExitURL = a})--instance FromJSON RichMediaExitOverride where-        parseJSON-          = withObject "RichMediaExitOverride"-              (\ o ->-                 RichMediaExitOverride <$>-                   (o .:? "useCustomExitUrl") <*> (o .:? "exitId") <*>-                     (o .:? "customExitUrl"))--instance ToJSON RichMediaExitOverride where-        toJSON RichMediaExitOverride{..}-          = object-              (catMaybes-                 [("useCustomExitUrl" .=) <$> _rmeoUseCustomExitURL,-                  ("exitId" .=) <$> _rmeoExitId,-                  ("customExitUrl" .=) <$> _rmeoCustomExitURL])---- | Represents a sorted dimension.------ /See:/ 'sortedDimension' smart constructor.-data SortedDimension = SortedDimension-    { _sdKind      :: !Text-    , _sdSortOrder :: !(Maybe SortedDimensionSortOrder)-    , _sdName      :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'SortedDimension' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sdKind'------ * 'sdSortOrder'------ * 'sdName'-sortedDimension-    :: SortedDimension-sortedDimension =-    SortedDimension-    { _sdKind = "dfareporting#sortedDimension"-    , _sdSortOrder = Nothing-    , _sdName = Nothing-    }---- | The kind of resource this is, in this case dfareporting#sortedDimension.-sdKind :: Lens' SortedDimension Text-sdKind = lens _sdKind (\ s a -> s{_sdKind = a})---- | An optional sort order for the dimension column.-sdSortOrder :: Lens' SortedDimension (Maybe SortedDimensionSortOrder)-sdSortOrder-  = lens _sdSortOrder (\ s a -> s{_sdSortOrder = a})---- | The name of the dimension.-sdName :: Lens' SortedDimension (Maybe Text)-sdName = lens _sdName (\ s a -> s{_sdName = a})--instance FromJSON SortedDimension where-        parseJSON-          = withObject "SortedDimension"-              (\ o ->-                 SortedDimension <$>-                   (o .:? "kind" .!= "dfareporting#sortedDimension") <*>-                     (o .:? "sortOrder")-                     <*> (o .:? "name"))--instance ToJSON SortedDimension where-        toJSON SortedDimension{..}-          = object-              (catMaybes-                 [Just ("kind" .= _sdKind),-                  ("sortOrder" .=) <$> _sdSortOrder,-                  ("name" .=) <$> _sdName])---- | Creative Field List Response------ /See:/ 'creativeFieldsListResponse' smart constructor.-data CreativeFieldsListResponse = CreativeFieldsListResponse-    { _cflrNextPageToken  :: !(Maybe Text)-    , _cflrKind           :: !Text-    , _cflrCreativeFields :: !(Maybe [CreativeField])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CreativeFieldsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cflrNextPageToken'------ * 'cflrKind'------ * 'cflrCreativeFields'-creativeFieldsListResponse-    :: CreativeFieldsListResponse-creativeFieldsListResponse =-    CreativeFieldsListResponse-    { _cflrNextPageToken = Nothing-    , _cflrKind = "dfareporting#creativeFieldsListResponse"-    , _cflrCreativeFields = Nothing-    }---- | Pagination token to be used for the next list operation.-cflrNextPageToken :: Lens' CreativeFieldsListResponse (Maybe Text)-cflrNextPageToken-  = lens _cflrNextPageToken-      (\ s a -> s{_cflrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#creativeFieldsListResponse\".-cflrKind :: Lens' CreativeFieldsListResponse Text-cflrKind = lens _cflrKind (\ s a -> s{_cflrKind = a})---- | Creative field collection.-cflrCreativeFields :: Lens' CreativeFieldsListResponse [CreativeField]-cflrCreativeFields-  = lens _cflrCreativeFields-      (\ s a -> s{_cflrCreativeFields = a})-      . _Default-      . _Coerce--instance FromJSON CreativeFieldsListResponse where-        parseJSON-          = withObject "CreativeFieldsListResponse"-              (\ o ->-                 CreativeFieldsListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!=-                        "dfareporting#creativeFieldsListResponse")-                     <*> (o .:? "creativeFields" .!= mempty))--instance ToJSON CreativeFieldsListResponse where-        toJSON CreativeFieldsListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _cflrNextPageToken,-                  Just ("kind" .= _cflrKind),-                  ("creativeFields" .=) <$> _cflrCreativeFields])---- | Placement GenerateTags Response------ /See:/ 'placementsGenerateTagsResponse' smart constructor.-data PlacementsGenerateTagsResponse = PlacementsGenerateTagsResponse-    { _pgtrKind          :: !Text-    , _pgtrPlacementTags :: !(Maybe [PlacementTag])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'PlacementsGenerateTagsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pgtrKind'------ * 'pgtrPlacementTags'-placementsGenerateTagsResponse-    :: PlacementsGenerateTagsResponse-placementsGenerateTagsResponse =-    PlacementsGenerateTagsResponse-    { _pgtrKind = "dfareporting#placementsGenerateTagsResponse"-    , _pgtrPlacementTags = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#placementsGenerateTagsResponse\".-pgtrKind :: Lens' PlacementsGenerateTagsResponse Text-pgtrKind = lens _pgtrKind (\ s a -> s{_pgtrKind = a})---- | Set of generated tags for the specified placements.-pgtrPlacementTags :: Lens' PlacementsGenerateTagsResponse [PlacementTag]-pgtrPlacementTags-  = lens _pgtrPlacementTags-      (\ s a -> s{_pgtrPlacementTags = a})-      . _Default-      . _Coerce--instance FromJSON PlacementsGenerateTagsResponse-         where-        parseJSON-          = withObject "PlacementsGenerateTagsResponse"-              (\ o ->-                 PlacementsGenerateTagsResponse <$>-                   (o .:? "kind" .!=-                      "dfareporting#placementsGenerateTagsResponse")-                     <*> (o .:? "placementTags" .!= mempty))--instance ToJSON PlacementsGenerateTagsResponse where-        toJSON PlacementsGenerateTagsResponse{..}-          = object-              (catMaybes-                 [Just ("kind" .= _pgtrKind),-                  ("placementTags" .=) <$> _pgtrPlacementTags])---- | Creative Asset.------ /See:/ 'creativeAsset' smart constructor.-data CreativeAsset = CreativeAsset-    { _caaZIndex                :: !(Maybe (Textual Int32))-    , _caaPushdown              :: !(Maybe Bool)-    , _caaVideoDuration         :: !(Maybe (Textual Double))-    , _caaOriginalBackup        :: !(Maybe Bool)-    , _caaWindowMode            :: !(Maybe CreativeAssetWindowMode)-    , _caaFlashVersion          :: !(Maybe (Textual Int32))-    , _caaPushdownDuration      :: !(Maybe (Textual Double))-    , _caaSize                  :: !(Maybe Size)-    , _caaVerticallyLocked      :: !(Maybe Bool)-    , _caaOffSet                :: !(Maybe OffSetPosition)-    , _caaStreamingServingURL   :: !(Maybe Text)-    , _caaZipFilesize           :: !(Maybe Text)-    , _caaTransparency          :: !(Maybe Bool)-    , _caaHideSelectionBoxes    :: !(Maybe Bool)-    , _caaSSLCompliant          :: !(Maybe Bool)-    , _caaFileSize              :: !(Maybe (Textual Int64))-    , _caaAssetIdentifier       :: !(Maybe CreativeAssetId)-    , _caaDurationType          :: !(Maybe CreativeAssetDurationType)-    , _caaProgressiveServingURL :: !(Maybe Text)-    , _caaActive                :: !(Maybe Bool)-    , _caaRole                  :: !(Maybe CreativeAssetRole)-    , _caaMimeType              :: !(Maybe Text)-    , _caaPositionTopUnit       :: !(Maybe CreativeAssetPositionTopUnit)-    , _caaPositionLeftUnit      :: !(Maybe CreativeAssetPositionLeftUnit)-    , _caaAlignment             :: !(Maybe CreativeAssetAlignment)-    , _caaExpandedDimension     :: !(Maybe Size)-    , _caaZipFilename           :: !(Maybe Text)-    , _caaActionScript3         :: !(Maybe Bool)-    , _caaDisplayType           :: !(Maybe CreativeAssetDisplayType)-    , _caaChildAssetType        :: !(Maybe CreativeAssetChildAssetType)-    , _caaCollapsedSize         :: !(Maybe Size)-    , _caaId                    :: !(Maybe (Textual Int64))-    , _caaBitRate               :: !(Maybe (Textual Int32))-    , _caaCustomStartTimeValue  :: !(Maybe (Textual Int32))-    , _caaStartTimeType         :: !(Maybe CreativeAssetStartTimeType)-    , _caaDuration              :: !(Maybe (Textual Int32))-    , _caaArtworkType           :: !(Maybe CreativeAssetArtworkType)-    , _caaHideFlashObjects      :: !(Maybe Bool)-    , _caaDetectedFeatures      :: !(Maybe [CreativeAssetDetectedFeaturesItem])-    , _caaBackupImageExit       :: !(Maybe CreativeCustomEvent)-    , _caaPosition              :: !(Maybe OffSetPosition)-    , _caaHorizontallyLocked    :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CreativeAsset' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'caaZIndex'------ * 'caaPushdown'------ * 'caaVideoDuration'------ * 'caaOriginalBackup'------ * 'caaWindowMode'------ * 'caaFlashVersion'------ * 'caaPushdownDuration'------ * 'caaSize'------ * 'caaVerticallyLocked'------ * 'caaOffSet'------ * 'caaStreamingServingURL'------ * 'caaZipFilesize'------ * 'caaTransparency'------ * 'caaHideSelectionBoxes'------ * 'caaSSLCompliant'------ * 'caaFileSize'------ * 'caaAssetIdentifier'------ * 'caaDurationType'------ * 'caaProgressiveServingURL'------ * 'caaActive'------ * 'caaRole'------ * 'caaMimeType'------ * 'caaPositionTopUnit'------ * 'caaPositionLeftUnit'------ * 'caaAlignment'------ * 'caaExpandedDimension'------ * 'caaZipFilename'------ * 'caaActionScript3'------ * 'caaDisplayType'------ * 'caaChildAssetType'------ * 'caaCollapsedSize'------ * 'caaId'------ * 'caaBitRate'------ * 'caaCustomStartTimeValue'------ * 'caaStartTimeType'------ * 'caaDuration'------ * 'caaArtworkType'------ * 'caaHideFlashObjects'------ * 'caaDetectedFeatures'------ * 'caaBackupImageExit'------ * 'caaPosition'------ * 'caaHorizontallyLocked'-creativeAsset-    :: CreativeAsset-creativeAsset =-    CreativeAsset-    { _caaZIndex = Nothing-    , _caaPushdown = Nothing-    , _caaVideoDuration = Nothing-    , _caaOriginalBackup = Nothing-    , _caaWindowMode = Nothing-    , _caaFlashVersion = Nothing-    , _caaPushdownDuration = Nothing-    , _caaSize = Nothing-    , _caaVerticallyLocked = Nothing-    , _caaOffSet = Nothing-    , _caaStreamingServingURL = Nothing-    , _caaZipFilesize = Nothing-    , _caaTransparency = Nothing-    , _caaHideSelectionBoxes = Nothing-    , _caaSSLCompliant = Nothing-    , _caaFileSize = Nothing-    , _caaAssetIdentifier = Nothing-    , _caaDurationType = Nothing-    , _caaProgressiveServingURL = Nothing-    , _caaActive = Nothing-    , _caaRole = Nothing-    , _caaMimeType = Nothing-    , _caaPositionTopUnit = Nothing-    , _caaPositionLeftUnit = Nothing-    , _caaAlignment = Nothing-    , _caaExpandedDimension = Nothing-    , _caaZipFilename = Nothing-    , _caaActionScript3 = Nothing-    , _caaDisplayType = Nothing-    , _caaChildAssetType = Nothing-    , _caaCollapsedSize = Nothing-    , _caaId = Nothing-    , _caaBitRate = Nothing-    , _caaCustomStartTimeValue = Nothing-    , _caaStartTimeType = Nothing-    , _caaDuration = Nothing-    , _caaArtworkType = Nothing-    , _caaHideFlashObjects = Nothing-    , _caaDetectedFeatures = Nothing-    , _caaBackupImageExit = Nothing-    , _caaPosition = Nothing-    , _caaHorizontallyLocked = Nothing-    }---- | zIndex value of an asset. This is a read-only field. Applicable to the--- following creative types: all RICH_MEDIA.Additionally, only applicable--- to assets whose displayType is NOT one of the following types:--- ASSET_DISPLAY_TYPE_INPAGE or ASSET_DISPLAY_TYPE_OVERLAY.-caaZIndex :: Lens' CreativeAsset (Maybe Int32)-caaZIndex-  = lens _caaZIndex (\ s a -> s{_caaZIndex = a}) .-      mapping _Coerce---- | Whether the asset pushes down other content. Applicable to the following--- creative types: all RICH_MEDIA. Additionally, only applicable when the--- asset offsets are 0, the collapsedSize.width matches size.width, and the--- collapsedSize.height is less than size.height.-caaPushdown :: Lens' CreativeAsset (Maybe Bool)-caaPushdown-  = lens _caaPushdown (\ s a -> s{_caaPushdown = a})---- | Detected video duration for video asset. This is a read-only field.--- Applicable to the following creative types: INSTREAM_VIDEO and all--- VPAID.-caaVideoDuration :: Lens' CreativeAsset (Maybe Double)-caaVideoDuration-  = lens _caaVideoDuration-      (\ s a -> s{_caaVideoDuration = a})-      . mapping _Coerce---- | Whether the backup asset is original or changed by the user in DCM.--- Applicable to the following creative types: all RICH_MEDIA.-caaOriginalBackup :: Lens' CreativeAsset (Maybe Bool)-caaOriginalBackup-  = lens _caaOriginalBackup-      (\ s a -> s{_caaOriginalBackup = a})---- | Window mode options for flash assets. Applicable to the following--- creative types: FLASH_INPAGE, RICH_MEDIA_EXPANDING,--- RICH_MEDIA_IM_EXPAND, RICH_MEDIA_INPAGE, and RICH_MEDIA_INPAGE_FLOATING.-caaWindowMode :: Lens' CreativeAsset (Maybe CreativeAssetWindowMode)-caaWindowMode-  = lens _caaWindowMode-      (\ s a -> s{_caaWindowMode = a})---- | Flash version of the asset. This is a read-only field. Applicable to the--- following creative types: FLASH_INPAGE, ENHANCED_BANNER, all RICH_MEDIA,--- and all VPAID.-caaFlashVersion :: Lens' CreativeAsset (Maybe Int32)-caaFlashVersion-  = lens _caaFlashVersion-      (\ s a -> s{_caaFlashVersion = a})-      . mapping _Coerce---- | Pushdown duration in seconds for an asset. Must be between 0 and 9.99.--- Applicable to the following creative types: all RICH_MEDIA.Additionally,--- only applicable when the asset pushdown field is true, the offsets are--- 0, the collapsedSize.width matches size.width, and the--- collapsedSize.height is less than size.height.-caaPushdownDuration :: Lens' CreativeAsset (Maybe Double)-caaPushdownDuration-  = lens _caaPushdownDuration-      (\ s a -> s{_caaPushdownDuration = a})-      . mapping _Coerce---- | Size associated with this creative asset. This is a required field when--- applicable; however for IMAGE and FLASH_INPAGE creatives, if left blank,--- this field will be automatically set using the actual size of the--- associated image asset. Applicable to the following creative types:--- ENHANCED_BANNER, ENHANCED_IMAGE, FLASH_INPAGE, HTML5_BANNER, IMAGE, and--- all RICH_MEDIA.-caaSize :: Lens' CreativeAsset (Maybe Size)-caaSize = lens _caaSize (\ s a -> s{_caaSize = a})---- | Whether the asset is vertically locked. This is a read-only field.--- Applicable to the following creative types: all RICH_MEDIA.-caaVerticallyLocked :: Lens' CreativeAsset (Maybe Bool)-caaVerticallyLocked-  = lens _caaVerticallyLocked-      (\ s a -> s{_caaVerticallyLocked = a})---- | Offset position for an asset in collapsed mode. This is a read-only--- field. Applicable to the following creative types: all RICH_MEDIA and--- all VPAID. Additionally, only applicable to assets whose displayType is--- ASSET_DISPLAY_TYPE_EXPANDING or ASSET_DISPLAY_TYPE_PEEL_DOWN.-caaOffSet :: Lens' CreativeAsset (Maybe OffSetPosition)-caaOffSet-  = lens _caaOffSet (\ s a -> s{_caaOffSet = a})---- | Streaming URL for video asset. This is a read-only field. Applicable to--- the following creative types: INSTREAM_VIDEO and all VPAID.-caaStreamingServingURL :: Lens' CreativeAsset (Maybe Text)-caaStreamingServingURL-  = lens _caaStreamingServingURL-      (\ s a -> s{_caaStreamingServingURL = a})---- | Size of zip file. This is a read-only field. Applicable to the following--- creative types: HTML5_BANNER.-caaZipFilesize :: Lens' CreativeAsset (Maybe Text)-caaZipFilesize-  = lens _caaZipFilesize-      (\ s a -> s{_caaZipFilesize = a})---- | Whether the asset is transparent. Applicable to the following creative--- types: all RICH_MEDIA. Additionally, only applicable to HTML5 assets.-caaTransparency :: Lens' CreativeAsset (Maybe Bool)-caaTransparency-  = lens _caaTransparency-      (\ s a -> s{_caaTransparency = a})---- | Whether to hide selection boxes flag for an asset. Applicable to the--- following creative types: all RICH_MEDIA.-caaHideSelectionBoxes :: Lens' CreativeAsset (Maybe Bool)-caaHideSelectionBoxes-  = lens _caaHideSelectionBoxes-      (\ s a -> s{_caaHideSelectionBoxes = a})---- | Whether the asset is SSL-compliant. This is a read-only field.--- Applicable to all but the following creative types: all REDIRECT and--- TRACKING_TEXT.-caaSSLCompliant :: Lens' CreativeAsset (Maybe Bool)-caaSSLCompliant-  = lens _caaSSLCompliant-      (\ s a -> s{_caaSSLCompliant = a})---- | File size associated with this creative asset. This is a read-only--- field. Applicable to all but the following creative types: all REDIRECT--- and TRACKING_TEXT.-caaFileSize :: Lens' CreativeAsset (Maybe Int64)-caaFileSize-  = lens _caaFileSize (\ s a -> s{_caaFileSize = a}) .-      mapping _Coerce---- | Identifier of this asset. This is the same identifier returned during--- creative asset insert operation. This is a required field. Applicable to--- all but the following creative types: all REDIRECT and TRACKING_TEXT.-caaAssetIdentifier :: Lens' CreativeAsset (Maybe CreativeAssetId)-caaAssetIdentifier-  = lens _caaAssetIdentifier-      (\ s a -> s{_caaAssetIdentifier = a})---- | Duration type for which an asset will be displayed. Applicable to the--- following creative types: all RICH_MEDIA.-caaDurationType :: Lens' CreativeAsset (Maybe CreativeAssetDurationType)-caaDurationType-  = lens _caaDurationType-      (\ s a -> s{_caaDurationType = a})---- | Progressive URL for video asset. This is a read-only field. Applicable--- to the following creative types: INSTREAM_VIDEO and all VPAID.-caaProgressiveServingURL :: Lens' CreativeAsset (Maybe Text)-caaProgressiveServingURL-  = lens _caaProgressiveServingURL-      (\ s a -> s{_caaProgressiveServingURL = a})---- | Whether the video asset is active. This is a read-only field for--- VPAID_NON_LINEAR assets. Applicable to the following creative types:--- INSTREAM_VIDEO and all VPAID.-caaActive :: Lens' CreativeAsset (Maybe Bool)-caaActive-  = lens _caaActive (\ s a -> s{_caaActive = a})---- | Role of the asset in relation to creative. Applicable to all but the--- following creative types: all REDIRECT and TRACKING_TEXT. This is a--- required field. PRIMARY applies to ENHANCED_BANNER, FLASH_INPAGE,--- HTML5_BANNER, IMAGE, IMAGE_GALLERY, all RICH_MEDIA (which may contain--- multiple primary assets), and all VPAID creatives. BACKUP_IMAGE applies--- to ENHANCED_BANNER, FLASH_INPAGE, HTML5_BANNER, all RICH_MEDIA, and all--- VPAID creatives. ADDITIONAL_IMAGE and ADDITIONAL_FLASH apply to--- FLASH_INPAGE creatives. OTHER refers to assets from sources other than--- DCM, such as Studio uploaded assets, applicable to all RICH_MEDIA and--- all VPAID creatives. PARENT_VIDEO refers to videos uploaded by the user--- in DCM and is applicable to INSTREAM_VIDEO and VPAID_LINEAR creatives.--- TRANSCODED_VIDEO refers to videos transcoded by DCM from PARENT_VIDEO--- assets and is applicable to INSTREAM_VIDEO and VPAID_LINEAR creatives.--- ALTERNATE_VIDEO refers to the DCM representation of child asset videos--- from Studio, and is applicable to VPAID_LINEAR creatives. These cannot--- be added or removed within DCM. For VPAID_LINEAR creatives,--- PARENT_VIDEO, TRANSCODED_VIDEO and ALTERNATE_VIDEO assets that are--- marked active serve as backup in case the VPAID creative cannot be--- served. Only PARENT_VIDEO assets can be added or removed for an--- INSTREAM_VIDEO or VPAID_LINEAR creative.-caaRole :: Lens' CreativeAsset (Maybe CreativeAssetRole)-caaRole = lens _caaRole (\ s a -> s{_caaRole = a})---- | Detected MIME type for video asset. This is a read-only field.--- Applicable to the following creative types: INSTREAM_VIDEO and all--- VPAID.-caaMimeType :: Lens' CreativeAsset (Maybe Text)-caaMimeType-  = lens _caaMimeType (\ s a -> s{_caaMimeType = a})---- | Offset top unit for an asset. This is a read-only field if the asset--- displayType is ASSET_DISPLAY_TYPE_OVERLAY. Applicable to the following--- creative types: all RICH_MEDIA.-caaPositionTopUnit :: Lens' CreativeAsset (Maybe CreativeAssetPositionTopUnit)-caaPositionTopUnit-  = lens _caaPositionTopUnit-      (\ s a -> s{_caaPositionTopUnit = a})---- | Offset left unit for an asset. This is a read-only field. Applicable to--- the following creative types: all RICH_MEDIA.-caaPositionLeftUnit :: Lens' CreativeAsset (Maybe CreativeAssetPositionLeftUnit)-caaPositionLeftUnit-  = lens _caaPositionLeftUnit-      (\ s a -> s{_caaPositionLeftUnit = a})---- | Possible alignments for an asset. This is a read-only field. Applicable--- to the following creative types: RICH_MEDIA_MULTI_FLOATING.-caaAlignment :: Lens' CreativeAsset (Maybe CreativeAssetAlignment)-caaAlignment-  = lens _caaAlignment (\ s a -> s{_caaAlignment = a})---- | Detected expanded dimension for video asset. This is a read-only field.--- Applicable to the following creative types: INSTREAM_VIDEO and all--- VPAID.-caaExpandedDimension :: Lens' CreativeAsset (Maybe Size)-caaExpandedDimension-  = lens _caaExpandedDimension-      (\ s a -> s{_caaExpandedDimension = a})---- | File name of zip file. This is a read-only field. Applicable to the--- following creative types: HTML5_BANNER.-caaZipFilename :: Lens' CreativeAsset (Maybe Text)-caaZipFilename-  = lens _caaZipFilename-      (\ s a -> s{_caaZipFilename = a})---- | Whether ActionScript3 is enabled for the flash asset. This is a--- read-only field. Applicable to the following creative types:--- FLASH_INPAGE and ENHANCED_BANNER.-caaActionScript3 :: Lens' CreativeAsset (Maybe Bool)-caaActionScript3-  = lens _caaActionScript3-      (\ s a -> s{_caaActionScript3 = a})---- | Type of rich media asset. This is a read-only field. Applicable to the--- following creative types: all RICH_MEDIA.-caaDisplayType :: Lens' CreativeAsset (Maybe CreativeAssetDisplayType)-caaDisplayType-  = lens _caaDisplayType-      (\ s a -> s{_caaDisplayType = a})---- | Rich media child asset type. This is a read-only field. Applicable to--- the following creative types: all VPAID.-caaChildAssetType :: Lens' CreativeAsset (Maybe CreativeAssetChildAssetType)-caaChildAssetType-  = lens _caaChildAssetType-      (\ s a -> s{_caaChildAssetType = a})---- | Size of an asset when collapsed. This is a read-only field. Applicable--- to the following creative types: all RICH_MEDIA and all VPAID.--- Additionally, applicable to assets whose displayType is--- ASSET_DISPLAY_TYPE_EXPANDING or ASSET_DISPLAY_TYPE_PEEL_DOWN.-caaCollapsedSize :: Lens' CreativeAsset (Maybe Size)-caaCollapsedSize-  = lens _caaCollapsedSize-      (\ s a -> s{_caaCollapsedSize = a})---- | Numeric ID of this creative asset. This is a required field and should--- not be modified. Applicable to all but the following creative types: all--- REDIRECT and TRACKING_TEXT.-caaId :: Lens' CreativeAsset (Maybe Int64)-caaId-  = lens _caaId (\ s a -> s{_caaId = a}) .-      mapping _Coerce---- | Detected bit-rate for video asset. This is a read-only field. Applicable--- to the following creative types: INSTREAM_VIDEO and all VPAID.-caaBitRate :: Lens' CreativeAsset (Maybe Int32)-caaBitRate-  = lens _caaBitRate (\ s a -> s{_caaBitRate = a}) .-      mapping _Coerce---- | Custom start time in seconds for making the asset visible. Applicable to--- the following creative types: all RICH_MEDIA.-caaCustomStartTimeValue :: Lens' CreativeAsset (Maybe Int32)-caaCustomStartTimeValue-  = lens _caaCustomStartTimeValue-      (\ s a -> s{_caaCustomStartTimeValue = a})-      . mapping _Coerce---- | Initial wait time type before making the asset visible. Applicable to--- the following creative types: all RICH_MEDIA.-caaStartTimeType :: Lens' CreativeAsset (Maybe CreativeAssetStartTimeType)-caaStartTimeType-  = lens _caaStartTimeType-      (\ s a -> s{_caaStartTimeType = a})---- | Duration in seconds for which an asset will be displayed. Applicable to--- the following creative types: INSTREAM_VIDEO and VPAID_LINEAR.-caaDuration :: Lens' CreativeAsset (Maybe Int32)-caaDuration-  = lens _caaDuration (\ s a -> s{_caaDuration = a}) .-      mapping _Coerce---- | Artwork type of rich media creative. This is a read-only field.--- Applicable to the following creative types: all RICH_MEDIA.-caaArtworkType :: Lens' CreativeAsset (Maybe CreativeAssetArtworkType)-caaArtworkType-  = lens _caaArtworkType-      (\ s a -> s{_caaArtworkType = a})---- | Whether to hide Flash objects flag for an asset. Applicable to the--- following creative types: all RICH_MEDIA.-caaHideFlashObjects :: Lens' CreativeAsset (Maybe Bool)-caaHideFlashObjects-  = lens _caaHideFlashObjects-      (\ s a -> s{_caaHideFlashObjects = a})---- | List of feature dependencies for the creative asset that are detected by--- DCM. Feature dependencies are features that a browser must be able to--- support in order to render your HTML5 creative correctly. This is a--- read-only, auto-generated field. Applicable to the following creative--- types: ENHANCED_BANNER and HTML5_BANNER.-caaDetectedFeatures :: Lens' CreativeAsset [CreativeAssetDetectedFeaturesItem]-caaDetectedFeatures-  = lens _caaDetectedFeatures-      (\ s a -> s{_caaDetectedFeatures = a})-      . _Default-      . _Coerce---- | Exit event configured for the backup image. Applicable to the following--- creative types: all RICH_MEDIA.-caaBackupImageExit :: Lens' CreativeAsset (Maybe CreativeCustomEvent)-caaBackupImageExit-  = lens _caaBackupImageExit-      (\ s a -> s{_caaBackupImageExit = a})---- | Offset position for an asset. Applicable to the following creative--- types: all RICH_MEDIA.-caaPosition :: Lens' CreativeAsset (Maybe OffSetPosition)-caaPosition-  = lens _caaPosition (\ s a -> s{_caaPosition = a})---- | Whether the asset is horizontally locked. This is a read-only field.--- Applicable to the following creative types: all RICH_MEDIA.-caaHorizontallyLocked :: Lens' CreativeAsset (Maybe Bool)-caaHorizontallyLocked-  = lens _caaHorizontallyLocked-      (\ s a -> s{_caaHorizontallyLocked = a})--instance FromJSON CreativeAsset where-        parseJSON-          = withObject "CreativeAsset"-              (\ o ->-                 CreativeAsset <$>-                   (o .:? "zIndex") <*> (o .:? "pushdown") <*>-                     (o .:? "videoDuration")-                     <*> (o .:? "originalBackup")-                     <*> (o .:? "windowMode")-                     <*> (o .:? "flashVersion")-                     <*> (o .:? "pushdownDuration")-                     <*> (o .:? "size")-                     <*> (o .:? "verticallyLocked")-                     <*> (o .:? "offset")-                     <*> (o .:? "streamingServingUrl")-                     <*> (o .:? "zipFilesize")-                     <*> (o .:? "transparency")-                     <*> (o .:? "hideSelectionBoxes")-                     <*> (o .:? "sslCompliant")-                     <*> (o .:? "fileSize")-                     <*> (o .:? "assetIdentifier")-                     <*> (o .:? "durationType")-                     <*> (o .:? "progressiveServingUrl")-                     <*> (o .:? "active")-                     <*> (o .:? "role")-                     <*> (o .:? "mimeType")-                     <*> (o .:? "positionTopUnit")-                     <*> (o .:? "positionLeftUnit")-                     <*> (o .:? "alignment")-                     <*> (o .:? "expandedDimension")-                     <*> (o .:? "zipFilename")-                     <*> (o .:? "actionScript3")-                     <*> (o .:? "displayType")-                     <*> (o .:? "childAssetType")-                     <*> (o .:? "collapsedSize")-                     <*> (o .:? "id")-                     <*> (o .:? "bitRate")-                     <*> (o .:? "customStartTimeValue")-                     <*> (o .:? "startTimeType")-                     <*> (o .:? "duration")-                     <*> (o .:? "artworkType")-                     <*> (o .:? "hideFlashObjects")-                     <*> (o .:? "detectedFeatures" .!= mempty)-                     <*> (o .:? "backupImageExit")-                     <*> (o .:? "position")-                     <*> (o .:? "horizontallyLocked"))--instance ToJSON CreativeAsset where-        toJSON CreativeAsset{..}-          = object-              (catMaybes-                 [("zIndex" .=) <$> _caaZIndex,-                  ("pushdown" .=) <$> _caaPushdown,-                  ("videoDuration" .=) <$> _caaVideoDuration,-                  ("originalBackup" .=) <$> _caaOriginalBackup,-                  ("windowMode" .=) <$> _caaWindowMode,-                  ("flashVersion" .=) <$> _caaFlashVersion,-                  ("pushdownDuration" .=) <$> _caaPushdownDuration,-                  ("size" .=) <$> _caaSize,-                  ("verticallyLocked" .=) <$> _caaVerticallyLocked,-                  ("offset" .=) <$> _caaOffSet,-                  ("streamingServingUrl" .=) <$>-                    _caaStreamingServingURL,-                  ("zipFilesize" .=) <$> _caaZipFilesize,-                  ("transparency" .=) <$> _caaTransparency,-                  ("hideSelectionBoxes" .=) <$> _caaHideSelectionBoxes,-                  ("sslCompliant" .=) <$> _caaSSLCompliant,-                  ("fileSize" .=) <$> _caaFileSize,-                  ("assetIdentifier" .=) <$> _caaAssetIdentifier,-                  ("durationType" .=) <$> _caaDurationType,-                  ("progressiveServingUrl" .=) <$>-                    _caaProgressiveServingURL,-                  ("active" .=) <$> _caaActive,-                  ("role" .=) <$> _caaRole,-                  ("mimeType" .=) <$> _caaMimeType,-                  ("positionTopUnit" .=) <$> _caaPositionTopUnit,-                  ("positionLeftUnit" .=) <$> _caaPositionLeftUnit,-                  ("alignment" .=) <$> _caaAlignment,-                  ("expandedDimension" .=) <$> _caaExpandedDimension,-                  ("zipFilename" .=) <$> _caaZipFilename,-                  ("actionScript3" .=) <$> _caaActionScript3,-                  ("displayType" .=) <$> _caaDisplayType,-                  ("childAssetType" .=) <$> _caaChildAssetType,-                  ("collapsedSize" .=) <$> _caaCollapsedSize,-                  ("id" .=) <$> _caaId, ("bitRate" .=) <$> _caaBitRate,-                  ("customStartTimeValue" .=) <$>-                    _caaCustomStartTimeValue,-                  ("startTimeType" .=) <$> _caaStartTimeType,-                  ("duration" .=) <$> _caaDuration,-                  ("artworkType" .=) <$> _caaArtworkType,-                  ("hideFlashObjects" .=) <$> _caaHideFlashObjects,-                  ("detectedFeatures" .=) <$> _caaDetectedFeatures,-                  ("backupImageExit" .=) <$> _caaBackupImageExit,-                  ("position" .=) <$> _caaPosition,-                  ("horizontallyLocked" .=) <$>-                    _caaHorizontallyLocked])---- | Placement List Response------ /See:/ 'placementsListResponse' smart constructor.-data PlacementsListResponse = PlacementsListResponse-    { _plaNextPageToken :: !(Maybe Text)-    , _plaKind          :: !Text-    , _plaPlacements    :: !(Maybe [Placement])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'PlacementsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'plaNextPageToken'------ * 'plaKind'------ * 'plaPlacements'-placementsListResponse-    :: PlacementsListResponse-placementsListResponse =-    PlacementsListResponse-    { _plaNextPageToken = Nothing-    , _plaKind = "dfareporting#placementsListResponse"-    , _plaPlacements = Nothing-    }---- | Pagination token to be used for the next list operation.-plaNextPageToken :: Lens' PlacementsListResponse (Maybe Text)-plaNextPageToken-  = lens _plaNextPageToken-      (\ s a -> s{_plaNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#placementsListResponse\".-plaKind :: Lens' PlacementsListResponse Text-plaKind = lens _plaKind (\ s a -> s{_plaKind = a})---- | Placement collection.-plaPlacements :: Lens' PlacementsListResponse [Placement]-plaPlacements-  = lens _plaPlacements-      (\ s a -> s{_plaPlacements = a})-      . _Default-      . _Coerce--instance FromJSON PlacementsListResponse where-        parseJSON-          = withObject "PlacementsListResponse"-              (\ o ->-                 PlacementsListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!=-                        "dfareporting#placementsListResponse")-                     <*> (o .:? "placements" .!= mempty))--instance ToJSON PlacementsListResponse where-        toJSON PlacementsListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _plaNextPageToken,-                  Just ("kind" .= _plaKind),-                  ("placements" .=) <$> _plaPlacements])---- | The report\'s schedule. Can only be set if the report\'s \'dateRange\'--- is a relative date range and the relative date range is not \"TODAY\".------ /See:/ 'reportSchedule' smart constructor.-data ReportSchedule = ReportSchedule-    { _rsEvery             :: !(Maybe (Textual Int32))-    , _rsActive            :: !(Maybe Bool)-    , _rsRepeats           :: !(Maybe Text)-    , _rsStartDate         :: !(Maybe Date')-    , _rsExpirationDate    :: !(Maybe Date')-    , _rsRunsOnDayOfMonth  :: !(Maybe ReportScheduleRunsOnDayOfMonth)-    , _rsRepeatsOnWeekDays :: !(Maybe [ReportScheduleRepeatsOnWeekDaysItem])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ReportSchedule' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rsEvery'------ * 'rsActive'------ * 'rsRepeats'------ * 'rsStartDate'------ * 'rsExpirationDate'------ * 'rsRunsOnDayOfMonth'------ * 'rsRepeatsOnWeekDays'-reportSchedule-    :: ReportSchedule-reportSchedule =-    ReportSchedule-    { _rsEvery = Nothing-    , _rsActive = Nothing-    , _rsRepeats = Nothing-    , _rsStartDate = Nothing-    , _rsExpirationDate = Nothing-    , _rsRunsOnDayOfMonth = Nothing-    , _rsRepeatsOnWeekDays = Nothing-    }---- | Defines every how many days, weeks or months the report should be run.--- Needs to be set when \"repeats\" is either \"DAILY\", \"WEEKLY\" or--- \"MONTHLY\".-rsEvery :: Lens' ReportSchedule (Maybe Int32)-rsEvery-  = lens _rsEvery (\ s a -> s{_rsEvery = a}) .-      mapping _Coerce---- | Whether the schedule is active or not. Must be set to either true or--- false.-rsActive :: Lens' ReportSchedule (Maybe Bool)-rsActive = lens _rsActive (\ s a -> s{_rsActive = a})---- | The interval for which the report is repeated. Note: - \"DAILY\" also--- requires field \"every\" to be set. - \"WEEKLY\" also requires fields--- \"every\" and \"repeatsOnWeekDays\" to be set. - \"MONTHLY\" also--- requires fields \"every\" and \"runsOnDayOfMonth\" to be set.-rsRepeats :: Lens' ReportSchedule (Maybe Text)-rsRepeats-  = lens _rsRepeats (\ s a -> s{_rsRepeats = a})---- | Start date of date range for which scheduled reports should be run.-rsStartDate :: Lens' ReportSchedule (Maybe Day)-rsStartDate-  = lens _rsStartDate (\ s a -> s{_rsStartDate = a}) .-      mapping _Date---- | The expiration date when the scheduled report stops running.-rsExpirationDate :: Lens' ReportSchedule (Maybe Day)-rsExpirationDate-  = lens _rsExpirationDate-      (\ s a -> s{_rsExpirationDate = a})-      . mapping _Date---- | Enum to define for \"MONTHLY\" scheduled reports whether reports should--- be repeated on the same day of the month as \"startDate\" or the same--- day of the week of the month. Example: If \'startDate\' is Monday, April--- 2nd 2012 (2012-04-02), \"DAY_OF_MONTH\" would run subsequent reports on--- the 2nd of every Month, and \"WEEK_OF_MONTH\" would run subsequent--- reports on the first Monday of the month.-rsRunsOnDayOfMonth :: Lens' ReportSchedule (Maybe ReportScheduleRunsOnDayOfMonth)-rsRunsOnDayOfMonth-  = lens _rsRunsOnDayOfMonth-      (\ s a -> s{_rsRunsOnDayOfMonth = a})---- | List of week days \"WEEKLY\" on which scheduled reports should run.-rsRepeatsOnWeekDays :: Lens' ReportSchedule [ReportScheduleRepeatsOnWeekDaysItem]-rsRepeatsOnWeekDays-  = lens _rsRepeatsOnWeekDays-      (\ s a -> s{_rsRepeatsOnWeekDays = a})-      . _Default-      . _Coerce--instance FromJSON ReportSchedule where-        parseJSON-          = withObject "ReportSchedule"-              (\ o ->-                 ReportSchedule <$>-                   (o .:? "every") <*> (o .:? "active") <*>-                     (o .:? "repeats")-                     <*> (o .:? "startDate")-                     <*> (o .:? "expirationDate")-                     <*> (o .:? "runsOnDayOfMonth")-                     <*> (o .:? "repeatsOnWeekDays" .!= mempty))--instance ToJSON ReportSchedule where-        toJSON ReportSchedule{..}-          = object-              (catMaybes-                 [("every" .=) <$> _rsEvery,-                  ("active" .=) <$> _rsActive,-                  ("repeats" .=) <$> _rsRepeats,-                  ("startDate" .=) <$> _rsStartDate,-                  ("expirationDate" .=) <$> _rsExpirationDate,-                  ("runsOnDayOfMonth" .=) <$> _rsRunsOnDayOfMonth,-                  ("repeatsOnWeekDays" .=) <$> _rsRepeatsOnWeekDays])---- | The report criteria for a report of type \"PATH_TO_CONVERSION\".------ /See:/ 'reportPathToConversionCriteria' smart constructor.-data ReportPathToConversionCriteria = ReportPathToConversionCriteria-    { _rptccReportProperties          :: !(Maybe ReportPathToConversionCriteriaReportProperties)-    , _rptccMetricNames               :: !(Maybe [Text])-    , _rptccCustomRichMediaEvents     :: !(Maybe [DimensionValue])-    , _rptccDateRange                 :: !(Maybe DateRange)-    , _rptccConversionDimensions      :: !(Maybe [SortedDimension])-    , _rptccCustomFloodlightVariables :: !(Maybe [SortedDimension])-    , _rptccFloodlightConfigId        :: !(Maybe DimensionValue)-    , _rptccActivityFilters           :: !(Maybe [DimensionValue])-    , _rptccPerInteractionDimensions  :: !(Maybe [SortedDimension])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ReportPathToConversionCriteria' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rptccReportProperties'------ * 'rptccMetricNames'------ * 'rptccCustomRichMediaEvents'------ * 'rptccDateRange'------ * 'rptccConversionDimensions'------ * 'rptccCustomFloodlightVariables'------ * 'rptccFloodlightConfigId'------ * 'rptccActivityFilters'------ * 'rptccPerInteractionDimensions'-reportPathToConversionCriteria-    :: ReportPathToConversionCriteria-reportPathToConversionCriteria =-    ReportPathToConversionCriteria-    { _rptccReportProperties = Nothing-    , _rptccMetricNames = Nothing-    , _rptccCustomRichMediaEvents = Nothing-    , _rptccDateRange = Nothing-    , _rptccConversionDimensions = Nothing-    , _rptccCustomFloodlightVariables = Nothing-    , _rptccFloodlightConfigId = Nothing-    , _rptccActivityFilters = Nothing-    , _rptccPerInteractionDimensions = Nothing-    }---- | The properties of the report.-rptccReportProperties :: Lens' ReportPathToConversionCriteria (Maybe ReportPathToConversionCriteriaReportProperties)-rptccReportProperties-  = lens _rptccReportProperties-      (\ s a -> s{_rptccReportProperties = a})---- | The list of names of metrics the report should include.-rptccMetricNames :: Lens' ReportPathToConversionCriteria [Text]-rptccMetricNames-  = lens _rptccMetricNames-      (\ s a -> s{_rptccMetricNames = a})-      . _Default-      . _Coerce---- | The list of custom rich media events to include.-rptccCustomRichMediaEvents :: Lens' ReportPathToConversionCriteria [DimensionValue]-rptccCustomRichMediaEvents-  = lens _rptccCustomRichMediaEvents-      (\ s a -> s{_rptccCustomRichMediaEvents = a})-      . _Default-      . _Coerce---- | The date range this report should be run for.-rptccDateRange :: Lens' ReportPathToConversionCriteria (Maybe DateRange)-rptccDateRange-  = lens _rptccDateRange-      (\ s a -> s{_rptccDateRange = a})---- | The list of conversion dimensions the report should include.-rptccConversionDimensions :: Lens' ReportPathToConversionCriteria [SortedDimension]-rptccConversionDimensions-  = lens _rptccConversionDimensions-      (\ s a -> s{_rptccConversionDimensions = a})-      . _Default-      . _Coerce---- | The list of custom floodlight variables the report should include.-rptccCustomFloodlightVariables :: Lens' ReportPathToConversionCriteria [SortedDimension]-rptccCustomFloodlightVariables-  = lens _rptccCustomFloodlightVariables-      (\ s a -> s{_rptccCustomFloodlightVariables = a})-      . _Default-      . _Coerce---- | The floodlight ID for which to show data in this report. All advertisers--- associated with that ID will automatically be added. The dimension of--- the value needs to be \'dfa:floodlightConfigId\'.-rptccFloodlightConfigId :: Lens' ReportPathToConversionCriteria (Maybe DimensionValue)-rptccFloodlightConfigId-  = lens _rptccFloodlightConfigId-      (\ s a -> s{_rptccFloodlightConfigId = a})---- | The list of \'dfa:activity\' values to filter on.-rptccActivityFilters :: Lens' ReportPathToConversionCriteria [DimensionValue]-rptccActivityFilters-  = lens _rptccActivityFilters-      (\ s a -> s{_rptccActivityFilters = a})-      . _Default-      . _Coerce---- | The list of per interaction dimensions the report should include.-rptccPerInteractionDimensions :: Lens' ReportPathToConversionCriteria [SortedDimension]-rptccPerInteractionDimensions-  = lens _rptccPerInteractionDimensions-      (\ s a -> s{_rptccPerInteractionDimensions = a})-      . _Default-      . _Coerce--instance FromJSON ReportPathToConversionCriteria-         where-        parseJSON-          = withObject "ReportPathToConversionCriteria"-              (\ o ->-                 ReportPathToConversionCriteria <$>-                   (o .:? "reportProperties") <*>-                     (o .:? "metricNames" .!= mempty)-                     <*> (o .:? "customRichMediaEvents" .!= mempty)-                     <*> (o .:? "dateRange")-                     <*> (o .:? "conversionDimensions" .!= mempty)-                     <*> (o .:? "customFloodlightVariables" .!= mempty)-                     <*> (o .:? "floodlightConfigId")-                     <*> (o .:? "activityFilters" .!= mempty)-                     <*> (o .:? "perInteractionDimensions" .!= mempty))--instance ToJSON ReportPathToConversionCriteria where-        toJSON ReportPathToConversionCriteria{..}-          = object-              (catMaybes-                 [("reportProperties" .=) <$> _rptccReportProperties,-                  ("metricNames" .=) <$> _rptccMetricNames,-                  ("customRichMediaEvents" .=) <$>-                    _rptccCustomRichMediaEvents,-                  ("dateRange" .=) <$> _rptccDateRange,-                  ("conversionDimensions" .=) <$>-                    _rptccConversionDimensions,-                  ("customFloodlightVariables" .=) <$>-                    _rptccCustomFloodlightVariables,-                  ("floodlightConfigId" .=) <$>-                    _rptccFloodlightConfigId,-                  ("activityFilters" .=) <$> _rptccActivityFilters,-                  ("perInteractionDimensions" .=) <$>-                    _rptccPerInteractionDimensions])---- | Metro List Response------ /See:/ 'metrosListResponse' smart constructor.-data MetrosListResponse = MetrosListResponse-    { _mlrKind   :: !Text-    , _mlrMetros :: !(Maybe [Metro])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'MetrosListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mlrKind'------ * 'mlrMetros'-metrosListResponse-    :: MetrosListResponse-metrosListResponse =-    MetrosListResponse-    { _mlrKind = "dfareporting#metrosListResponse"-    , _mlrMetros = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#metrosListResponse\".-mlrKind :: Lens' MetrosListResponse Text-mlrKind = lens _mlrKind (\ s a -> s{_mlrKind = a})---- | Metro collection.-mlrMetros :: Lens' MetrosListResponse [Metro]-mlrMetros-  = lens _mlrMetros (\ s a -> s{_mlrMetros = a}) .-      _Default-      . _Coerce--instance FromJSON MetrosListResponse where-        parseJSON-          = withObject "MetrosListResponse"-              (\ o ->-                 MetrosListResponse <$>-                   (o .:? "kind" .!= "dfareporting#metrosListResponse")-                     <*> (o .:? "metros" .!= mempty))--instance ToJSON MetrosListResponse where-        toJSON MetrosListResponse{..}-          = object-              (catMaybes-                 [Just ("kind" .= _mlrKind),-                  ("metros" .=) <$> _mlrMetros])---- | Order document List Response------ /See:/ 'orderDocumentsListResponse' smart constructor.-data OrderDocumentsListResponse = OrderDocumentsListResponse-    { _odlrNextPageToken  :: !(Maybe Text)-    , _odlrKind           :: !Text-    , _odlrOrderDocuments :: !(Maybe [OrderDocument])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'OrderDocumentsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'odlrNextPageToken'------ * 'odlrKind'------ * 'odlrOrderDocuments'-orderDocumentsListResponse-    :: OrderDocumentsListResponse-orderDocumentsListResponse =-    OrderDocumentsListResponse-    { _odlrNextPageToken = Nothing-    , _odlrKind = "dfareporting#orderDocumentsListResponse"-    , _odlrOrderDocuments = Nothing-    }---- | Pagination token to be used for the next list operation.-odlrNextPageToken :: Lens' OrderDocumentsListResponse (Maybe Text)-odlrNextPageToken-  = lens _odlrNextPageToken-      (\ s a -> s{_odlrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#orderDocumentsListResponse\".-odlrKind :: Lens' OrderDocumentsListResponse Text-odlrKind = lens _odlrKind (\ s a -> s{_odlrKind = a})---- | Order document collection-odlrOrderDocuments :: Lens' OrderDocumentsListResponse [OrderDocument]-odlrOrderDocuments-  = lens _odlrOrderDocuments-      (\ s a -> s{_odlrOrderDocuments = a})-      . _Default-      . _Coerce--instance FromJSON OrderDocumentsListResponse where-        parseJSON-          = withObject "OrderDocumentsListResponse"-              (\ o ->-                 OrderDocumentsListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!=-                        "dfareporting#orderDocumentsListResponse")-                     <*> (o .:? "orderDocuments" .!= mempty))--instance ToJSON OrderDocumentsListResponse where-        toJSON OrderDocumentsListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _odlrNextPageToken,-                  Just ("kind" .= _odlrKind),-                  ("orderDocuments" .=) <$> _odlrOrderDocuments])---- | Represents a recipient.------ /See:/ 'recipient' smart constructor.-data Recipient = Recipient-    { _recEmail        :: !(Maybe Text)-    , _recKind         :: !Text-    , _recDeliveryType :: !(Maybe RecipientDeliveryType)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'Recipient' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'recEmail'------ * 'recKind'------ * 'recDeliveryType'-recipient-    :: Recipient-recipient =-    Recipient-    { _recEmail = Nothing-    , _recKind = "dfareporting#recipient"-    , _recDeliveryType = Nothing-    }---- | The email address of the recipient.-recEmail :: Lens' Recipient (Maybe Text)-recEmail = lens _recEmail (\ s a -> s{_recEmail = a})---- | The kind of resource this is, in this case dfareporting#recipient.-recKind :: Lens' Recipient Text-recKind = lens _recKind (\ s a -> s{_recKind = a})---- | The delivery type for the recipient.-recDeliveryType :: Lens' Recipient (Maybe RecipientDeliveryType)-recDeliveryType-  = lens _recDeliveryType-      (\ s a -> s{_recDeliveryType = a})--instance FromJSON Recipient where-        parseJSON-          = withObject "Recipient"-              (\ o ->-                 Recipient <$>-                   (o .:? "email") <*>-                     (o .:? "kind" .!= "dfareporting#recipient")-                     <*> (o .:? "deliveryType"))--instance ToJSON Recipient where-        toJSON Recipient{..}-          = object-              (catMaybes-                 [("email" .=) <$> _recEmail,-                  Just ("kind" .= _recKind),-                  ("deliveryType" .=) <$> _recDeliveryType])---- | Contains properties of a site.------ /See:/ 'site' smart constructor.-data Site = Site-    { _ssKind                          :: !Text-    , _ssKeyName                       :: !(Maybe Text)-    , _ssSiteContacts                  :: !(Maybe [SiteContact])-    , _ssSiteSettings                  :: !(Maybe SiteSettings)-    , _ssIdDimensionValue              :: !(Maybe DimensionValue)-    , _ssDirectorySiteIdDimensionValue :: !(Maybe DimensionValue)-    , _ssAccountId                     :: !(Maybe (Textual Int64))-    , _ssName                          :: !(Maybe Text)-    , _ssDirectorySiteId               :: !(Maybe (Textual Int64))-    , _ssId                            :: !(Maybe (Textual Int64))-    , _ssSubAccountId                  :: !(Maybe (Textual Int64))-    , _ssApproved                      :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'Site' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ssKind'------ * 'ssKeyName'------ * 'ssSiteContacts'------ * 'ssSiteSettings'------ * 'ssIdDimensionValue'------ * 'ssDirectorySiteIdDimensionValue'------ * 'ssAccountId'------ * 'ssName'------ * 'ssDirectorySiteId'------ * 'ssId'------ * 'ssSubAccountId'------ * 'ssApproved'-site-    :: Site-site =-    Site-    { _ssKind = "dfareporting#site"-    , _ssKeyName = Nothing-    , _ssSiteContacts = Nothing-    , _ssSiteSettings = Nothing-    , _ssIdDimensionValue = Nothing-    , _ssDirectorySiteIdDimensionValue = Nothing-    , _ssAccountId = Nothing-    , _ssName = Nothing-    , _ssDirectorySiteId = Nothing-    , _ssId = Nothing-    , _ssSubAccountId = Nothing-    , _ssApproved = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#site\".-ssKind :: Lens' Site Text-ssKind = lens _ssKind (\ s a -> s{_ssKind = a})---- | Key name of this site. This is a read-only, auto-generated field.-ssKeyName :: Lens' Site (Maybe Text)-ssKeyName-  = lens _ssKeyName (\ s a -> s{_ssKeyName = a})---- | Site contacts.-ssSiteContacts :: Lens' Site [SiteContact]-ssSiteContacts-  = lens _ssSiteContacts-      (\ s a -> s{_ssSiteContacts = a})-      . _Default-      . _Coerce---- | Site-wide settings.-ssSiteSettings :: Lens' Site (Maybe SiteSettings)-ssSiteSettings-  = lens _ssSiteSettings-      (\ s a -> s{_ssSiteSettings = a})---- | Dimension value for the ID of this site. This is a read-only,--- auto-generated field.-ssIdDimensionValue :: Lens' Site (Maybe DimensionValue)-ssIdDimensionValue-  = lens _ssIdDimensionValue-      (\ s a -> s{_ssIdDimensionValue = a})---- | Dimension value for the ID of the directory site. This is a read-only,--- auto-generated field.-ssDirectorySiteIdDimensionValue :: Lens' Site (Maybe DimensionValue)-ssDirectorySiteIdDimensionValue-  = lens _ssDirectorySiteIdDimensionValue-      (\ s a -> s{_ssDirectorySiteIdDimensionValue = a})---- | Account ID of this site. This is a read-only field that can be left--- blank.-ssAccountId :: Lens' Site (Maybe Int64)-ssAccountId-  = lens _ssAccountId (\ s a -> s{_ssAccountId = a}) .-      mapping _Coerce---- | Name of this site.This is a required field. Must be less than 128--- characters long. If this site is under a subaccount, the name must be--- unique among sites of the same subaccount. Otherwise, this site is a--- top-level site, and the name must be unique among top-level sites of the--- same account.-ssName :: Lens' Site (Maybe Text)-ssName = lens _ssName (\ s a -> s{_ssName = a})---- | Directory site associated with this site. This is a required field that--- is read-only after insertion.-ssDirectorySiteId :: Lens' Site (Maybe Int64)-ssDirectorySiteId-  = lens _ssDirectorySiteId-      (\ s a -> s{_ssDirectorySiteId = a})-      . mapping _Coerce---- | ID of this site. This is a read-only, auto-generated field.-ssId :: Lens' Site (Maybe Int64)-ssId-  = lens _ssId (\ s a -> s{_ssId = a}) .-      mapping _Coerce---- | Subaccount ID of this site. This is a read-only field that can be left--- blank.-ssSubAccountId :: Lens' Site (Maybe Int64)-ssSubAccountId-  = lens _ssSubAccountId-      (\ s a -> s{_ssSubAccountId = a})-      . mapping _Coerce---- | Whether this site is approved.-ssApproved :: Lens' Site (Maybe Bool)-ssApproved-  = lens _ssApproved (\ s a -> s{_ssApproved = a})--instance FromJSON Site where-        parseJSON-          = withObject "Site"-              (\ o ->-                 Site <$>-                   (o .:? "kind" .!= "dfareporting#site") <*>-                     (o .:? "keyName")-                     <*> (o .:? "siteContacts" .!= mempty)-                     <*> (o .:? "siteSettings")-                     <*> (o .:? "idDimensionValue")-                     <*> (o .:? "directorySiteIdDimensionValue")-                     <*> (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "directorySiteId")-                     <*> (o .:? "id")-                     <*> (o .:? "subaccountId")-                     <*> (o .:? "approved"))--instance ToJSON Site where-        toJSON Site{..}-          = object-              (catMaybes-                 [Just ("kind" .= _ssKind),-                  ("keyName" .=) <$> _ssKeyName,-                  ("siteContacts" .=) <$> _ssSiteContacts,-                  ("siteSettings" .=) <$> _ssSiteSettings,-                  ("idDimensionValue" .=) <$> _ssIdDimensionValue,-                  ("directorySiteIdDimensionValue" .=) <$>-                    _ssDirectorySiteIdDimensionValue,-                  ("accountId" .=) <$> _ssAccountId,-                  ("name" .=) <$> _ssName,-                  ("directorySiteId" .=) <$> _ssDirectorySiteId,-                  ("id" .=) <$> _ssId,-                  ("subaccountId" .=) <$> _ssSubAccountId,-                  ("approved" .=) <$> _ssApproved])---- | User Defined Variable configuration.------ /See:/ 'userDefinedVariableConfiguration' smart constructor.-data UserDefinedVariableConfiguration = UserDefinedVariableConfiguration-    { _udvcReportName   :: !(Maybe Text)-    , _udvcDataType     :: !(Maybe UserDefinedVariableConfigurationDataType)-    , _udvcVariableType :: !(Maybe UserDefinedVariableConfigurationVariableType)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'UserDefinedVariableConfiguration' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'udvcReportName'------ * 'udvcDataType'------ * 'udvcVariableType'-userDefinedVariableConfiguration-    :: UserDefinedVariableConfiguration-userDefinedVariableConfiguration =-    UserDefinedVariableConfiguration-    { _udvcReportName = Nothing-    , _udvcDataType = Nothing-    , _udvcVariableType = Nothing-    }---- | User-friendly name for the variable which will appear in reports. This--- is a required field, must be less than 64 characters long, and cannot--- contain the following characters: \"\"\<>\".-udvcReportName :: Lens' UserDefinedVariableConfiguration (Maybe Text)-udvcReportName-  = lens _udvcReportName-      (\ s a -> s{_udvcReportName = a})---- | Data type for the variable. This is a required field.-udvcDataType :: Lens' UserDefinedVariableConfiguration (Maybe UserDefinedVariableConfigurationDataType)-udvcDataType-  = lens _udvcDataType (\ s a -> s{_udvcDataType = a})---- | Variable name in the tag. This is a required field.-udvcVariableType :: Lens' UserDefinedVariableConfiguration (Maybe UserDefinedVariableConfigurationVariableType)-udvcVariableType-  = lens _udvcVariableType-      (\ s a -> s{_udvcVariableType = a})--instance FromJSON UserDefinedVariableConfiguration-         where-        parseJSON-          = withObject "UserDefinedVariableConfiguration"-              (\ o ->-                 UserDefinedVariableConfiguration <$>-                   (o .:? "reportName") <*> (o .:? "dataType") <*>-                     (o .:? "variableType"))--instance ToJSON UserDefinedVariableConfiguration-         where-        toJSON UserDefinedVariableConfiguration{..}-          = object-              (catMaybes-                 [("reportName" .=) <$> _udvcReportName,-                  ("dataType" .=) <$> _udvcDataType,-                  ("variableType" .=) <$> _udvcVariableType])---- | The report criteria for a report of type \"CROSS_DIMENSION_REACH\".------ /See:/ 'reportCrossDimensionReachCriteria' smart constructor.-data ReportCrossDimensionReachCriteria = ReportCrossDimensionReachCriteria-    { _rcdrcPivoted            :: !(Maybe Bool)-    , _rcdrcBreakdown          :: !(Maybe [SortedDimension])-    , _rcdrcDimension          :: !(Maybe ReportCrossDimensionReachCriteriaDimension)-    , _rcdrcMetricNames        :: !(Maybe [Text])-    , _rcdrcDimensionFilters   :: !(Maybe [DimensionValue])-    , _rcdrcDateRange          :: !(Maybe DateRange)-    , _rcdrcOverlapMetricNames :: !(Maybe [Text])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ReportCrossDimensionReachCriteria' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rcdrcPivoted'------ * 'rcdrcBreakdown'------ * 'rcdrcDimension'------ * 'rcdrcMetricNames'------ * 'rcdrcDimensionFilters'------ * 'rcdrcDateRange'------ * 'rcdrcOverlapMetricNames'-reportCrossDimensionReachCriteria-    :: ReportCrossDimensionReachCriteria-reportCrossDimensionReachCriteria =-    ReportCrossDimensionReachCriteria-    { _rcdrcPivoted = Nothing-    , _rcdrcBreakdown = Nothing-    , _rcdrcDimension = Nothing-    , _rcdrcMetricNames = Nothing-    , _rcdrcDimensionFilters = Nothing-    , _rcdrcDateRange = Nothing-    , _rcdrcOverlapMetricNames = Nothing-    }---- | Whether the report is pivoted or not. Defaults to true.-rcdrcPivoted :: Lens' ReportCrossDimensionReachCriteria (Maybe Bool)-rcdrcPivoted-  = lens _rcdrcPivoted (\ s a -> s{_rcdrcPivoted = a})---- | The list of dimensions the report should include.-rcdrcBreakdown :: Lens' ReportCrossDimensionReachCriteria [SortedDimension]-rcdrcBreakdown-  = lens _rcdrcBreakdown-      (\ s a -> s{_rcdrcBreakdown = a})-      . _Default-      . _Coerce---- | The dimension option.-rcdrcDimension :: Lens' ReportCrossDimensionReachCriteria (Maybe ReportCrossDimensionReachCriteriaDimension)-rcdrcDimension-  = lens _rcdrcDimension-      (\ s a -> s{_rcdrcDimension = a})---- | The list of names of metrics the report should include.-rcdrcMetricNames :: Lens' ReportCrossDimensionReachCriteria [Text]-rcdrcMetricNames-  = lens _rcdrcMetricNames-      (\ s a -> s{_rcdrcMetricNames = a})-      . _Default-      . _Coerce---- | The list of filters on which dimensions are filtered.-rcdrcDimensionFilters :: Lens' ReportCrossDimensionReachCriteria [DimensionValue]-rcdrcDimensionFilters-  = lens _rcdrcDimensionFilters-      (\ s a -> s{_rcdrcDimensionFilters = a})-      . _Default-      . _Coerce---- | The date range this report should be run for.-rcdrcDateRange :: Lens' ReportCrossDimensionReachCriteria (Maybe DateRange)-rcdrcDateRange-  = lens _rcdrcDateRange-      (\ s a -> s{_rcdrcDateRange = a})---- | The list of names of overlap metrics the report should include.-rcdrcOverlapMetricNames :: Lens' ReportCrossDimensionReachCriteria [Text]-rcdrcOverlapMetricNames-  = lens _rcdrcOverlapMetricNames-      (\ s a -> s{_rcdrcOverlapMetricNames = a})-      . _Default-      . _Coerce--instance FromJSON ReportCrossDimensionReachCriteria-         where-        parseJSON-          = withObject "ReportCrossDimensionReachCriteria"-              (\ o ->-                 ReportCrossDimensionReachCriteria <$>-                   (o .:? "pivoted") <*> (o .:? "breakdown" .!= mempty)-                     <*> (o .:? "dimension")-                     <*> (o .:? "metricNames" .!= mempty)-                     <*> (o .:? "dimensionFilters" .!= mempty)-                     <*> (o .:? "dateRange")-                     <*> (o .:? "overlapMetricNames" .!= mempty))--instance ToJSON ReportCrossDimensionReachCriteria-         where-        toJSON ReportCrossDimensionReachCriteria{..}-          = object-              (catMaybes-                 [("pivoted" .=) <$> _rcdrcPivoted,-                  ("breakdown" .=) <$> _rcdrcBreakdown,-                  ("dimension" .=) <$> _rcdrcDimension,-                  ("metricNames" .=) <$> _rcdrcMetricNames,-                  ("dimensionFilters" .=) <$> _rcdrcDimensionFilters,-                  ("dateRange" .=) <$> _rcdrcDateRange,-                  ("overlapMetricNames" .=) <$>-                    _rcdrcOverlapMetricNames])---- | The URLs where the completed report file can be downloaded.------ /See:/ 'fileURLs' smart constructor.-data FileURLs = FileURLs-    { _fuBrowserURL :: !(Maybe Text)-    , _fuAPIURL     :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'FileURLs' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'fuBrowserURL'------ * 'fuAPIURL'-fileURLs-    :: FileURLs-fileURLs =-    FileURLs-    { _fuBrowserURL = Nothing-    , _fuAPIURL = Nothing-    }---- | The URL for downloading the report data through a browser.-fuBrowserURL :: Lens' FileURLs (Maybe Text)-fuBrowserURL-  = lens _fuBrowserURL (\ s a -> s{_fuBrowserURL = a})---- | The URL for downloading the report data through the API.-fuAPIURL :: Lens' FileURLs (Maybe Text)-fuAPIURL = lens _fuAPIURL (\ s a -> s{_fuAPIURL = a})--instance FromJSON FileURLs where-        parseJSON-          = withObject "FileURLs"-              (\ o ->-                 FileURLs <$>-                   (o .:? "browserUrl") <*> (o .:? "apiUrl"))--instance ToJSON FileURLs where-        toJSON FileURLs{..}-          = object-              (catMaybes-                 [("browserUrl" .=) <$> _fuBrowserURL,-                  ("apiUrl" .=) <$> _fuAPIURL])---- | Campaign Creative Association List Response------ /See:/ 'campaignCreativeAssociationsListResponse' smart constructor.-data CampaignCreativeAssociationsListResponse = CampaignCreativeAssociationsListResponse-    { _ccalrCampaignCreativeAssociations :: !(Maybe [CampaignCreativeAssociation])-    , _ccalrNextPageToken                :: !(Maybe Text)-    , _ccalrKind                         :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CampaignCreativeAssociationsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ccalrCampaignCreativeAssociations'------ * 'ccalrNextPageToken'------ * 'ccalrKind'-campaignCreativeAssociationsListResponse-    :: CampaignCreativeAssociationsListResponse-campaignCreativeAssociationsListResponse =-    CampaignCreativeAssociationsListResponse-    { _ccalrCampaignCreativeAssociations = Nothing-    , _ccalrNextPageToken = Nothing-    , _ccalrKind = "dfareporting#campaignCreativeAssociationsListResponse"-    }---- | Campaign creative association collection-ccalrCampaignCreativeAssociations :: Lens' CampaignCreativeAssociationsListResponse [CampaignCreativeAssociation]-ccalrCampaignCreativeAssociations-  = lens _ccalrCampaignCreativeAssociations-      (\ s a -> s{_ccalrCampaignCreativeAssociations = a})-      . _Default-      . _Coerce---- | Pagination token to be used for the next list operation.-ccalrNextPageToken :: Lens' CampaignCreativeAssociationsListResponse (Maybe Text)-ccalrNextPageToken-  = lens _ccalrNextPageToken-      (\ s a -> s{_ccalrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#campaignCreativeAssociationsListResponse\".-ccalrKind :: Lens' CampaignCreativeAssociationsListResponse Text-ccalrKind-  = lens _ccalrKind (\ s a -> s{_ccalrKind = a})--instance FromJSON-         CampaignCreativeAssociationsListResponse where-        parseJSON-          = withObject-              "CampaignCreativeAssociationsListResponse"-              (\ o ->-                 CampaignCreativeAssociationsListResponse <$>-                   (o .:? "campaignCreativeAssociations" .!= mempty) <*>-                     (o .:? "nextPageToken")-                     <*>-                     (o .:? "kind" .!=-                        "dfareporting#campaignCreativeAssociationsListResponse"))--instance ToJSON-         CampaignCreativeAssociationsListResponse where-        toJSON CampaignCreativeAssociationsListResponse{..}-          = object-              (catMaybes-                 [("campaignCreativeAssociations" .=) <$>-                    _ccalrCampaignCreativeAssociations,-                  ("nextPageToken" .=) <$> _ccalrNextPageToken,-                  Just ("kind" .= _ccalrKind)])---- | Describes properties of a DoubleClick Planning order.------ /See:/ 'order' smart constructor.-data Order = Order-    { _oSellerOrderId          :: !(Maybe Text)-    , _oSellerOrganizationName :: !(Maybe Text)-    , _oKind                   :: !Text-    , _oAdvertiserId           :: !(Maybe (Textual Int64))-    , _oPlanningTermId         :: !(Maybe (Textual Int64))-    , _oAccountId              :: !(Maybe (Textual Int64))-    , _oName                   :: !(Maybe Text)-    , _oSiteNames              :: !(Maybe [Text])-    , _oLastModifiedInfo       :: !(Maybe LastModifiedInfo)-    , _oBuyerOrganizationName  :: !(Maybe Text)-    , _oId                     :: !(Maybe (Textual Int64))-    , _oBuyerInvoiceId         :: !(Maybe Text)-    , _oComments               :: !(Maybe Text)-    , _oProjectId              :: !(Maybe (Textual Int64))-    , _oSubAccountId           :: !(Maybe (Textual Int64))-    , _oNotes                  :: !(Maybe Text)-    , _oContacts               :: !(Maybe [OrderContact])-    , _oSiteId                 :: !(Maybe [Textual Int64])-    , _oTermsAndConditions     :: !(Maybe Text)-    , _oApproverUserProFileIds :: !(Maybe [Textual Int64])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'Order' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'oSellerOrderId'------ * 'oSellerOrganizationName'------ * 'oKind'------ * 'oAdvertiserId'------ * 'oPlanningTermId'------ * 'oAccountId'------ * 'oName'------ * 'oSiteNames'------ * 'oLastModifiedInfo'------ * 'oBuyerOrganizationName'------ * 'oId'------ * 'oBuyerInvoiceId'------ * 'oComments'------ * 'oProjectId'------ * 'oSubAccountId'------ * 'oNotes'------ * 'oContacts'------ * 'oSiteId'------ * 'oTermsAndConditions'------ * 'oApproverUserProFileIds'-order-    :: Order-order =-    Order-    { _oSellerOrderId = Nothing-    , _oSellerOrganizationName = Nothing-    , _oKind = "dfareporting#order"-    , _oAdvertiserId = Nothing-    , _oPlanningTermId = Nothing-    , _oAccountId = Nothing-    , _oName = Nothing-    , _oSiteNames = Nothing-    , _oLastModifiedInfo = Nothing-    , _oBuyerOrganizationName = Nothing-    , _oId = Nothing-    , _oBuyerInvoiceId = Nothing-    , _oComments = Nothing-    , _oProjectId = Nothing-    , _oSubAccountId = Nothing-    , _oNotes = Nothing-    , _oContacts = Nothing-    , _oSiteId = Nothing-    , _oTermsAndConditions = Nothing-    , _oApproverUserProFileIds = Nothing-    }---- | Seller order ID associated with this order.-oSellerOrderId :: Lens' Order (Maybe Text)-oSellerOrderId-  = lens _oSellerOrderId-      (\ s a -> s{_oSellerOrderId = a})---- | Name of the seller organization.-oSellerOrganizationName :: Lens' Order (Maybe Text)-oSellerOrganizationName-  = lens _oSellerOrganizationName-      (\ s a -> s{_oSellerOrganizationName = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#order\".-oKind :: Lens' Order Text-oKind = lens _oKind (\ s a -> s{_oKind = a})---- | Advertiser ID of this order.-oAdvertiserId :: Lens' Order (Maybe Int64)-oAdvertiserId-  = lens _oAdvertiserId-      (\ s a -> s{_oAdvertiserId = a})-      . mapping _Coerce---- | ID of the terms and conditions template used in this order.-oPlanningTermId :: Lens' Order (Maybe Int64)-oPlanningTermId-  = lens _oPlanningTermId-      (\ s a -> s{_oPlanningTermId = a})-      . mapping _Coerce---- | Account ID of this order.-oAccountId :: Lens' Order (Maybe Int64)-oAccountId-  = lens _oAccountId (\ s a -> s{_oAccountId = a}) .-      mapping _Coerce---- | Name of this order.-oName :: Lens' Order (Maybe Text)-oName = lens _oName (\ s a -> s{_oName = a})---- | Free-form site names this order is associated with.-oSiteNames :: Lens' Order [Text]-oSiteNames-  = lens _oSiteNames (\ s a -> s{_oSiteNames = a}) .-      _Default-      . _Coerce---- | Information about the most recent modification of this order.-oLastModifiedInfo :: Lens' Order (Maybe LastModifiedInfo)-oLastModifiedInfo-  = lens _oLastModifiedInfo-      (\ s a -> s{_oLastModifiedInfo = a})---- | Name of the buyer organization.-oBuyerOrganizationName :: Lens' Order (Maybe Text)-oBuyerOrganizationName-  = lens _oBuyerOrganizationName-      (\ s a -> s{_oBuyerOrganizationName = a})---- | ID of this order. This is a read-only, auto-generated field.-oId :: Lens' Order (Maybe Int64)-oId-  = lens _oId (\ s a -> s{_oId = a}) . mapping _Coerce---- | Buyer invoice ID associated with this order.-oBuyerInvoiceId :: Lens' Order (Maybe Text)-oBuyerInvoiceId-  = lens _oBuyerInvoiceId-      (\ s a -> s{_oBuyerInvoiceId = a})---- | Comments in this order.-oComments :: Lens' Order (Maybe Text)-oComments-  = lens _oComments (\ s a -> s{_oComments = a})---- | Project ID of this order.-oProjectId :: Lens' Order (Maybe Int64)-oProjectId-  = lens _oProjectId (\ s a -> s{_oProjectId = a}) .-      mapping _Coerce---- | Subaccount ID of this order.-oSubAccountId :: Lens' Order (Maybe Int64)-oSubAccountId-  = lens _oSubAccountId-      (\ s a -> s{_oSubAccountId = a})-      . mapping _Coerce---- | Notes of this order.-oNotes :: Lens' Order (Maybe Text)-oNotes = lens _oNotes (\ s a -> s{_oNotes = a})---- | Contacts for this order.-oContacts :: Lens' Order [OrderContact]-oContacts-  = lens _oContacts (\ s a -> s{_oContacts = a}) .-      _Default-      . _Coerce---- | Site IDs this order is associated with.-oSiteId :: Lens' Order [Int64]-oSiteId-  = lens _oSiteId (\ s a -> s{_oSiteId = a}) . _Default-      . _Coerce---- | Terms and conditions of this order.-oTermsAndConditions :: Lens' Order (Maybe Text)-oTermsAndConditions-  = lens _oTermsAndConditions-      (\ s a -> s{_oTermsAndConditions = a})---- | IDs for users that have to approve documents created for this order.-oApproverUserProFileIds :: Lens' Order [Int64]-oApproverUserProFileIds-  = lens _oApproverUserProFileIds-      (\ s a -> s{_oApproverUserProFileIds = a})-      . _Default-      . _Coerce--instance FromJSON Order where-        parseJSON-          = withObject "Order"-              (\ o ->-                 Order <$>-                   (o .:? "sellerOrderId") <*>-                     (o .:? "sellerOrganizationName")-                     <*> (o .:? "kind" .!= "dfareporting#order")-                     <*> (o .:? "advertiserId")-                     <*> (o .:? "planningTermId")-                     <*> (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "siteNames" .!= mempty)-                     <*> (o .:? "lastModifiedInfo")-                     <*> (o .:? "buyerOrganizationName")-                     <*> (o .:? "id")-                     <*> (o .:? "buyerInvoiceId")-                     <*> (o .:? "comments")-                     <*> (o .:? "projectId")-                     <*> (o .:? "subaccountId")-                     <*> (o .:? "notes")-                     <*> (o .:? "contacts" .!= mempty)-                     <*> (o .:? "siteId" .!= mempty)-                     <*> (o .:? "termsAndConditions")-                     <*> (o .:? "approverUserProfileIds" .!= mempty))--instance ToJSON Order where-        toJSON Order{..}-          = object-              (catMaybes-                 [("sellerOrderId" .=) <$> _oSellerOrderId,-                  ("sellerOrganizationName" .=) <$>-                    _oSellerOrganizationName,-                  Just ("kind" .= _oKind),-                  ("advertiserId" .=) <$> _oAdvertiserId,-                  ("planningTermId" .=) <$> _oPlanningTermId,-                  ("accountId" .=) <$> _oAccountId,-                  ("name" .=) <$> _oName,-                  ("siteNames" .=) <$> _oSiteNames,-                  ("lastModifiedInfo" .=) <$> _oLastModifiedInfo,-                  ("buyerOrganizationName" .=) <$>-                    _oBuyerOrganizationName,-                  ("id" .=) <$> _oId,-                  ("buyerInvoiceId" .=) <$> _oBuyerInvoiceId,-                  ("comments" .=) <$> _oComments,-                  ("projectId" .=) <$> _oProjectId,-                  ("subaccountId" .=) <$> _oSubAccountId,-                  ("notes" .=) <$> _oNotes,-                  ("contacts" .=) <$> _oContacts,-                  ("siteId" .=) <$> _oSiteId,-                  ("termsAndConditions" .=) <$> _oTermsAndConditions,-                  ("approverUserProfileIds" .=) <$>-                    _oApproverUserProFileIds])---- | Creative Asset ID.------ /See:/ 'creativeAssetId' smart constructor.-data CreativeAssetId = CreativeAssetId-    { _caiName :: !(Maybe Text)-    , _caiType :: !(Maybe CreativeAssetIdType)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CreativeAssetId' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'caiName'------ * 'caiType'-creativeAssetId-    :: CreativeAssetId-creativeAssetId =-    CreativeAssetId-    { _caiName = Nothing-    , _caiType = Nothing-    }---- | Name of the creative asset. This is a required field while inserting an--- asset. After insertion, this assetIdentifier is used to identify the--- uploaded asset. Characters in the name must be alphanumeric or one of--- the following: \".-_ \". Spaces are allowed.-caiName :: Lens' CreativeAssetId (Maybe Text)-caiName = lens _caiName (\ s a -> s{_caiName = a})---- | Type of asset to upload. This is a required field. IMAGE is solely used--- for IMAGE creatives. Other image assets should use HTML_IMAGE.-caiType :: Lens' CreativeAssetId (Maybe CreativeAssetIdType)-caiType = lens _caiType (\ s a -> s{_caiType = a})--instance FromJSON CreativeAssetId where-        parseJSON-          = withObject "CreativeAssetId"-              (\ o ->-                 CreativeAssetId <$>-                   (o .:? "name") <*> (o .:? "type"))--instance ToJSON CreativeAssetId where-        toJSON CreativeAssetId{..}-          = object-              (catMaybes-                 [("name" .=) <$> _caiName, ("type" .=) <$> _caiType])---- | Frequency Cap.------ /See:/ 'frequencyCap' smart constructor.-data FrequencyCap = FrequencyCap-    { _fcImpressions :: !(Maybe (Textual Int64))-    , _fcDuration    :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'FrequencyCap' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'fcImpressions'------ * 'fcDuration'-frequencyCap-    :: FrequencyCap-frequencyCap =-    FrequencyCap-    { _fcImpressions = Nothing-    , _fcDuration = Nothing-    }---- | Number of times an individual user can be served the ad within the--- specified duration. The maximum allowed is 15.-fcImpressions :: Lens' FrequencyCap (Maybe Int64)-fcImpressions-  = lens _fcImpressions-      (\ s a -> s{_fcImpressions = a})-      . mapping _Coerce---- | Duration of time, in seconds, for this frequency cap. The maximum--- duration is 90 days in seconds, or 7,776,000.-fcDuration :: Lens' FrequencyCap (Maybe Int64)-fcDuration-  = lens _fcDuration (\ s a -> s{_fcDuration = a}) .-      mapping _Coerce--instance FromJSON FrequencyCap where-        parseJSON-          = withObject "FrequencyCap"-              (\ o ->-                 FrequencyCap <$>-                   (o .:? "impressions") <*> (o .:? "duration"))--instance ToJSON FrequencyCap where-        toJSON FrequencyCap{..}-          = object-              (catMaybes-                 [("impressions" .=) <$> _fcImpressions,-                  ("duration" .=) <$> _fcDuration])---- | Represents a File resource. A file contains the metadata for a report--- run. It shows the status of the run and holds the URLs to the generated--- report data if the run is finished and the status is--- \"REPORT_AVAILABLE\".------ /See:/ 'file' smart constructor.-data File = File-    { _filStatus           :: !(Maybe FileStatus)-    , _filEtag             :: !(Maybe Text)-    , _filKind             :: !Text-    , _filURLs             :: !(Maybe FileURLs)-    , _filReportId         :: !(Maybe (Textual Int64))-    , _filDateRange        :: !(Maybe DateRange)-    , _filFormat           :: !(Maybe FileFormat)-    , _filLastModifiedTime :: !(Maybe (Textual Int64))-    , _filId               :: !(Maybe (Textual Int64))-    , _filFileName         :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'File' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'filStatus'------ * 'filEtag'------ * 'filKind'------ * 'filURLs'------ * 'filReportId'------ * 'filDateRange'------ * 'filFormat'------ * 'filLastModifiedTime'------ * 'filId'------ * 'filFileName'-file-    :: File-file =-    File-    { _filStatus = Nothing-    , _filEtag = Nothing-    , _filKind = "dfareporting#file"-    , _filURLs = Nothing-    , _filReportId = Nothing-    , _filDateRange = Nothing-    , _filFormat = Nothing-    , _filLastModifiedTime = Nothing-    , _filId = Nothing-    , _filFileName = Nothing-    }---- | The status of the report file.-filStatus :: Lens' File (Maybe FileStatus)-filStatus-  = lens _filStatus (\ s a -> s{_filStatus = a})---- | The eTag of this response for caching purposes.-filEtag :: Lens' File (Maybe Text)-filEtag = lens _filEtag (\ s a -> s{_filEtag = a})---- | The kind of resource this is, in this case dfareporting#file.-filKind :: Lens' File Text-filKind = lens _filKind (\ s a -> s{_filKind = a})---- | The URLs where the completed report file can be downloaded.-filURLs :: Lens' File (Maybe FileURLs)-filURLs = lens _filURLs (\ s a -> s{_filURLs = a})---- | The ID of the report this file was generated from.-filReportId :: Lens' File (Maybe Int64)-filReportId-  = lens _filReportId (\ s a -> s{_filReportId = a}) .-      mapping _Coerce---- | The date range for which the file has report data. The date range will--- always be the absolute date range for which the report is run.-filDateRange :: Lens' File (Maybe DateRange)-filDateRange-  = lens _filDateRange (\ s a -> s{_filDateRange = a})---- | The output format of the report. Only available once the file is--- available.-filFormat :: Lens' File (Maybe FileFormat)-filFormat-  = lens _filFormat (\ s a -> s{_filFormat = a})---- | The timestamp in milliseconds since epoch when this file was last--- modified.-filLastModifiedTime :: Lens' File (Maybe Int64)-filLastModifiedTime-  = lens _filLastModifiedTime-      (\ s a -> s{_filLastModifiedTime = a})-      . mapping _Coerce---- | The unique ID of this report file.-filId :: Lens' File (Maybe Int64)-filId-  = lens _filId (\ s a -> s{_filId = a}) .-      mapping _Coerce---- | The filename of the file.-filFileName :: Lens' File (Maybe Text)-filFileName-  = lens _filFileName (\ s a -> s{_filFileName = a})--instance FromJSON File where-        parseJSON-          = withObject "File"-              (\ o ->-                 File <$>-                   (o .:? "status") <*> (o .:? "etag") <*>-                     (o .:? "kind" .!= "dfareporting#file")-                     <*> (o .:? "urls")-                     <*> (o .:? "reportId")-                     <*> (o .:? "dateRange")-                     <*> (o .:? "format")-                     <*> (o .:? "lastModifiedTime")-                     <*> (o .:? "id")-                     <*> (o .:? "fileName"))--instance ToJSON File where-        toJSON File{..}-          = object-              (catMaybes-                 [("status" .=) <$> _filStatus,-                  ("etag" .=) <$> _filEtag, Just ("kind" .= _filKind),-                  ("urls" .=) <$> _filURLs,-                  ("reportId" .=) <$> _filReportId,-                  ("dateRange" .=) <$> _filDateRange,-                  ("format" .=) <$> _filFormat,-                  ("lastModifiedTime" .=) <$> _filLastModifiedTime,-                  ("id" .=) <$> _filId,-                  ("fileName" .=) <$> _filFileName])---- | Creative Settings------ /See:/ 'creativeSettings' smart constructor.-data CreativeSettings = CreativeSettings-    { _csIFrameHeader :: !(Maybe Text)-    , _csIFrameFooter :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CreativeSettings' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'csIFrameHeader'------ * 'csIFrameFooter'-creativeSettings-    :: CreativeSettings-creativeSettings =-    CreativeSettings-    { _csIFrameHeader = Nothing-    , _csIFrameFooter = Nothing-    }---- | Header text for iFrames for this site. Must be less than or equal to--- 2000 characters long.-csIFrameHeader :: Lens' CreativeSettings (Maybe Text)-csIFrameHeader-  = lens _csIFrameHeader-      (\ s a -> s{_csIFrameHeader = a})---- | Header text for iFrames for this site. Must be less than or equal to--- 2000 characters long.-csIFrameFooter :: Lens' CreativeSettings (Maybe Text)-csIFrameFooter-  = lens _csIFrameFooter-      (\ s a -> s{_csIFrameFooter = a})--instance FromJSON CreativeSettings where-        parseJSON-          = withObject "CreativeSettings"-              (\ o ->-                 CreativeSettings <$>-                   (o .:? "iFrameHeader") <*> (o .:? "iFrameFooter"))--instance ToJSON CreativeSettings where-        toJSON CreativeSettings{..}-          = object-              (catMaybes-                 [("iFrameHeader" .=) <$> _csIFrameHeader,-                  ("iFrameFooter" .=) <$> _csIFrameFooter])---- | Creative Group List Response------ /See:/ 'creativeGroupsListResponse' smart constructor.-data CreativeGroupsListResponse = CreativeGroupsListResponse-    { _cglrCreativeGroups :: !(Maybe [CreativeGroup])-    , _cglrNextPageToken  :: !(Maybe Text)-    , _cglrKind           :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CreativeGroupsListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cglrCreativeGroups'------ * 'cglrNextPageToken'------ * 'cglrKind'-creativeGroupsListResponse-    :: CreativeGroupsListResponse-creativeGroupsListResponse =-    CreativeGroupsListResponse-    { _cglrCreativeGroups = Nothing-    , _cglrNextPageToken = Nothing-    , _cglrKind = "dfareporting#creativeGroupsListResponse"-    }---- | Creative group collection.-cglrCreativeGroups :: Lens' CreativeGroupsListResponse [CreativeGroup]-cglrCreativeGroups-  = lens _cglrCreativeGroups-      (\ s a -> s{_cglrCreativeGroups = a})-      . _Default-      . _Coerce---- | Pagination token to be used for the next list operation.-cglrNextPageToken :: Lens' CreativeGroupsListResponse (Maybe Text)-cglrNextPageToken-  = lens _cglrNextPageToken-      (\ s a -> s{_cglrNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#creativeGroupsListResponse\".-cglrKind :: Lens' CreativeGroupsListResponse Text-cglrKind = lens _cglrKind (\ s a -> s{_cglrKind = a})--instance FromJSON CreativeGroupsListResponse where-        parseJSON-          = withObject "CreativeGroupsListResponse"-              (\ o ->-                 CreativeGroupsListResponse <$>-                   (o .:? "creativeGroups" .!= mempty) <*>-                     (o .:? "nextPageToken")-                     <*>-                     (o .:? "kind" .!=-                        "dfareporting#creativeGroupsListResponse"))--instance ToJSON CreativeGroupsListResponse where-        toJSON CreativeGroupsListResponse{..}-          = object-              (catMaybes-                 [("creativeGroups" .=) <$> _cglrCreativeGroups,-                  ("nextPageToken" .=) <$> _cglrNextPageToken,-                  Just ("kind" .= _cglrKind)])---- | Mobile Carrier List Response------ /See:/ 'mobileCarriersListResponse' smart constructor.-data MobileCarriersListResponse = MobileCarriersListResponse-    { _mclrMobileCarriers :: !(Maybe [MobileCarrier])-    , _mclrKind           :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'MobileCarriersListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mclrMobileCarriers'------ * 'mclrKind'-mobileCarriersListResponse-    :: MobileCarriersListResponse-mobileCarriersListResponse =-    MobileCarriersListResponse-    { _mclrMobileCarriers = Nothing-    , _mclrKind = "dfareporting#mobileCarriersListResponse"-    }---- | Mobile carrier collection.-mclrMobileCarriers :: Lens' MobileCarriersListResponse [MobileCarrier]-mclrMobileCarriers-  = lens _mclrMobileCarriers-      (\ s a -> s{_mclrMobileCarriers = a})-      . _Default-      . _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#mobileCarriersListResponse\".-mclrKind :: Lens' MobileCarriersListResponse Text-mclrKind = lens _mclrKind (\ s a -> s{_mclrKind = a})--instance FromJSON MobileCarriersListResponse where-        parseJSON-          = withObject "MobileCarriersListResponse"-              (\ o ->-                 MobileCarriersListResponse <$>-                   (o .:? "mobileCarriers" .!= mempty) <*>-                     (o .:? "kind" .!=-                        "dfareporting#mobileCarriersListResponse"))--instance ToJSON MobileCarriersListResponse where-        toJSON MobileCarriersListResponse{..}-          = object-              (catMaybes-                 [("mobileCarriers" .=) <$> _mclrMobileCarriers,-                  Just ("kind" .= _mclrKind)])---- | Landing Page List Response------ /See:/ 'landingPagesListResponse' smart constructor.-data LandingPagesListResponse = LandingPagesListResponse-    { _lplrLandingPages :: !(Maybe [LandingPage])-    , _lplrKind         :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'LandingPagesListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lplrLandingPages'------ * 'lplrKind'-landingPagesListResponse-    :: LandingPagesListResponse-landingPagesListResponse =-    LandingPagesListResponse-    { _lplrLandingPages = Nothing-    , _lplrKind = "dfareporting#landingPagesListResponse"-    }---- | Landing page collection-lplrLandingPages :: Lens' LandingPagesListResponse [LandingPage]-lplrLandingPages-  = lens _lplrLandingPages-      (\ s a -> s{_lplrLandingPages = a})-      . _Default-      . _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#landingPagesListResponse\".-lplrKind :: Lens' LandingPagesListResponse Text-lplrKind = lens _lplrKind (\ s a -> s{_lplrKind = a})--instance FromJSON LandingPagesListResponse where-        parseJSON-          = withObject "LandingPagesListResponse"-              (\ o ->-                 LandingPagesListResponse <$>-                   (o .:? "landingPages" .!= mempty) <*>-                     (o .:? "kind" .!=-                        "dfareporting#landingPagesListResponse"))--instance ToJSON LandingPagesListResponse where-        toJSON LandingPagesListResponse{..}-          = object-              (catMaybes-                 [("landingPages" .=) <$> _lplrLandingPages,-                  Just ("kind" .= _lplrKind)])---- | CreativeAssets contains properties of a creative asset file which will--- be uploaded or has already been uploaded. Refer to the creative sample--- code for how to upload assets and insert a creative.------ /See:/ 'creativeAssetMetadata' smart constructor.-data CreativeAssetMetadata = CreativeAssetMetadata-    { _camaKind                  :: !Text-    , _camaAssetIdentifier       :: !(Maybe CreativeAssetId)-    , _camaClickTags             :: !(Maybe [ClickTag])-    , _camaWarnedValidationRules :: !(Maybe [CreativeAssetMetadataWarnedValidationRulesItem])-    , _camaDetectedFeatures      :: !(Maybe [CreativeAssetMetadataDetectedFeaturesItem])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CreativeAssetMetadata' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'camaKind'------ * 'camaAssetIdentifier'------ * 'camaClickTags'------ * 'camaWarnedValidationRules'------ * 'camaDetectedFeatures'-creativeAssetMetadata-    :: CreativeAssetMetadata-creativeAssetMetadata =-    CreativeAssetMetadata-    { _camaKind = "dfareporting#creativeAssetMetadata"-    , _camaAssetIdentifier = Nothing-    , _camaClickTags = Nothing-    , _camaWarnedValidationRules = Nothing-    , _camaDetectedFeatures = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#creativeAssetMetadata\".-camaKind :: Lens' CreativeAssetMetadata Text-camaKind = lens _camaKind (\ s a -> s{_camaKind = a})---- | ID of the creative asset. This is a required field.-camaAssetIdentifier :: Lens' CreativeAssetMetadata (Maybe CreativeAssetId)-camaAssetIdentifier-  = lens _camaAssetIdentifier-      (\ s a -> s{_camaAssetIdentifier = a})---- | List of detected click tags for assets. This is a read-only--- auto-generated field.-camaClickTags :: Lens' CreativeAssetMetadata [ClickTag]-camaClickTags-  = lens _camaClickTags-      (\ s a -> s{_camaClickTags = a})-      . _Default-      . _Coerce---- | Rules validated during code generation that generated a warning. This is--- a read-only, auto-generated field. Possible values are: ---- \"CLICK_TAG_NON_TOP_LEVEL\" - \"CLICK_TAG_MISSING\" ---- \"CLICK_TAG_MORE_THAN_ONE\" - \"CLICK_TAG_INVALID\" - \"ORPHANED_ASSET\"--- - \"PRIMARY_HTML_MISSING\" - \"EXTERNAL_FILE_REFERENCED\" ---- \"MRAID_REFERENCED\" - \"ADMOB_REFERENCED\" - \"FILE_TYPE_INVALID\" ---- \"ZIP_INVALID\" - \"LINKED_FILE_NOT_FOUND\" - \"MAX_FLASH_VERSION_11\" ---- \"NOT_SSL_COMPLIANT\" - \"FILE_DETAIL_EMPTY\" - \"ASSET_INVALID\" ---- \"GWD_PROPERTIES_INVALID\" - \"ENABLER_UNSUPPORTED_METHOD_DCM\" ---- \"ASSET_FORMAT_UNSUPPORTED_DCM\" - \"COMPONENT_UNSUPPORTED_DCM\" ---- \"HTML5_FEATURE_UNSUPPORTED\' \"-camaWarnedValidationRules :: Lens' CreativeAssetMetadata [CreativeAssetMetadataWarnedValidationRulesItem]-camaWarnedValidationRules-  = lens _camaWarnedValidationRules-      (\ s a -> s{_camaWarnedValidationRules = a})-      . _Default-      . _Coerce---- | List of feature dependencies for the creative asset that are detected by--- DCM. Feature dependencies are features that a browser must be able to--- support in order to render your HTML5 creative correctly. This is a--- read-only, auto-generated field.-camaDetectedFeatures :: Lens' CreativeAssetMetadata [CreativeAssetMetadataDetectedFeaturesItem]-camaDetectedFeatures-  = lens _camaDetectedFeatures-      (\ s a -> s{_camaDetectedFeatures = a})-      . _Default-      . _Coerce--instance FromJSON CreativeAssetMetadata where-        parseJSON-          = withObject "CreativeAssetMetadata"-              (\ o ->-                 CreativeAssetMetadata <$>-                   (o .:? "kind" .!=-                      "dfareporting#creativeAssetMetadata")-                     <*> (o .:? "assetIdentifier")-                     <*> (o .:? "clickTags" .!= mempty)-                     <*> (o .:? "warnedValidationRules" .!= mempty)-                     <*> (o .:? "detectedFeatures" .!= mempty))--instance ToJSON CreativeAssetMetadata where-        toJSON CreativeAssetMetadata{..}-          = object-              (catMaybes-                 [Just ("kind" .= _camaKind),-                  ("assetIdentifier" .=) <$> _camaAssetIdentifier,-                  ("clickTags" .=) <$> _camaClickTags,-                  ("warnedValidationRules" .=) <$>-                    _camaWarnedValidationRules,-                  ("detectedFeatures" .=) <$> _camaDetectedFeatures])---- | Omniture Integration Settings.------ /See:/ 'omnitureSettings' smart constructor.-data OmnitureSettings = OmnitureSettings-    { _osOmnitureCostDataEnabled    :: !(Maybe Bool)-    , _osOmnitureIntegrationEnabled :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'OmnitureSettings' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'osOmnitureCostDataEnabled'------ * 'osOmnitureIntegrationEnabled'-omnitureSettings-    :: OmnitureSettings-omnitureSettings =-    OmnitureSettings-    { _osOmnitureCostDataEnabled = Nothing-    , _osOmnitureIntegrationEnabled = Nothing-    }---- | Whether placement cost data will be sent to Omniture. This property can--- be enabled only if omnitureIntegrationEnabled is true.-osOmnitureCostDataEnabled :: Lens' OmnitureSettings (Maybe Bool)-osOmnitureCostDataEnabled-  = lens _osOmnitureCostDataEnabled-      (\ s a -> s{_osOmnitureCostDataEnabled = a})---- | Whether Omniture integration is enabled. This property can be enabled--- only when the \"Advanced Ad Serving\" account setting is enabled.-osOmnitureIntegrationEnabled :: Lens' OmnitureSettings (Maybe Bool)-osOmnitureIntegrationEnabled-  = lens _osOmnitureIntegrationEnabled-      (\ s a -> s{_osOmnitureIntegrationEnabled = a})--instance FromJSON OmnitureSettings where-        parseJSON-          = withObject "OmnitureSettings"-              (\ o ->-                 OmnitureSettings <$>-                   (o .:? "omnitureCostDataEnabled") <*>-                     (o .:? "omnitureIntegrationEnabled"))--instance ToJSON OmnitureSettings where-        toJSON OmnitureSettings{..}-          = object-              (catMaybes-                 [("omnitureCostDataEnabled" .=) <$>-                    _osOmnitureCostDataEnabled,-                  ("omnitureIntegrationEnabled" .=) <$>-                    _osOmnitureIntegrationEnabled])---- | Contains information about an internet connection type that can be--- targeted by ads. Clients can use the connection type to target mobile--- vs. broadband users.------ /See:/ 'connectionType' smart constructor.-data ConnectionType = ConnectionType-    { _cttKind :: !Text-    , _cttName :: !(Maybe Text)-    , _cttId   :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ConnectionType' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cttKind'------ * 'cttName'------ * 'cttId'-connectionType-    :: ConnectionType-connectionType =-    ConnectionType-    { _cttKind = "dfareporting#connectionType"-    , _cttName = Nothing-    , _cttId = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#connectionType\".-cttKind :: Lens' ConnectionType Text-cttKind = lens _cttKind (\ s a -> s{_cttKind = a})---- | Name of this connection type.-cttName :: Lens' ConnectionType (Maybe Text)-cttName = lens _cttName (\ s a -> s{_cttName = a})---- | ID of this connection type.-cttId :: Lens' ConnectionType (Maybe Int64)-cttId-  = lens _cttId (\ s a -> s{_cttId = a}) .-      mapping _Coerce--instance FromJSON ConnectionType where-        parseJSON-          = withObject "ConnectionType"-              (\ o ->-                 ConnectionType <$>-                   (o .:? "kind" .!= "dfareporting#connectionType") <*>-                     (o .:? "name")-                     <*> (o .:? "id"))--instance ToJSON ConnectionType where-        toJSON ConnectionType{..}-          = object-              (catMaybes-                 [Just ("kind" .= _cttKind), ("name" .=) <$> _cttName,-                  ("id" .=) <$> _cttId])---- | Contains properties of a package or roadblock.------ /See:/ 'placementGroup' smart constructor.-data PlacementGroup = PlacementGroup-    { _plalPlacementStrategyId              :: !(Maybe (Textual Int64))-    , _plalSiteIdDimensionValue             :: !(Maybe DimensionValue)-    , _plalPricingSchedule                  :: !(Maybe PricingSchedule)-    , _plalKind                             :: !Text-    , _plalCampaignIdDimensionValue         :: !(Maybe DimensionValue)-    , _plalAdvertiserId                     :: !(Maybe (Textual Int64))-    , _plalAdvertiserIdDimensionValue       :: !(Maybe DimensionValue)-    , _plalCampaignId                       :: !(Maybe (Textual Int64))-    , _plalIdDimensionValue                 :: !(Maybe DimensionValue)-    , _plalPlacementGroupType               :: !(Maybe PlacementGroupPlacementGroupType)-    , _plalContentCategoryId                :: !(Maybe (Textual Int64))-    , _plalDirectorySiteIdDimensionValue    :: !(Maybe DimensionValue)-    , _plalAccountId                        :: !(Maybe (Textual Int64))-    , _plalName                             :: !(Maybe Text)-    , _plalDirectorySiteId                  :: !(Maybe (Textual Int64))-    , _plalCreateInfo                       :: !(Maybe LastModifiedInfo)-    , _plalChildPlacementIds                :: !(Maybe [Textual Int64])-    , _plalLastModifiedInfo                 :: !(Maybe LastModifiedInfo)-    , _plalId                               :: !(Maybe (Textual Int64))-    , _plalPrimaryPlacementId               :: !(Maybe (Textual Int64))-    , _plalSubAccountId                     :: !(Maybe (Textual Int64))-    , _plalExternalId                       :: !(Maybe Text)-    , _plalComment                          :: !(Maybe Text)-    , _plalPrimaryPlacementIdDimensionValue :: !(Maybe DimensionValue)-    , _plalSiteId                           :: !(Maybe (Textual Int64))-    , _plalArchived                         :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'PlacementGroup' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'plalPlacementStrategyId'------ * 'plalSiteIdDimensionValue'------ * 'plalPricingSchedule'------ * 'plalKind'------ * 'plalCampaignIdDimensionValue'------ * 'plalAdvertiserId'------ * 'plalAdvertiserIdDimensionValue'------ * 'plalCampaignId'------ * 'plalIdDimensionValue'------ * 'plalPlacementGroupType'------ * 'plalContentCategoryId'------ * 'plalDirectorySiteIdDimensionValue'------ * 'plalAccountId'------ * 'plalName'------ * 'plalDirectorySiteId'------ * 'plalCreateInfo'------ * 'plalChildPlacementIds'------ * 'plalLastModifiedInfo'------ * 'plalId'------ * 'plalPrimaryPlacementId'------ * 'plalSubAccountId'------ * 'plalExternalId'------ * 'plalComment'------ * 'plalPrimaryPlacementIdDimensionValue'------ * 'plalSiteId'------ * 'plalArchived'-placementGroup-    :: PlacementGroup-placementGroup =-    PlacementGroup-    { _plalPlacementStrategyId = Nothing-    , _plalSiteIdDimensionValue = Nothing-    , _plalPricingSchedule = Nothing-    , _plalKind = "dfareporting#placementGroup"-    , _plalCampaignIdDimensionValue = Nothing-    , _plalAdvertiserId = Nothing-    , _plalAdvertiserIdDimensionValue = Nothing-    , _plalCampaignId = Nothing-    , _plalIdDimensionValue = Nothing-    , _plalPlacementGroupType = Nothing-    , _plalContentCategoryId = Nothing-    , _plalDirectorySiteIdDimensionValue = Nothing-    , _plalAccountId = Nothing-    , _plalName = Nothing-    , _plalDirectorySiteId = Nothing-    , _plalCreateInfo = Nothing-    , _plalChildPlacementIds = Nothing-    , _plalLastModifiedInfo = Nothing-    , _plalId = Nothing-    , _plalPrimaryPlacementId = Nothing-    , _plalSubAccountId = Nothing-    , _plalExternalId = Nothing-    , _plalComment = Nothing-    , _plalPrimaryPlacementIdDimensionValue = Nothing-    , _plalSiteId = Nothing-    , _plalArchived = Nothing-    }---- | ID of the placement strategy assigned to this placement group.-plalPlacementStrategyId :: Lens' PlacementGroup (Maybe Int64)-plalPlacementStrategyId-  = lens _plalPlacementStrategyId-      (\ s a -> s{_plalPlacementStrategyId = a})-      . mapping _Coerce---- | Dimension value for the ID of the site. This is a read-only,--- auto-generated field.-plalSiteIdDimensionValue :: Lens' PlacementGroup (Maybe DimensionValue)-plalSiteIdDimensionValue-  = lens _plalSiteIdDimensionValue-      (\ s a -> s{_plalSiteIdDimensionValue = a})---- | Pricing schedule of this placement group. This field is required on--- insertion.-plalPricingSchedule :: Lens' PlacementGroup (Maybe PricingSchedule)-plalPricingSchedule-  = lens _plalPricingSchedule-      (\ s a -> s{_plalPricingSchedule = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#placementGroup\".-plalKind :: Lens' PlacementGroup Text-plalKind = lens _plalKind (\ s a -> s{_plalKind = a})---- | Dimension value for the ID of the campaign. This is a read-only,--- auto-generated field.-plalCampaignIdDimensionValue :: Lens' PlacementGroup (Maybe DimensionValue)-plalCampaignIdDimensionValue-  = lens _plalCampaignIdDimensionValue-      (\ s a -> s{_plalCampaignIdDimensionValue = a})---- | Advertiser ID of this placement group. This is a required field on--- insertion.-plalAdvertiserId :: Lens' PlacementGroup (Maybe Int64)-plalAdvertiserId-  = lens _plalAdvertiserId-      (\ s a -> s{_plalAdvertiserId = a})-      . mapping _Coerce---- | Dimension value for the ID of the advertiser. This is a read-only,--- auto-generated field.-plalAdvertiserIdDimensionValue :: Lens' PlacementGroup (Maybe DimensionValue)-plalAdvertiserIdDimensionValue-  = lens _plalAdvertiserIdDimensionValue-      (\ s a -> s{_plalAdvertiserIdDimensionValue = a})---- | Campaign ID of this placement group. This field is required on--- insertion.-plalCampaignId :: Lens' PlacementGroup (Maybe Int64)-plalCampaignId-  = lens _plalCampaignId-      (\ s a -> s{_plalCampaignId = a})-      . mapping _Coerce---- | Dimension value for the ID of this placement group. This is a read-only,--- auto-generated field.-plalIdDimensionValue :: Lens' PlacementGroup (Maybe DimensionValue)-plalIdDimensionValue-  = lens _plalIdDimensionValue-      (\ s a -> s{_plalIdDimensionValue = a})---- | Type of this placement group. A package is a simple group of placements--- that acts as a single pricing point for a group of tags. A roadblock is--- a group of placements that not only acts as a single pricing point, but--- also assumes that all the tags in it will be served at the same time. A--- roadblock requires one of its assigned placements to be marked as--- primary for reporting. This field is required on insertion.-plalPlacementGroupType :: Lens' PlacementGroup (Maybe PlacementGroupPlacementGroupType)-plalPlacementGroupType-  = lens _plalPlacementGroupType-      (\ s a -> s{_plalPlacementGroupType = a})---- | ID of the content category assigned to this placement group.-plalContentCategoryId :: Lens' PlacementGroup (Maybe Int64)-plalContentCategoryId-  = lens _plalContentCategoryId-      (\ s a -> s{_plalContentCategoryId = a})-      . mapping _Coerce---- | Dimension value for the ID of the directory site. This is a read-only,--- auto-generated field.-plalDirectorySiteIdDimensionValue :: Lens' PlacementGroup (Maybe DimensionValue)-plalDirectorySiteIdDimensionValue-  = lens _plalDirectorySiteIdDimensionValue-      (\ s a -> s{_plalDirectorySiteIdDimensionValue = a})---- | Account ID of this placement group. This is a read-only field that can--- be left blank.-plalAccountId :: Lens' PlacementGroup (Maybe Int64)-plalAccountId-  = lens _plalAccountId-      (\ s a -> s{_plalAccountId = a})-      . mapping _Coerce---- | Name of this placement group. This is a required field and must be less--- than 256 characters long.-plalName :: Lens' PlacementGroup (Maybe Text)-plalName = lens _plalName (\ s a -> s{_plalName = a})---- | Directory site ID associated with this placement group. On insert, you--- must set either this field or the site_id field to specify the site--- associated with this placement group. This is a required field that is--- read-only after insertion.-plalDirectorySiteId :: Lens' PlacementGroup (Maybe Int64)-plalDirectorySiteId-  = lens _plalDirectorySiteId-      (\ s a -> s{_plalDirectorySiteId = a})-      . mapping _Coerce---- | Information about the creation of this placement group. This is a--- read-only field.-plalCreateInfo :: Lens' PlacementGroup (Maybe LastModifiedInfo)-plalCreateInfo-  = lens _plalCreateInfo-      (\ s a -> s{_plalCreateInfo = a})---- | IDs of placements which are assigned to this placement group. This is a--- read-only, auto-generated field.-plalChildPlacementIds :: Lens' PlacementGroup [Int64]-plalChildPlacementIds-  = lens _plalChildPlacementIds-      (\ s a -> s{_plalChildPlacementIds = a})-      . _Default-      . _Coerce---- | Information about the most recent modification of this placement group.--- This is a read-only field.-plalLastModifiedInfo :: Lens' PlacementGroup (Maybe LastModifiedInfo)-plalLastModifiedInfo-  = lens _plalLastModifiedInfo-      (\ s a -> s{_plalLastModifiedInfo = a})---- | ID of this placement group. This is a read-only, auto-generated field.-plalId :: Lens' PlacementGroup (Maybe Int64)-plalId-  = lens _plalId (\ s a -> s{_plalId = a}) .-      mapping _Coerce---- | ID of the primary placement, used to calculate the media cost of a--- roadblock (placement group). Modifying this field will automatically--- modify the primary field on all affected roadblock child placements.-plalPrimaryPlacementId :: Lens' PlacementGroup (Maybe Int64)-plalPrimaryPlacementId-  = lens _plalPrimaryPlacementId-      (\ s a -> s{_plalPrimaryPlacementId = a})-      . mapping _Coerce---- | Subaccount ID of this placement group. This is a read-only field that--- can be left blank.-plalSubAccountId :: Lens' PlacementGroup (Maybe Int64)-plalSubAccountId-  = lens _plalSubAccountId-      (\ s a -> s{_plalSubAccountId = a})-      . mapping _Coerce---- | External ID for this placement.-plalExternalId :: Lens' PlacementGroup (Maybe Text)-plalExternalId-  = lens _plalExternalId-      (\ s a -> s{_plalExternalId = a})---- | Comments for this placement group.-plalComment :: Lens' PlacementGroup (Maybe Text)-plalComment-  = lens _plalComment (\ s a -> s{_plalComment = a})---- | Dimension value for the ID of the primary placement. This is a--- read-only, auto-generated field.-plalPrimaryPlacementIdDimensionValue :: Lens' PlacementGroup (Maybe DimensionValue)-plalPrimaryPlacementIdDimensionValue-  = lens _plalPrimaryPlacementIdDimensionValue-      (\ s a ->-         s{_plalPrimaryPlacementIdDimensionValue = a})---- | Site ID associated with this placement group. On insert, you must set--- either this field or the directorySiteId field to specify the site--- associated with this placement group. This is a required field that is--- read-only after insertion.-plalSiteId :: Lens' PlacementGroup (Maybe Int64)-plalSiteId-  = lens _plalSiteId (\ s a -> s{_plalSiteId = a}) .-      mapping _Coerce---- | Whether this placement group is archived.-plalArchived :: Lens' PlacementGroup (Maybe Bool)-plalArchived-  = lens _plalArchived (\ s a -> s{_plalArchived = a})--instance FromJSON PlacementGroup where-        parseJSON-          = withObject "PlacementGroup"-              (\ o ->-                 PlacementGroup <$>-                   (o .:? "placementStrategyId") <*>-                     (o .:? "siteIdDimensionValue")-                     <*> (o .:? "pricingSchedule")-                     <*> (o .:? "kind" .!= "dfareporting#placementGroup")-                     <*> (o .:? "campaignIdDimensionValue")-                     <*> (o .:? "advertiserId")-                     <*> (o .:? "advertiserIdDimensionValue")-                     <*> (o .:? "campaignId")-                     <*> (o .:? "idDimensionValue")-                     <*> (o .:? "placementGroupType")-                     <*> (o .:? "contentCategoryId")-                     <*> (o .:? "directorySiteIdDimensionValue")-                     <*> (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "directorySiteId")-                     <*> (o .:? "createInfo")-                     <*> (o .:? "childPlacementIds" .!= mempty)-                     <*> (o .:? "lastModifiedInfo")-                     <*> (o .:? "id")-                     <*> (o .:? "primaryPlacementId")-                     <*> (o .:? "subaccountId")-                     <*> (o .:? "externalId")-                     <*> (o .:? "comment")-                     <*> (o .:? "primaryPlacementIdDimensionValue")-                     <*> (o .:? "siteId")-                     <*> (o .:? "archived"))--instance ToJSON PlacementGroup where-        toJSON PlacementGroup{..}-          = object-              (catMaybes-                 [("placementStrategyId" .=) <$>-                    _plalPlacementStrategyId,-                  ("siteIdDimensionValue" .=) <$>-                    _plalSiteIdDimensionValue,-                  ("pricingSchedule" .=) <$> _plalPricingSchedule,-                  Just ("kind" .= _plalKind),-                  ("campaignIdDimensionValue" .=) <$>-                    _plalCampaignIdDimensionValue,-                  ("advertiserId" .=) <$> _plalAdvertiserId,-                  ("advertiserIdDimensionValue" .=) <$>-                    _plalAdvertiserIdDimensionValue,-                  ("campaignId" .=) <$> _plalCampaignId,-                  ("idDimensionValue" .=) <$> _plalIdDimensionValue,-                  ("placementGroupType" .=) <$>-                    _plalPlacementGroupType,-                  ("contentCategoryId" .=) <$> _plalContentCategoryId,-                  ("directorySiteIdDimensionValue" .=) <$>-                    _plalDirectorySiteIdDimensionValue,-                  ("accountId" .=) <$> _plalAccountId,-                  ("name" .=) <$> _plalName,-                  ("directorySiteId" .=) <$> _plalDirectorySiteId,-                  ("createInfo" .=) <$> _plalCreateInfo,-                  ("childPlacementIds" .=) <$> _plalChildPlacementIds,-                  ("lastModifiedInfo" .=) <$> _plalLastModifiedInfo,-                  ("id" .=) <$> _plalId,-                  ("primaryPlacementId" .=) <$>-                    _plalPrimaryPlacementId,-                  ("subaccountId" .=) <$> _plalSubAccountId,-                  ("externalId" .=) <$> _plalExternalId,-                  ("comment" .=) <$> _plalComment,-                  ("primaryPlacementIdDimensionValue" .=) <$>-                    _plalPrimaryPlacementIdDimensionValue,-                  ("siteId" .=) <$> _plalSiteId,-                  ("archived" .=) <$> _plalArchived])---- | Contains properties of an event tag.------ /See:/ 'eventTag' smart constructor.-data EventTag = EventTag-    { _etStatus                     :: !(Maybe EventTagStatus)-    , _etExcludeFromAdxRequests     :: !(Maybe Bool)-    , _etEnabledByDefault           :: !(Maybe Bool)-    , _etKind                       :: !Text-    , _etCampaignIdDimensionValue   :: !(Maybe DimensionValue)-    , _etAdvertiserId               :: !(Maybe (Textual Int64))-    , _etURL                        :: !(Maybe Text)-    , _etAdvertiserIdDimensionValue :: !(Maybe DimensionValue)-    , _etSSLCompliant               :: !(Maybe Bool)-    , _etCampaignId                 :: !(Maybe (Textual Int64))-    , _etAccountId                  :: !(Maybe (Textual Int64))-    , _etName                       :: !(Maybe Text)-    , _etURLEscapeLevels            :: !(Maybe (Textual Int32))-    , _etSiteIds                    :: !(Maybe [Textual Int64])-    , _etId                         :: !(Maybe (Textual Int64))-    , _etSubAccountId               :: !(Maybe (Textual Int64))-    , _etType                       :: !(Maybe EventTagType)-    , _etSiteFilterType             :: !(Maybe EventTagSiteFilterType)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'EventTag' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'etStatus'------ * 'etExcludeFromAdxRequests'------ * 'etEnabledByDefault'------ * 'etKind'------ * 'etCampaignIdDimensionValue'------ * 'etAdvertiserId'------ * 'etURL'------ * 'etAdvertiserIdDimensionValue'------ * 'etSSLCompliant'------ * 'etCampaignId'------ * 'etAccountId'------ * 'etName'------ * 'etURLEscapeLevels'------ * 'etSiteIds'------ * 'etId'------ * 'etSubAccountId'------ * 'etType'------ * 'etSiteFilterType'-eventTag-    :: EventTag-eventTag =-    EventTag-    { _etStatus = Nothing-    , _etExcludeFromAdxRequests = Nothing-    , _etEnabledByDefault = Nothing-    , _etKind = "dfareporting#eventTag"-    , _etCampaignIdDimensionValue = Nothing-    , _etAdvertiserId = Nothing-    , _etURL = Nothing-    , _etAdvertiserIdDimensionValue = Nothing-    , _etSSLCompliant = Nothing-    , _etCampaignId = Nothing-    , _etAccountId = Nothing-    , _etName = Nothing-    , _etURLEscapeLevels = Nothing-    , _etSiteIds = Nothing-    , _etId = Nothing-    , _etSubAccountId = Nothing-    , _etType = Nothing-    , _etSiteFilterType = Nothing-    }---- | Status of this event tag. Must be ENABLED for this event tag to fire.--- This is a required field.-etStatus :: Lens' EventTag (Maybe EventTagStatus)-etStatus = lens _etStatus (\ s a -> s{_etStatus = a})---- | Whether to remove this event tag from ads that are trafficked through--- DoubleClick Bid Manager to Ad Exchange. This may be useful if the event--- tag uses a pixel that is unapproved for Ad Exchange bids on one or more--- networks, such as the Google Display Network.-etExcludeFromAdxRequests :: Lens' EventTag (Maybe Bool)-etExcludeFromAdxRequests-  = lens _etExcludeFromAdxRequests-      (\ s a -> s{_etExcludeFromAdxRequests = a})---- | Whether this event tag should be automatically enabled for all of the--- advertiser\'s campaigns and ads.-etEnabledByDefault :: Lens' EventTag (Maybe Bool)-etEnabledByDefault-  = lens _etEnabledByDefault-      (\ s a -> s{_etEnabledByDefault = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#eventTag\".-etKind :: Lens' EventTag Text-etKind = lens _etKind (\ s a -> s{_etKind = a})---- | Dimension value for the ID of the campaign. This is a read-only,--- auto-generated field.-etCampaignIdDimensionValue :: Lens' EventTag (Maybe DimensionValue)-etCampaignIdDimensionValue-  = lens _etCampaignIdDimensionValue-      (\ s a -> s{_etCampaignIdDimensionValue = a})---- | Advertiser ID of this event tag. This field or the campaignId field is--- required on insertion.-etAdvertiserId :: Lens' EventTag (Maybe Int64)-etAdvertiserId-  = lens _etAdvertiserId-      (\ s a -> s{_etAdvertiserId = a})-      . mapping _Coerce---- | Payload URL for this event tag. The URL on a click-through event tag--- should have a landing page URL appended to the end of it. This field is--- required on insertion.-etURL :: Lens' EventTag (Maybe Text)-etURL = lens _etURL (\ s a -> s{_etURL = a})---- | Dimension value for the ID of the advertiser. This is a read-only,--- auto-generated field.-etAdvertiserIdDimensionValue :: Lens' EventTag (Maybe DimensionValue)-etAdvertiserIdDimensionValue-  = lens _etAdvertiserIdDimensionValue-      (\ s a -> s{_etAdvertiserIdDimensionValue = a})---- | Whether this tag is SSL-compliant or not. This is a read-only field.-etSSLCompliant :: Lens' EventTag (Maybe Bool)-etSSLCompliant-  = lens _etSSLCompliant-      (\ s a -> s{_etSSLCompliant = a})---- | Campaign ID of this event tag. This field or the advertiserId field is--- required on insertion.-etCampaignId :: Lens' EventTag (Maybe Int64)-etCampaignId-  = lens _etCampaignId (\ s a -> s{_etCampaignId = a})-      . mapping _Coerce---- | Account ID of this event tag. This is a read-only field that can be left--- blank.-etAccountId :: Lens' EventTag (Maybe Int64)-etAccountId-  = lens _etAccountId (\ s a -> s{_etAccountId = a}) .-      mapping _Coerce---- | Name of this event tag. This is a required field and must be less than--- 256 characters long.-etName :: Lens' EventTag (Maybe Text)-etName = lens _etName (\ s a -> s{_etName = a})---- | Number of times the landing page URL should be URL-escaped before being--- appended to the click-through event tag URL. Only applies to--- click-through event tags as specified by the event tag type.-etURLEscapeLevels :: Lens' EventTag (Maybe Int32)-etURLEscapeLevels-  = lens _etURLEscapeLevels-      (\ s a -> s{_etURLEscapeLevels = a})-      . mapping _Coerce---- | Filter list of site IDs associated with this event tag. The--- siteFilterType determines whether this is a whitelist or blacklist--- filter.-etSiteIds :: Lens' EventTag [Int64]-etSiteIds-  = lens _etSiteIds (\ s a -> s{_etSiteIds = a}) .-      _Default-      . _Coerce---- | ID of this event tag. This is a read-only, auto-generated field.-etId :: Lens' EventTag (Maybe Int64)-etId-  = lens _etId (\ s a -> s{_etId = a}) .-      mapping _Coerce---- | Subaccount ID of this event tag. This is a read-only field that can be--- left blank.-etSubAccountId :: Lens' EventTag (Maybe Int64)-etSubAccountId-  = lens _etSubAccountId-      (\ s a -> s{_etSubAccountId = a})-      . mapping _Coerce---- | Event tag type. Can be used to specify whether to use a third-party--- pixel, a third-party JavaScript URL, or a third-party click-through URL--- for either impression or click tracking. This is a required field.-etType :: Lens' EventTag (Maybe EventTagType)-etType = lens _etType (\ s a -> s{_etType = a})---- | Site filter type for this event tag. If no type is specified then the--- event tag will be applied to all sites.-etSiteFilterType :: Lens' EventTag (Maybe EventTagSiteFilterType)-etSiteFilterType-  = lens _etSiteFilterType-      (\ s a -> s{_etSiteFilterType = a})--instance FromJSON EventTag where-        parseJSON-          = withObject "EventTag"-              (\ o ->-                 EventTag <$>-                   (o .:? "status") <*> (o .:? "excludeFromAdxRequests")-                     <*> (o .:? "enabledByDefault")-                     <*> (o .:? "kind" .!= "dfareporting#eventTag")-                     <*> (o .:? "campaignIdDimensionValue")-                     <*> (o .:? "advertiserId")-                     <*> (o .:? "url")-                     <*> (o .:? "advertiserIdDimensionValue")-                     <*> (o .:? "sslCompliant")-                     <*> (o .:? "campaignId")-                     <*> (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "urlEscapeLevels")-                     <*> (o .:? "siteIds" .!= mempty)-                     <*> (o .:? "id")-                     <*> (o .:? "subaccountId")-                     <*> (o .:? "type")-                     <*> (o .:? "siteFilterType"))--instance ToJSON EventTag where-        toJSON EventTag{..}-          = object-              (catMaybes-                 [("status" .=) <$> _etStatus,-                  ("excludeFromAdxRequests" .=) <$>-                    _etExcludeFromAdxRequests,-                  ("enabledByDefault" .=) <$> _etEnabledByDefault,-                  Just ("kind" .= _etKind),-                  ("campaignIdDimensionValue" .=) <$>-                    _etCampaignIdDimensionValue,-                  ("advertiserId" .=) <$> _etAdvertiserId,-                  ("url" .=) <$> _etURL,-                  ("advertiserIdDimensionValue" .=) <$>-                    _etAdvertiserIdDimensionValue,-                  ("sslCompliant" .=) <$> _etSSLCompliant,-                  ("campaignId" .=) <$> _etCampaignId,-                  ("accountId" .=) <$> _etAccountId,-                  ("name" .=) <$> _etName,-                  ("urlEscapeLevels" .=) <$> _etURLEscapeLevels,-                  ("siteIds" .=) <$> _etSiteIds, ("id" .=) <$> _etId,-                  ("subaccountId" .=) <$> _etSubAccountId,-                  ("type" .=) <$> _etType,-                  ("siteFilterType" .=) <$> _etSiteFilterType])---- | Contains properties of a user role permission.------ /See:/ 'userRolePermission' smart constructor.-data UserRolePermission = UserRolePermission-    { _useKind              :: !Text-    , _useAvailability      :: !(Maybe UserRolePermissionAvailability)-    , _useName              :: !(Maybe Text)-    , _useId                :: !(Maybe (Textual Int64))-    , _usePermissionGroupId :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'UserRolePermission' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'useKind'------ * 'useAvailability'------ * 'useName'------ * 'useId'------ * 'usePermissionGroupId'-userRolePermission-    :: UserRolePermission-userRolePermission =-    UserRolePermission-    { _useKind = "dfareporting#userRolePermission"-    , _useAvailability = Nothing-    , _useName = Nothing-    , _useId = Nothing-    , _usePermissionGroupId = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#userRolePermission\".-useKind :: Lens' UserRolePermission Text-useKind = lens _useKind (\ s a -> s{_useKind = a})---- | Levels of availability for a user role permission.-useAvailability :: Lens' UserRolePermission (Maybe UserRolePermissionAvailability)-useAvailability-  = lens _useAvailability-      (\ s a -> s{_useAvailability = a})---- | Name of this user role permission.-useName :: Lens' UserRolePermission (Maybe Text)-useName = lens _useName (\ s a -> s{_useName = a})---- | ID of this user role permission.-useId :: Lens' UserRolePermission (Maybe Int64)-useId-  = lens _useId (\ s a -> s{_useId = a}) .-      mapping _Coerce---- | ID of the permission group that this user role permission belongs to.-usePermissionGroupId :: Lens' UserRolePermission (Maybe Int64)-usePermissionGroupId-  = lens _usePermissionGroupId-      (\ s a -> s{_usePermissionGroupId = a})-      . mapping _Coerce--instance FromJSON UserRolePermission where-        parseJSON-          = withObject "UserRolePermission"-              (\ o ->-                 UserRolePermission <$>-                   (o .:? "kind" .!= "dfareporting#userRolePermission")-                     <*> (o .:? "availability")-                     <*> (o .:? "name")-                     <*> (o .:? "id")-                     <*> (o .:? "permissionGroupId"))--instance ToJSON UserRolePermission where-        toJSON UserRolePermission{..}-          = object-              (catMaybes-                 [Just ("kind" .= _useKind),-                  ("availability" .=) <$> _useAvailability,-                  ("name" .=) <$> _useName, ("id" .=) <$> _useId,-                  ("permissionGroupId" .=) <$> _usePermissionGroupId])---- | Contact of an order.------ /See:/ 'orderContact' smart constructor.-data OrderContact = OrderContact-    { _ocSignatureUserProFileId :: !(Maybe (Textual Int64))-    , _ocContactName            :: !(Maybe Text)-    , _ocContactTitle           :: !(Maybe Text)-    , _ocContactType            :: !(Maybe OrderContactContactType)-    , _ocContactInfo            :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'OrderContact' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ocSignatureUserProFileId'------ * 'ocContactName'------ * 'ocContactTitle'------ * 'ocContactType'------ * 'ocContactInfo'-orderContact-    :: OrderContact-orderContact =-    OrderContact-    { _ocSignatureUserProFileId = Nothing-    , _ocContactName = Nothing-    , _ocContactTitle = Nothing-    , _ocContactType = Nothing-    , _ocContactInfo = Nothing-    }---- | ID of the user profile containing the signature that will be embedded--- into order documents.-ocSignatureUserProFileId :: Lens' OrderContact (Maybe Int64)-ocSignatureUserProFileId-  = lens _ocSignatureUserProFileId-      (\ s a -> s{_ocSignatureUserProFileId = a})-      . mapping _Coerce---- | Name of this contact.-ocContactName :: Lens' OrderContact (Maybe Text)-ocContactName-  = lens _ocContactName-      (\ s a -> s{_ocContactName = a})---- | Title of this contact.-ocContactTitle :: Lens' OrderContact (Maybe Text)-ocContactTitle-  = lens _ocContactTitle-      (\ s a -> s{_ocContactTitle = a})---- | Type of this contact.-ocContactType :: Lens' OrderContact (Maybe OrderContactContactType)-ocContactType-  = lens _ocContactType-      (\ s a -> s{_ocContactType = a})---- | Free-form information about this contact. It could be any information--- related to this contact in addition to type, title, name, and signature--- user profile ID.-ocContactInfo :: Lens' OrderContact (Maybe Text)-ocContactInfo-  = lens _ocContactInfo-      (\ s a -> s{_ocContactInfo = a})--instance FromJSON OrderContact where-        parseJSON-          = withObject "OrderContact"-              (\ o ->-                 OrderContact <$>-                   (o .:? "signatureUserProfileId") <*>-                     (o .:? "contactName")-                     <*> (o .:? "contactTitle")-                     <*> (o .:? "contactType")-                     <*> (o .:? "contactInfo"))--instance ToJSON OrderContact where-        toJSON OrderContact{..}-          = object-              (catMaybes-                 [("signatureUserProfileId" .=) <$>-                    _ocSignatureUserProFileId,-                  ("contactName" .=) <$> _ocContactName,-                  ("contactTitle" .=) <$> _ocContactTitle,-                  ("contactType" .=) <$> _ocContactType,-                  ("contactInfo" .=) <$> _ocContactInfo])---- | Floodlight Activity GenerateTag Response------ /See:/ 'floodlightActivitiesGenerateTagResponse' smart constructor.-data FloodlightActivitiesGenerateTagResponse = FloodlightActivitiesGenerateTagResponse-    { _fagtrFloodlightActivityTag :: !(Maybe Text)-    , _fagtrKind                  :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'FloodlightActivitiesGenerateTagResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'fagtrFloodlightActivityTag'------ * 'fagtrKind'-floodlightActivitiesGenerateTagResponse-    :: FloodlightActivitiesGenerateTagResponse-floodlightActivitiesGenerateTagResponse =-    FloodlightActivitiesGenerateTagResponse-    { _fagtrFloodlightActivityTag = Nothing-    , _fagtrKind = "dfareporting#floodlightActivitiesGenerateTagResponse"-    }---- | Generated tag for this floodlight activity.-fagtrFloodlightActivityTag :: Lens' FloodlightActivitiesGenerateTagResponse (Maybe Text)-fagtrFloodlightActivityTag-  = lens _fagtrFloodlightActivityTag-      (\ s a -> s{_fagtrFloodlightActivityTag = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#floodlightActivitiesGenerateTagResponse\".-fagtrKind :: Lens' FloodlightActivitiesGenerateTagResponse Text-fagtrKind-  = lens _fagtrKind (\ s a -> s{_fagtrKind = a})--instance FromJSON-         FloodlightActivitiesGenerateTagResponse where-        parseJSON-          = withObject-              "FloodlightActivitiesGenerateTagResponse"-              (\ o ->-                 FloodlightActivitiesGenerateTagResponse <$>-                   (o .:? "floodlightActivityTag") <*>-                     (o .:? "kind" .!=-                        "dfareporting#floodlightActivitiesGenerateTagResponse"))--instance ToJSON-         FloodlightActivitiesGenerateTagResponse where-        toJSON FloodlightActivitiesGenerateTagResponse{..}-          = object-              (catMaybes-                 [("floodlightActivityTag" .=) <$>-                    _fagtrFloodlightActivityTag,-                  Just ("kind" .= _fagtrKind)])---- | Directory Site Contact Assignment------ /See:/ 'directorySiteContactAssignment' smart constructor.-data DirectorySiteContactAssignment = DirectorySiteContactAssignment-    { _dscaVisibility :: !(Maybe DirectorySiteContactAssignmentVisibility)-    , _dscaContactId  :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'DirectorySiteContactAssignment' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dscaVisibility'------ * 'dscaContactId'-directorySiteContactAssignment-    :: DirectorySiteContactAssignment-directorySiteContactAssignment =-    DirectorySiteContactAssignment-    { _dscaVisibility = Nothing-    , _dscaContactId = Nothing-    }---- | Visibility of this directory site contact assignment. When set to PUBLIC--- this contact assignment is visible to all account and agency users; when--- set to PRIVATE it is visible only to the site.-dscaVisibility :: Lens' DirectorySiteContactAssignment (Maybe DirectorySiteContactAssignmentVisibility)-dscaVisibility-  = lens _dscaVisibility-      (\ s a -> s{_dscaVisibility = a})---- | ID of this directory site contact. This is a read-only, auto-generated--- field.-dscaContactId :: Lens' DirectorySiteContactAssignment (Maybe Int64)-dscaContactId-  = lens _dscaContactId-      (\ s a -> s{_dscaContactId = a})-      . mapping _Coerce--instance FromJSON DirectorySiteContactAssignment-         where-        parseJSON-          = withObject "DirectorySiteContactAssignment"-              (\ o ->-                 DirectorySiteContactAssignment <$>-                   (o .:? "visibility") <*> (o .:? "contactId"))--instance ToJSON DirectorySiteContactAssignment where-        toJSON DirectorySiteContactAssignment{..}-          = object-              (catMaybes-                 [("visibility" .=) <$> _dscaVisibility,-                  ("contactId" .=) <$> _dscaContactId])---- | Ad Slot------ /See:/ 'adSlot' smart constructor.-data AdSlot = AdSlot-    { _assHeight            :: !(Maybe (Textual Int64))-    , _assPaymentSourceType :: !(Maybe AdSlotPaymentSourceType)-    , _assLinkedPlacementId :: !(Maybe (Textual Int64))-    , _assWidth             :: !(Maybe (Textual Int64))-    , _assPrimary           :: !(Maybe Bool)-    , _assName              :: !(Maybe Text)-    , _assComment           :: !(Maybe Text)-    , _assCompatibility     :: !(Maybe AdSlotCompatibility)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'AdSlot' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'assHeight'------ * 'assPaymentSourceType'------ * 'assLinkedPlacementId'------ * 'assWidth'------ * 'assPrimary'------ * 'assName'------ * 'assComment'------ * 'assCompatibility'-adSlot-    :: AdSlot-adSlot =-    AdSlot-    { _assHeight = Nothing-    , _assPaymentSourceType = Nothing-    , _assLinkedPlacementId = Nothing-    , _assWidth = Nothing-    , _assPrimary = Nothing-    , _assName = Nothing-    , _assComment = Nothing-    , _assCompatibility = Nothing-    }---- | Height of this ad slot.-assHeight :: Lens' AdSlot (Maybe Int64)-assHeight-  = lens _assHeight (\ s a -> s{_assHeight = a}) .-      mapping _Coerce---- | Payment source type of this ad slot.-assPaymentSourceType :: Lens' AdSlot (Maybe AdSlotPaymentSourceType)-assPaymentSourceType-  = lens _assPaymentSourceType-      (\ s a -> s{_assPaymentSourceType = a})---- | ID of the placement from an external platform that is linked to this ad--- slot.-assLinkedPlacementId :: Lens' AdSlot (Maybe Int64)-assLinkedPlacementId-  = lens _assLinkedPlacementId-      (\ s a -> s{_assLinkedPlacementId = a})-      . mapping _Coerce---- | Width of this ad slot.-assWidth :: Lens' AdSlot (Maybe Int64)-assWidth-  = lens _assWidth (\ s a -> s{_assWidth = a}) .-      mapping _Coerce---- | Primary ad slot of a roadblock inventory item.-assPrimary :: Lens' AdSlot (Maybe Bool)-assPrimary-  = lens _assPrimary (\ s a -> s{_assPrimary = a})---- | Name of this ad slot.-assName :: Lens' AdSlot (Maybe Text)-assName = lens _assName (\ s a -> s{_assName = a})---- | Comment for this ad slot.-assComment :: Lens' AdSlot (Maybe Text)-assComment-  = lens _assComment (\ s a -> s{_assComment = a})---- | Ad slot compatibility. WEB and WEB_INTERSTITIAL refer to rendering--- either on desktop or on mobile devices for regular or interstitial ads--- respectively. APP and APP_INTERSTITIAL are for rendering in mobile apps.--- IN_STREAM_VIDEO refers to rendering in in-stream video ads developed--- with the VAST standard.-assCompatibility :: Lens' AdSlot (Maybe AdSlotCompatibility)-assCompatibility-  = lens _assCompatibility-      (\ s a -> s{_assCompatibility = a})--instance FromJSON AdSlot where-        parseJSON-          = withObject "AdSlot"-              (\ o ->-                 AdSlot <$>-                   (o .:? "height") <*> (o .:? "paymentSourceType") <*>-                     (o .:? "linkedPlacementId")-                     <*> (o .:? "width")-                     <*> (o .:? "primary")-                     <*> (o .:? "name")-                     <*> (o .:? "comment")-                     <*> (o .:? "compatibility"))--instance ToJSON AdSlot where-        toJSON AdSlot{..}-          = object-              (catMaybes-                 [("height" .=) <$> _assHeight,-                  ("paymentSourceType" .=) <$> _assPaymentSourceType,-                  ("linkedPlacementId" .=) <$> _assLinkedPlacementId,-                  ("width" .=) <$> _assWidth,-                  ("primary" .=) <$> _assPrimary,-                  ("name" .=) <$> _assName,-                  ("comment" .=) <$> _assComment,-                  ("compatibility" .=) <$> _assCompatibility])---- | Third-party Tracking URL.------ /See:/ 'thirdPartyTrackingURL' smart constructor.-data ThirdPartyTrackingURL = ThirdPartyTrackingURL-    { _tptuURL               :: !(Maybe Text)-    , _tptuThirdPartyURLType :: !(Maybe ThirdPartyTrackingURLThirdPartyURLType)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ThirdPartyTrackingURL' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tptuURL'------ * 'tptuThirdPartyURLType'-thirdPartyTrackingURL-    :: ThirdPartyTrackingURL-thirdPartyTrackingURL =-    ThirdPartyTrackingURL-    { _tptuURL = Nothing-    , _tptuThirdPartyURLType = Nothing-    }---- | URL for the specified third-party URL type.-tptuURL :: Lens' ThirdPartyTrackingURL (Maybe Text)-tptuURL = lens _tptuURL (\ s a -> s{_tptuURL = a})---- | Third-party URL type for in-stream video creatives.-tptuThirdPartyURLType :: Lens' ThirdPartyTrackingURL (Maybe ThirdPartyTrackingURLThirdPartyURLType)-tptuThirdPartyURLType-  = lens _tptuThirdPartyURLType-      (\ s a -> s{_tptuThirdPartyURLType = a})--instance FromJSON ThirdPartyTrackingURL where-        parseJSON-          = withObject "ThirdPartyTrackingURL"-              (\ o ->-                 ThirdPartyTrackingURL <$>-                   (o .:? "url") <*> (o .:? "thirdPartyUrlType"))--instance ToJSON ThirdPartyTrackingURL where-        toJSON ThirdPartyTrackingURL{..}-          = object-              (catMaybes-                 [("url" .=) <$> _tptuURL,-                  ("thirdPartyUrlType" .=) <$> _tptuThirdPartyURLType])---- | Contains properties of a DoubleClick Planning order document.------ /See:/ 'orderDocument' smart constructor.-data OrderDocument = OrderDocument-    { _odSigned                   :: !(Maybe Bool)-    , _odKind                     :: !Text-    , _odAdvertiserId             :: !(Maybe (Textual Int64))-    , _odLastSentTime             :: !(Maybe DateTime')-    , _odAmendedOrderDocumentId   :: !(Maybe (Textual Int64))-    , _odLastSentRecipients       :: !(Maybe [Text])-    , _odEffectiveDate            :: !(Maybe Date')-    , _odApprovedByUserProFileIds :: !(Maybe [Textual Int64])-    , _odAccountId                :: !(Maybe (Textual Int64))-    , _odId                       :: !(Maybe (Textual Int64))-    , _odProjectId                :: !(Maybe (Textual Int64))-    , _odTitle                    :: !(Maybe Text)-    , _odSubAccountId             :: !(Maybe (Textual Int64))-    , _odType                     :: !(Maybe OrderDocumentType)-    , _odOrderId                  :: !(Maybe (Textual Int64))-    , _odCancelled                :: !(Maybe Bool)-    , _odCreatedInfo              :: !(Maybe LastModifiedInfo)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'OrderDocument' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'odSigned'------ * 'odKind'------ * 'odAdvertiserId'------ * 'odLastSentTime'------ * 'odAmendedOrderDocumentId'------ * 'odLastSentRecipients'------ * 'odEffectiveDate'------ * 'odApprovedByUserProFileIds'------ * 'odAccountId'------ * 'odId'------ * 'odProjectId'------ * 'odTitle'------ * 'odSubAccountId'------ * 'odType'------ * 'odOrderId'------ * 'odCancelled'------ * 'odCreatedInfo'-orderDocument-    :: OrderDocument-orderDocument =-    OrderDocument-    { _odSigned = Nothing-    , _odKind = "dfareporting#orderDocument"-    , _odAdvertiserId = Nothing-    , _odLastSentTime = Nothing-    , _odAmendedOrderDocumentId = Nothing-    , _odLastSentRecipients = Nothing-    , _odEffectiveDate = Nothing-    , _odApprovedByUserProFileIds = Nothing-    , _odAccountId = Nothing-    , _odId = Nothing-    , _odProjectId = Nothing-    , _odTitle = Nothing-    , _odSubAccountId = Nothing-    , _odType = Nothing-    , _odOrderId = Nothing-    , _odCancelled = Nothing-    , _odCreatedInfo = Nothing-    }---- | Whether this order document has been signed.-odSigned :: Lens' OrderDocument (Maybe Bool)-odSigned = lens _odSigned (\ s a -> s{_odSigned = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#orderDocument\".-odKind :: Lens' OrderDocument Text-odKind = lens _odKind (\ s a -> s{_odKind = a})---- | Advertiser ID of this order document.-odAdvertiserId :: Lens' OrderDocument (Maybe Int64)-odAdvertiserId-  = lens _odAdvertiserId-      (\ s a -> s{_odAdvertiserId = a})-      . mapping _Coerce---- | Timestamp of the last email sent with this order document.-odLastSentTime :: Lens' OrderDocument (Maybe UTCTime)-odLastSentTime-  = lens _odLastSentTime-      (\ s a -> s{_odLastSentTime = a})-      . mapping _DateTime---- | The amended order document ID of this order document. An order document--- can be created by optionally amending another order document so that the--- change history can be preserved.-odAmendedOrderDocumentId :: Lens' OrderDocument (Maybe Int64)-odAmendedOrderDocumentId-  = lens _odAmendedOrderDocumentId-      (\ s a -> s{_odAmendedOrderDocumentId = a})-      . mapping _Coerce---- | List of email addresses that received the last sent document.-odLastSentRecipients :: Lens' OrderDocument [Text]-odLastSentRecipients-  = lens _odLastSentRecipients-      (\ s a -> s{_odLastSentRecipients = a})-      . _Default-      . _Coerce---- | Effective date of this order document.-odEffectiveDate :: Lens' OrderDocument (Maybe Day)-odEffectiveDate-  = lens _odEffectiveDate-      (\ s a -> s{_odEffectiveDate = a})-      . mapping _Date---- | IDs of users who have approved this order document.-odApprovedByUserProFileIds :: Lens' OrderDocument [Int64]-odApprovedByUserProFileIds-  = lens _odApprovedByUserProFileIds-      (\ s a -> s{_odApprovedByUserProFileIds = a})-      . _Default-      . _Coerce---- | Account ID of this order document.-odAccountId :: Lens' OrderDocument (Maybe Int64)-odAccountId-  = lens _odAccountId (\ s a -> s{_odAccountId = a}) .-      mapping _Coerce---- | ID of this order document.-odId :: Lens' OrderDocument (Maybe Int64)-odId-  = lens _odId (\ s a -> s{_odId = a}) .-      mapping _Coerce---- | Project ID of this order document.-odProjectId :: Lens' OrderDocument (Maybe Int64)-odProjectId-  = lens _odProjectId (\ s a -> s{_odProjectId = a}) .-      mapping _Coerce---- | Title of this order document.-odTitle :: Lens' OrderDocument (Maybe Text)-odTitle = lens _odTitle (\ s a -> s{_odTitle = a})---- | Subaccount ID of this order document.-odSubAccountId :: Lens' OrderDocument (Maybe Int64)-odSubAccountId-  = lens _odSubAccountId-      (\ s a -> s{_odSubAccountId = a})-      . mapping _Coerce---- | Type of this order document-odType :: Lens' OrderDocument (Maybe OrderDocumentType)-odType = lens _odType (\ s a -> s{_odType = a})---- | ID of the order from which this order document is created.-odOrderId :: Lens' OrderDocument (Maybe Int64)-odOrderId-  = lens _odOrderId (\ s a -> s{_odOrderId = a}) .-      mapping _Coerce---- | Whether this order document is cancelled.-odCancelled :: Lens' OrderDocument (Maybe Bool)-odCancelled-  = lens _odCancelled (\ s a -> s{_odCancelled = a})---- | Information about the creation of this order document.-odCreatedInfo :: Lens' OrderDocument (Maybe LastModifiedInfo)-odCreatedInfo-  = lens _odCreatedInfo-      (\ s a -> s{_odCreatedInfo = a})--instance FromJSON OrderDocument where-        parseJSON-          = withObject "OrderDocument"-              (\ o ->-                 OrderDocument <$>-                   (o .:? "signed") <*>-                     (o .:? "kind" .!= "dfareporting#orderDocument")-                     <*> (o .:? "advertiserId")-                     <*> (o .:? "lastSentTime")-                     <*> (o .:? "amendedOrderDocumentId")-                     <*> (o .:? "lastSentRecipients" .!= mempty)-                     <*> (o .:? "effectiveDate")-                     <*> (o .:? "approvedByUserProfileIds" .!= mempty)-                     <*> (o .:? "accountId")-                     <*> (o .:? "id")-                     <*> (o .:? "projectId")-                     <*> (o .:? "title")-                     <*> (o .:? "subaccountId")-                     <*> (o .:? "type")-                     <*> (o .:? "orderId")-                     <*> (o .:? "cancelled")-                     <*> (o .:? "createdInfo"))--instance ToJSON OrderDocument where-        toJSON OrderDocument{..}-          = object-              (catMaybes-                 [("signed" .=) <$> _odSigned,-                  Just ("kind" .= _odKind),-                  ("advertiserId" .=) <$> _odAdvertiserId,-                  ("lastSentTime" .=) <$> _odLastSentTime,-                  ("amendedOrderDocumentId" .=) <$>-                    _odAmendedOrderDocumentId,-                  ("lastSentRecipients" .=) <$> _odLastSentRecipients,-                  ("effectiveDate" .=) <$> _odEffectiveDate,-                  ("approvedByUserProfileIds" .=) <$>-                    _odApprovedByUserProFileIds,-                  ("accountId" .=) <$> _odAccountId,-                  ("id" .=) <$> _odId,-                  ("projectId" .=) <$> _odProjectId,-                  ("title" .=) <$> _odTitle,-                  ("subaccountId" .=) <$> _odSubAccountId,-                  ("type" .=) <$> _odType,-                  ("orderId" .=) <$> _odOrderId,-                  ("cancelled" .=) <$> _odCancelled,-                  ("createdInfo" .=) <$> _odCreatedInfo])---- | Contains information about a metro region that can be targeted by ads.------ /See:/ 'metro' smart constructor.-data Metro = Metro-    { _metMetroCode     :: !(Maybe Text)-    , _metKind          :: !Text-    , _metName          :: !(Maybe Text)-    , _metCountryCode   :: !(Maybe Text)-    , _metDmaId         :: !(Maybe (Textual Int64))-    , _metCountryDartId :: !(Maybe (Textual Int64))-    , _metDartId        :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'Metro' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'metMetroCode'------ * 'metKind'------ * 'metName'------ * 'metCountryCode'------ * 'metDmaId'------ * 'metCountryDartId'------ * 'metDartId'-metro-    :: Metro-metro =-    Metro-    { _metMetroCode = Nothing-    , _metKind = "dfareporting#metro"-    , _metName = Nothing-    , _metCountryCode = Nothing-    , _metDmaId = Nothing-    , _metCountryDartId = Nothing-    , _metDartId = Nothing-    }---- | Metro code of this metro region. This is equivalent to dma_id.-metMetroCode :: Lens' Metro (Maybe Text)-metMetroCode-  = lens _metMetroCode (\ s a -> s{_metMetroCode = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#metro\".-metKind :: Lens' Metro Text-metKind = lens _metKind (\ s a -> s{_metKind = a})---- | Name of this metro region.-metName :: Lens' Metro (Maybe Text)-metName = lens _metName (\ s a -> s{_metName = a})---- | Country code of the country to which this metro region belongs.-metCountryCode :: Lens' Metro (Maybe Text)-metCountryCode-  = lens _metCountryCode-      (\ s a -> s{_metCountryCode = a})---- | DMA ID of this metro region. This is the ID used for targeting and--- generating reports, and is equivalent to metro_code.-metDmaId :: Lens' Metro (Maybe Int64)-metDmaId-  = lens _metDmaId (\ s a -> s{_metDmaId = a}) .-      mapping _Coerce---- | DART ID of the country to which this metro region belongs.-metCountryDartId :: Lens' Metro (Maybe Int64)-metCountryDartId-  = lens _metCountryDartId-      (\ s a -> s{_metCountryDartId = a})-      . mapping _Coerce---- | DART ID of this metro region.-metDartId :: Lens' Metro (Maybe Int64)-metDartId-  = lens _metDartId (\ s a -> s{_metDartId = a}) .-      mapping _Coerce--instance FromJSON Metro where-        parseJSON-          = withObject "Metro"-              (\ o ->-                 Metro <$>-                   (o .:? "metroCode") <*>-                     (o .:? "kind" .!= "dfareporting#metro")-                     <*> (o .:? "name")-                     <*> (o .:? "countryCode")-                     <*> (o .:? "dmaId")-                     <*> (o .:? "countryDartId")-                     <*> (o .:? "dartId"))--instance ToJSON Metro where-        toJSON Metro{..}-          = object-              (catMaybes-                 [("metroCode" .=) <$> _metMetroCode,-                  Just ("kind" .= _metKind), ("name" .=) <$> _metName,-                  ("countryCode" .=) <$> _metCountryCode,-                  ("dmaId" .=) <$> _metDmaId,-                  ("countryDartId" .=) <$> _metCountryDartId,-                  ("dartId" .=) <$> _metDartId])---- | Contains properties of a placement.------ /See:/ 'placement' smart constructor.-data Placement = Placement-    { _p1Status                         :: !(Maybe PlacementStatus)-    , _p1PlacementStrategyId            :: !(Maybe (Textual Int64))-    , _p1TagFormats                     :: !(Maybe [PlacementTagFormatsItem])-    , _p1SiteIdDimensionValue           :: !(Maybe DimensionValue)-    , _p1PricingSchedule                :: !(Maybe PricingSchedule)-    , _p1Size                           :: !(Maybe Size)-    , _p1Kind                           :: !Text-    , _p1KeyName                        :: !(Maybe Text)-    , _p1CampaignIdDimensionValue       :: !(Maybe DimensionValue)-    , _p1AdvertiserId                   :: !(Maybe (Textual Int64))-    , _p1AdvertiserIdDimensionValue     :: !(Maybe DimensionValue)-    , _p1CampaignId                     :: !(Maybe (Textual Int64))-    , _p1IdDimensionValue               :: !(Maybe DimensionValue)-    , _p1Primary                        :: !(Maybe Bool)-    , _p1LookbackConfiguration          :: !(Maybe LookbackConfiguration)-    , _p1TagSetting                     :: !(Maybe TagSetting)-    , _p1ContentCategoryId              :: !(Maybe (Textual Int64))-    , _p1DirectorySiteIdDimensionValue  :: !(Maybe DimensionValue)-    , _p1AccountId                      :: !(Maybe (Textual Int64))-    , _p1PaymentSource                  :: !(Maybe PlacementPaymentSource)-    , _p1Name                           :: !(Maybe Text)-    , _p1DirectorySiteId                :: !(Maybe (Textual Int64))-    , _p1CreateInfo                     :: !(Maybe LastModifiedInfo)-    , _p1LastModifiedInfo               :: !(Maybe LastModifiedInfo)-    , _p1Id                             :: !(Maybe (Textual Int64))-    , _p1SSLRequired                    :: !(Maybe Bool)-    , _p1SubAccountId                   :: !(Maybe (Textual Int64))-    , _p1PlacementGroupIdDimensionValue :: !(Maybe DimensionValue)-    , _p1ExternalId                     :: !(Maybe Text)-    , _p1PlacementGroupId               :: !(Maybe (Textual Int64))-    , _p1Comment                        :: !(Maybe Text)-    , _p1SiteId                         :: !(Maybe (Textual Int64))-    , _p1Compatibility                  :: !(Maybe PlacementCompatibility)-    , _p1Archived                       :: !(Maybe Bool)-    , _p1PaymentApproved                :: !(Maybe Bool)-    , _p1PublisherUpdateInfo            :: !(Maybe LastModifiedInfo)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'Placement' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'p1Status'------ * 'p1PlacementStrategyId'------ * 'p1TagFormats'------ * 'p1SiteIdDimensionValue'------ * 'p1PricingSchedule'------ * 'p1Size'------ * 'p1Kind'------ * 'p1KeyName'------ * 'p1CampaignIdDimensionValue'------ * 'p1AdvertiserId'------ * 'p1AdvertiserIdDimensionValue'------ * 'p1CampaignId'------ * 'p1IdDimensionValue'------ * 'p1Primary'------ * 'p1LookbackConfiguration'------ * 'p1TagSetting'------ * 'p1ContentCategoryId'------ * 'p1DirectorySiteIdDimensionValue'------ * 'p1AccountId'------ * 'p1PaymentSource'------ * 'p1Name'------ * 'p1DirectorySiteId'------ * 'p1CreateInfo'------ * 'p1LastModifiedInfo'------ * 'p1Id'------ * 'p1SSLRequired'------ * 'p1SubAccountId'------ * 'p1PlacementGroupIdDimensionValue'------ * 'p1ExternalId'------ * 'p1PlacementGroupId'------ * 'p1Comment'------ * 'p1SiteId'------ * 'p1Compatibility'------ * 'p1Archived'------ * 'p1PaymentApproved'------ * 'p1PublisherUpdateInfo'-placement-    :: Placement-placement =-    Placement-    { _p1Status = Nothing-    , _p1PlacementStrategyId = Nothing-    , _p1TagFormats = Nothing-    , _p1SiteIdDimensionValue = Nothing-    , _p1PricingSchedule = Nothing-    , _p1Size = Nothing-    , _p1Kind = "dfareporting#placement"-    , _p1KeyName = Nothing-    , _p1CampaignIdDimensionValue = Nothing-    , _p1AdvertiserId = Nothing-    , _p1AdvertiserIdDimensionValue = Nothing-    , _p1CampaignId = Nothing-    , _p1IdDimensionValue = Nothing-    , _p1Primary = Nothing-    , _p1LookbackConfiguration = Nothing-    , _p1TagSetting = Nothing-    , _p1ContentCategoryId = Nothing-    , _p1DirectorySiteIdDimensionValue = Nothing-    , _p1AccountId = Nothing-    , _p1PaymentSource = Nothing-    , _p1Name = Nothing-    , _p1DirectorySiteId = Nothing-    , _p1CreateInfo = Nothing-    , _p1LastModifiedInfo = Nothing-    , _p1Id = Nothing-    , _p1SSLRequired = Nothing-    , _p1SubAccountId = Nothing-    , _p1PlacementGroupIdDimensionValue = Nothing-    , _p1ExternalId = Nothing-    , _p1PlacementGroupId = Nothing-    , _p1Comment = Nothing-    , _p1SiteId = Nothing-    , _p1Compatibility = Nothing-    , _p1Archived = Nothing-    , _p1PaymentApproved = Nothing-    , _p1PublisherUpdateInfo = Nothing-    }---- | Third-party placement status.-p1Status :: Lens' Placement (Maybe PlacementStatus)-p1Status = lens _p1Status (\ s a -> s{_p1Status = a})---- | ID of the placement strategy assigned to this placement.-p1PlacementStrategyId :: Lens' Placement (Maybe Int64)-p1PlacementStrategyId-  = lens _p1PlacementStrategyId-      (\ s a -> s{_p1PlacementStrategyId = a})-      . mapping _Coerce---- | Tag formats to generate for this placement. This field is required on--- insertion. Acceptable values are: - \"PLACEMENT_TAG_STANDARD\" ---- \"PLACEMENT_TAG_IFRAME_JAVASCRIPT\" - \"PLACEMENT_TAG_IFRAME_ILAYER\" ---- \"PLACEMENT_TAG_INTERNAL_REDIRECT\" - \"PLACEMENT_TAG_JAVASCRIPT\" ---- \"PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT\" ---- \"PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT\" ---- \"PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT\" ---- \"PLACEMENT_TAG_CLICK_COMMANDS\" ---- \"PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH\" - \"PLACEMENT_TAG_TRACKING\" ---- \"PLACEMENT_TAG_TRACKING_IFRAME\" ---- \"PLACEMENT_TAG_TRACKING_JAVASCRIPT\"-p1TagFormats :: Lens' Placement [PlacementTagFormatsItem]-p1TagFormats-  = lens _p1TagFormats (\ s a -> s{_p1TagFormats = a})-      . _Default-      . _Coerce---- | Dimension value for the ID of the site. This is a read-only,--- auto-generated field.-p1SiteIdDimensionValue :: Lens' Placement (Maybe DimensionValue)-p1SiteIdDimensionValue-  = lens _p1SiteIdDimensionValue-      (\ s a -> s{_p1SiteIdDimensionValue = a})---- | Pricing schedule of this placement. This field is required on insertion,--- specifically subfields startDate, endDate and pricingType.-p1PricingSchedule :: Lens' Placement (Maybe PricingSchedule)-p1PricingSchedule-  = lens _p1PricingSchedule-      (\ s a -> s{_p1PricingSchedule = a})---- | Size associated with this placement. When inserting or updating a--- placement, only the size ID field is used. This field is required on--- insertion.-p1Size :: Lens' Placement (Maybe Size)-p1Size = lens _p1Size (\ s a -> s{_p1Size = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#placement\".-p1Kind :: Lens' Placement Text-p1Kind = lens _p1Kind (\ s a -> s{_p1Kind = a})---- | Key name of this placement. This is a read-only, auto-generated field.-p1KeyName :: Lens' Placement (Maybe Text)-p1KeyName-  = lens _p1KeyName (\ s a -> s{_p1KeyName = a})---- | Dimension value for the ID of the campaign. This is a read-only,--- auto-generated field.-p1CampaignIdDimensionValue :: Lens' Placement (Maybe DimensionValue)-p1CampaignIdDimensionValue-  = lens _p1CampaignIdDimensionValue-      (\ s a -> s{_p1CampaignIdDimensionValue = a})---- | Advertiser ID of this placement. This field can be left blank.-p1AdvertiserId :: Lens' Placement (Maybe Int64)-p1AdvertiserId-  = lens _p1AdvertiserId-      (\ s a -> s{_p1AdvertiserId = a})-      . mapping _Coerce---- | Dimension value for the ID of the advertiser. This is a read-only,--- auto-generated field.-p1AdvertiserIdDimensionValue :: Lens' Placement (Maybe DimensionValue)-p1AdvertiserIdDimensionValue-  = lens _p1AdvertiserIdDimensionValue-      (\ s a -> s{_p1AdvertiserIdDimensionValue = a})---- | Campaign ID of this placement. This field is a required field on--- insertion.-p1CampaignId :: Lens' Placement (Maybe Int64)-p1CampaignId-  = lens _p1CampaignId (\ s a -> s{_p1CampaignId = a})-      . mapping _Coerce---- | Dimension value for the ID of this placement. This is a read-only,--- auto-generated field.-p1IdDimensionValue :: Lens' Placement (Maybe DimensionValue)-p1IdDimensionValue-  = lens _p1IdDimensionValue-      (\ s a -> s{_p1IdDimensionValue = a})---- | Whether this placement is the primary placement of a roadblock--- (placement group). You cannot change this field from true to false.--- Setting this field to true will automatically set the primary field on--- the original primary placement of the roadblock to false, and it will--- automatically set the roadblock\'s primaryPlacementId field to the ID of--- this placement.-p1Primary :: Lens' Placement (Maybe Bool)-p1Primary-  = lens _p1Primary (\ s a -> s{_p1Primary = a})---- | Lookback window settings for this placement.-p1LookbackConfiguration :: Lens' Placement (Maybe LookbackConfiguration)-p1LookbackConfiguration-  = lens _p1LookbackConfiguration-      (\ s a -> s{_p1LookbackConfiguration = a})---- | Tag settings for this placement.-p1TagSetting :: Lens' Placement (Maybe TagSetting)-p1TagSetting-  = lens _p1TagSetting (\ s a -> s{_p1TagSetting = a})---- | ID of the content category assigned to this placement.-p1ContentCategoryId :: Lens' Placement (Maybe Int64)-p1ContentCategoryId-  = lens _p1ContentCategoryId-      (\ s a -> s{_p1ContentCategoryId = a})-      . mapping _Coerce---- | Dimension value for the ID of the directory site. This is a read-only,--- auto-generated field.-p1DirectorySiteIdDimensionValue :: Lens' Placement (Maybe DimensionValue)-p1DirectorySiteIdDimensionValue-  = lens _p1DirectorySiteIdDimensionValue-      (\ s a -> s{_p1DirectorySiteIdDimensionValue = a})---- | Account ID of this placement. This field can be left blank.-p1AccountId :: Lens' Placement (Maybe Int64)-p1AccountId-  = lens _p1AccountId (\ s a -> s{_p1AccountId = a}) .-      mapping _Coerce---- | Payment source for this placement. This is a required field that is--- read-only after insertion.-p1PaymentSource :: Lens' Placement (Maybe PlacementPaymentSource)-p1PaymentSource-  = lens _p1PaymentSource-      (\ s a -> s{_p1PaymentSource = a})---- | Name of this placement.This is a required field and must be less than--- 256 characters long.-p1Name :: Lens' Placement (Maybe Text)-p1Name = lens _p1Name (\ s a -> s{_p1Name = a})---- | Directory site ID of this placement. On insert, you must set either this--- field or the siteId field to specify the site associated with this--- placement. This is a required field that is read-only after insertion.-p1DirectorySiteId :: Lens' Placement (Maybe Int64)-p1DirectorySiteId-  = lens _p1DirectorySiteId-      (\ s a -> s{_p1DirectorySiteId = a})-      . mapping _Coerce---- | Information about the creation of this placement. This is a read-only--- field.-p1CreateInfo :: Lens' Placement (Maybe LastModifiedInfo)-p1CreateInfo-  = lens _p1CreateInfo (\ s a -> s{_p1CreateInfo = a})---- | Information about the most recent modification of this placement. This--- is a read-only field.-p1LastModifiedInfo :: Lens' Placement (Maybe LastModifiedInfo)-p1LastModifiedInfo-  = lens _p1LastModifiedInfo-      (\ s a -> s{_p1LastModifiedInfo = a})---- | ID of this placement. This is a read-only, auto-generated field.-p1Id :: Lens' Placement (Maybe Int64)-p1Id-  = lens _p1Id (\ s a -> s{_p1Id = a}) .-      mapping _Coerce---- | Whether creatives assigned to this placement must be SSL-compliant.-p1SSLRequired :: Lens' Placement (Maybe Bool)-p1SSLRequired-  = lens _p1SSLRequired-      (\ s a -> s{_p1SSLRequired = a})---- | Subaccount ID of this placement. This field can be left blank.-p1SubAccountId :: Lens' Placement (Maybe Int64)-p1SubAccountId-  = lens _p1SubAccountId-      (\ s a -> s{_p1SubAccountId = a})-      . mapping _Coerce---- | Dimension value for the ID of the placement group. This is a read-only,--- auto-generated field.-p1PlacementGroupIdDimensionValue :: Lens' Placement (Maybe DimensionValue)-p1PlacementGroupIdDimensionValue-  = lens _p1PlacementGroupIdDimensionValue-      (\ s a -> s{_p1PlacementGroupIdDimensionValue = a})---- | External ID for this placement.-p1ExternalId :: Lens' Placement (Maybe Text)-p1ExternalId-  = lens _p1ExternalId (\ s a -> s{_p1ExternalId = a})---- | ID of this placement\'s group, if applicable.-p1PlacementGroupId :: Lens' Placement (Maybe Int64)-p1PlacementGroupId-  = lens _p1PlacementGroupId-      (\ s a -> s{_p1PlacementGroupId = a})-      . mapping _Coerce---- | Comments for this placement.-p1Comment :: Lens' Placement (Maybe Text)-p1Comment-  = lens _p1Comment (\ s a -> s{_p1Comment = a})---- | Site ID associated with this placement. On insert, you must set either--- this field or the directorySiteId field to specify the site associated--- with this placement. This is a required field that is read-only after--- insertion.-p1SiteId :: Lens' Placement (Maybe Int64)-p1SiteId-  = lens _p1SiteId (\ s a -> s{_p1SiteId = a}) .-      mapping _Coerce---- | Placement compatibility. WEB and WEB_INTERSTITIAL refer to rendering--- either on desktop or on mobile devices for regular or interstitial ads,--- respectively. APP and APP_INTERSTITIAL are for rendering in mobile--- apps.IN_STREAM_VIDEO refers to rendering in in-stream video ads--- developed with the VAST standard. This field is required on insertion.-p1Compatibility :: Lens' Placement (Maybe PlacementCompatibility)-p1Compatibility-  = lens _p1Compatibility-      (\ s a -> s{_p1Compatibility = a})---- | Whether this placement is archived.-p1Archived :: Lens' Placement (Maybe Bool)-p1Archived-  = lens _p1Archived (\ s a -> s{_p1Archived = a})---- | Whether payment was approved for this placement. This is a read-only--- field relevant only to publisher-paid placements.-p1PaymentApproved :: Lens' Placement (Maybe Bool)-p1PaymentApproved-  = lens _p1PaymentApproved-      (\ s a -> s{_p1PaymentApproved = a})---- | Information about the last publisher update. This is a read-only field.-p1PublisherUpdateInfo :: Lens' Placement (Maybe LastModifiedInfo)-p1PublisherUpdateInfo-  = lens _p1PublisherUpdateInfo-      (\ s a -> s{_p1PublisherUpdateInfo = a})--instance FromJSON Placement where-        parseJSON-          = withObject "Placement"-              (\ o ->-                 Placement <$>-                   (o .:? "status") <*> (o .:? "placementStrategyId")-                     <*> (o .:? "tagFormats" .!= mempty)-                     <*> (o .:? "siteIdDimensionValue")-                     <*> (o .:? "pricingSchedule")-                     <*> (o .:? "size")-                     <*> (o .:? "kind" .!= "dfareporting#placement")-                     <*> (o .:? "keyName")-                     <*> (o .:? "campaignIdDimensionValue")-                     <*> (o .:? "advertiserId")-                     <*> (o .:? "advertiserIdDimensionValue")-                     <*> (o .:? "campaignId")-                     <*> (o .:? "idDimensionValue")-                     <*> (o .:? "primary")-                     <*> (o .:? "lookbackConfiguration")-                     <*> (o .:? "tagSetting")-                     <*> (o .:? "contentCategoryId")-                     <*> (o .:? "directorySiteIdDimensionValue")-                     <*> (o .:? "accountId")-                     <*> (o .:? "paymentSource")-                     <*> (o .:? "name")-                     <*> (o .:? "directorySiteId")-                     <*> (o .:? "createInfo")-                     <*> (o .:? "lastModifiedInfo")-                     <*> (o .:? "id")-                     <*> (o .:? "sslRequired")-                     <*> (o .:? "subaccountId")-                     <*> (o .:? "placementGroupIdDimensionValue")-                     <*> (o .:? "externalId")-                     <*> (o .:? "placementGroupId")-                     <*> (o .:? "comment")-                     <*> (o .:? "siteId")-                     <*> (o .:? "compatibility")-                     <*> (o .:? "archived")-                     <*> (o .:? "paymentApproved")-                     <*> (o .:? "publisherUpdateInfo"))--instance ToJSON Placement where-        toJSON Placement{..}-          = object-              (catMaybes-                 [("status" .=) <$> _p1Status,-                  ("placementStrategyId" .=) <$>-                    _p1PlacementStrategyId,-                  ("tagFormats" .=) <$> _p1TagFormats,-                  ("siteIdDimensionValue" .=) <$>-                    _p1SiteIdDimensionValue,-                  ("pricingSchedule" .=) <$> _p1PricingSchedule,-                  ("size" .=) <$> _p1Size, Just ("kind" .= _p1Kind),-                  ("keyName" .=) <$> _p1KeyName,-                  ("campaignIdDimensionValue" .=) <$>-                    _p1CampaignIdDimensionValue,-                  ("advertiserId" .=) <$> _p1AdvertiserId,-                  ("advertiserIdDimensionValue" .=) <$>-                    _p1AdvertiserIdDimensionValue,-                  ("campaignId" .=) <$> _p1CampaignId,-                  ("idDimensionValue" .=) <$> _p1IdDimensionValue,-                  ("primary" .=) <$> _p1Primary,-                  ("lookbackConfiguration" .=) <$>-                    _p1LookbackConfiguration,-                  ("tagSetting" .=) <$> _p1TagSetting,-                  ("contentCategoryId" .=) <$> _p1ContentCategoryId,-                  ("directorySiteIdDimensionValue" .=) <$>-                    _p1DirectorySiteIdDimensionValue,-                  ("accountId" .=) <$> _p1AccountId,-                  ("paymentSource" .=) <$> _p1PaymentSource,-                  ("name" .=) <$> _p1Name,-                  ("directorySiteId" .=) <$> _p1DirectorySiteId,-                  ("createInfo" .=) <$> _p1CreateInfo,-                  ("lastModifiedInfo" .=) <$> _p1LastModifiedInfo,-                  ("id" .=) <$> _p1Id,-                  ("sslRequired" .=) <$> _p1SSLRequired,-                  ("subaccountId" .=) <$> _p1SubAccountId,-                  ("placementGroupIdDimensionValue" .=) <$>-                    _p1PlacementGroupIdDimensionValue,-                  ("externalId" .=) <$> _p1ExternalId,-                  ("placementGroupId" .=) <$> _p1PlacementGroupId,-                  ("comment" .=) <$> _p1Comment,-                  ("siteId" .=) <$> _p1SiteId,-                  ("compatibility" .=) <$> _p1Compatibility,-                  ("archived" .=) <$> _p1Archived,-                  ("paymentApproved" .=) <$> _p1PaymentApproved,-                  ("publisherUpdateInfo" .=) <$>-                    _p1PublisherUpdateInfo])---- | Site List Response------ /See:/ 'sitesListResponse' smart constructor.-data SitesListResponse = SitesListResponse-    { _sitNextPageToken :: !(Maybe Text)-    , _sitKind          :: !Text-    , _sitSites         :: !(Maybe [Site])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'SitesListResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sitNextPageToken'------ * 'sitKind'------ * 'sitSites'-sitesListResponse-    :: SitesListResponse-sitesListResponse =-    SitesListResponse-    { _sitNextPageToken = Nothing-    , _sitKind = "dfareporting#sitesListResponse"-    , _sitSites = Nothing-    }---- | Pagination token to be used for the next list operation.-sitNextPageToken :: Lens' SitesListResponse (Maybe Text)-sitNextPageToken-  = lens _sitNextPageToken-      (\ s a -> s{_sitNextPageToken = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#sitesListResponse\".-sitKind :: Lens' SitesListResponse Text-sitKind = lens _sitKind (\ s a -> s{_sitKind = a})---- | Site collection.-sitSites :: Lens' SitesListResponse [Site]-sitSites-  = lens _sitSites (\ s a -> s{_sitSites = a}) .-      _Default-      . _Coerce--instance FromJSON SitesListResponse where-        parseJSON-          = withObject "SitesListResponse"-              (\ o ->-                 SitesListResponse <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!= "dfareporting#sitesListResponse")-                     <*> (o .:? "sites" .!= mempty))--instance ToJSON SitesListResponse where-        toJSON SitesListResponse{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _sitNextPageToken,-                  Just ("kind" .= _sitKind),-                  ("sites" .=) <$> _sitSites])---- | Contains properties of a creative field.------ /See:/ 'creativeField' smart constructor.-data CreativeField = CreativeField-    { _cffKind                       :: !Text-    , _cffAdvertiserId               :: !(Maybe (Textual Int64))-    , _cffAdvertiserIdDimensionValue :: !(Maybe DimensionValue)-    , _cffAccountId                  :: !(Maybe (Textual Int64))-    , _cffName                       :: !(Maybe Text)-    , _cffId                         :: !(Maybe (Textual Int64))-    , _cffSubAccountId               :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'CreativeField' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cffKind'------ * 'cffAdvertiserId'------ * 'cffAdvertiserIdDimensionValue'------ * 'cffAccountId'------ * 'cffName'------ * 'cffId'------ * 'cffSubAccountId'-creativeField-    :: CreativeField-creativeField =-    CreativeField-    { _cffKind = "dfareporting#creativeField"-    , _cffAdvertiserId = Nothing-    , _cffAdvertiserIdDimensionValue = Nothing-    , _cffAccountId = Nothing-    , _cffName = Nothing-    , _cffId = Nothing-    , _cffSubAccountId = Nothing-    }---- | Identifies what kind of resource this is. Value: the fixed string--- \"dfareporting#creativeField\".-cffKind :: Lens' CreativeField Text-cffKind = lens _cffKind (\ s a -> s{_cffKind = a})---- | Advertiser ID of this creative field. This is a required field on--- insertion.-cffAdvertiserId :: Lens' CreativeField (Maybe Int64)-cffAdvertiserId-  = lens _cffAdvertiserId-      (\ s a -> s{_cffAdvertiserId = a})-      . mapping _Coerce---- | Dimension value for the ID of the advertiser. This is a read-only,--- auto-generated field.-cffAdvertiserIdDimensionValue :: Lens' CreativeField (Maybe DimensionValue)-cffAdvertiserIdDimensionValue-  = lens _cffAdvertiserIdDimensionValue-      (\ s a -> s{_cffAdvertiserIdDimensionValue = a})---- | Account ID of this creative field. This is a read-only field that can be--- left blank.-cffAccountId :: Lens' CreativeField (Maybe Int64)-cffAccountId-  = lens _cffAccountId (\ s a -> s{_cffAccountId = a})-      . mapping _Coerce---- | Name of this creative field. This is a required field and must be less--- than 256 characters long and unique among creative fields of the same--- advertiser.-cffName :: Lens' CreativeField (Maybe Text)-cffName = lens _cffName (\ s a -> s{_cffName = a})---- | ID of this creative field. This is a read-only, auto-generated field.-cffId :: Lens' CreativeField (Maybe Int64)-cffId-  = lens _cffId (\ s a -> s{_cffId = a}) .-      mapping _Coerce---- | Subaccount ID of this creative field. This is a read-only field that can--- be left blank.-cffSubAccountId :: Lens' CreativeField (Maybe Int64)-cffSubAccountId-  = lens _cffSubAccountId-      (\ s a -> s{_cffSubAccountId = a})-      . mapping _Coerce--instance FromJSON CreativeField where-        parseJSON-          = withObject "CreativeField"-              (\ o ->-                 CreativeField <$>-                   (o .:? "kind" .!= "dfareporting#creativeField") <*>-                     (o .:? "advertiserId")-                     <*> (o .:? "advertiserIdDimensionValue")-                     <*> (o .:? "accountId")-                     <*> (o .:? "name")-                     <*> (o .:? "id")-                     <*> (o .:? "subaccountId"))--instance ToJSON CreativeField where-        toJSON CreativeField{..}-          = object-              (catMaybes-                 [Just ("kind" .= _cffKind),-                  ("advertiserId" .=) <$> _cffAdvertiserId,-                  ("advertiserIdDimensionValue" .=) <$>-                    _cffAdvertiserIdDimensionValue,-                  ("accountId" .=) <$> _cffAccountId,-                  ("name" .=) <$> _cffName, ("id" .=) <$> _cffId,-                  ("subaccountId" .=) <$> _cffSubAccountId])---- | Properties of inheriting and overriding the default click-through event--- tag. A campaign may override the event tag defined at the advertiser--- level, and an ad may also override the campaign\'s setting further.------ /See:/ 'defaultClickThroughEventTagProperties' smart constructor.-data DefaultClickThroughEventTagProperties = DefaultClickThroughEventTagProperties-    { _dctetpOverrideInheritedEventTag     :: !(Maybe Bool)-    , _dctetpDefaultClickThroughEventTagId :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'DefaultClickThroughEventTagProperties' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dctetpOverrideInheritedEventTag'------ * 'dctetpDefaultClickThroughEventTagId'-defaultClickThroughEventTagProperties-    :: DefaultClickThroughEventTagProperties-defaultClickThroughEventTagProperties =-    DefaultClickThroughEventTagProperties-    { _dctetpOverrideInheritedEventTag = Nothing-    , _dctetpDefaultClickThroughEventTagId = Nothing-    }---- | Whether this entity should override the inherited default click-through--- event tag with its own defined value.-dctetpOverrideInheritedEventTag :: Lens' DefaultClickThroughEventTagProperties (Maybe Bool)-dctetpOverrideInheritedEventTag-  = lens _dctetpOverrideInheritedEventTag-      (\ s a -> s{_dctetpOverrideInheritedEventTag = a})---- | ID of the click-through event tag to apply to all ads in this entity\'s--- scope.-dctetpDefaultClickThroughEventTagId :: Lens' DefaultClickThroughEventTagProperties (Maybe Int64)-dctetpDefaultClickThroughEventTagId-  = lens _dctetpDefaultClickThroughEventTagId-      (\ s a ->-         s{_dctetpDefaultClickThroughEventTagId = a})-      . mapping _Coerce--instance FromJSON-         DefaultClickThroughEventTagProperties where-        parseJSON-          = withObject "DefaultClickThroughEventTagProperties"-              (\ o ->-                 DefaultClickThroughEventTagProperties <$>-                   (o .:? "overrideInheritedEventTag") <*>-                     (o .:? "defaultClickThroughEventTagId"))--instance ToJSON DefaultClickThroughEventTagProperties-         where-        toJSON DefaultClickThroughEventTagProperties{..}-          = object-              (catMaybes-                 [("overrideInheritedEventTag" .=) <$>-                    _dctetpOverrideInheritedEventTag,-                  ("defaultClickThroughEventTagId" .=) <$>-                    _dctetpDefaultClickThroughEventTagId])---- | Remarketing List Targeting Expression.------ /See:/ 'listTargetingExpression' smart constructor.-newtype ListTargetingExpression = ListTargetingExpression-    { _lteExpression :: Maybe Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'ListTargetingExpression' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lteExpression'-listTargetingExpression-    :: ListTargetingExpression-listTargetingExpression =-    ListTargetingExpression-    { _lteExpression = Nothing-    }---- | Expression describing which lists are being targeted by the ad.-lteExpression :: Lens' ListTargetingExpression (Maybe Text)-lteExpression-  = lens _lteExpression-      (\ s a -> s{_lteExpression = a})--instance FromJSON ListTargetingExpression where-        parseJSON-          = withObject "ListTargetingExpression"-              (\ o ->-                 ListTargetingExpression <$> (o .:? "expression"))--instance ToJSON ListTargetingExpression where-        toJSON ListTargetingExpression{..}+-- 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.DFAReporting.Types.Product where++import           Network.Google.DFAReporting.Types.Sum+import           Network.Google.Prelude++-- | Represents the list of File resources.+--+-- /See:/ 'fileList' smart constructor.+data FileList = FileList'+    { _flEtag          :: !(Maybe Text)+    , _flNextPageToken :: !(Maybe Text)+    , _flKind          :: !Text+    , _flItems         :: !(Maybe [File])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'FileList' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'flEtag'+--+-- * 'flNextPageToken'+--+-- * 'flKind'+--+-- * 'flItems'+fileList+    :: FileList+fileList =+    FileList'+    { _flEtag = Nothing+    , _flNextPageToken = Nothing+    , _flKind = "dfareporting#fileList"+    , _flItems = Nothing+    }++-- | The eTag of this response for caching purposes.+flEtag :: Lens' FileList (Maybe Text)+flEtag = lens _flEtag (\ s a -> s{_flEtag = a})++-- | Continuation token used to page through files. To retrieve the next page+-- of results, set the next request\'s \"pageToken\" to the value of this+-- field. The page token is only valid for a limited amount of time and+-- should not be persisted.+flNextPageToken :: Lens' FileList (Maybe Text)+flNextPageToken+  = lens _flNextPageToken+      (\ s a -> s{_flNextPageToken = a})++-- | The kind of list this is, in this case dfareporting#fileList.+flKind :: Lens' FileList Text+flKind = lens _flKind (\ s a -> s{_flKind = a})++-- | The files returned in this response.+flItems :: Lens' FileList [File]+flItems+  = lens _flItems (\ s a -> s{_flItems = a}) . _Default+      . _Coerce++instance FromJSON FileList where+        parseJSON+          = withObject "FileList"+              (\ o ->+                 FileList' <$>+                   (o .:? "etag") <*> (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!= "dfareporting#fileList")+                     <*> (o .:? "items" .!= mempty))++instance ToJSON FileList where+        toJSON FileList'{..}+          = object+              (catMaybes+                 [("etag" .=) <$> _flEtag,+                  ("nextPageToken" .=) <$> _flNextPageToken,+                  Just ("kind" .= _flKind), ("items" .=) <$> _flItems])++-- | Creative optimization activity.+--+-- /See:/ 'optimizationActivity' smart constructor.+data OptimizationActivity = OptimizationActivity'+    { _oaWeight                             :: !(Maybe (Textual Int32))+    , _oaFloodlightActivityId               :: !(Maybe (Textual Int64))+    , _oaFloodlightActivityIdDimensionValue :: !(Maybe DimensionValue)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'OptimizationActivity' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'oaWeight'+--+-- * 'oaFloodlightActivityId'+--+-- * 'oaFloodlightActivityIdDimensionValue'+optimizationActivity+    :: OptimizationActivity+optimizationActivity =+    OptimizationActivity'+    { _oaWeight = Nothing+    , _oaFloodlightActivityId = Nothing+    , _oaFloodlightActivityIdDimensionValue = Nothing+    }++-- | Weight associated with this optimization. Must be greater than 1. The+-- weight assigned will be understood in proportion to the weights assigned+-- to the other optimization activities.+oaWeight :: Lens' OptimizationActivity (Maybe Int32)+oaWeight+  = lens _oaWeight (\ s a -> s{_oaWeight = a}) .+      mapping _Coerce++-- | Floodlight activity ID of this optimization activity. This is a required+-- field.+oaFloodlightActivityId :: Lens' OptimizationActivity (Maybe Int64)+oaFloodlightActivityId+  = lens _oaFloodlightActivityId+      (\ s a -> s{_oaFloodlightActivityId = a})+      . mapping _Coerce++-- | Dimension value for the ID of the floodlight activity. This is a+-- read-only, auto-generated field.+oaFloodlightActivityIdDimensionValue :: Lens' OptimizationActivity (Maybe DimensionValue)+oaFloodlightActivityIdDimensionValue+  = lens _oaFloodlightActivityIdDimensionValue+      (\ s a ->+         s{_oaFloodlightActivityIdDimensionValue = a})++instance FromJSON OptimizationActivity where+        parseJSON+          = withObject "OptimizationActivity"+              (\ o ->+                 OptimizationActivity' <$>+                   (o .:? "weight") <*> (o .:? "floodlightActivityId")+                     <*> (o .:? "floodlightActivityIdDimensionValue"))++instance ToJSON OptimizationActivity where+        toJSON OptimizationActivity'{..}+          = object+              (catMaybes+                 [("weight" .=) <$> _oaWeight,+                  ("floodlightActivityId" .=) <$>+                    _oaFloodlightActivityId,+                  ("floodlightActivityIdDimensionValue" .=) <$>+                    _oaFloodlightActivityIdDimensionValue])++-- | A group clause made up of list population terms representing constraints+-- joined by ORs.+--+-- /See:/ 'listPopulationClause' smart constructor.+newtype ListPopulationClause = ListPopulationClause'+    { _lpcTerms :: Maybe [ListPopulationTerm]+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ListPopulationClause' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'lpcTerms'+listPopulationClause+    :: ListPopulationClause+listPopulationClause =+    ListPopulationClause'+    { _lpcTerms = Nothing+    }++-- | Terms of this list population clause. Each clause is made up of list+-- population terms representing constraints and are joined by ORs.+lpcTerms :: Lens' ListPopulationClause [ListPopulationTerm]+lpcTerms+  = lens _lpcTerms (\ s a -> s{_lpcTerms = a}) .+      _Default+      . _Coerce++instance FromJSON ListPopulationClause where+        parseJSON+          = withObject "ListPopulationClause"+              (\ o ->+                 ListPopulationClause' <$> (o .:? "terms" .!= mempty))++instance ToJSON ListPopulationClause where+        toJSON ListPopulationClause'{..}+          = object (catMaybes [("terms" .=) <$> _lpcTerms])++-- | Creative Custom Event.+--+-- /See:/ 'creativeCustomEvent' smart constructor.+data CreativeCustomEvent = CreativeCustomEvent'+    { _cceAdvertiserCustomEventId   :: !(Maybe (Textual Int64))+    , _cceAdvertiserCustomEventType :: !(Maybe CreativeCustomEventAdvertiserCustomEventType)+    , _cceAdvertiserCustomEventName :: !(Maybe Text)+    , _cceExitURL                   :: !(Maybe Text)+    , _cceTargetType                :: !(Maybe CreativeCustomEventTargetType)+    , _ccePopupWindowProperties     :: !(Maybe PopupWindowProperties)+    , _cceVideoReportingId          :: !(Maybe Text)+    , _cceId                        :: !(Maybe (Textual Int64))+    , _cceArtworkLabel              :: !(Maybe Text)+    , _cceArtworkType               :: !(Maybe CreativeCustomEventArtworkType)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CreativeCustomEvent' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cceAdvertiserCustomEventId'+--+-- * 'cceAdvertiserCustomEventType'+--+-- * 'cceAdvertiserCustomEventName'+--+-- * 'cceExitURL'+--+-- * 'cceTargetType'+--+-- * 'ccePopupWindowProperties'+--+-- * 'cceVideoReportingId'+--+-- * 'cceId'+--+-- * 'cceArtworkLabel'+--+-- * 'cceArtworkType'+creativeCustomEvent+    :: CreativeCustomEvent+creativeCustomEvent =+    CreativeCustomEvent'+    { _cceAdvertiserCustomEventId = Nothing+    , _cceAdvertiserCustomEventType = Nothing+    , _cceAdvertiserCustomEventName = Nothing+    , _cceExitURL = Nothing+    , _cceTargetType = Nothing+    , _ccePopupWindowProperties = Nothing+    , _cceVideoReportingId = Nothing+    , _cceId = Nothing+    , _cceArtworkLabel = Nothing+    , _cceArtworkType = Nothing+    }++-- | Unique ID of this event used by DDM Reporting and Data Transfer. This is+-- a read-only field.+cceAdvertiserCustomEventId :: Lens' CreativeCustomEvent (Maybe Int64)+cceAdvertiserCustomEventId+  = lens _cceAdvertiserCustomEventId+      (\ s a -> s{_cceAdvertiserCustomEventId = a})+      . mapping _Coerce++-- | Type of the event. This is a read-only field.+cceAdvertiserCustomEventType :: Lens' CreativeCustomEvent (Maybe CreativeCustomEventAdvertiserCustomEventType)+cceAdvertiserCustomEventType+  = lens _cceAdvertiserCustomEventType+      (\ s a -> s{_cceAdvertiserCustomEventType = a})++-- | User-entered name for the event.+cceAdvertiserCustomEventName :: Lens' CreativeCustomEvent (Maybe Text)+cceAdvertiserCustomEventName+  = lens _cceAdvertiserCustomEventName+      (\ s a -> s{_cceAdvertiserCustomEventName = a})++-- | Exit URL of the event. This field is used only for exit events.+cceExitURL :: Lens' CreativeCustomEvent (Maybe Text)+cceExitURL+  = lens _cceExitURL (\ s a -> s{_cceExitURL = a})++-- | Target type used by the event.+cceTargetType :: Lens' CreativeCustomEvent (Maybe CreativeCustomEventTargetType)+cceTargetType+  = lens _cceTargetType+      (\ s a -> s{_cceTargetType = a})++-- | Properties for rich media popup windows. This field is used only for+-- exit events.+ccePopupWindowProperties :: Lens' CreativeCustomEvent (Maybe PopupWindowProperties)+ccePopupWindowProperties+  = lens _ccePopupWindowProperties+      (\ s a -> s{_ccePopupWindowProperties = a})++-- | Video reporting ID, used to differentiate multiple videos in a single+-- creative. This is a read-only field.+cceVideoReportingId :: Lens' CreativeCustomEvent (Maybe Text)+cceVideoReportingId+  = lens _cceVideoReportingId+      (\ s a -> s{_cceVideoReportingId = a})++-- | ID of this event. This is a required field and should not be modified+-- after insertion.+cceId :: Lens' CreativeCustomEvent (Maybe Int64)+cceId+  = lens _cceId (\ s a -> s{_cceId = a}) .+      mapping _Coerce++-- | Artwork label column, used to link events in DCM back to events in+-- Studio. This is a required field and should not be modified after+-- insertion.+cceArtworkLabel :: Lens' CreativeCustomEvent (Maybe Text)+cceArtworkLabel+  = lens _cceArtworkLabel+      (\ s a -> s{_cceArtworkLabel = a})++-- | Artwork type used by the creative.This is a read-only field.+cceArtworkType :: Lens' CreativeCustomEvent (Maybe CreativeCustomEventArtworkType)+cceArtworkType+  = lens _cceArtworkType+      (\ s a -> s{_cceArtworkType = a})++instance FromJSON CreativeCustomEvent where+        parseJSON+          = withObject "CreativeCustomEvent"+              (\ o ->+                 CreativeCustomEvent' <$>+                   (o .:? "advertiserCustomEventId") <*>+                     (o .:? "advertiserCustomEventType")+                     <*> (o .:? "advertiserCustomEventName")+                     <*> (o .:? "exitUrl")+                     <*> (o .:? "targetType")+                     <*> (o .:? "popupWindowProperties")+                     <*> (o .:? "videoReportingId")+                     <*> (o .:? "id")+                     <*> (o .:? "artworkLabel")+                     <*> (o .:? "artworkType"))++instance ToJSON CreativeCustomEvent where+        toJSON CreativeCustomEvent'{..}+          = object+              (catMaybes+                 [("advertiserCustomEventId" .=) <$>+                    _cceAdvertiserCustomEventId,+                  ("advertiserCustomEventType" .=) <$>+                    _cceAdvertiserCustomEventType,+                  ("advertiserCustomEventName" .=) <$>+                    _cceAdvertiserCustomEventName,+                  ("exitUrl" .=) <$> _cceExitURL,+                  ("targetType" .=) <$> _cceTargetType,+                  ("popupWindowProperties" .=) <$>+                    _ccePopupWindowProperties,+                  ("videoReportingId" .=) <$> _cceVideoReportingId,+                  ("id" .=) <$> _cceId,+                  ("artworkLabel" .=) <$> _cceArtworkLabel,+                  ("artworkType" .=) <$> _cceArtworkType])++-- | Creative Click Tag.+--+-- /See:/ 'clickTag' smart constructor.+data ClickTag = ClickTag'+    { _ctValue     :: !(Maybe Text)+    , _ctName      :: !(Maybe Text)+    , _ctEventName :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ClickTag' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ctValue'+--+-- * 'ctName'+--+-- * 'ctEventName'+clickTag+    :: ClickTag+clickTag =+    ClickTag'+    { _ctValue = Nothing+    , _ctName = Nothing+    , _ctEventName = Nothing+    }++-- | Parameter value for the specified click tag. This field contains a+-- click-through url.+ctValue :: Lens' ClickTag (Maybe Text)+ctValue = lens _ctValue (\ s a -> s{_ctValue = a})++-- | Parameter name for the specified click tag. For ENHANCED_IMAGE creative+-- assets, this field must match the value of the creative asset\'s+-- creativeAssetId.name field.+ctName :: Lens' ClickTag (Maybe Text)+ctName = lens _ctName (\ s a -> s{_ctName = a})++-- | Advertiser event name associated with the click tag. This field is used+-- by ENHANCED_BANNER, ENHANCED_IMAGE, and HTML5_BANNER creatives.+ctEventName :: Lens' ClickTag (Maybe Text)+ctEventName+  = lens _ctEventName (\ s a -> s{_ctEventName = a})++instance FromJSON ClickTag where+        parseJSON+          = withObject "ClickTag"+              (\ o ->+                 ClickTag' <$>+                   (o .:? "value") <*> (o .:? "name") <*>+                     (o .:? "eventName"))++instance ToJSON ClickTag where+        toJSON ClickTag'{..}+          = object+              (catMaybes+                 [("value" .=) <$> _ctValue, ("name" .=) <$> _ctName,+                  ("eventName" .=) <$> _ctEventName])++-- | Campaign List Response+--+-- /See:/ 'campaignsListResponse' smart constructor.+data CampaignsListResponse = CampaignsListResponse'+    { _clrNextPageToken :: !(Maybe Text)+    , _clrCampaigns     :: !(Maybe [Campaign])+    , _clrKind          :: !Text+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CampaignsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'clrNextPageToken'+--+-- * 'clrCampaigns'+--+-- * 'clrKind'+campaignsListResponse+    :: CampaignsListResponse+campaignsListResponse =+    CampaignsListResponse'+    { _clrNextPageToken = Nothing+    , _clrCampaigns = Nothing+    , _clrKind = "dfareporting#campaignsListResponse"+    }++-- | Pagination token to be used for the next list operation.+clrNextPageToken :: Lens' CampaignsListResponse (Maybe Text)+clrNextPageToken+  = lens _clrNextPageToken+      (\ s a -> s{_clrNextPageToken = a})++-- | Campaign collection.+clrCampaigns :: Lens' CampaignsListResponse [Campaign]+clrCampaigns+  = lens _clrCampaigns (\ s a -> s{_clrCampaigns = a})+      . _Default+      . _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#campaignsListResponse\".+clrKind :: Lens' CampaignsListResponse Text+clrKind = lens _clrKind (\ s a -> s{_clrKind = a})++instance FromJSON CampaignsListResponse where+        parseJSON+          = withObject "CampaignsListResponse"+              (\ o ->+                 CampaignsListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "campaigns" .!= mempty)+                     <*>+                     (o .:? "kind" .!=+                        "dfareporting#campaignsListResponse"))++instance ToJSON CampaignsListResponse where+        toJSON CampaignsListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _clrNextPageToken,+                  ("campaigns" .=) <$> _clrCampaigns,+                  Just ("kind" .= _clrKind)])++-- | Geographical Targeting.+--+-- /See:/ 'geoTargeting' smart constructor.+data GeoTargeting = GeoTargeting'+    { _gtRegions          :: !(Maybe [Region])+    , _gtCountries        :: !(Maybe [Country])+    , _gtCities           :: !(Maybe [City])+    , _gtMetros           :: !(Maybe [Metro])+    , _gtExcludeCountries :: !(Maybe Bool)+    , _gtPostalCodes      :: !(Maybe [PostalCode])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'GeoTargeting' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gtRegions'+--+-- * 'gtCountries'+--+-- * 'gtCities'+--+-- * 'gtMetros'+--+-- * 'gtExcludeCountries'+--+-- * 'gtPostalCodes'+geoTargeting+    :: GeoTargeting+geoTargeting =+    GeoTargeting'+    { _gtRegions = Nothing+    , _gtCountries = Nothing+    , _gtCities = Nothing+    , _gtMetros = Nothing+    , _gtExcludeCountries = Nothing+    , _gtPostalCodes = Nothing+    }++-- | Regions to be targeted. For each region only dartId is required. The+-- other fields are populated automatically when the ad is inserted or+-- updated. If targeting a region, do not target or exclude the country of+-- the region.+gtRegions :: Lens' GeoTargeting [Region]+gtRegions+  = lens _gtRegions (\ s a -> s{_gtRegions = a}) .+      _Default+      . _Coerce++-- | Countries to be targeted or excluded from targeting, depending on the+-- setting of the excludeCountries field. For each country only dartId is+-- required. The other fields are populated automatically when the ad is+-- inserted or updated. If targeting or excluding a country, do not target+-- regions, cities, metros, or postal codes in the same country.+gtCountries :: Lens' GeoTargeting [Country]+gtCountries+  = lens _gtCountries (\ s a -> s{_gtCountries = a}) .+      _Default+      . _Coerce++-- | Cities to be targeted. For each city only dartId is required. The other+-- fields are populated automatically when the ad is inserted or updated.+-- If targeting a city, do not target or exclude the country of the city,+-- and do not target the metro or region of the city.+gtCities :: Lens' GeoTargeting [City]+gtCities+  = lens _gtCities (\ s a -> s{_gtCities = a}) .+      _Default+      . _Coerce++-- | Metros to be targeted. For each metro only dmaId is required. The other+-- fields are populated automatically when the ad is inserted or updated.+-- If targeting a metro, do not target or exclude the country of the metro.+gtMetros :: Lens' GeoTargeting [Metro]+gtMetros+  = lens _gtMetros (\ s a -> s{_gtMetros = a}) .+      _Default+      . _Coerce++-- | Whether or not to exclude the countries in the countries field from+-- targeting. If false, the countries field refers to countries which will+-- be targeted by the ad.+gtExcludeCountries :: Lens' GeoTargeting (Maybe Bool)+gtExcludeCountries+  = lens _gtExcludeCountries+      (\ s a -> s{_gtExcludeCountries = a})++-- | Postal codes to be targeted. For each postal code only id is required.+-- The other fields are populated automatically when the ad is inserted or+-- updated. If targeting a postal code, do not target or exclude the+-- country of the postal code.+gtPostalCodes :: Lens' GeoTargeting [PostalCode]+gtPostalCodes+  = lens _gtPostalCodes+      (\ s a -> s{_gtPostalCodes = a})+      . _Default+      . _Coerce++instance FromJSON GeoTargeting where+        parseJSON+          = withObject "GeoTargeting"+              (\ o ->+                 GeoTargeting' <$>+                   (o .:? "regions" .!= mempty) <*>+                     (o .:? "countries" .!= mempty)+                     <*> (o .:? "cities" .!= mempty)+                     <*> (o .:? "metros" .!= mempty)+                     <*> (o .:? "excludeCountries")+                     <*> (o .:? "postalCodes" .!= mempty))++instance ToJSON GeoTargeting where+        toJSON GeoTargeting'{..}+          = object+              (catMaybes+                 [("regions" .=) <$> _gtRegions,+                  ("countries" .=) <$> _gtCountries,+                  ("cities" .=) <$> _gtCities,+                  ("metros" .=) <$> _gtMetros,+                  ("excludeCountries" .=) <$> _gtExcludeCountries,+                  ("postalCodes" .=) <$> _gtPostalCodes])++-- | Represents fields that are compatible to be selected for a report of+-- type \"REACH\".+--+-- /See:/ 'reachReportCompatibleFields' smart constructor.+data ReachReportCompatibleFields = ReachReportCompatibleFields'+    { _rrcfMetrics                 :: !(Maybe [Metric])+    , _rrcfReachByFrequencyMetrics :: !(Maybe [Metric])+    , _rrcfKind                    :: !Text+    , _rrcfDimensionFilters        :: !(Maybe [Dimension])+    , _rrcfPivotedActivityMetrics  :: !(Maybe [Metric])+    , _rrcfDimensions              :: !(Maybe [Dimension])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ReachReportCompatibleFields' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rrcfMetrics'+--+-- * 'rrcfReachByFrequencyMetrics'+--+-- * 'rrcfKind'+--+-- * 'rrcfDimensionFilters'+--+-- * 'rrcfPivotedActivityMetrics'+--+-- * 'rrcfDimensions'+reachReportCompatibleFields+    :: ReachReportCompatibleFields+reachReportCompatibleFields =+    ReachReportCompatibleFields'+    { _rrcfMetrics = Nothing+    , _rrcfReachByFrequencyMetrics = Nothing+    , _rrcfKind = "dfareporting#reachReportCompatibleFields"+    , _rrcfDimensionFilters = Nothing+    , _rrcfPivotedActivityMetrics = Nothing+    , _rrcfDimensions = Nothing+    }++-- | Metrics which are compatible to be selected in the \"metricNames\"+-- section of the report.+rrcfMetrics :: Lens' ReachReportCompatibleFields [Metric]+rrcfMetrics+  = lens _rrcfMetrics (\ s a -> s{_rrcfMetrics = a}) .+      _Default+      . _Coerce++-- | Metrics which are compatible to be selected in the+-- \"reachByFrequencyMetricNames\" section of the report.+rrcfReachByFrequencyMetrics :: Lens' ReachReportCompatibleFields [Metric]+rrcfReachByFrequencyMetrics+  = lens _rrcfReachByFrequencyMetrics+      (\ s a -> s{_rrcfReachByFrequencyMetrics = a})+      . _Default+      . _Coerce++-- | The kind of resource this is, in this case+-- dfareporting#reachReportCompatibleFields.+rrcfKind :: Lens' ReachReportCompatibleFields Text+rrcfKind = lens _rrcfKind (\ s a -> s{_rrcfKind = a})++-- | Dimensions which are compatible to be selected in the+-- \"dimensionFilters\" section of the report.+rrcfDimensionFilters :: Lens' ReachReportCompatibleFields [Dimension]+rrcfDimensionFilters+  = lens _rrcfDimensionFilters+      (\ s a -> s{_rrcfDimensionFilters = a})+      . _Default+      . _Coerce++-- | Metrics which are compatible to be selected as activity metrics to pivot+-- on in the \"activities\" section of the report.+rrcfPivotedActivityMetrics :: Lens' ReachReportCompatibleFields [Metric]+rrcfPivotedActivityMetrics+  = lens _rrcfPivotedActivityMetrics+      (\ s a -> s{_rrcfPivotedActivityMetrics = a})+      . _Default+      . _Coerce++-- | Dimensions which are compatible to be selected in the \"dimensions\"+-- section of the report.+rrcfDimensions :: Lens' ReachReportCompatibleFields [Dimension]+rrcfDimensions+  = lens _rrcfDimensions+      (\ s a -> s{_rrcfDimensions = a})+      . _Default+      . _Coerce++instance FromJSON ReachReportCompatibleFields where+        parseJSON+          = withObject "ReachReportCompatibleFields"+              (\ o ->+                 ReachReportCompatibleFields' <$>+                   (o .:? "metrics" .!= mempty) <*>+                     (o .:? "reachByFrequencyMetrics" .!= mempty)+                     <*>+                     (o .:? "kind" .!=+                        "dfareporting#reachReportCompatibleFields")+                     <*> (o .:? "dimensionFilters" .!= mempty)+                     <*> (o .:? "pivotedActivityMetrics" .!= mempty)+                     <*> (o .:? "dimensions" .!= mempty))++instance ToJSON ReachReportCompatibleFields where+        toJSON ReachReportCompatibleFields'{..}+          = object+              (catMaybes+                 [("metrics" .=) <$> _rrcfMetrics,+                  ("reachByFrequencyMetrics" .=) <$>+                    _rrcfReachByFrequencyMetrics,+                  Just ("kind" .= _rrcfKind),+                  ("dimensionFilters" .=) <$> _rrcfDimensionFilters,+                  ("pivotedActivityMetrics" .=) <$>+                    _rrcfPivotedActivityMetrics,+                  ("dimensions" .=) <$> _rrcfDimensions])++-- | Contains information about a browser that can be targeted by ads.+--+-- /See:/ 'browser' smart constructor.+data Browser = Browser'+    { _bMinorVersion     :: !(Maybe Text)+    , _bKind             :: !Text+    , _bBrowserVersionId :: !(Maybe (Textual Int64))+    , _bMajorVersion     :: !(Maybe Text)+    , _bName             :: !(Maybe Text)+    , _bDartId           :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Browser' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'bMinorVersion'+--+-- * 'bKind'+--+-- * 'bBrowserVersionId'+--+-- * 'bMajorVersion'+--+-- * 'bName'+--+-- * 'bDartId'+browser+    :: Browser+browser =+    Browser'+    { _bMinorVersion = Nothing+    , _bKind = "dfareporting#browser"+    , _bBrowserVersionId = Nothing+    , _bMajorVersion = Nothing+    , _bName = Nothing+    , _bDartId = Nothing+    }++-- | Minor version number (number after first dot on left) of this browser.+-- For example, for Chrome 5.0.375.86 beta, this field should be set to 0.+-- An asterisk (*) may be used to target any version number, and a question+-- mark (?) may be used to target cases where the version number cannot be+-- identified. For example, Chrome *.* targets any version of Chrome: 1.2,+-- 2.5, 3.5, and so on. Chrome 3.* targets Chrome 3.1, 3.5, but not 4.0.+-- Firefox ?.? targets cases where the ad server knows the browser is+-- Firefox but can\'t tell which version it is.+bMinorVersion :: Lens' Browser (Maybe Text)+bMinorVersion+  = lens _bMinorVersion+      (\ s a -> s{_bMinorVersion = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#browser\".+bKind :: Lens' Browser Text+bKind = lens _bKind (\ s a -> s{_bKind = a})++-- | ID referring to this grouping of browser and version numbers. This is+-- the ID used for targeting.+bBrowserVersionId :: Lens' Browser (Maybe Int64)+bBrowserVersionId+  = lens _bBrowserVersionId+      (\ s a -> s{_bBrowserVersionId = a})+      . mapping _Coerce++-- | Major version number (leftmost number) of this browser. For example, for+-- Chrome 5.0.376.86 beta, this field should be set to 5. An asterisk (*)+-- may be used to target any version number, and a question mark (?) may be+-- used to target cases where the version number cannot be identified. For+-- example, Chrome *.* targets any version of Chrome: 1.2, 2.5, 3.5, and so+-- on. Chrome 3.* targets Chrome 3.1, 3.5, but not 4.0. Firefox ?.? targets+-- cases where the ad server knows the browser is Firefox but can\'t tell+-- which version it is.+bMajorVersion :: Lens' Browser (Maybe Text)+bMajorVersion+  = lens _bMajorVersion+      (\ s a -> s{_bMajorVersion = a})++-- | Name of this browser.+bName :: Lens' Browser (Maybe Text)+bName = lens _bName (\ s a -> s{_bName = a})++-- | DART ID of this browser. This is the ID used when generating reports.+bDartId :: Lens' Browser (Maybe Int64)+bDartId+  = lens _bDartId (\ s a -> s{_bDartId = a}) .+      mapping _Coerce++instance FromJSON Browser where+        parseJSON+          = withObject "Browser"+              (\ o ->+                 Browser' <$>+                   (o .:? "minorVersion") <*>+                     (o .:? "kind" .!= "dfareporting#browser")+                     <*> (o .:? "browserVersionId")+                     <*> (o .:? "majorVersion")+                     <*> (o .:? "name")+                     <*> (o .:? "dartId"))++instance ToJSON Browser where+        toJSON Browser'{..}+          = object+              (catMaybes+                 [("minorVersion" .=) <$> _bMinorVersion,+                  Just ("kind" .= _bKind),+                  ("browserVersionId" .=) <$> _bBrowserVersionId,+                  ("majorVersion" .=) <$> _bMajorVersion,+                  ("name" .=) <$> _bName, ("dartId" .=) <$> _bDartId])++-- | Creative Group Assignment.+--+-- /See:/ 'creativeGroupAssignment' smart constructor.+data CreativeGroupAssignment = CreativeGroupAssignment'+    { _cgaCreativeGroupNumber :: !(Maybe CreativeGroupAssignmentCreativeGroupNumber)+    , _cgaCreativeGroupId     :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CreativeGroupAssignment' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cgaCreativeGroupNumber'+--+-- * 'cgaCreativeGroupId'+creativeGroupAssignment+    :: CreativeGroupAssignment+creativeGroupAssignment =+    CreativeGroupAssignment'+    { _cgaCreativeGroupNumber = Nothing+    , _cgaCreativeGroupId = Nothing+    }++-- | Creative group number of the creative group assignment.+cgaCreativeGroupNumber :: Lens' CreativeGroupAssignment (Maybe CreativeGroupAssignmentCreativeGroupNumber)+cgaCreativeGroupNumber+  = lens _cgaCreativeGroupNumber+      (\ s a -> s{_cgaCreativeGroupNumber = a})++-- | ID of the creative group to be assigned.+cgaCreativeGroupId :: Lens' CreativeGroupAssignment (Maybe Int64)+cgaCreativeGroupId+  = lens _cgaCreativeGroupId+      (\ s a -> s{_cgaCreativeGroupId = a})+      . mapping _Coerce++instance FromJSON CreativeGroupAssignment where+        parseJSON+          = withObject "CreativeGroupAssignment"+              (\ o ->+                 CreativeGroupAssignment' <$>+                   (o .:? "creativeGroupNumber") <*>+                     (o .:? "creativeGroupId"))++instance ToJSON CreativeGroupAssignment where+        toJSON CreativeGroupAssignment'{..}+          = object+              (catMaybes+                 [("creativeGroupNumber" .=) <$>+                    _cgaCreativeGroupNumber,+                  ("creativeGroupId" .=) <$> _cgaCreativeGroupId])++-- | Directory Site Settings+--+-- /See:/ 'directorySiteSettings' smart constructor.+data DirectorySiteSettings = DirectorySiteSettings'+    { _dssInterstitialPlacementAccepted  :: !(Maybe Bool)+    , _dssDfpSettings                    :: !(Maybe DfpSettings)+    , _dssVerificationTagOptOut          :: !(Maybe Bool)+    , _dssActiveViewOptOut               :: !(Maybe Bool)+    , _dssVideoActiveViewOptOut          :: !(Maybe Bool)+    , _dssInstreamVideoPlacementAccepted :: !(Maybe Bool)+    , _dssNielsenOCROptOut               :: !(Maybe Bool)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DirectorySiteSettings' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dssInterstitialPlacementAccepted'+--+-- * 'dssDfpSettings'+--+-- * 'dssVerificationTagOptOut'+--+-- * 'dssActiveViewOptOut'+--+-- * 'dssVideoActiveViewOptOut'+--+-- * 'dssInstreamVideoPlacementAccepted'+--+-- * 'dssNielsenOCROptOut'+directorySiteSettings+    :: DirectorySiteSettings+directorySiteSettings =+    DirectorySiteSettings'+    { _dssInterstitialPlacementAccepted = Nothing+    , _dssDfpSettings = Nothing+    , _dssVerificationTagOptOut = Nothing+    , _dssActiveViewOptOut = Nothing+    , _dssVideoActiveViewOptOut = Nothing+    , _dssInstreamVideoPlacementAccepted = Nothing+    , _dssNielsenOCROptOut = Nothing+    }++-- | Whether this site accepts interstitial ads.+dssInterstitialPlacementAccepted :: Lens' DirectorySiteSettings (Maybe Bool)+dssInterstitialPlacementAccepted+  = lens _dssInterstitialPlacementAccepted+      (\ s a -> s{_dssInterstitialPlacementAccepted = a})++-- | Directory site DFP settings.+dssDfpSettings :: Lens' DirectorySiteSettings (Maybe DfpSettings)+dssDfpSettings+  = lens _dssDfpSettings+      (\ s a -> s{_dssDfpSettings = a})++-- | Whether this directory site has disabled generation of Verification ins+-- tags.+dssVerificationTagOptOut :: Lens' DirectorySiteSettings (Maybe Bool)+dssVerificationTagOptOut+  = lens _dssVerificationTagOptOut+      (\ s a -> s{_dssVerificationTagOptOut = a})++-- | Whether this directory site has disabled active view creatives.+dssActiveViewOptOut :: Lens' DirectorySiteSettings (Maybe Bool)+dssActiveViewOptOut+  = lens _dssActiveViewOptOut+      (\ s a -> s{_dssActiveViewOptOut = a})++-- | Whether this directory site has disabled active view for in-stream video+-- creatives.+dssVideoActiveViewOptOut :: Lens' DirectorySiteSettings (Maybe Bool)+dssVideoActiveViewOptOut+  = lens _dssVideoActiveViewOptOut+      (\ s a -> s{_dssVideoActiveViewOptOut = a})++-- | Whether this site accepts in-stream video ads.+dssInstreamVideoPlacementAccepted :: Lens' DirectorySiteSettings (Maybe Bool)+dssInstreamVideoPlacementAccepted+  = lens _dssInstreamVideoPlacementAccepted+      (\ s a -> s{_dssInstreamVideoPlacementAccepted = a})++-- | Whether this directory site has disabled Nielsen OCR reach ratings.+dssNielsenOCROptOut :: Lens' DirectorySiteSettings (Maybe Bool)+dssNielsenOCROptOut+  = lens _dssNielsenOCROptOut+      (\ s a -> s{_dssNielsenOCROptOut = a})++instance FromJSON DirectorySiteSettings where+        parseJSON+          = withObject "DirectorySiteSettings"+              (\ o ->+                 DirectorySiteSettings' <$>+                   (o .:? "interstitialPlacementAccepted") <*>+                     (o .:? "dfp_settings")+                     <*> (o .:? "verificationTagOptOut")+                     <*> (o .:? "activeViewOptOut")+                     <*> (o .:? "videoActiveViewOptOut")+                     <*> (o .:? "instream_video_placement_accepted")+                     <*> (o .:? "nielsenOcrOptOut"))++instance ToJSON DirectorySiteSettings where+        toJSON DirectorySiteSettings'{..}+          = object+              (catMaybes+                 [("interstitialPlacementAccepted" .=) <$>+                    _dssInterstitialPlacementAccepted,+                  ("dfp_settings" .=) <$> _dssDfpSettings,+                  ("verificationTagOptOut" .=) <$>+                    _dssVerificationTagOptOut,+                  ("activeViewOptOut" .=) <$> _dssActiveViewOptOut,+                  ("videoActiveViewOptOut" .=) <$>+                    _dssVideoActiveViewOptOut,+                  ("instream_video_placement_accepted" .=) <$>+                    _dssInstreamVideoPlacementAccepted,+                  ("nielsenOcrOptOut" .=) <$> _dssNielsenOCROptOut])++-- | Remarketing List Population Rule.+--+-- /See:/ 'listPopulationRule' smart constructor.+data ListPopulationRule = ListPopulationRule'+    { _lprFloodlightActivityName :: !(Maybe Text)+    , _lprFloodlightActivityId   :: !(Maybe (Textual Int64))+    , _lprListPopulationClauses  :: !(Maybe [ListPopulationClause])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ListPopulationRule' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'lprFloodlightActivityName'+--+-- * 'lprFloodlightActivityId'+--+-- * 'lprListPopulationClauses'+listPopulationRule+    :: ListPopulationRule+listPopulationRule =+    ListPopulationRule'+    { _lprFloodlightActivityName = Nothing+    , _lprFloodlightActivityId = Nothing+    , _lprListPopulationClauses = Nothing+    }++-- | Name of floodlight activity associated with this rule. This is a+-- read-only, auto-generated field.+lprFloodlightActivityName :: Lens' ListPopulationRule (Maybe Text)+lprFloodlightActivityName+  = lens _lprFloodlightActivityName+      (\ s a -> s{_lprFloodlightActivityName = a})++-- | Floodlight activity ID associated with this rule. This field can be left+-- blank.+lprFloodlightActivityId :: Lens' ListPopulationRule (Maybe Int64)+lprFloodlightActivityId+  = lens _lprFloodlightActivityId+      (\ s a -> s{_lprFloodlightActivityId = a})+      . mapping _Coerce++-- | Clauses that make up this list population rule. Clauses are joined by+-- ANDs, and the clauses themselves are made up of list population terms+-- which are joined by ORs.+lprListPopulationClauses :: Lens' ListPopulationRule [ListPopulationClause]+lprListPopulationClauses+  = lens _lprListPopulationClauses+      (\ s a -> s{_lprListPopulationClauses = a})+      . _Default+      . _Coerce++instance FromJSON ListPopulationRule where+        parseJSON+          = withObject "ListPopulationRule"+              (\ o ->+                 ListPopulationRule' <$>+                   (o .:? "floodlightActivityName") <*>+                     (o .:? "floodlightActivityId")+                     <*> (o .:? "listPopulationClauses" .!= mempty))++instance ToJSON ListPopulationRule where+        toJSON ListPopulationRule'{..}+          = object+              (catMaybes+                 [("floodlightActivityName" .=) <$>+                    _lprFloodlightActivityName,+                  ("floodlightActivityId" .=) <$>+                    _lprFloodlightActivityId,+                  ("listPopulationClauses" .=) <$>+                    _lprListPopulationClauses])++-- | Size List Response+--+-- /See:/ 'sizesListResponse' smart constructor.+data SizesListResponse = SizesListResponse'+    { _slrKind  :: !Text+    , _slrSizes :: !(Maybe [Size])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'SizesListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'slrKind'+--+-- * 'slrSizes'+sizesListResponse+    :: SizesListResponse+sizesListResponse =+    SizesListResponse'+    { _slrKind = "dfareporting#sizesListResponse"+    , _slrSizes = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#sizesListResponse\".+slrKind :: Lens' SizesListResponse Text+slrKind = lens _slrKind (\ s a -> s{_slrKind = a})++-- | Size collection.+slrSizes :: Lens' SizesListResponse [Size]+slrSizes+  = lens _slrSizes (\ s a -> s{_slrSizes = a}) .+      _Default+      . _Coerce++instance FromJSON SizesListResponse where+        parseJSON+          = withObject "SizesListResponse"+              (\ o ->+                 SizesListResponse' <$>+                   (o .:? "kind" .!= "dfareporting#sizesListResponse")+                     <*> (o .:? "sizes" .!= mempty))++instance ToJSON SizesListResponse where+        toJSON SizesListResponse'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _slrKind),+                  ("sizes" .=) <$> _slrSizes])++-- | Creative Rotation.+--+-- /See:/ 'creativeRotation' smart constructor.+data CreativeRotation = CreativeRotation'+    { _crWeightCalculationStrategy           :: !(Maybe CreativeRotationWeightCalculationStrategy)+    , _crCreativeAssignments                 :: !(Maybe [CreativeAssignment])+    , _crCreativeOptimizationConfigurationId :: !(Maybe (Textual Int64))+    , _crType                                :: !(Maybe CreativeRotationType)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CreativeRotation' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'crWeightCalculationStrategy'+--+-- * 'crCreativeAssignments'+--+-- * 'crCreativeOptimizationConfigurationId'+--+-- * 'crType'+creativeRotation+    :: CreativeRotation+creativeRotation =+    CreativeRotation'+    { _crWeightCalculationStrategy = Nothing+    , _crCreativeAssignments = Nothing+    , _crCreativeOptimizationConfigurationId = Nothing+    , _crType = Nothing+    }++-- | Strategy for calculating weights. Used with+-- CREATIVE_ROTATION_TYPE_RANDOM.+crWeightCalculationStrategy :: Lens' CreativeRotation (Maybe CreativeRotationWeightCalculationStrategy)+crWeightCalculationStrategy+  = lens _crWeightCalculationStrategy+      (\ s a -> s{_crWeightCalculationStrategy = a})++-- | Creative assignments in this creative rotation.+crCreativeAssignments :: Lens' CreativeRotation [CreativeAssignment]+crCreativeAssignments+  = lens _crCreativeAssignments+      (\ s a -> s{_crCreativeAssignments = a})+      . _Default+      . _Coerce++-- | Creative optimization configuration that is used by this ad. It should+-- refer to one of the existing optimization configurations in the ad\'s+-- campaign. If it is unset or set to 0, then the campaign\'s default+-- optimization configuration will be used for this ad.+crCreativeOptimizationConfigurationId :: Lens' CreativeRotation (Maybe Int64)+crCreativeOptimizationConfigurationId+  = lens _crCreativeOptimizationConfigurationId+      (\ s a ->+         s{_crCreativeOptimizationConfigurationId = a})+      . mapping _Coerce++-- | Type of creative rotation. Can be used to specify whether to use+-- sequential or random rotation.+crType :: Lens' CreativeRotation (Maybe CreativeRotationType)+crType = lens _crType (\ s a -> s{_crType = a})++instance FromJSON CreativeRotation where+        parseJSON+          = withObject "CreativeRotation"+              (\ o ->+                 CreativeRotation' <$>+                   (o .:? "weightCalculationStrategy") <*>+                     (o .:? "creativeAssignments" .!= mempty)+                     <*> (o .:? "creativeOptimizationConfigurationId")+                     <*> (o .:? "type"))++instance ToJSON CreativeRotation where+        toJSON CreativeRotation'{..}+          = object+              (catMaybes+                 [("weightCalculationStrategy" .=) <$>+                    _crWeightCalculationStrategy,+                  ("creativeAssignments" .=) <$>+                    _crCreativeAssignments,+                  ("creativeOptimizationConfigurationId" .=) <$>+                    _crCreativeOptimizationConfigurationId,+                  ("type" .=) <$> _crType])++-- | Technology Targeting.+--+-- /See:/ 'technologyTargeting' smart constructor.+data TechnologyTargeting = TechnologyTargeting'+    { _ttMobileCarriers          :: !(Maybe [MobileCarrier])+    , _ttOperatingSystemVersions :: !(Maybe [OperatingSystemVersion])+    , _ttPlatformTypes           :: !(Maybe [PlatformType])+    , _ttBrowsers                :: !(Maybe [Browser])+    , _ttConnectionTypes         :: !(Maybe [ConnectionType])+    , _ttOperatingSystems        :: !(Maybe [OperatingSystem])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'TechnologyTargeting' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ttMobileCarriers'+--+-- * 'ttOperatingSystemVersions'+--+-- * 'ttPlatformTypes'+--+-- * 'ttBrowsers'+--+-- * 'ttConnectionTypes'+--+-- * 'ttOperatingSystems'+technologyTargeting+    :: TechnologyTargeting+technologyTargeting =+    TechnologyTargeting'+    { _ttMobileCarriers = Nothing+    , _ttOperatingSystemVersions = Nothing+    , _ttPlatformTypes = Nothing+    , _ttBrowsers = Nothing+    , _ttConnectionTypes = Nothing+    , _ttOperatingSystems = Nothing+    }++-- | Mobile carriers that this ad targets. For each mobile carrier only id is+-- required, and the other fields are populated automatically when the ad+-- is inserted or updated. If targeting a mobile carrier, do not set+-- targeting for any zip codes.+ttMobileCarriers :: Lens' TechnologyTargeting [MobileCarrier]+ttMobileCarriers+  = lens _ttMobileCarriers+      (\ s a -> s{_ttMobileCarriers = a})+      . _Default+      . _Coerce++-- | Operating system versions that this ad targets. To target all versions,+-- use operatingSystems. For each operating system version, only id is+-- required. The other fields are populated automatically when the ad is+-- inserted or updated. If targeting an operating system version, do not+-- set targeting for the corresponding operating system in+-- operatingSystems.+ttOperatingSystemVersions :: Lens' TechnologyTargeting [OperatingSystemVersion]+ttOperatingSystemVersions+  = lens _ttOperatingSystemVersions+      (\ s a -> s{_ttOperatingSystemVersions = a})+      . _Default+      . _Coerce++-- | Platform types that this ad targets. For example, desktop, mobile, or+-- tablet. For each platform type, only id is required, and the other+-- fields are populated automatically when the ad is inserted or updated.+ttPlatformTypes :: Lens' TechnologyTargeting [PlatformType]+ttPlatformTypes+  = lens _ttPlatformTypes+      (\ s a -> s{_ttPlatformTypes = a})+      . _Default+      . _Coerce++-- | Browsers that this ad targets. For each browser either set+-- browserVersionId or dartId along with the version numbers. If both are+-- specified, only browserVersionId will be used.The other fields are+-- populated automatically when the ad is inserted or updated.+ttBrowsers :: Lens' TechnologyTargeting [Browser]+ttBrowsers+  = lens _ttBrowsers (\ s a -> s{_ttBrowsers = a}) .+      _Default+      . _Coerce++-- | Connection types that this ad targets. For each connection type only id+-- is required.The other fields are populated automatically when the ad is+-- inserted or updated.+ttConnectionTypes :: Lens' TechnologyTargeting [ConnectionType]+ttConnectionTypes+  = lens _ttConnectionTypes+      (\ s a -> s{_ttConnectionTypes = a})+      . _Default+      . _Coerce++-- | Operating systems that this ad targets. To target specific versions, use+-- operatingSystemVersions. For each operating system only dartId is+-- required. The other fields are populated automatically when the ad is+-- inserted or updated. If targeting an operating system, do not set+-- targeting for operating system versions for the same operating system.+ttOperatingSystems :: Lens' TechnologyTargeting [OperatingSystem]+ttOperatingSystems+  = lens _ttOperatingSystems+      (\ s a -> s{_ttOperatingSystems = a})+      . _Default+      . _Coerce++instance FromJSON TechnologyTargeting where+        parseJSON+          = withObject "TechnologyTargeting"+              (\ o ->+                 TechnologyTargeting' <$>+                   (o .:? "mobileCarriers" .!= mempty) <*>+                     (o .:? "operatingSystemVersions" .!= mempty)+                     <*> (o .:? "platformTypes" .!= mempty)+                     <*> (o .:? "browsers" .!= mempty)+                     <*> (o .:? "connectionTypes" .!= mempty)+                     <*> (o .:? "operatingSystems" .!= mempty))++instance ToJSON TechnologyTargeting where+        toJSON TechnologyTargeting'{..}+          = object+              (catMaybes+                 [("mobileCarriers" .=) <$> _ttMobileCarriers,+                  ("operatingSystemVersions" .=) <$>+                    _ttOperatingSystemVersions,+                  ("platformTypes" .=) <$> _ttPlatformTypes,+                  ("browsers" .=) <$> _ttBrowsers,+                  ("connectionTypes" .=) <$> _ttConnectionTypes,+                  ("operatingSystems" .=) <$> _ttOperatingSystems])++-- | Represents a buy from the DoubleClick Planning inventory store.+--+-- /See:/ 'inventoryItem' smart constructor.+data InventoryItem = InventoryItem'+    { _iiPlacementStrategyId       :: !(Maybe (Textual Int64))+    , _iiEstimatedClickThroughRate :: !(Maybe (Textual Int64))+    , _iiPricing                   :: !(Maybe Pricing)+    , _iiKind                      :: !Text+    , _iiAdvertiserId              :: !(Maybe (Textual Int64))+    , _iiRfpId                     :: !(Maybe (Textual Int64))+    , _iiContentCategoryId         :: !(Maybe (Textual Int64))+    , _iiInPlan                    :: !(Maybe Bool)+    , _iiAccountId                 :: !(Maybe (Textual Int64))+    , _iiName                      :: !(Maybe Text)+    , _iiAdSlots                   :: !(Maybe [AdSlot])+    , _iiNegotiationChannelId      :: !(Maybe (Textual Int64))+    , _iiLastModifiedInfo          :: !(Maybe LastModifiedInfo)+    , _iiId                        :: !(Maybe (Textual Int64))+    , _iiEstimatedConversionRate   :: !(Maybe (Textual Int64))+    , _iiProjectId                 :: !(Maybe (Textual Int64))+    , _iiSubAccountId              :: !(Maybe (Textual Int64))+    , _iiType                      :: !(Maybe InventoryItemType)+    , _iiOrderId                   :: !(Maybe (Textual Int64))+    , _iiSiteId                    :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'InventoryItem' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'iiPlacementStrategyId'+--+-- * 'iiEstimatedClickThroughRate'+--+-- * 'iiPricing'+--+-- * 'iiKind'+--+-- * 'iiAdvertiserId'+--+-- * 'iiRfpId'+--+-- * 'iiContentCategoryId'+--+-- * 'iiInPlan'+--+-- * 'iiAccountId'+--+-- * 'iiName'+--+-- * 'iiAdSlots'+--+-- * 'iiNegotiationChannelId'+--+-- * 'iiLastModifiedInfo'+--+-- * 'iiId'+--+-- * 'iiEstimatedConversionRate'+--+-- * 'iiProjectId'+--+-- * 'iiSubAccountId'+--+-- * 'iiType'+--+-- * 'iiOrderId'+--+-- * 'iiSiteId'+inventoryItem+    :: InventoryItem+inventoryItem =+    InventoryItem'+    { _iiPlacementStrategyId = Nothing+    , _iiEstimatedClickThroughRate = Nothing+    , _iiPricing = Nothing+    , _iiKind = "dfareporting#inventoryItem"+    , _iiAdvertiserId = Nothing+    , _iiRfpId = Nothing+    , _iiContentCategoryId = Nothing+    , _iiInPlan = Nothing+    , _iiAccountId = Nothing+    , _iiName = Nothing+    , _iiAdSlots = Nothing+    , _iiNegotiationChannelId = Nothing+    , _iiLastModifiedInfo = Nothing+    , _iiId = Nothing+    , _iiEstimatedConversionRate = Nothing+    , _iiProjectId = Nothing+    , _iiSubAccountId = Nothing+    , _iiType = Nothing+    , _iiOrderId = Nothing+    , _iiSiteId = Nothing+    }++-- | Placement strategy ID of this inventory item.+iiPlacementStrategyId :: Lens' InventoryItem (Maybe Int64)+iiPlacementStrategyId+  = lens _iiPlacementStrategyId+      (\ s a -> s{_iiPlacementStrategyId = a})+      . mapping _Coerce++-- | Estimated click-through rate of this inventory item.+iiEstimatedClickThroughRate :: Lens' InventoryItem (Maybe Int64)+iiEstimatedClickThroughRate+  = lens _iiEstimatedClickThroughRate+      (\ s a -> s{_iiEstimatedClickThroughRate = a})+      . mapping _Coerce++-- | Pricing of this inventory item.+iiPricing :: Lens' InventoryItem (Maybe Pricing)+iiPricing+  = lens _iiPricing (\ s a -> s{_iiPricing = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#inventoryItem\".+iiKind :: Lens' InventoryItem Text+iiKind = lens _iiKind (\ s a -> s{_iiKind = a})++-- | Advertiser ID of this inventory item.+iiAdvertiserId :: Lens' InventoryItem (Maybe Int64)+iiAdvertiserId+  = lens _iiAdvertiserId+      (\ s a -> s{_iiAdvertiserId = a})+      . mapping _Coerce++-- | RFP ID of this inventory item.+iiRfpId :: Lens' InventoryItem (Maybe Int64)+iiRfpId+  = lens _iiRfpId (\ s a -> s{_iiRfpId = a}) .+      mapping _Coerce++-- | Content category ID of this inventory item.+iiContentCategoryId :: Lens' InventoryItem (Maybe Int64)+iiContentCategoryId+  = lens _iiContentCategoryId+      (\ s a -> s{_iiContentCategoryId = a})+      . mapping _Coerce++-- | Whether this inventory item is in plan.+iiInPlan :: Lens' InventoryItem (Maybe Bool)+iiInPlan = lens _iiInPlan (\ s a -> s{_iiInPlan = a})++-- | Account ID of this inventory item.+iiAccountId :: Lens' InventoryItem (Maybe Int64)+iiAccountId+  = lens _iiAccountId (\ s a -> s{_iiAccountId = a}) .+      mapping _Coerce++-- | Name of this inventory item. For standalone inventory items, this is the+-- same name as that of its only ad slot. For group inventory items, this+-- can differ from the name of any of its ad slots.+iiName :: Lens' InventoryItem (Maybe Text)+iiName = lens _iiName (\ s a -> s{_iiName = a})++-- | Ad slots of this inventory item. If this inventory item represents a+-- standalone placement, there will be exactly one ad slot. If this+-- inventory item represents a placement group, there will be more than one+-- ad slot, each representing one child placement in that placement group.+iiAdSlots :: Lens' InventoryItem [AdSlot]+iiAdSlots+  = lens _iiAdSlots (\ s a -> s{_iiAdSlots = a}) .+      _Default+      . _Coerce++-- | Negotiation channel ID of this inventory item.+iiNegotiationChannelId :: Lens' InventoryItem (Maybe Int64)+iiNegotiationChannelId+  = lens _iiNegotiationChannelId+      (\ s a -> s{_iiNegotiationChannelId = a})+      . mapping _Coerce++-- | Information about the most recent modification of this inventory item.+iiLastModifiedInfo :: Lens' InventoryItem (Maybe LastModifiedInfo)+iiLastModifiedInfo+  = lens _iiLastModifiedInfo+      (\ s a -> s{_iiLastModifiedInfo = a})++-- | ID of this inventory item.+iiId :: Lens' InventoryItem (Maybe Int64)+iiId+  = lens _iiId (\ s a -> s{_iiId = a}) .+      mapping _Coerce++-- | Estimated conversion rate of this inventory item.+iiEstimatedConversionRate :: Lens' InventoryItem (Maybe Int64)+iiEstimatedConversionRate+  = lens _iiEstimatedConversionRate+      (\ s a -> s{_iiEstimatedConversionRate = a})+      . mapping _Coerce++-- | Project ID of this inventory item.+iiProjectId :: Lens' InventoryItem (Maybe Int64)+iiProjectId+  = lens _iiProjectId (\ s a -> s{_iiProjectId = a}) .+      mapping _Coerce++-- | Subaccount ID of this inventory item.+iiSubAccountId :: Lens' InventoryItem (Maybe Int64)+iiSubAccountId+  = lens _iiSubAccountId+      (\ s a -> s{_iiSubAccountId = a})+      . mapping _Coerce++-- | Type of inventory item.+iiType :: Lens' InventoryItem (Maybe InventoryItemType)+iiType = lens _iiType (\ s a -> s{_iiType = a})++-- | Order ID of this inventory item.+iiOrderId :: Lens' InventoryItem (Maybe Int64)+iiOrderId+  = lens _iiOrderId (\ s a -> s{_iiOrderId = a}) .+      mapping _Coerce++-- | ID of the site this inventory item is associated with.+iiSiteId :: Lens' InventoryItem (Maybe Int64)+iiSiteId+  = lens _iiSiteId (\ s a -> s{_iiSiteId = a}) .+      mapping _Coerce++instance FromJSON InventoryItem where+        parseJSON+          = withObject "InventoryItem"+              (\ o ->+                 InventoryItem' <$>+                   (o .:? "placementStrategyId") <*>+                     (o .:? "estimatedClickThroughRate")+                     <*> (o .:? "pricing")+                     <*> (o .:? "kind" .!= "dfareporting#inventoryItem")+                     <*> (o .:? "advertiserId")+                     <*> (o .:? "rfpId")+                     <*> (o .:? "contentCategoryId")+                     <*> (o .:? "inPlan")+                     <*> (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "adSlots" .!= mempty)+                     <*> (o .:? "negotiationChannelId")+                     <*> (o .:? "lastModifiedInfo")+                     <*> (o .:? "id")+                     <*> (o .:? "estimatedConversionRate")+                     <*> (o .:? "projectId")+                     <*> (o .:? "subaccountId")+                     <*> (o .:? "type")+                     <*> (o .:? "orderId")+                     <*> (o .:? "siteId"))++instance ToJSON InventoryItem where+        toJSON InventoryItem'{..}+          = object+              (catMaybes+                 [("placementStrategyId" .=) <$>+                    _iiPlacementStrategyId,+                  ("estimatedClickThroughRate" .=) <$>+                    _iiEstimatedClickThroughRate,+                  ("pricing" .=) <$> _iiPricing,+                  Just ("kind" .= _iiKind),+                  ("advertiserId" .=) <$> _iiAdvertiserId,+                  ("rfpId" .=) <$> _iiRfpId,+                  ("contentCategoryId" .=) <$> _iiContentCategoryId,+                  ("inPlan" .=) <$> _iiInPlan,+                  ("accountId" .=) <$> _iiAccountId,+                  ("name" .=) <$> _iiName,+                  ("adSlots" .=) <$> _iiAdSlots,+                  ("negotiationChannelId" .=) <$>+                    _iiNegotiationChannelId,+                  ("lastModifiedInfo" .=) <$> _iiLastModifiedInfo,+                  ("id" .=) <$> _iiId,+                  ("estimatedConversionRate" .=) <$>+                    _iiEstimatedConversionRate,+                  ("projectId" .=) <$> _iiProjectId,+                  ("subaccountId" .=) <$> _iiSubAccountId,+                  ("type" .=) <$> _iiType,+                  ("orderId" .=) <$> _iiOrderId,+                  ("siteId" .=) <$> _iiSiteId])++-- | Project List Response+--+-- /See:/ 'projectsListResponse' smart constructor.+data ProjectsListResponse = ProjectsListResponse'+    { _plrNextPageToken :: !(Maybe Text)+    , _plrKind          :: !Text+    , _plrProjects      :: !(Maybe [Project])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ProjectsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'plrNextPageToken'+--+-- * 'plrKind'+--+-- * 'plrProjects'+projectsListResponse+    :: ProjectsListResponse+projectsListResponse =+    ProjectsListResponse'+    { _plrNextPageToken = Nothing+    , _plrKind = "dfareporting#projectsListResponse"+    , _plrProjects = Nothing+    }++-- | Pagination token to be used for the next list operation.+plrNextPageToken :: Lens' ProjectsListResponse (Maybe Text)+plrNextPageToken+  = lens _plrNextPageToken+      (\ s a -> s{_plrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#projectsListResponse\".+plrKind :: Lens' ProjectsListResponse Text+plrKind = lens _plrKind (\ s a -> s{_plrKind = a})++-- | Project collection.+plrProjects :: Lens' ProjectsListResponse [Project]+plrProjects+  = lens _plrProjects (\ s a -> s{_plrProjects = a}) .+      _Default+      . _Coerce++instance FromJSON ProjectsListResponse where+        parseJSON+          = withObject "ProjectsListResponse"+              (\ o ->+                 ProjectsListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!=+                        "dfareporting#projectsListResponse")+                     <*> (o .:? "projects" .!= mempty))++instance ToJSON ProjectsListResponse where+        toJSON ProjectsListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _plrNextPageToken,+                  Just ("kind" .= _plrKind),+                  ("projects" .=) <$> _plrProjects])++-- | Ad List Response+--+-- /See:/ 'adsListResponse' smart constructor.+data AdsListResponse = AdsListResponse'+    { _alrNextPageToken :: !(Maybe Text)+    , _alrKind          :: !Text+    , _alrAds           :: !(Maybe [Ad])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'AdsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'alrNextPageToken'+--+-- * 'alrKind'+--+-- * 'alrAds'+adsListResponse+    :: AdsListResponse+adsListResponse =+    AdsListResponse'+    { _alrNextPageToken = Nothing+    , _alrKind = "dfareporting#adsListResponse"+    , _alrAds = Nothing+    }++-- | Pagination token to be used for the next list operation.+alrNextPageToken :: Lens' AdsListResponse (Maybe Text)+alrNextPageToken+  = lens _alrNextPageToken+      (\ s a -> s{_alrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#adsListResponse\".+alrKind :: Lens' AdsListResponse Text+alrKind = lens _alrKind (\ s a -> s{_alrKind = a})++-- | Ad collection.+alrAds :: Lens' AdsListResponse [Ad]+alrAds+  = lens _alrAds (\ s a -> s{_alrAds = a}) . _Default .+      _Coerce++instance FromJSON AdsListResponse where+        parseJSON+          = withObject "AdsListResponse"+              (\ o ->+                 AdsListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!= "dfareporting#adsListResponse")+                     <*> (o .:? "ads" .!= mempty))++instance ToJSON AdsListResponse where+        toJSON AdsListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _alrNextPageToken,+                  Just ("kind" .= _alrKind), ("ads" .=) <$> _alrAds])++-- | Remarketing List Population Rule Term.+--+-- /See:/ 'listPopulationTerm' smart constructor.+data ListPopulationTerm = ListPopulationTerm'+    { _lptOperator             :: !(Maybe ListPopulationTermOperator)+    , _lptValue                :: !(Maybe Text)+    , _lptVariableFriendlyName :: !(Maybe Text)+    , _lptNegation             :: !(Maybe Bool)+    , _lptVariableName         :: !(Maybe Text)+    , _lptRemarketingListId    :: !(Maybe (Textual Int64))+    , _lptType                 :: !(Maybe ListPopulationTermType)+    , _lptContains             :: !(Maybe Bool)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ListPopulationTerm' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'lptOperator'+--+-- * 'lptValue'+--+-- * 'lptVariableFriendlyName'+--+-- * 'lptNegation'+--+-- * 'lptVariableName'+--+-- * 'lptRemarketingListId'+--+-- * 'lptType'+--+-- * 'lptContains'+listPopulationTerm+    :: ListPopulationTerm+listPopulationTerm =+    ListPopulationTerm'+    { _lptOperator = Nothing+    , _lptValue = Nothing+    , _lptVariableFriendlyName = Nothing+    , _lptNegation = Nothing+    , _lptVariableName = Nothing+    , _lptRemarketingListId = Nothing+    , _lptType = Nothing+    , _lptContains = Nothing+    }++-- | Comparison operator of this term. This field is only relevant when type+-- is left unset or set to CUSTOM_VARIABLE_TERM or REFERRER_TERM.+lptOperator :: Lens' ListPopulationTerm (Maybe ListPopulationTermOperator)+lptOperator+  = lens _lptOperator (\ s a -> s{_lptOperator = a})++-- | Literal to compare the variable to. This field is only relevant when+-- type is left unset or set to CUSTOM_VARIABLE_TERM or REFERRER_TERM.+lptValue :: Lens' ListPopulationTerm (Maybe Text)+lptValue = lens _lptValue (\ s a -> s{_lptValue = a})++-- | Friendly name of this term\'s variable. This is a read-only,+-- auto-generated field. This field is only relevant when type is left+-- unset or set to CUSTOM_VARIABLE_TERM.+lptVariableFriendlyName :: Lens' ListPopulationTerm (Maybe Text)+lptVariableFriendlyName+  = lens _lptVariableFriendlyName+      (\ s a -> s{_lptVariableFriendlyName = a})++-- | Whether to negate the comparison result of this term during rule+-- evaluation. This field is only relevant when type is left unset or set+-- to CUSTOM_VARIABLE_TERM or REFERRER_TERM.+lptNegation :: Lens' ListPopulationTerm (Maybe Bool)+lptNegation+  = lens _lptNegation (\ s a -> s{_lptNegation = a})++-- | Name of the variable (U1, U2, etc.) being compared in this term. This+-- field is only relevant when type is set to null, CUSTOM_VARIABLE_TERM or+-- REFERRER_TERM.+lptVariableName :: Lens' ListPopulationTerm (Maybe Text)+lptVariableName+  = lens _lptVariableName+      (\ s a -> s{_lptVariableName = a})++-- | ID of the list in question. This field is only relevant when type is set+-- to LIST_MEMBERSHIP_TERM.+lptRemarketingListId :: Lens' ListPopulationTerm (Maybe Int64)+lptRemarketingListId+  = lens _lptRemarketingListId+      (\ s a -> s{_lptRemarketingListId = a})+      . mapping _Coerce++-- | List population term type determines the applicable fields in this+-- object. If left unset or set to CUSTOM_VARIABLE_TERM, then variableName,+-- variableFriendlyName, operator, value, and negation are applicable. If+-- set to LIST_MEMBERSHIP_TERM then remarketingListId and contains are+-- applicable. If set to REFERRER_TERM then operator, value, and negation+-- are applicable.+lptType :: Lens' ListPopulationTerm (Maybe ListPopulationTermType)+lptType = lens _lptType (\ s a -> s{_lptType = a})++-- | Will be true if the term should check if the user is in the list and+-- false if the term should check if the user is not in the list. This+-- field is only relevant when type is set to LIST_MEMBERSHIP_TERM. False+-- by default.+lptContains :: Lens' ListPopulationTerm (Maybe Bool)+lptContains+  = lens _lptContains (\ s a -> s{_lptContains = a})++instance FromJSON ListPopulationTerm where+        parseJSON+          = withObject "ListPopulationTerm"+              (\ o ->+                 ListPopulationTerm' <$>+                   (o .:? "operator") <*> (o .:? "value") <*>+                     (o .:? "variableFriendlyName")+                     <*> (o .:? "negation")+                     <*> (o .:? "variableName")+                     <*> (o .:? "remarketingListId")+                     <*> (o .:? "type")+                     <*> (o .:? "contains"))++instance ToJSON ListPopulationTerm where+        toJSON ListPopulationTerm'{..}+          = object+              (catMaybes+                 [("operator" .=) <$> _lptOperator,+                  ("value" .=) <$> _lptValue,+                  ("variableFriendlyName" .=) <$>+                    _lptVariableFriendlyName,+                  ("negation" .=) <$> _lptNegation,+                  ("variableName" .=) <$> _lptVariableName,+                  ("remarketingListId" .=) <$> _lptRemarketingListId,+                  ("type" .=) <$> _lptType,+                  ("contains" .=) <$> _lptContains])++-- | Dynamic and Image Tag Settings.+--+-- /See:/ 'tagSettings' smart constructor.+data TagSettings = TagSettings'+    { _tsDynamicTagEnabled :: !(Maybe Bool)+    , _tsImageTagEnabled   :: !(Maybe Bool)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'TagSettings' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'tsDynamicTagEnabled'+--+-- * 'tsImageTagEnabled'+tagSettings+    :: TagSettings+tagSettings =+    TagSettings'+    { _tsDynamicTagEnabled = Nothing+    , _tsImageTagEnabled = Nothing+    }++-- | Whether dynamic floodlight tags are enabled.+tsDynamicTagEnabled :: Lens' TagSettings (Maybe Bool)+tsDynamicTagEnabled+  = lens _tsDynamicTagEnabled+      (\ s a -> s{_tsDynamicTagEnabled = a})++-- | Whether image tags are enabled.+tsImageTagEnabled :: Lens' TagSettings (Maybe Bool)+tsImageTagEnabled+  = lens _tsImageTagEnabled+      (\ s a -> s{_tsImageTagEnabled = a})++instance FromJSON TagSettings where+        parseJSON+          = withObject "TagSettings"+              (\ o ->+                 TagSettings' <$>+                   (o .:? "dynamicTagEnabled") <*>+                     (o .:? "imageTagEnabled"))++instance ToJSON TagSettings where+        toJSON TagSettings'{..}+          = object+              (catMaybes+                 [("dynamicTagEnabled" .=) <$> _tsDynamicTagEnabled,+                  ("imageTagEnabled" .=) <$> _tsImageTagEnabled])++-- | Subaccount List Response+--+-- /See:/ 'subAccountsListResponse' smart constructor.+data SubAccountsListResponse = SubAccountsListResponse'+    { _salrNextPageToken :: !(Maybe Text)+    , _salrKind          :: !Text+    , _salrSubAccounts   :: !(Maybe [SubAccount])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'SubAccountsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'salrNextPageToken'+--+-- * 'salrKind'+--+-- * 'salrSubAccounts'+subAccountsListResponse+    :: SubAccountsListResponse+subAccountsListResponse =+    SubAccountsListResponse'+    { _salrNextPageToken = Nothing+    , _salrKind = "dfareporting#subaccountsListResponse"+    , _salrSubAccounts = Nothing+    }++-- | Pagination token to be used for the next list operation.+salrNextPageToken :: Lens' SubAccountsListResponse (Maybe Text)+salrNextPageToken+  = lens _salrNextPageToken+      (\ s a -> s{_salrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#subaccountsListResponse\".+salrKind :: Lens' SubAccountsListResponse Text+salrKind = lens _salrKind (\ s a -> s{_salrKind = a})++-- | Subaccount collection.+salrSubAccounts :: Lens' SubAccountsListResponse [SubAccount]+salrSubAccounts+  = lens _salrSubAccounts+      (\ s a -> s{_salrSubAccounts = a})+      . _Default+      . _Coerce++instance FromJSON SubAccountsListResponse where+        parseJSON+          = withObject "SubAccountsListResponse"+              (\ o ->+                 SubAccountsListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!=+                        "dfareporting#subaccountsListResponse")+                     <*> (o .:? "subaccounts" .!= mempty))++instance ToJSON SubAccountsListResponse where+        toJSON SubAccountsListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _salrNextPageToken,+                  Just ("kind" .= _salrKind),+                  ("subaccounts" .=) <$> _salrSubAccounts])++-- | Contains properties of a Site Directory contact.+--+-- /See:/ 'directorySiteContact' smart constructor.+data DirectorySiteContact = DirectorySiteContact'+    { _dscEmail     :: !(Maybe Text)+    , _dscPhone     :: !(Maybe Text)+    , _dscLastName  :: !(Maybe Text)+    , _dscKind      :: !Text+    , _dscAddress   :: !(Maybe Text)+    , _dscRole      :: !(Maybe DirectorySiteContactRole)+    , _dscFirstName :: !(Maybe Text)+    , _dscId        :: !(Maybe (Textual Int64))+    , _dscTitle     :: !(Maybe Text)+    , _dscType      :: !(Maybe DirectorySiteContactType)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DirectorySiteContact' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dscEmail'+--+-- * 'dscPhone'+--+-- * 'dscLastName'+--+-- * 'dscKind'+--+-- * 'dscAddress'+--+-- * 'dscRole'+--+-- * 'dscFirstName'+--+-- * 'dscId'+--+-- * 'dscTitle'+--+-- * 'dscType'+directorySiteContact+    :: DirectorySiteContact+directorySiteContact =+    DirectorySiteContact'+    { _dscEmail = Nothing+    , _dscPhone = Nothing+    , _dscLastName = Nothing+    , _dscKind = "dfareporting#directorySiteContact"+    , _dscAddress = Nothing+    , _dscRole = Nothing+    , _dscFirstName = Nothing+    , _dscId = Nothing+    , _dscTitle = Nothing+    , _dscType = Nothing+    }++-- | Email address of this directory site contact.+dscEmail :: Lens' DirectorySiteContact (Maybe Text)+dscEmail = lens _dscEmail (\ s a -> s{_dscEmail = a})++-- | Phone number of this directory site contact.+dscPhone :: Lens' DirectorySiteContact (Maybe Text)+dscPhone = lens _dscPhone (\ s a -> s{_dscPhone = a})++-- | Last name of this directory site contact.+dscLastName :: Lens' DirectorySiteContact (Maybe Text)+dscLastName+  = lens _dscLastName (\ s a -> s{_dscLastName = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#directorySiteContact\".+dscKind :: Lens' DirectorySiteContact Text+dscKind = lens _dscKind (\ s a -> s{_dscKind = a})++-- | Address of this directory site contact.+dscAddress :: Lens' DirectorySiteContact (Maybe Text)+dscAddress+  = lens _dscAddress (\ s a -> s{_dscAddress = a})++-- | Directory site contact role.+dscRole :: Lens' DirectorySiteContact (Maybe DirectorySiteContactRole)+dscRole = lens _dscRole (\ s a -> s{_dscRole = a})++-- | First name of this directory site contact.+dscFirstName :: Lens' DirectorySiteContact (Maybe Text)+dscFirstName+  = lens _dscFirstName (\ s a -> s{_dscFirstName = a})++-- | ID of this directory site contact. This is a read-only, auto-generated+-- field.+dscId :: Lens' DirectorySiteContact (Maybe Int64)+dscId+  = lens _dscId (\ s a -> s{_dscId = a}) .+      mapping _Coerce++-- | Title or designation of this directory site contact.+dscTitle :: Lens' DirectorySiteContact (Maybe Text)+dscTitle = lens _dscTitle (\ s a -> s{_dscTitle = a})++-- | Directory site contact type.+dscType :: Lens' DirectorySiteContact (Maybe DirectorySiteContactType)+dscType = lens _dscType (\ s a -> s{_dscType = a})++instance FromJSON DirectorySiteContact where+        parseJSON+          = withObject "DirectorySiteContact"+              (\ o ->+                 DirectorySiteContact' <$>+                   (o .:? "email") <*> (o .:? "phone") <*>+                     (o .:? "lastName")+                     <*>+                     (o .:? "kind" .!=+                        "dfareporting#directorySiteContact")+                     <*> (o .:? "address")+                     <*> (o .:? "role")+                     <*> (o .:? "firstName")+                     <*> (o .:? "id")+                     <*> (o .:? "title")+                     <*> (o .:? "type"))++instance ToJSON DirectorySiteContact where+        toJSON DirectorySiteContact'{..}+          = object+              (catMaybes+                 [("email" .=) <$> _dscEmail,+                  ("phone" .=) <$> _dscPhone,+                  ("lastName" .=) <$> _dscLastName,+                  Just ("kind" .= _dscKind),+                  ("address" .=) <$> _dscAddress,+                  ("role" .=) <$> _dscRole,+                  ("firstName" .=) <$> _dscFirstName,+                  ("id" .=) <$> _dscId, ("title" .=) <$> _dscTitle,+                  ("type" .=) <$> _dscType])++-- | Region List Response+--+-- /See:/ 'regionsListResponse' smart constructor.+data RegionsListResponse = RegionsListResponse'+    { _rlrKind    :: !Text+    , _rlrRegions :: !(Maybe [Region])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'RegionsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rlrKind'+--+-- * 'rlrRegions'+regionsListResponse+    :: RegionsListResponse+regionsListResponse =+    RegionsListResponse'+    { _rlrKind = "dfareporting#regionsListResponse"+    , _rlrRegions = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#regionsListResponse\".+rlrKind :: Lens' RegionsListResponse Text+rlrKind = lens _rlrKind (\ s a -> s{_rlrKind = a})++-- | Region collection.+rlrRegions :: Lens' RegionsListResponse [Region]+rlrRegions+  = lens _rlrRegions (\ s a -> s{_rlrRegions = a}) .+      _Default+      . _Coerce++instance FromJSON RegionsListResponse where+        parseJSON+          = withObject "RegionsListResponse"+              (\ o ->+                 RegionsListResponse' <$>+                   (o .:? "kind" .!= "dfareporting#regionsListResponse")+                     <*> (o .:? "regions" .!= mempty))++instance ToJSON RegionsListResponse where+        toJSON RegionsListResponse'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _rlrKind),+                  ("regions" .=) <$> _rlrRegions])++-- | Dynamic Tag+--+-- /See:/ 'floodlightActivityDynamicTag' smart constructor.+data FloodlightActivityDynamicTag = FloodlightActivityDynamicTag'+    { _fadtTag  :: !(Maybe Text)+    , _fadtName :: !(Maybe Text)+    , _fadtId   :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'FloodlightActivityDynamicTag' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'fadtTag'+--+-- * 'fadtName'+--+-- * 'fadtId'+floodlightActivityDynamicTag+    :: FloodlightActivityDynamicTag+floodlightActivityDynamicTag =+    FloodlightActivityDynamicTag'+    { _fadtTag = Nothing+    , _fadtName = Nothing+    , _fadtId = Nothing+    }++-- | Tag code.+fadtTag :: Lens' FloodlightActivityDynamicTag (Maybe Text)+fadtTag = lens _fadtTag (\ s a -> s{_fadtTag = a})++-- | Name of this tag.+fadtName :: Lens' FloodlightActivityDynamicTag (Maybe Text)+fadtName = lens _fadtName (\ s a -> s{_fadtName = a})++-- | ID of this dynamic tag. This is a read-only, auto-generated field.+fadtId :: Lens' FloodlightActivityDynamicTag (Maybe Int64)+fadtId+  = lens _fadtId (\ s a -> s{_fadtId = a}) .+      mapping _Coerce++instance FromJSON FloodlightActivityDynamicTag where+        parseJSON+          = withObject "FloodlightActivityDynamicTag"+              (\ o ->+                 FloodlightActivityDynamicTag' <$>+                   (o .:? "tag") <*> (o .:? "name") <*> (o .:? "id"))++instance ToJSON FloodlightActivityDynamicTag where+        toJSON FloodlightActivityDynamicTag'{..}+          = object+              (catMaybes+                 [("tag" .=) <$> _fadtTag, ("name" .=) <$> _fadtName,+                  ("id" .=) <$> _fadtId])++-- | DirectorySites contains properties of a website from the Site Directory.+-- Sites need to be added to an account via the Sites resource before they+-- can be assigned to a placement.+--+-- /See:/ 'directorySite' smart constructor.+data DirectorySite = DirectorySite'+    { _dsCurrencyId             :: !(Maybe (Textual Int64))+    , _dsSettings               :: !(Maybe DirectorySiteSettings)+    , _dsInterstitialTagFormats :: !(Maybe [DirectorySiteInterstitialTagFormatsItem])+    , _dsKind                   :: !Text+    , _dsURL                    :: !(Maybe Text)+    , _dsIdDimensionValue       :: !(Maybe DimensionValue)+    , _dsInpageTagFormats       :: !(Maybe [DirectorySiteInpageTagFormatsItem])+    , _dsActive                 :: !(Maybe Bool)+    , _dsName                   :: !(Maybe Text)+    , _dsId                     :: !(Maybe (Textual Int64))+    , _dsCountryId              :: !(Maybe (Textual Int64))+    , _dsContactAssignments     :: !(Maybe [DirectorySiteContactAssignment])+    , _dsDescription            :: !(Maybe Text)+    , _dsParentId               :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DirectorySite' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dsCurrencyId'+--+-- * 'dsSettings'+--+-- * 'dsInterstitialTagFormats'+--+-- * 'dsKind'+--+-- * 'dsURL'+--+-- * 'dsIdDimensionValue'+--+-- * 'dsInpageTagFormats'+--+-- * 'dsActive'+--+-- * 'dsName'+--+-- * 'dsId'+--+-- * 'dsCountryId'+--+-- * 'dsContactAssignments'+--+-- * 'dsDescription'+--+-- * 'dsParentId'+directorySite+    :: DirectorySite+directorySite =+    DirectorySite'+    { _dsCurrencyId = Nothing+    , _dsSettings = Nothing+    , _dsInterstitialTagFormats = Nothing+    , _dsKind = "dfareporting#directorySite"+    , _dsURL = Nothing+    , _dsIdDimensionValue = Nothing+    , _dsInpageTagFormats = Nothing+    , _dsActive = Nothing+    , _dsName = Nothing+    , _dsId = Nothing+    , _dsCountryId = Nothing+    , _dsContactAssignments = Nothing+    , _dsDescription = Nothing+    , _dsParentId = Nothing+    }++-- | Currency ID of this directory site. Possible values are: - \"1\" for USD+-- - \"2\" for GBP - \"3\" for ESP - \"4\" for SEK - \"5\" for CAD - \"6\"+-- for JPY - \"7\" for DEM - \"8\" for AUD - \"9\" for FRF - \"10\" for ITL+-- - \"11\" for DKK - \"12\" for NOK - \"13\" for FIM - \"14\" for ZAR -+-- \"15\" for IEP - \"16\" for NLG - \"17\" for EUR - \"18\" for KRW -+-- \"19\" for TWD - \"20\" for SGD - \"21\" for CNY - \"22\" for HKD -+-- \"23\" for NZD - \"24\" for MYR - \"25\" for BRL - \"26\" for PTE -+-- \"27\" for MXP - \"28\" for CLP - \"29\" for TRY - \"30\" for ARS -+-- \"31\" for PEN - \"32\" for ILS - \"33\" for CHF - \"34\" for VEF -+-- \"35\" for COP - \"36\" for GTQ - \"37\" for PLN - \"39\" for INR -+-- \"40\" for THB - \"41\" for IDR - \"42\" for CZK - \"43\" for RON -+-- \"44\" for HUF - \"45\" for RUB - \"46\" for AED - \"47\" for BGN -+-- \"48\" for HRK+dsCurrencyId :: Lens' DirectorySite (Maybe Int64)+dsCurrencyId+  = lens _dsCurrencyId (\ s a -> s{_dsCurrencyId = a})+      . mapping _Coerce++-- | Directory site settings.+dsSettings :: Lens' DirectorySite (Maybe DirectorySiteSettings)+dsSettings+  = lens _dsSettings (\ s a -> s{_dsSettings = a})++-- | Tag types for interstitial placements. Acceptable values are: -+-- \"IFRAME_JAVASCRIPT_INTERSTITIAL\" - \"INTERNAL_REDIRECT_INTERSTITIAL\"+-- - \"JAVASCRIPT_INTERSTITIAL\"+dsInterstitialTagFormats :: Lens' DirectorySite [DirectorySiteInterstitialTagFormatsItem]+dsInterstitialTagFormats+  = lens _dsInterstitialTagFormats+      (\ s a -> s{_dsInterstitialTagFormats = a})+      . _Default+      . _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#directorySite\".+dsKind :: Lens' DirectorySite Text+dsKind = lens _dsKind (\ s a -> s{_dsKind = a})++-- | URL of this directory site.+dsURL :: Lens' DirectorySite (Maybe Text)+dsURL = lens _dsURL (\ s a -> s{_dsURL = a})++-- | Dimension value for the ID of this directory site. This is a read-only,+-- auto-generated field.+dsIdDimensionValue :: Lens' DirectorySite (Maybe DimensionValue)+dsIdDimensionValue+  = lens _dsIdDimensionValue+      (\ s a -> s{_dsIdDimensionValue = a})++-- | Tag types for regular placements. Acceptable values are: - \"STANDARD\"+-- - \"IFRAME_JAVASCRIPT_INPAGE\" - \"INTERNAL_REDIRECT_INPAGE\" -+-- \"JAVASCRIPT_INPAGE\"+dsInpageTagFormats :: Lens' DirectorySite [DirectorySiteInpageTagFormatsItem]+dsInpageTagFormats+  = lens _dsInpageTagFormats+      (\ s a -> s{_dsInpageTagFormats = a})+      . _Default+      . _Coerce++-- | Whether this directory site is active.+dsActive :: Lens' DirectorySite (Maybe Bool)+dsActive = lens _dsActive (\ s a -> s{_dsActive = a})++-- | Name of this directory site.+dsName :: Lens' DirectorySite (Maybe Text)+dsName = lens _dsName (\ s a -> s{_dsName = a})++-- | ID of this directory site. This is a read-only, auto-generated field.+dsId :: Lens' DirectorySite (Maybe Int64)+dsId+  = lens _dsId (\ s a -> s{_dsId = a}) .+      mapping _Coerce++-- | Country ID of this directory site.+dsCountryId :: Lens' DirectorySite (Maybe Int64)+dsCountryId+  = lens _dsCountryId (\ s a -> s{_dsCountryId = a}) .+      mapping _Coerce++-- | Directory site contacts.+dsContactAssignments :: Lens' DirectorySite [DirectorySiteContactAssignment]+dsContactAssignments+  = lens _dsContactAssignments+      (\ s a -> s{_dsContactAssignments = a})+      . _Default+      . _Coerce++-- | Description of this directory site.+dsDescription :: Lens' DirectorySite (Maybe Text)+dsDescription+  = lens _dsDescription+      (\ s a -> s{_dsDescription = a})++-- | Parent directory site ID.+dsParentId :: Lens' DirectorySite (Maybe Int64)+dsParentId+  = lens _dsParentId (\ s a -> s{_dsParentId = a}) .+      mapping _Coerce++instance FromJSON DirectorySite where+        parseJSON+          = withObject "DirectorySite"+              (\ o ->+                 DirectorySite' <$>+                   (o .:? "currencyId") <*> (o .:? "settings") <*>+                     (o .:? "interstitialTagFormats" .!= mempty)+                     <*> (o .:? "kind" .!= "dfareporting#directorySite")+                     <*> (o .:? "url")+                     <*> (o .:? "idDimensionValue")+                     <*> (o .:? "inpageTagFormats" .!= mempty)+                     <*> (o .:? "active")+                     <*> (o .:? "name")+                     <*> (o .:? "id")+                     <*> (o .:? "countryId")+                     <*> (o .:? "contactAssignments" .!= mempty)+                     <*> (o .:? "description")+                     <*> (o .:? "parentId"))++instance ToJSON DirectorySite where+        toJSON DirectorySite'{..}+          = object+              (catMaybes+                 [("currencyId" .=) <$> _dsCurrencyId,+                  ("settings" .=) <$> _dsSettings,+                  ("interstitialTagFormats" .=) <$>+                    _dsInterstitialTagFormats,+                  Just ("kind" .= _dsKind), ("url" .=) <$> _dsURL,+                  ("idDimensionValue" .=) <$> _dsIdDimensionValue,+                  ("inpageTagFormats" .=) <$> _dsInpageTagFormats,+                  ("active" .=) <$> _dsActive, ("name" .=) <$> _dsName,+                  ("id" .=) <$> _dsId,+                  ("countryId" .=) <$> _dsCountryId,+                  ("contactAssignments" .=) <$> _dsContactAssignments,+                  ("description" .=) <$> _dsDescription,+                  ("parentId" .=) <$> _dsParentId])++-- | The properties of the report.+--+-- /See:/ 'reportFloodlightCriteriaReportProperties' smart constructor.+data ReportFloodlightCriteriaReportProperties = ReportFloodlightCriteriaReportProperties'+    { _rfcrpIncludeUnattributedIPConversions     :: !(Maybe Bool)+    , _rfcrpIncludeUnattributedCookieConversions :: !(Maybe Bool)+    , _rfcrpIncludeAttributedIPConversions       :: !(Maybe Bool)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ReportFloodlightCriteriaReportProperties' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rfcrpIncludeUnattributedIPConversions'+--+-- * 'rfcrpIncludeUnattributedCookieConversions'+--+-- * 'rfcrpIncludeAttributedIPConversions'+reportFloodlightCriteriaReportProperties+    :: ReportFloodlightCriteriaReportProperties+reportFloodlightCriteriaReportProperties =+    ReportFloodlightCriteriaReportProperties'+    { _rfcrpIncludeUnattributedIPConversions = Nothing+    , _rfcrpIncludeUnattributedCookieConversions = Nothing+    , _rfcrpIncludeAttributedIPConversions = Nothing+    }++-- | Include conversions that have no associated cookies and no exposures.+-- It’s therefore impossible to know how the user was exposed to your ads+-- during the lookback window prior to a conversion.+rfcrpIncludeUnattributedIPConversions :: Lens' ReportFloodlightCriteriaReportProperties (Maybe Bool)+rfcrpIncludeUnattributedIPConversions+  = lens _rfcrpIncludeUnattributedIPConversions+      (\ s a ->+         s{_rfcrpIncludeUnattributedIPConversions = a})++-- | Include conversions of users with a DoubleClick cookie but without an+-- exposure. That means the user did not click or see an ad from the+-- advertiser within the Floodlight group, or that the interaction happened+-- outside the lookback window.+rfcrpIncludeUnattributedCookieConversions :: Lens' ReportFloodlightCriteriaReportProperties (Maybe Bool)+rfcrpIncludeUnattributedCookieConversions+  = lens _rfcrpIncludeUnattributedCookieConversions+      (\ s a ->+         s{_rfcrpIncludeUnattributedCookieConversions = a})++-- | Include conversions that have no cookie, but do have an exposure path.+rfcrpIncludeAttributedIPConversions :: Lens' ReportFloodlightCriteriaReportProperties (Maybe Bool)+rfcrpIncludeAttributedIPConversions+  = lens _rfcrpIncludeAttributedIPConversions+      (\ s a ->+         s{_rfcrpIncludeAttributedIPConversions = a})++instance FromJSON+         ReportFloodlightCriteriaReportProperties where+        parseJSON+          = withObject+              "ReportFloodlightCriteriaReportProperties"+              (\ o ->+                 ReportFloodlightCriteriaReportProperties' <$>+                   (o .:? "includeUnattributedIPConversions") <*>+                     (o .:? "includeUnattributedCookieConversions")+                     <*> (o .:? "includeAttributedIPConversions"))++instance ToJSON+         ReportFloodlightCriteriaReportProperties where+        toJSON ReportFloodlightCriteriaReportProperties'{..}+          = object+              (catMaybes+                 [("includeUnattributedIPConversions" .=) <$>+                    _rfcrpIncludeUnattributedIPConversions,+                  ("includeUnattributedCookieConversions" .=) <$>+                    _rfcrpIncludeUnattributedCookieConversions,+                  ("includeAttributedIPConversions" .=) <$>+                    _rfcrpIncludeAttributedIPConversions])++-- | Contains properties of a Floodlight activity group.+--+-- /See:/ 'floodlightActivityGroup' smart constructor.+data FloodlightActivityGroup = FloodlightActivityGroup'+    { _fagTagString                               :: !(Maybe Text)+    , _fagFloodlightConfigurationId               :: !(Maybe (Textual Int64))+    , _fagKind                                    :: !Text+    , _fagAdvertiserId                            :: !(Maybe (Textual Int64))+    , _fagAdvertiserIdDimensionValue              :: !(Maybe DimensionValue)+    , _fagIdDimensionValue                        :: !(Maybe DimensionValue)+    , _fagAccountId                               :: !(Maybe (Textual Int64))+    , _fagName                                    :: !(Maybe Text)+    , _fagId                                      :: !(Maybe (Textual Int64))+    , _fagSubAccountId                            :: !(Maybe (Textual Int64))+    , _fagType                                    :: !(Maybe FloodlightActivityGroupType)+    , _fagFloodlightConfigurationIdDimensionValue :: !(Maybe DimensionValue)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'FloodlightActivityGroup' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'fagTagString'+--+-- * 'fagFloodlightConfigurationId'+--+-- * 'fagKind'+--+-- * 'fagAdvertiserId'+--+-- * 'fagAdvertiserIdDimensionValue'+--+-- * 'fagIdDimensionValue'+--+-- * 'fagAccountId'+--+-- * 'fagName'+--+-- * 'fagId'+--+-- * 'fagSubAccountId'+--+-- * 'fagType'+--+-- * 'fagFloodlightConfigurationIdDimensionValue'+floodlightActivityGroup+    :: FloodlightActivityGroup+floodlightActivityGroup =+    FloodlightActivityGroup'+    { _fagTagString = Nothing+    , _fagFloodlightConfigurationId = Nothing+    , _fagKind = "dfareporting#floodlightActivityGroup"+    , _fagAdvertiserId = Nothing+    , _fagAdvertiserIdDimensionValue = Nothing+    , _fagIdDimensionValue = Nothing+    , _fagAccountId = Nothing+    , _fagName = Nothing+    , _fagId = Nothing+    , _fagSubAccountId = Nothing+    , _fagType = Nothing+    , _fagFloodlightConfigurationIdDimensionValue = Nothing+    }++-- | Value of the type= parameter in the floodlight tag, which the ad servers+-- use to identify the activity group that the activity belongs to. This is+-- optional: if empty, a new tag string will be generated for you. This+-- string must be 1 to 8 characters long, with valid characters being+-- [a-z][A-Z][0-9][-][ _ ]. This tag string must also be unique among+-- activity groups of the same floodlight configuration. This field is+-- read-only after insertion.+fagTagString :: Lens' FloodlightActivityGroup (Maybe Text)+fagTagString+  = lens _fagTagString (\ s a -> s{_fagTagString = a})++-- | Floodlight configuration ID of this floodlight activity group. This is a+-- required field.+fagFloodlightConfigurationId :: Lens' FloodlightActivityGroup (Maybe Int64)+fagFloodlightConfigurationId+  = lens _fagFloodlightConfigurationId+      (\ s a -> s{_fagFloodlightConfigurationId = a})+      . mapping _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#floodlightActivityGroup\".+fagKind :: Lens' FloodlightActivityGroup Text+fagKind = lens _fagKind (\ s a -> s{_fagKind = a})++-- | Advertiser ID of this floodlight activity group. If this field is left+-- blank, the value will be copied over either from the floodlight+-- configuration\'s advertiser or from the existing activity group\'s+-- advertiser.+fagAdvertiserId :: Lens' FloodlightActivityGroup (Maybe Int64)+fagAdvertiserId+  = lens _fagAdvertiserId+      (\ s a -> s{_fagAdvertiserId = a})+      . mapping _Coerce++-- | Dimension value for the ID of the advertiser. This is a read-only,+-- auto-generated field.+fagAdvertiserIdDimensionValue :: Lens' FloodlightActivityGroup (Maybe DimensionValue)+fagAdvertiserIdDimensionValue+  = lens _fagAdvertiserIdDimensionValue+      (\ s a -> s{_fagAdvertiserIdDimensionValue = a})++-- | Dimension value for the ID of this floodlight activity group. This is a+-- read-only, auto-generated field.+fagIdDimensionValue :: Lens' FloodlightActivityGroup (Maybe DimensionValue)+fagIdDimensionValue+  = lens _fagIdDimensionValue+      (\ s a -> s{_fagIdDimensionValue = a})++-- | Account ID of this floodlight activity group. This is a read-only field+-- that can be left blank.+fagAccountId :: Lens' FloodlightActivityGroup (Maybe Int64)+fagAccountId+  = lens _fagAccountId (\ s a -> s{_fagAccountId = a})+      . mapping _Coerce++-- | Name of this floodlight activity group. This is a required field. Must+-- be less than 65 characters long and cannot contain quotes.+fagName :: Lens' FloodlightActivityGroup (Maybe Text)+fagName = lens _fagName (\ s a -> s{_fagName = a})++-- | ID of this floodlight activity group. This is a read-only,+-- auto-generated field.+fagId :: Lens' FloodlightActivityGroup (Maybe Int64)+fagId+  = lens _fagId (\ s a -> s{_fagId = a}) .+      mapping _Coerce++-- | Subaccount ID of this floodlight activity group. This is a read-only+-- field that can be left blank.+fagSubAccountId :: Lens' FloodlightActivityGroup (Maybe Int64)+fagSubAccountId+  = lens _fagSubAccountId+      (\ s a -> s{_fagSubAccountId = a})+      . mapping _Coerce++-- | Type of the floodlight activity group. This is a required field that is+-- read-only after insertion.+fagType :: Lens' FloodlightActivityGroup (Maybe FloodlightActivityGroupType)+fagType = lens _fagType (\ s a -> s{_fagType = a})++-- | Dimension value for the ID of the floodlight configuration. This is a+-- read-only, auto-generated field.+fagFloodlightConfigurationIdDimensionValue :: Lens' FloodlightActivityGroup (Maybe DimensionValue)+fagFloodlightConfigurationIdDimensionValue+  = lens _fagFloodlightConfigurationIdDimensionValue+      (\ s a ->+         s{_fagFloodlightConfigurationIdDimensionValue = a})++instance FromJSON FloodlightActivityGroup where+        parseJSON+          = withObject "FloodlightActivityGroup"+              (\ o ->+                 FloodlightActivityGroup' <$>+                   (o .:? "tagString") <*>+                     (o .:? "floodlightConfigurationId")+                     <*>+                     (o .:? "kind" .!=+                        "dfareporting#floodlightActivityGroup")+                     <*> (o .:? "advertiserId")+                     <*> (o .:? "advertiserIdDimensionValue")+                     <*> (o .:? "idDimensionValue")+                     <*> (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "id")+                     <*> (o .:? "subaccountId")+                     <*> (o .:? "type")+                     <*>+                     (o .:? "floodlightConfigurationIdDimensionValue"))++instance ToJSON FloodlightActivityGroup where+        toJSON FloodlightActivityGroup'{..}+          = object+              (catMaybes+                 [("tagString" .=) <$> _fagTagString,+                  ("floodlightConfigurationId" .=) <$>+                    _fagFloodlightConfigurationId,+                  Just ("kind" .= _fagKind),+                  ("advertiserId" .=) <$> _fagAdvertiserId,+                  ("advertiserIdDimensionValue" .=) <$>+                    _fagAdvertiserIdDimensionValue,+                  ("idDimensionValue" .=) <$> _fagIdDimensionValue,+                  ("accountId" .=) <$> _fagAccountId,+                  ("name" .=) <$> _fagName, ("id" .=) <$> _fagId,+                  ("subaccountId" .=) <$> _fagSubAccountId,+                  ("type" .=) <$> _fagType,+                  ("floodlightConfigurationIdDimensionValue" .=) <$>+                    _fagFloodlightConfigurationIdDimensionValue])++-- | Represents fields that are compatible to be selected for a report of+-- type \"CROSS_DIMENSION_REACH\".+--+-- /See:/ 'crossDimensionReachReportCompatibleFields' smart constructor.+data CrossDimensionReachReportCompatibleFields = CrossDimensionReachReportCompatibleFields'+    { _cdrrcfMetrics          :: !(Maybe [Metric])+    , _cdrrcfBreakdown        :: !(Maybe [Dimension])+    , _cdrrcfKind             :: !Text+    , _cdrrcfDimensionFilters :: !(Maybe [Dimension])+    , _cdrrcfOverlapMetrics   :: !(Maybe [Metric])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CrossDimensionReachReportCompatibleFields' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cdrrcfMetrics'+--+-- * 'cdrrcfBreakdown'+--+-- * 'cdrrcfKind'+--+-- * 'cdrrcfDimensionFilters'+--+-- * 'cdrrcfOverlapMetrics'+crossDimensionReachReportCompatibleFields+    :: CrossDimensionReachReportCompatibleFields+crossDimensionReachReportCompatibleFields =+    CrossDimensionReachReportCompatibleFields'+    { _cdrrcfMetrics = Nothing+    , _cdrrcfBreakdown = Nothing+    , _cdrrcfKind = "dfareporting#crossDimensionReachReportCompatibleFields"+    , _cdrrcfDimensionFilters = Nothing+    , _cdrrcfOverlapMetrics = Nothing+    }++-- | Metrics which are compatible to be selected in the \"metricNames\"+-- section of the report.+cdrrcfMetrics :: Lens' CrossDimensionReachReportCompatibleFields [Metric]+cdrrcfMetrics+  = lens _cdrrcfMetrics+      (\ s a -> s{_cdrrcfMetrics = a})+      . _Default+      . _Coerce++-- | Dimensions which are compatible to be selected in the \"breakdown\"+-- section of the report.+cdrrcfBreakdown :: Lens' CrossDimensionReachReportCompatibleFields [Dimension]+cdrrcfBreakdown+  = lens _cdrrcfBreakdown+      (\ s a -> s{_cdrrcfBreakdown = a})+      . _Default+      . _Coerce++-- | The kind of resource this is, in this case+-- dfareporting#crossDimensionReachReportCompatibleFields.+cdrrcfKind :: Lens' CrossDimensionReachReportCompatibleFields Text+cdrrcfKind+  = lens _cdrrcfKind (\ s a -> s{_cdrrcfKind = a})++-- | Dimensions which are compatible to be selected in the+-- \"dimensionFilters\" section of the report.+cdrrcfDimensionFilters :: Lens' CrossDimensionReachReportCompatibleFields [Dimension]+cdrrcfDimensionFilters+  = lens _cdrrcfDimensionFilters+      (\ s a -> s{_cdrrcfDimensionFilters = a})+      . _Default+      . _Coerce++-- | Metrics which are compatible to be selected in the+-- \"overlapMetricNames\" section of the report.+cdrrcfOverlapMetrics :: Lens' CrossDimensionReachReportCompatibleFields [Metric]+cdrrcfOverlapMetrics+  = lens _cdrrcfOverlapMetrics+      (\ s a -> s{_cdrrcfOverlapMetrics = a})+      . _Default+      . _Coerce++instance FromJSON+         CrossDimensionReachReportCompatibleFields where+        parseJSON+          = withObject+              "CrossDimensionReachReportCompatibleFields"+              (\ o ->+                 CrossDimensionReachReportCompatibleFields' <$>+                   (o .:? "metrics" .!= mempty) <*>+                     (o .:? "breakdown" .!= mempty)+                     <*>+                     (o .:? "kind" .!=+                        "dfareporting#crossDimensionReachReportCompatibleFields")+                     <*> (o .:? "dimensionFilters" .!= mempty)+                     <*> (o .:? "overlapMetrics" .!= mempty))++instance ToJSON+         CrossDimensionReachReportCompatibleFields where+        toJSON CrossDimensionReachReportCompatibleFields'{..}+          = object+              (catMaybes+                 [("metrics" .=) <$> _cdrrcfMetrics,+                  ("breakdown" .=) <$> _cdrrcfBreakdown,+                  Just ("kind" .= _cdrrcfKind),+                  ("dimensionFilters" .=) <$> _cdrrcfDimensionFilters,+                  ("overlapMetrics" .=) <$> _cdrrcfOverlapMetrics])++-- | FsCommand.+--+-- /See:/ 'fsCommand' smart constructor.+data FsCommand = FsCommand'+    { _fcPositionOption :: !(Maybe FsCommandPositionOption)+    , _fcLeft           :: !(Maybe (Textual Int32))+    , _fcWindowHeight   :: !(Maybe (Textual Int32))+    , _fcWindowWidth    :: !(Maybe (Textual Int32))+    , _fcTop            :: !(Maybe (Textual Int32))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'FsCommand' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'fcPositionOption'+--+-- * 'fcLeft'+--+-- * 'fcWindowHeight'+--+-- * 'fcWindowWidth'+--+-- * 'fcTop'+fsCommand+    :: FsCommand+fsCommand =+    FsCommand'+    { _fcPositionOption = Nothing+    , _fcLeft = Nothing+    , _fcWindowHeight = Nothing+    , _fcWindowWidth = Nothing+    , _fcTop = Nothing+    }++-- | Position in the browser where the window will open.+fcPositionOption :: Lens' FsCommand (Maybe FsCommandPositionOption)+fcPositionOption+  = lens _fcPositionOption+      (\ s a -> s{_fcPositionOption = a})++-- | Distance from the left of the browser.Applicable when positionOption is+-- DISTANCE_FROM_TOP_LEFT_CORNER.+fcLeft :: Lens' FsCommand (Maybe Int32)+fcLeft+  = lens _fcLeft (\ s a -> s{_fcLeft = a}) .+      mapping _Coerce++-- | Height of the window.+fcWindowHeight :: Lens' FsCommand (Maybe Int32)+fcWindowHeight+  = lens _fcWindowHeight+      (\ s a -> s{_fcWindowHeight = a})+      . mapping _Coerce++-- | Width of the window.+fcWindowWidth :: Lens' FsCommand (Maybe Int32)+fcWindowWidth+  = lens _fcWindowWidth+      (\ s a -> s{_fcWindowWidth = a})+      . mapping _Coerce++-- | Distance from the top of the browser. Applicable when positionOption is+-- DISTANCE_FROM_TOP_LEFT_CORNER.+fcTop :: Lens' FsCommand (Maybe Int32)+fcTop+  = lens _fcTop (\ s a -> s{_fcTop = a}) .+      mapping _Coerce++instance FromJSON FsCommand where+        parseJSON+          = withObject "FsCommand"+              (\ o ->+                 FsCommand' <$>+                   (o .:? "positionOption") <*> (o .:? "left") <*>+                     (o .:? "windowHeight")+                     <*> (o .:? "windowWidth")+                     <*> (o .:? "top"))++instance ToJSON FsCommand where+        toJSON FsCommand'{..}+          = object+              (catMaybes+                 [("positionOption" .=) <$> _fcPositionOption,+                  ("left" .=) <$> _fcLeft,+                  ("windowHeight" .=) <$> _fcWindowHeight,+                  ("windowWidth" .=) <$> _fcWindowWidth,+                  ("top" .=) <$> _fcTop])++-- | Placement Assignment.+--+-- /See:/ 'placementAssignment' smart constructor.+data PlacementAssignment = PlacementAssignment'+    { _paPlacementId               :: !(Maybe (Textual Int64))+    , _paPlacementIdDimensionValue :: !(Maybe DimensionValue)+    , _paActive                    :: !(Maybe Bool)+    , _paSSLRequired               :: !(Maybe Bool)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'PlacementAssignment' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'paPlacementId'+--+-- * 'paPlacementIdDimensionValue'+--+-- * 'paActive'+--+-- * 'paSSLRequired'+placementAssignment+    :: PlacementAssignment+placementAssignment =+    PlacementAssignment'+    { _paPlacementId = Nothing+    , _paPlacementIdDimensionValue = Nothing+    , _paActive = Nothing+    , _paSSLRequired = Nothing+    }++-- | ID of the placement to be assigned. This is a required field.+paPlacementId :: Lens' PlacementAssignment (Maybe Int64)+paPlacementId+  = lens _paPlacementId+      (\ s a -> s{_paPlacementId = a})+      . mapping _Coerce++-- | Dimension value for the ID of the placement. This is a read-only,+-- auto-generated field.+paPlacementIdDimensionValue :: Lens' PlacementAssignment (Maybe DimensionValue)+paPlacementIdDimensionValue+  = lens _paPlacementIdDimensionValue+      (\ s a -> s{_paPlacementIdDimensionValue = a})++-- | Whether this placement assignment is active. When true, the placement+-- will be included in the ad\'s rotation.+paActive :: Lens' PlacementAssignment (Maybe Bool)+paActive = lens _paActive (\ s a -> s{_paActive = a})++-- | Whether the placement to be assigned requires SSL. This is a read-only+-- field that is auto-generated when the ad is inserted or updated.+paSSLRequired :: Lens' PlacementAssignment (Maybe Bool)+paSSLRequired+  = lens _paSSLRequired+      (\ s a -> s{_paSSLRequired = a})++instance FromJSON PlacementAssignment where+        parseJSON+          = withObject "PlacementAssignment"+              (\ o ->+                 PlacementAssignment' <$>+                   (o .:? "placementId") <*>+                     (o .:? "placementIdDimensionValue")+                     <*> (o .:? "active")+                     <*> (o .:? "sslRequired"))++instance ToJSON PlacementAssignment where+        toJSON PlacementAssignment'{..}+          = object+              (catMaybes+                 [("placementId" .=) <$> _paPlacementId,+                  ("placementIdDimensionValue" .=) <$>+                    _paPlacementIdDimensionValue,+                  ("active" .=) <$> _paActive,+                  ("sslRequired" .=) <$> _paSSLRequired])++-- | Contains properties of a creative field value.+--+-- /See:/ 'creativeFieldValue' smart constructor.+data CreativeFieldValue = CreativeFieldValue'+    { _cfvKind  :: !Text+    , _cfvValue :: !(Maybe Text)+    , _cfvId    :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CreativeFieldValue' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cfvKind'+--+-- * 'cfvValue'+--+-- * 'cfvId'+creativeFieldValue+    :: CreativeFieldValue+creativeFieldValue =+    CreativeFieldValue'+    { _cfvKind = "dfareporting#creativeFieldValue"+    , _cfvValue = Nothing+    , _cfvId = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#creativeFieldValue\".+cfvKind :: Lens' CreativeFieldValue Text+cfvKind = lens _cfvKind (\ s a -> s{_cfvKind = a})++-- | Value of this creative field value. It needs to be less than 256+-- characters in length and unique per creative field.+cfvValue :: Lens' CreativeFieldValue (Maybe Text)+cfvValue = lens _cfvValue (\ s a -> s{_cfvValue = a})++-- | ID of this creative field value. This is a read-only, auto-generated+-- field.+cfvId :: Lens' CreativeFieldValue (Maybe Int64)+cfvId+  = lens _cfvId (\ s a -> s{_cfvId = a}) .+      mapping _Coerce++instance FromJSON CreativeFieldValue where+        parseJSON+          = withObject "CreativeFieldValue"+              (\ o ->+                 CreativeFieldValue' <$>+                   (o .:? "kind" .!= "dfareporting#creativeFieldValue")+                     <*> (o .:? "value")+                     <*> (o .:? "id"))++instance ToJSON CreativeFieldValue where+        toJSON CreativeFieldValue'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _cfvKind),+                  ("value" .=) <$> _cfvValue, ("id" .=) <$> _cfvId])++-- | Represents a DimensionValuesRequest.+--+-- /See:/ 'dimensionValueRequest' smart constructor.+data DimensionValueRequest = DimensionValueRequest'+    { _dvrKind          :: !Text+    , _dvrEndDate       :: !(Maybe Date')+    , _dvrFilters       :: !(Maybe [DimensionFilter])+    , _dvrStartDate     :: !(Maybe Date')+    , _dvrDimensionName :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DimensionValueRequest' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dvrKind'+--+-- * 'dvrEndDate'+--+-- * 'dvrFilters'+--+-- * 'dvrStartDate'+--+-- * 'dvrDimensionName'+dimensionValueRequest+    :: DimensionValueRequest+dimensionValueRequest =+    DimensionValueRequest'+    { _dvrKind = "dfareporting#dimensionValueRequest"+    , _dvrEndDate = Nothing+    , _dvrFilters = Nothing+    , _dvrStartDate = Nothing+    , _dvrDimensionName = Nothing+    }++-- | The kind of request this is, in this case+-- dfareporting#dimensionValueRequest.+dvrKind :: Lens' DimensionValueRequest Text+dvrKind = lens _dvrKind (\ s a -> s{_dvrKind = a})++-- | The end date of the date range for which to retrieve dimension values. A+-- string of the format \"yyyy-MM-dd\".+dvrEndDate :: Lens' DimensionValueRequest (Maybe Day)+dvrEndDate+  = lens _dvrEndDate (\ s a -> s{_dvrEndDate = a}) .+      mapping _Date++-- | The list of filters by which to filter values. The filters are ANDed.+dvrFilters :: Lens' DimensionValueRequest [DimensionFilter]+dvrFilters+  = lens _dvrFilters (\ s a -> s{_dvrFilters = a}) .+      _Default+      . _Coerce++-- | The start date of the date range for which to retrieve dimension values.+-- A string of the format \"yyyy-MM-dd\".+dvrStartDate :: Lens' DimensionValueRequest (Maybe Day)+dvrStartDate+  = lens _dvrStartDate (\ s a -> s{_dvrStartDate = a})+      . mapping _Date++-- | The name of the dimension for which values should be requested.+dvrDimensionName :: Lens' DimensionValueRequest (Maybe Text)+dvrDimensionName+  = lens _dvrDimensionName+      (\ s a -> s{_dvrDimensionName = a})++instance FromJSON DimensionValueRequest where+        parseJSON+          = withObject "DimensionValueRequest"+              (\ o ->+                 DimensionValueRequest' <$>+                   (o .:? "kind" .!=+                      "dfareporting#dimensionValueRequest")+                     <*> (o .:? "endDate")+                     <*> (o .:? "filters" .!= mempty)+                     <*> (o .:? "startDate")+                     <*> (o .:? "dimensionName"))++instance ToJSON DimensionValueRequest where+        toJSON DimensionValueRequest'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _dvrKind),+                  ("endDate" .=) <$> _dvrEndDate,+                  ("filters" .=) <$> _dvrFilters,+                  ("startDate" .=) <$> _dvrStartDate,+                  ("dimensionName" .=) <$> _dvrDimensionName])++-- | Floodlight Configuration List Response+--+-- /See:/ 'floodlightConfigurationsListResponse' smart constructor.+data FloodlightConfigurationsListResponse = FloodlightConfigurationsListResponse'+    { _fclrKind                     :: !Text+    , _fclrFloodlightConfigurations :: !(Maybe [FloodlightConfiguration])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'FloodlightConfigurationsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'fclrKind'+--+-- * 'fclrFloodlightConfigurations'+floodlightConfigurationsListResponse+    :: FloodlightConfigurationsListResponse+floodlightConfigurationsListResponse =+    FloodlightConfigurationsListResponse'+    { _fclrKind = "dfareporting#floodlightConfigurationsListResponse"+    , _fclrFloodlightConfigurations = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#floodlightConfigurationsListResponse\".+fclrKind :: Lens' FloodlightConfigurationsListResponse Text+fclrKind = lens _fclrKind (\ s a -> s{_fclrKind = a})++-- | Floodlight configuration collection.+fclrFloodlightConfigurations :: Lens' FloodlightConfigurationsListResponse [FloodlightConfiguration]+fclrFloodlightConfigurations+  = lens _fclrFloodlightConfigurations+      (\ s a -> s{_fclrFloodlightConfigurations = a})+      . _Default+      . _Coerce++instance FromJSON+         FloodlightConfigurationsListResponse where+        parseJSON+          = withObject "FloodlightConfigurationsListResponse"+              (\ o ->+                 FloodlightConfigurationsListResponse' <$>+                   (o .:? "kind" .!=+                      "dfareporting#floodlightConfigurationsListResponse")+                     <*> (o .:? "floodlightConfigurations" .!= mempty))++instance ToJSON FloodlightConfigurationsListResponse+         where+        toJSON FloodlightConfigurationsListResponse'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _fclrKind),+                  ("floodlightConfigurations" .=) <$>+                    _fclrFloodlightConfigurations])++-- | Floodlight Activity List Response+--+-- /See:/ 'floodlightActivitiesListResponse' smart constructor.+data FloodlightActivitiesListResponse = FloodlightActivitiesListResponse'+    { _falrNextPageToken        :: !(Maybe Text)+    , _falrKind                 :: !Text+    , _falrFloodlightActivities :: !(Maybe [FloodlightActivity])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'FloodlightActivitiesListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'falrNextPageToken'+--+-- * 'falrKind'+--+-- * 'falrFloodlightActivities'+floodlightActivitiesListResponse+    :: FloodlightActivitiesListResponse+floodlightActivitiesListResponse =+    FloodlightActivitiesListResponse'+    { _falrNextPageToken = Nothing+    , _falrKind = "dfareporting#floodlightActivitiesListResponse"+    , _falrFloodlightActivities = Nothing+    }++-- | Pagination token to be used for the next list operation.+falrNextPageToken :: Lens' FloodlightActivitiesListResponse (Maybe Text)+falrNextPageToken+  = lens _falrNextPageToken+      (\ s a -> s{_falrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#floodlightActivitiesListResponse\".+falrKind :: Lens' FloodlightActivitiesListResponse Text+falrKind = lens _falrKind (\ s a -> s{_falrKind = a})++-- | Floodlight activity collection.+falrFloodlightActivities :: Lens' FloodlightActivitiesListResponse [FloodlightActivity]+falrFloodlightActivities+  = lens _falrFloodlightActivities+      (\ s a -> s{_falrFloodlightActivities = a})+      . _Default+      . _Coerce++instance FromJSON FloodlightActivitiesListResponse+         where+        parseJSON+          = withObject "FloodlightActivitiesListResponse"+              (\ o ->+                 FloodlightActivitiesListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!=+                        "dfareporting#floodlightActivitiesListResponse")+                     <*> (o .:? "floodlightActivities" .!= mempty))++instance ToJSON FloodlightActivitiesListResponse+         where+        toJSON FloodlightActivitiesListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _falrNextPageToken,+                  Just ("kind" .= _falrKind),+                  ("floodlightActivities" .=) <$>+                    _falrFloodlightActivities])++-- | Creative Field Assignment.+--+-- /See:/ 'creativeFieldAssignment' smart constructor.+data CreativeFieldAssignment = CreativeFieldAssignment'+    { _cfaCreativeFieldId      :: !(Maybe (Textual Int64))+    , _cfaCreativeFieldValueId :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CreativeFieldAssignment' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cfaCreativeFieldId'+--+-- * 'cfaCreativeFieldValueId'+creativeFieldAssignment+    :: CreativeFieldAssignment+creativeFieldAssignment =+    CreativeFieldAssignment'+    { _cfaCreativeFieldId = Nothing+    , _cfaCreativeFieldValueId = Nothing+    }++-- | ID of the creative field.+cfaCreativeFieldId :: Lens' CreativeFieldAssignment (Maybe Int64)+cfaCreativeFieldId+  = lens _cfaCreativeFieldId+      (\ s a -> s{_cfaCreativeFieldId = a})+      . mapping _Coerce++-- | ID of the creative field value.+cfaCreativeFieldValueId :: Lens' CreativeFieldAssignment (Maybe Int64)+cfaCreativeFieldValueId+  = lens _cfaCreativeFieldValueId+      (\ s a -> s{_cfaCreativeFieldValueId = a})+      . mapping _Coerce++instance FromJSON CreativeFieldAssignment where+        parseJSON+          = withObject "CreativeFieldAssignment"+              (\ o ->+                 CreativeFieldAssignment' <$>+                   (o .:? "creativeFieldId") <*>+                     (o .:? "creativeFieldValueId"))++instance ToJSON CreativeFieldAssignment where+        toJSON CreativeFieldAssignment'{..}+          = object+              (catMaybes+                 [("creativeFieldId" .=) <$> _cfaCreativeFieldId,+                  ("creativeFieldValueId" .=) <$>+                    _cfaCreativeFieldValueId])++-- | Groups advertisers together so that reports can be generated for the+-- entire group at once.+--+-- /See:/ 'advertiserGroup' smart constructor.+data AdvertiserGroup = AdvertiserGroup'+    { _agKind      :: !Text+    , _agAccountId :: !(Maybe (Textual Int64))+    , _agName      :: !(Maybe Text)+    , _agId        :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'AdvertiserGroup' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'agKind'+--+-- * 'agAccountId'+--+-- * 'agName'+--+-- * 'agId'+advertiserGroup+    :: AdvertiserGroup+advertiserGroup =+    AdvertiserGroup'+    { _agKind = "dfareporting#advertiserGroup"+    , _agAccountId = Nothing+    , _agName = Nothing+    , _agId = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#advertiserGroup\".+agKind :: Lens' AdvertiserGroup Text+agKind = lens _agKind (\ s a -> s{_agKind = a})++-- | Account ID of this advertiser group. This is a read-only field that can+-- be left blank.+agAccountId :: Lens' AdvertiserGroup (Maybe Int64)+agAccountId+  = lens _agAccountId (\ s a -> s{_agAccountId = a}) .+      mapping _Coerce++-- | Name of this advertiser group. This is a required field and must be less+-- than 256 characters long and unique among advertiser groups of the same+-- account.+agName :: Lens' AdvertiserGroup (Maybe Text)+agName = lens _agName (\ s a -> s{_agName = a})++-- | ID of this advertiser group. This is a read-only, auto-generated field.+agId :: Lens' AdvertiserGroup (Maybe Int64)+agId+  = lens _agId (\ s a -> s{_agId = a}) .+      mapping _Coerce++instance FromJSON AdvertiserGroup where+        parseJSON+          = withObject "AdvertiserGroup"+              (\ o ->+                 AdvertiserGroup' <$>+                   (o .:? "kind" .!= "dfareporting#advertiserGroup") <*>+                     (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "id"))++instance ToJSON AdvertiserGroup where+        toJSON AdvertiserGroup'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _agKind),+                  ("accountId" .=) <$> _agAccountId,+                  ("name" .=) <$> _agName, ("id" .=) <$> _agId])++-- | Placement Tag Data+--+-- /See:/ 'tagData' smart constructor.+data TagData = TagData'+    { _tdClickTag      :: !(Maybe Text)+    , _tdFormat        :: !(Maybe TagDataFormat)+    , _tdCreativeId    :: !(Maybe (Textual Int64))+    , _tdAdId          :: !(Maybe (Textual Int64))+    , _tdImpressionTag :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'TagData' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'tdClickTag'+--+-- * 'tdFormat'+--+-- * 'tdCreativeId'+--+-- * 'tdAdId'+--+-- * 'tdImpressionTag'+tagData+    :: TagData+tagData =+    TagData'+    { _tdClickTag = Nothing+    , _tdFormat = Nothing+    , _tdCreativeId = Nothing+    , _tdAdId = Nothing+    , _tdImpressionTag = Nothing+    }++-- | Tag string to record a click.+tdClickTag :: Lens' TagData (Maybe Text)+tdClickTag+  = lens _tdClickTag (\ s a -> s{_tdClickTag = a})++-- | TagData tag format of this tag.+tdFormat :: Lens' TagData (Maybe TagDataFormat)+tdFormat = lens _tdFormat (\ s a -> s{_tdFormat = a})++-- | Creative associated with this placement tag.+tdCreativeId :: Lens' TagData (Maybe Int64)+tdCreativeId+  = lens _tdCreativeId (\ s a -> s{_tdCreativeId = a})+      . mapping _Coerce++-- | Ad associated with this placement tag.+tdAdId :: Lens' TagData (Maybe Int64)+tdAdId+  = lens _tdAdId (\ s a -> s{_tdAdId = a}) .+      mapping _Coerce++-- | Tag string for serving an ad.+tdImpressionTag :: Lens' TagData (Maybe Text)+tdImpressionTag+  = lens _tdImpressionTag+      (\ s a -> s{_tdImpressionTag = a})++instance FromJSON TagData where+        parseJSON+          = withObject "TagData"+              (\ o ->+                 TagData' <$>+                   (o .:? "clickTag") <*> (o .:? "format") <*>+                     (o .:? "creativeId")+                     <*> (o .:? "adId")+                     <*> (o .:? "impressionTag"))++instance ToJSON TagData where+        toJSON TagData'{..}+          = object+              (catMaybes+                 [("clickTag" .=) <$> _tdClickTag,+                  ("format" .=) <$> _tdFormat,+                  ("creativeId" .=) <$> _tdCreativeId,+                  ("adId" .=) <$> _tdAdId,+                  ("impressionTag" .=) <$> _tdImpressionTag])++-- | Day Part Targeting.+--+-- /See:/ 'dayPartTargeting' smart constructor.+data DayPartTargeting = DayPartTargeting'+    { _dptDaysOfWeek    :: !(Maybe [DayPartTargetingDaysOfWeekItem])+    , _dptHoursOfDay    :: !(Maybe [Textual Int32])+    , _dptUserLocalTime :: !(Maybe Bool)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DayPartTargeting' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dptDaysOfWeek'+--+-- * 'dptHoursOfDay'+--+-- * 'dptUserLocalTime'+dayPartTargeting+    :: DayPartTargeting+dayPartTargeting =+    DayPartTargeting'+    { _dptDaysOfWeek = Nothing+    , _dptHoursOfDay = Nothing+    , _dptUserLocalTime = Nothing+    }++-- | Days of the week when the ad will serve. Acceptable values are: -+-- \"SUNDAY\" - \"MONDAY\" - \"TUESDAY\" - \"WEDNESDAY\" - \"THURSDAY\" -+-- \"FRIDAY\" - \"SATURDAY\"+dptDaysOfWeek :: Lens' DayPartTargeting [DayPartTargetingDaysOfWeekItem]+dptDaysOfWeek+  = lens _dptDaysOfWeek+      (\ s a -> s{_dptDaysOfWeek = a})+      . _Default+      . _Coerce++-- | Hours of the day when the ad will serve. Must be an integer between 0+-- and 23 (inclusive), where 0 is midnight to 1 AM, and 23 is 11 PM to+-- midnight. Can be specified with days of week, in which case the ad would+-- serve during these hours on the specified days. For example, if Monday,+-- Wednesday, Friday are the days of week specified and 9-10am, 3-5pm+-- (hours 9, 15, and 16) is specified, the ad would serve Monday,+-- Wednesdays, and Fridays at 9-10am and 3-5pm.+dptHoursOfDay :: Lens' DayPartTargeting [Int32]+dptHoursOfDay+  = lens _dptHoursOfDay+      (\ s a -> s{_dptHoursOfDay = a})+      . _Default+      . _Coerce++-- | Whether or not to use the user\'s local time. If false, the America\/New+-- York time zone applies.+dptUserLocalTime :: Lens' DayPartTargeting (Maybe Bool)+dptUserLocalTime+  = lens _dptUserLocalTime+      (\ s a -> s{_dptUserLocalTime = a})++instance FromJSON DayPartTargeting where+        parseJSON+          = withObject "DayPartTargeting"+              (\ o ->+                 DayPartTargeting' <$>+                   (o .:? "daysOfWeek" .!= mempty) <*>+                     (o .:? "hoursOfDay" .!= mempty)+                     <*> (o .:? "userLocalTime"))++instance ToJSON DayPartTargeting where+        toJSON DayPartTargeting'{..}+          = object+              (catMaybes+                 [("daysOfWeek" .=) <$> _dptDaysOfWeek,+                  ("hoursOfDay" .=) <$> _dptHoursOfDay,+                  ("userLocalTime" .=) <$> _dptUserLocalTime])++-- | Creative optimization settings.+--+-- /See:/ 'creativeOptimizationConfiguration' smart constructor.+data CreativeOptimizationConfiguration = CreativeOptimizationConfiguration'+    { _cocOptimizationModel     :: !(Maybe CreativeOptimizationConfigurationOptimizationModel)+    , _cocName                  :: !(Maybe Text)+    , _cocOptimizationActivitys :: !(Maybe [OptimizationActivity])+    , _cocId                    :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CreativeOptimizationConfiguration' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cocOptimizationModel'+--+-- * 'cocName'+--+-- * 'cocOptimizationActivitys'+--+-- * 'cocId'+creativeOptimizationConfiguration+    :: CreativeOptimizationConfiguration+creativeOptimizationConfiguration =+    CreativeOptimizationConfiguration'+    { _cocOptimizationModel = Nothing+    , _cocName = Nothing+    , _cocOptimizationActivitys = Nothing+    , _cocId = Nothing+    }++-- | Optimization model for this configuration.+cocOptimizationModel :: Lens' CreativeOptimizationConfiguration (Maybe CreativeOptimizationConfigurationOptimizationModel)+cocOptimizationModel+  = lens _cocOptimizationModel+      (\ s a -> s{_cocOptimizationModel = a})++-- | Name of this creative optimization config. This is a required field and+-- must be less than 129 characters long.+cocName :: Lens' CreativeOptimizationConfiguration (Maybe Text)+cocName = lens _cocName (\ s a -> s{_cocName = a})++-- | List of optimization activities associated with this configuration.+cocOptimizationActivitys :: Lens' CreativeOptimizationConfiguration [OptimizationActivity]+cocOptimizationActivitys+  = lens _cocOptimizationActivitys+      (\ s a -> s{_cocOptimizationActivitys = a})+      . _Default+      . _Coerce++-- | ID of this creative optimization config. This field is auto-generated+-- when the campaign is inserted or updated. It can be null for existing+-- campaigns.+cocId :: Lens' CreativeOptimizationConfiguration (Maybe Int64)+cocId+  = lens _cocId (\ s a -> s{_cocId = a}) .+      mapping _Coerce++instance FromJSON CreativeOptimizationConfiguration+         where+        parseJSON+          = withObject "CreativeOptimizationConfiguration"+              (\ o ->+                 CreativeOptimizationConfiguration' <$>+                   (o .:? "optimizationModel") <*> (o .:? "name") <*>+                     (o .:? "optimizationActivitys" .!= mempty)+                     <*> (o .:? "id"))++instance ToJSON CreativeOptimizationConfiguration+         where+        toJSON CreativeOptimizationConfiguration'{..}+          = object+              (catMaybes+                 [("optimizationModel" .=) <$> _cocOptimizationModel,+                  ("name" .=) <$> _cocName,+                  ("optimizationActivitys" .=) <$>+                    _cocOptimizationActivitys,+                  ("id" .=) <$> _cocId])++-- | The report criteria for a report of type \"STANDARD\".+--+-- /See:/ 'reportCriteria' smart constructor.+data ReportCriteria = ReportCriteria'+    { _rcMetricNames           :: !(Maybe [Text])+    , _rcCustomRichMediaEvents :: !(Maybe CustomRichMediaEvents)+    , _rcDimensionFilters      :: !(Maybe [DimensionValue])+    , _rcActivities            :: !(Maybe Activities)+    , _rcDateRange             :: !(Maybe DateRange)+    , _rcDimensions            :: !(Maybe [SortedDimension])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ReportCriteria' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rcMetricNames'+--+-- * 'rcCustomRichMediaEvents'+--+-- * 'rcDimensionFilters'+--+-- * 'rcActivities'+--+-- * 'rcDateRange'+--+-- * 'rcDimensions'+reportCriteria+    :: ReportCriteria+reportCriteria =+    ReportCriteria'+    { _rcMetricNames = Nothing+    , _rcCustomRichMediaEvents = Nothing+    , _rcDimensionFilters = Nothing+    , _rcActivities = Nothing+    , _rcDateRange = Nothing+    , _rcDimensions = Nothing+    }++-- | The list of names of metrics the report should include.+rcMetricNames :: Lens' ReportCriteria [Text]+rcMetricNames+  = lens _rcMetricNames+      (\ s a -> s{_rcMetricNames = a})+      . _Default+      . _Coerce++-- | Custom Rich Media Events group.+rcCustomRichMediaEvents :: Lens' ReportCriteria (Maybe CustomRichMediaEvents)+rcCustomRichMediaEvents+  = lens _rcCustomRichMediaEvents+      (\ s a -> s{_rcCustomRichMediaEvents = a})++-- | The list of filters on which dimensions are filtered. Filters for+-- different dimensions are ANDed, filters for the same dimension are+-- grouped together and ORed.+rcDimensionFilters :: Lens' ReportCriteria [DimensionValue]+rcDimensionFilters+  = lens _rcDimensionFilters+      (\ s a -> s{_rcDimensionFilters = a})+      . _Default+      . _Coerce++-- | Activity group.+rcActivities :: Lens' ReportCriteria (Maybe Activities)+rcActivities+  = lens _rcActivities (\ s a -> s{_rcActivities = a})++-- | The date range for which this report should be run.+rcDateRange :: Lens' ReportCriteria (Maybe DateRange)+rcDateRange+  = lens _rcDateRange (\ s a -> s{_rcDateRange = a})++-- | The list of standard dimensions the report should include.+rcDimensions :: Lens' ReportCriteria [SortedDimension]+rcDimensions+  = lens _rcDimensions (\ s a -> s{_rcDimensions = a})+      . _Default+      . _Coerce++instance FromJSON ReportCriteria where+        parseJSON+          = withObject "ReportCriteria"+              (\ o ->+                 ReportCriteria' <$>+                   (o .:? "metricNames" .!= mempty) <*>+                     (o .:? "customRichMediaEvents")+                     <*> (o .:? "dimensionFilters" .!= mempty)+                     <*> (o .:? "activities")+                     <*> (o .:? "dateRange")+                     <*> (o .:? "dimensions" .!= mempty))++instance ToJSON ReportCriteria where+        toJSON ReportCriteria'{..}+          = object+              (catMaybes+                 [("metricNames" .=) <$> _rcMetricNames,+                  ("customRichMediaEvents" .=) <$>+                    _rcCustomRichMediaEvents,+                  ("dimensionFilters" .=) <$> _rcDimensionFilters,+                  ("activities" .=) <$> _rcActivities,+                  ("dateRange" .=) <$> _rcDateRange,+                  ("dimensions" .=) <$> _rcDimensions])++-- | Placement Strategy List Response+--+-- /See:/ 'placementStrategiesListResponse' smart constructor.+data PlacementStrategiesListResponse = PlacementStrategiesListResponse'+    { _pslrPlacementStrategies :: !(Maybe [PlacementStrategy])+    , _pslrNextPageToken       :: !(Maybe Text)+    , _pslrKind                :: !Text+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'PlacementStrategiesListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'pslrPlacementStrategies'+--+-- * 'pslrNextPageToken'+--+-- * 'pslrKind'+placementStrategiesListResponse+    :: PlacementStrategiesListResponse+placementStrategiesListResponse =+    PlacementStrategiesListResponse'+    { _pslrPlacementStrategies = Nothing+    , _pslrNextPageToken = Nothing+    , _pslrKind = "dfareporting#placementStrategiesListResponse"+    }++-- | Placement strategy collection.+pslrPlacementStrategies :: Lens' PlacementStrategiesListResponse [PlacementStrategy]+pslrPlacementStrategies+  = lens _pslrPlacementStrategies+      (\ s a -> s{_pslrPlacementStrategies = a})+      . _Default+      . _Coerce++-- | Pagination token to be used for the next list operation.+pslrNextPageToken :: Lens' PlacementStrategiesListResponse (Maybe Text)+pslrNextPageToken+  = lens _pslrNextPageToken+      (\ s a -> s{_pslrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#placementStrategiesListResponse\".+pslrKind :: Lens' PlacementStrategiesListResponse Text+pslrKind = lens _pslrKind (\ s a -> s{_pslrKind = a})++instance FromJSON PlacementStrategiesListResponse+         where+        parseJSON+          = withObject "PlacementStrategiesListResponse"+              (\ o ->+                 PlacementStrategiesListResponse' <$>+                   (o .:? "placementStrategies" .!= mempty) <*>+                     (o .:? "nextPageToken")+                     <*>+                     (o .:? "kind" .!=+                        "dfareporting#placementStrategiesListResponse"))++instance ToJSON PlacementStrategiesListResponse where+        toJSON PlacementStrategiesListResponse'{..}+          = object+              (catMaybes+                 [("placementStrategies" .=) <$>+                    _pslrPlacementStrategies,+                  ("nextPageToken" .=) <$> _pslrNextPageToken,+                  Just ("kind" .= _pslrKind)])++-- | Contains properties of a DCM subaccount.+--+-- /See:/ 'subAccount' smart constructor.+data SubAccount = SubAccount'+    { _saKind                   :: !Text+    , _saAvailablePermissionIds :: !(Maybe [Textual Int64])+    , _saAccountId              :: !(Maybe (Textual Int64))+    , _saName                   :: !(Maybe Text)+    , _saId                     :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'SubAccount' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'saKind'+--+-- * 'saAvailablePermissionIds'+--+-- * 'saAccountId'+--+-- * 'saName'+--+-- * 'saId'+subAccount+    :: SubAccount+subAccount =+    SubAccount'+    { _saKind = "dfareporting#subaccount"+    , _saAvailablePermissionIds = Nothing+    , _saAccountId = Nothing+    , _saName = Nothing+    , _saId = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#subaccount\".+saKind :: Lens' SubAccount Text+saKind = lens _saKind (\ s a -> s{_saKind = a})++-- | IDs of the available user role permissions for this subaccount.+saAvailablePermissionIds :: Lens' SubAccount [Int64]+saAvailablePermissionIds+  = lens _saAvailablePermissionIds+      (\ s a -> s{_saAvailablePermissionIds = a})+      . _Default+      . _Coerce++-- | ID of the account that contains this subaccount. This is a read-only+-- field that can be left blank.+saAccountId :: Lens' SubAccount (Maybe Int64)+saAccountId+  = lens _saAccountId (\ s a -> s{_saAccountId = a}) .+      mapping _Coerce++-- | Name of this subaccount. This is a required field. Must be less than 128+-- characters long and be unique among subaccounts of the same account.+saName :: Lens' SubAccount (Maybe Text)+saName = lens _saName (\ s a -> s{_saName = a})++-- | ID of this subaccount. This is a read-only, auto-generated field.+saId :: Lens' SubAccount (Maybe Int64)+saId+  = lens _saId (\ s a -> s{_saId = a}) .+      mapping _Coerce++instance FromJSON SubAccount where+        parseJSON+          = withObject "SubAccount"+              (\ o ->+                 SubAccount' <$>+                   (o .:? "kind" .!= "dfareporting#subaccount") <*>+                     (o .:? "availablePermissionIds" .!= mempty)+                     <*> (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "id"))++instance ToJSON SubAccount where+        toJSON SubAccount'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _saKind),+                  ("availablePermissionIds" .=) <$>+                    _saAvailablePermissionIds,+                  ("accountId" .=) <$> _saAccountId,+                  ("name" .=) <$> _saName, ("id" .=) <$> _saId])++-- | Inventory item List Response+--+-- /See:/ 'inventoryItemsListResponse' smart constructor.+data InventoryItemsListResponse = InventoryItemsListResponse'+    { _iilrInventoryItems :: !(Maybe [InventoryItem])+    , _iilrNextPageToken  :: !(Maybe Text)+    , _iilrKind           :: !Text+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'InventoryItemsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'iilrInventoryItems'+--+-- * 'iilrNextPageToken'+--+-- * 'iilrKind'+inventoryItemsListResponse+    :: InventoryItemsListResponse+inventoryItemsListResponse =+    InventoryItemsListResponse'+    { _iilrInventoryItems = Nothing+    , _iilrNextPageToken = Nothing+    , _iilrKind = "dfareporting#inventoryItemsListResponse"+    }++-- | Inventory item collection+iilrInventoryItems :: Lens' InventoryItemsListResponse [InventoryItem]+iilrInventoryItems+  = lens _iilrInventoryItems+      (\ s a -> s{_iilrInventoryItems = a})+      . _Default+      . _Coerce++-- | Pagination token to be used for the next list operation.+iilrNextPageToken :: Lens' InventoryItemsListResponse (Maybe Text)+iilrNextPageToken+  = lens _iilrNextPageToken+      (\ s a -> s{_iilrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#inventoryItemsListResponse\".+iilrKind :: Lens' InventoryItemsListResponse Text+iilrKind = lens _iilrKind (\ s a -> s{_iilrKind = a})++instance FromJSON InventoryItemsListResponse where+        parseJSON+          = withObject "InventoryItemsListResponse"+              (\ o ->+                 InventoryItemsListResponse' <$>+                   (o .:? "inventoryItems" .!= mempty) <*>+                     (o .:? "nextPageToken")+                     <*>+                     (o .:? "kind" .!=+                        "dfareporting#inventoryItemsListResponse"))++instance ToJSON InventoryItemsListResponse where+        toJSON InventoryItemsListResponse'{..}+          = object+              (catMaybes+                 [("inventoryItems" .=) <$> _iilrInventoryItems,+                  ("nextPageToken" .=) <$> _iilrNextPageToken,+                  Just ("kind" .= _iilrKind)])++-- | Contains properties of a DCM ad.+--+-- /See:/ 'ad' smart constructor.+data Ad = Ad'+    { _aCreativeGroupAssignments              :: !(Maybe [CreativeGroupAssignment])+    , _aGeoTargeting                          :: !(Maybe GeoTargeting)+    , _aCreativeRotation                      :: !(Maybe CreativeRotation)+    , _aTechnologyTargeting                   :: !(Maybe TechnologyTargeting)+    , _aAudienceSegmentId                     :: !(Maybe (Textual Int64))+    , _aDayPartTargeting                      :: !(Maybe DayPartTargeting)+    , _aSize                                  :: !(Maybe Size)+    , _aStartTime                             :: !(Maybe DateTime')+    , _aKind                                  :: !Text+    , _aClickThroughURLSuffixProperties       :: !(Maybe ClickThroughURLSuffixProperties)+    , _aCampaignIdDimensionValue              :: !(Maybe DimensionValue)+    , _aAdvertiserId                          :: !(Maybe (Textual Int64))+    , _aAdvertiserIdDimensionValue            :: !(Maybe DimensionValue)+    , _aSSLCompliant                          :: !(Maybe Bool)+    , _aCampaignId                            :: !(Maybe (Textual Int64))+    , _aIdDimensionValue                      :: !(Maybe DimensionValue)+    , _aClickThroughURL                       :: !(Maybe ClickThroughURL)+    , _aDeliverySchedule                      :: !(Maybe DeliverySchedule)+    , _aEventTagOverrides                     :: !(Maybe [EventTagOverride])+    , _aActive                                :: !(Maybe Bool)+    , _aAccountId                             :: !(Maybe (Textual Int64))+    , _aName                                  :: !(Maybe Text)+    , _aKeyValueTargetingExpression           :: !(Maybe KeyValueTargetingExpression)+    , _aEndTime                               :: !(Maybe DateTime')+    , _aCreateInfo                            :: !(Maybe LastModifiedInfo)+    , _aLastModifiedInfo                      :: !(Maybe LastModifiedInfo)+    , _aId                                    :: !(Maybe (Textual Int64))+    , _aSSLRequired                           :: !(Maybe Bool)+    , _aComments                              :: !(Maybe Text)+    , _aSubAccountId                          :: !(Maybe (Textual Int64))+    , _aType                                  :: !(Maybe AdType)+    , _aRemarketingListExpression             :: !(Maybe ListTargetingExpression)+    , _aDynamicClickTracker                   :: !(Maybe Bool)+    , _aCompatibility                         :: !(Maybe AdCompatibility)+    , _aArchived                              :: !(Maybe Bool)+    , _aDefaultClickThroughEventTagProperties :: !(Maybe DefaultClickThroughEventTagProperties)+    , _aPlacementAssignments                  :: !(Maybe [PlacementAssignment])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Ad' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'aCreativeGroupAssignments'+--+-- * 'aGeoTargeting'+--+-- * 'aCreativeRotation'+--+-- * 'aTechnologyTargeting'+--+-- * 'aAudienceSegmentId'+--+-- * 'aDayPartTargeting'+--+-- * 'aSize'+--+-- * 'aStartTime'+--+-- * 'aKind'+--+-- * 'aClickThroughURLSuffixProperties'+--+-- * 'aCampaignIdDimensionValue'+--+-- * 'aAdvertiserId'+--+-- * 'aAdvertiserIdDimensionValue'+--+-- * 'aSSLCompliant'+--+-- * 'aCampaignId'+--+-- * 'aIdDimensionValue'+--+-- * 'aClickThroughURL'+--+-- * 'aDeliverySchedule'+--+-- * 'aEventTagOverrides'+--+-- * 'aActive'+--+-- * 'aAccountId'+--+-- * 'aName'+--+-- * 'aKeyValueTargetingExpression'+--+-- * 'aEndTime'+--+-- * 'aCreateInfo'+--+-- * 'aLastModifiedInfo'+--+-- * 'aId'+--+-- * 'aSSLRequired'+--+-- * 'aComments'+--+-- * 'aSubAccountId'+--+-- * 'aType'+--+-- * 'aRemarketingListExpression'+--+-- * 'aDynamicClickTracker'+--+-- * 'aCompatibility'+--+-- * 'aArchived'+--+-- * 'aDefaultClickThroughEventTagProperties'+--+-- * 'aPlacementAssignments'+ad+    :: Ad+ad =+    Ad'+    { _aCreativeGroupAssignments = Nothing+    , _aGeoTargeting = Nothing+    , _aCreativeRotation = Nothing+    , _aTechnologyTargeting = Nothing+    , _aAudienceSegmentId = Nothing+    , _aDayPartTargeting = Nothing+    , _aSize = Nothing+    , _aStartTime = Nothing+    , _aKind = "dfareporting#ad"+    , _aClickThroughURLSuffixProperties = Nothing+    , _aCampaignIdDimensionValue = Nothing+    , _aAdvertiserId = Nothing+    , _aAdvertiserIdDimensionValue = Nothing+    , _aSSLCompliant = Nothing+    , _aCampaignId = Nothing+    , _aIdDimensionValue = Nothing+    , _aClickThroughURL = Nothing+    , _aDeliverySchedule = Nothing+    , _aEventTagOverrides = Nothing+    , _aActive = Nothing+    , _aAccountId = Nothing+    , _aName = Nothing+    , _aKeyValueTargetingExpression = Nothing+    , _aEndTime = Nothing+    , _aCreateInfo = Nothing+    , _aLastModifiedInfo = Nothing+    , _aId = Nothing+    , _aSSLRequired = Nothing+    , _aComments = Nothing+    , _aSubAccountId = Nothing+    , _aType = Nothing+    , _aRemarketingListExpression = Nothing+    , _aDynamicClickTracker = Nothing+    , _aCompatibility = Nothing+    , _aArchived = Nothing+    , _aDefaultClickThroughEventTagProperties = Nothing+    , _aPlacementAssignments = Nothing+    }++-- | Creative group assignments for this ad. Applicable when type is+-- AD_SERVING_CLICK_TRACKER. Only one assignment per creative group number+-- is allowed for a maximum of two assignments.+aCreativeGroupAssignments :: Lens' Ad [CreativeGroupAssignment]+aCreativeGroupAssignments+  = lens _aCreativeGroupAssignments+      (\ s a -> s{_aCreativeGroupAssignments = a})+      . _Default+      . _Coerce++-- | Geographical targeting information for this ad.Applicable when type is+-- AD_SERVING_STANDARD_AD.+aGeoTargeting :: Lens' Ad (Maybe GeoTargeting)+aGeoTargeting+  = lens _aGeoTargeting+      (\ s a -> s{_aGeoTargeting = a})++-- | Creative rotation for this ad. Applicable when type is+-- AD_SERVING_DEFAULT_AD, AD_SERVING_STANDARD_AD, or AD_SERVING_TRACKING.+-- When type is AD_SERVING_DEFAULT_AD, this field should have exactly one+-- creativeAssignment.+aCreativeRotation :: Lens' Ad (Maybe CreativeRotation)+aCreativeRotation+  = lens _aCreativeRotation+      (\ s a -> s{_aCreativeRotation = a})++-- | Technology platform targeting information for this ad. Applicable when+-- type is AD_SERVING_STANDARD_AD.+aTechnologyTargeting :: Lens' Ad (Maybe TechnologyTargeting)+aTechnologyTargeting+  = lens _aTechnologyTargeting+      (\ s a -> s{_aTechnologyTargeting = a})++-- | Audience segment ID that is being targeted for this ad. Applicable when+-- type is AD_SERVING_STANDARD_AD.+aAudienceSegmentId :: Lens' Ad (Maybe Int64)+aAudienceSegmentId+  = lens _aAudienceSegmentId+      (\ s a -> s{_aAudienceSegmentId = a})+      . mapping _Coerce++-- | Time and day targeting information for this ad. Applicable when type is+-- AD_SERVING_STANDARD_AD.+aDayPartTargeting :: Lens' Ad (Maybe DayPartTargeting)+aDayPartTargeting+  = lens _aDayPartTargeting+      (\ s a -> s{_aDayPartTargeting = a})++-- | Size of this ad. Applicable when type is AD_SERVING_DEFAULT_AD.+aSize :: Lens' Ad (Maybe Size)+aSize = lens _aSize (\ s a -> s{_aSize = a})++-- | Date and time that this ad should start serving. If creating an ad, this+-- field must be a time in the future. This is a required field on+-- insertion.+aStartTime :: Lens' Ad (Maybe UTCTime)+aStartTime+  = lens _aStartTime (\ s a -> s{_aStartTime = a}) .+      mapping _DateTime++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#ad\".+aKind :: Lens' Ad Text+aKind = lens _aKind (\ s a -> s{_aKind = a})++-- | Click-through URL suffix properties for this ad. Applies to the URL in+-- the ad or (if overriding ad properties) the URL in the creative.+aClickThroughURLSuffixProperties :: Lens' Ad (Maybe ClickThroughURLSuffixProperties)+aClickThroughURLSuffixProperties+  = lens _aClickThroughURLSuffixProperties+      (\ s a -> s{_aClickThroughURLSuffixProperties = a})++-- | Dimension value for the ID of the campaign. This is a read-only,+-- auto-generated field.+aCampaignIdDimensionValue :: Lens' Ad (Maybe DimensionValue)+aCampaignIdDimensionValue+  = lens _aCampaignIdDimensionValue+      (\ s a -> s{_aCampaignIdDimensionValue = a})++-- | Advertiser ID of this ad. This is a required field on insertion.+aAdvertiserId :: Lens' Ad (Maybe Int64)+aAdvertiserId+  = lens _aAdvertiserId+      (\ s a -> s{_aAdvertiserId = a})+      . mapping _Coerce++-- | Dimension value for the ID of the advertiser. This is a read-only,+-- auto-generated field.+aAdvertiserIdDimensionValue :: Lens' Ad (Maybe DimensionValue)+aAdvertiserIdDimensionValue+  = lens _aAdvertiserIdDimensionValue+      (\ s a -> s{_aAdvertiserIdDimensionValue = a})++-- | Whether this ad is ssl compliant. This is a read-only field that is+-- auto-generated when the ad is inserted or updated.+aSSLCompliant :: Lens' Ad (Maybe Bool)+aSSLCompliant+  = lens _aSSLCompliant+      (\ s a -> s{_aSSLCompliant = a})++-- | Campaign ID of this ad. This is a required field on insertion.+aCampaignId :: Lens' Ad (Maybe Int64)+aCampaignId+  = lens _aCampaignId (\ s a -> s{_aCampaignId = a}) .+      mapping _Coerce++-- | Dimension value for the ID of this ad. This is a read-only,+-- auto-generated field.+aIdDimensionValue :: Lens' Ad (Maybe DimensionValue)+aIdDimensionValue+  = lens _aIdDimensionValue+      (\ s a -> s{_aIdDimensionValue = a})++-- | Click-through URL for this ad. This is a required field on insertion.+-- Applicable when type is AD_SERVING_CLICK_TRACKER.+aClickThroughURL :: Lens' Ad (Maybe ClickThroughURL)+aClickThroughURL+  = lens _aClickThroughURL+      (\ s a -> s{_aClickThroughURL = a})++-- | Delivery schedule information for this ad. Applicable when type is+-- AD_SERVING_STANDARD_AD or AD_SERVING_TRACKING. This field along with+-- subfields priority and impressionRatio are required on insertion when+-- type is AD_SERVING_STANDARD_AD.+aDeliverySchedule :: Lens' Ad (Maybe DeliverySchedule)+aDeliverySchedule+  = lens _aDeliverySchedule+      (\ s a -> s{_aDeliverySchedule = a})++-- | Event tag overrides for this ad.+aEventTagOverrides :: Lens' Ad [EventTagOverride]+aEventTagOverrides+  = lens _aEventTagOverrides+      (\ s a -> s{_aEventTagOverrides = a})+      . _Default+      . _Coerce++-- | Whether this ad is active.+aActive :: Lens' Ad (Maybe Bool)+aActive = lens _aActive (\ s a -> s{_aActive = a})++-- | Account ID of this ad. This is a read-only field that can be left blank.+aAccountId :: Lens' Ad (Maybe Int64)+aAccountId+  = lens _aAccountId (\ s a -> s{_aAccountId = a}) .+      mapping _Coerce++-- | Name of this ad. This is a required field and must be less than 256+-- characters long.+aName :: Lens' Ad (Maybe Text)+aName = lens _aName (\ s a -> s{_aName = a})++-- | Key-value targeting information for this ad. Applicable when type is+-- AD_SERVING_STANDARD_AD.+aKeyValueTargetingExpression :: Lens' Ad (Maybe KeyValueTargetingExpression)+aKeyValueTargetingExpression+  = lens _aKeyValueTargetingExpression+      (\ s a -> s{_aKeyValueTargetingExpression = a})++-- | Date and time that this ad should stop serving. Must be later than the+-- start time. This is a required field on insertion.+aEndTime :: Lens' Ad (Maybe UTCTime)+aEndTime+  = lens _aEndTime (\ s a -> s{_aEndTime = a}) .+      mapping _DateTime++-- | Information about the creation of this ad.This is a read-only field.+aCreateInfo :: Lens' Ad (Maybe LastModifiedInfo)+aCreateInfo+  = lens _aCreateInfo (\ s a -> s{_aCreateInfo = a})++-- | Information about the most recent modification of this ad. This is a+-- read-only field.+aLastModifiedInfo :: Lens' Ad (Maybe LastModifiedInfo)+aLastModifiedInfo+  = lens _aLastModifiedInfo+      (\ s a -> s{_aLastModifiedInfo = a})++-- | ID of this ad. This is a read-only, auto-generated field.+aId :: Lens' Ad (Maybe Int64)+aId+  = lens _aId (\ s a -> s{_aId = a}) . mapping _Coerce++-- | Whether this ad requires ssl. This is a read-only field that is+-- auto-generated when the ad is inserted or updated.+aSSLRequired :: Lens' Ad (Maybe Bool)+aSSLRequired+  = lens _aSSLRequired (\ s a -> s{_aSSLRequired = a})++-- | Comments for this ad.+aComments :: Lens' Ad (Maybe Text)+aComments+  = lens _aComments (\ s a -> s{_aComments = a})++-- | Subaccount ID of this ad. This is a read-only field that can be left+-- blank.+aSubAccountId :: Lens' Ad (Maybe Int64)+aSubAccountId+  = lens _aSubAccountId+      (\ s a -> s{_aSubAccountId = a})+      . mapping _Coerce++-- | Type of ad. This is a required field on insertion. Note that default ads+-- (AD_SERVING_DEFAULT_AD) cannot be created directly (see Creative+-- resource).+aType :: Lens' Ad (Maybe AdType)+aType = lens _aType (\ s a -> s{_aType = a})++-- | Applicable when type is AD_SERVING_STANDARD_AD. Remarketing list+-- targeting expression for this ad.+aRemarketingListExpression :: Lens' Ad (Maybe ListTargetingExpression)+aRemarketingListExpression+  = lens _aRemarketingListExpression+      (\ s a -> s{_aRemarketingListExpression = a})++-- | Whether this ad is a dynamic click tracker. Applicable when type is+-- AD_SERVING_CLICK_TRACKER. This is a required field on insert, and is+-- read-only after insert.+aDynamicClickTracker :: Lens' Ad (Maybe Bool)+aDynamicClickTracker+  = lens _aDynamicClickTracker+      (\ s a -> s{_aDynamicClickTracker = a})++-- | Compatibility of this ad. Applicable when type is AD_SERVING_DEFAULT_AD.+-- DISPLAY and DISPLAY_INTERSTITIAL refer to either rendering on desktop or+-- on mobile devices or in mobile apps for regular or interstitial ads,+-- respectively. APP and APP_INTERSTITIAL are only used for existing+-- default ads. New mobile placements must be assigned DISPLAY or+-- DISPLAY_INTERSTITIAL and default ads created for those placements will+-- be limited to those compatibility types. IN_STREAM_VIDEO refers to+-- rendering in-stream video ads developed with the VAST standard.+aCompatibility :: Lens' Ad (Maybe AdCompatibility)+aCompatibility+  = lens _aCompatibility+      (\ s a -> s{_aCompatibility = a})++-- | Whether this ad is archived.+aArchived :: Lens' Ad (Maybe Bool)+aArchived+  = lens _aArchived (\ s a -> s{_aArchived = a})++-- | Default click-through event tag properties for this ad.+aDefaultClickThroughEventTagProperties :: Lens' Ad (Maybe DefaultClickThroughEventTagProperties)+aDefaultClickThroughEventTagProperties+  = lens _aDefaultClickThroughEventTagProperties+      (\ s a ->+         s{_aDefaultClickThroughEventTagProperties = a})++-- | Placement assignments for this ad.+aPlacementAssignments :: Lens' Ad [PlacementAssignment]+aPlacementAssignments+  = lens _aPlacementAssignments+      (\ s a -> s{_aPlacementAssignments = a})+      . _Default+      . _Coerce++instance FromJSON Ad where+        parseJSON+          = withObject "Ad"+              (\ o ->+                 Ad' <$>+                   (o .:? "creativeGroupAssignments" .!= mempty) <*>+                     (o .:? "geoTargeting")+                     <*> (o .:? "creativeRotation")+                     <*> (o .:? "technologyTargeting")+                     <*> (o .:? "audienceSegmentId")+                     <*> (o .:? "dayPartTargeting")+                     <*> (o .:? "size")+                     <*> (o .:? "startTime")+                     <*> (o .:? "kind" .!= "dfareporting#ad")+                     <*> (o .:? "clickThroughUrlSuffixProperties")+                     <*> (o .:? "campaignIdDimensionValue")+                     <*> (o .:? "advertiserId")+                     <*> (o .:? "advertiserIdDimensionValue")+                     <*> (o .:? "sslCompliant")+                     <*> (o .:? "campaignId")+                     <*> (o .:? "idDimensionValue")+                     <*> (o .:? "clickThroughUrl")+                     <*> (o .:? "deliverySchedule")+                     <*> (o .:? "eventTagOverrides" .!= mempty)+                     <*> (o .:? "active")+                     <*> (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "keyValueTargetingExpression")+                     <*> (o .:? "endTime")+                     <*> (o .:? "createInfo")+                     <*> (o .:? "lastModifiedInfo")+                     <*> (o .:? "id")+                     <*> (o .:? "sslRequired")+                     <*> (o .:? "comments")+                     <*> (o .:? "subaccountId")+                     <*> (o .:? "type")+                     <*> (o .:? "remarketingListExpression")+                     <*> (o .:? "dynamicClickTracker")+                     <*> (o .:? "compatibility")+                     <*> (o .:? "archived")+                     <*> (o .:? "defaultClickThroughEventTagProperties")+                     <*> (o .:? "placementAssignments" .!= mempty))++instance ToJSON Ad where+        toJSON Ad'{..}+          = object+              (catMaybes+                 [("creativeGroupAssignments" .=) <$>+                    _aCreativeGroupAssignments,+                  ("geoTargeting" .=) <$> _aGeoTargeting,+                  ("creativeRotation" .=) <$> _aCreativeRotation,+                  ("technologyTargeting" .=) <$> _aTechnologyTargeting,+                  ("audienceSegmentId" .=) <$> _aAudienceSegmentId,+                  ("dayPartTargeting" .=) <$> _aDayPartTargeting,+                  ("size" .=) <$> _aSize,+                  ("startTime" .=) <$> _aStartTime,+                  Just ("kind" .= _aKind),+                  ("clickThroughUrlSuffixProperties" .=) <$>+                    _aClickThroughURLSuffixProperties,+                  ("campaignIdDimensionValue" .=) <$>+                    _aCampaignIdDimensionValue,+                  ("advertiserId" .=) <$> _aAdvertiserId,+                  ("advertiserIdDimensionValue" .=) <$>+                    _aAdvertiserIdDimensionValue,+                  ("sslCompliant" .=) <$> _aSSLCompliant,+                  ("campaignId" .=) <$> _aCampaignId,+                  ("idDimensionValue" .=) <$> _aIdDimensionValue,+                  ("clickThroughUrl" .=) <$> _aClickThroughURL,+                  ("deliverySchedule" .=) <$> _aDeliverySchedule,+                  ("eventTagOverrides" .=) <$> _aEventTagOverrides,+                  ("active" .=) <$> _aActive,+                  ("accountId" .=) <$> _aAccountId,+                  ("name" .=) <$> _aName,+                  ("keyValueTargetingExpression" .=) <$>+                    _aKeyValueTargetingExpression,+                  ("endTime" .=) <$> _aEndTime,+                  ("createInfo" .=) <$> _aCreateInfo,+                  ("lastModifiedInfo" .=) <$> _aLastModifiedInfo,+                  ("id" .=) <$> _aId,+                  ("sslRequired" .=) <$> _aSSLRequired,+                  ("comments" .=) <$> _aComments,+                  ("subaccountId" .=) <$> _aSubAccountId,+                  ("type" .=) <$> _aType,+                  ("remarketingListExpression" .=) <$>+                    _aRemarketingListExpression,+                  ("dynamicClickTracker" .=) <$> _aDynamicClickTracker,+                  ("compatibility" .=) <$> _aCompatibility,+                  ("archived" .=) <$> _aArchived,+                  ("defaultClickThroughEventTagProperties" .=) <$>+                    _aDefaultClickThroughEventTagProperties,+                  ("placementAssignments" .=) <$>+                    _aPlacementAssignments])++-- | Contains properties of a DoubleClick Planning project.+--+-- /See:/ 'project' smart constructor.+data Project = Project'+    { _pTargetClicks      :: !(Maybe (Textual Int64))+    , _pClientBillingCode :: !(Maybe Text)+    , _pTargetCpmNanos    :: !(Maybe (Textual Int64))+    , _pTargetConversions :: !(Maybe (Textual Int64))+    , _pBudget            :: !(Maybe (Textual Int64))+    , _pKind              :: !Text+    , _pAdvertiserId      :: !(Maybe (Textual Int64))+    , _pEndDate           :: !(Maybe Date')+    , _pOverview          :: !(Maybe Text)+    , _pTargetImpressions :: !(Maybe (Textual Int64))+    , _pStartDate         :: !(Maybe Date')+    , _pTargetCpcNanos    :: !(Maybe (Textual Int64))+    , _pAccountId         :: !(Maybe (Textual Int64))+    , _pName              :: !(Maybe Text)+    , _pLastModifiedInfo  :: !(Maybe LastModifiedInfo)+    , _pId                :: !(Maybe (Textual Int64))+    , _pAudienceAgeGroup  :: !(Maybe ProjectAudienceAgeGroup)+    , _pSubAccountId      :: !(Maybe (Textual Int64))+    , _pAudienceGender    :: !(Maybe ProjectAudienceGender)+    , _pClientName        :: !(Maybe Text)+    , _pTargetCpaNanos    :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Project' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'pTargetClicks'+--+-- * 'pClientBillingCode'+--+-- * 'pTargetCpmNanos'+--+-- * 'pTargetConversions'+--+-- * 'pBudget'+--+-- * 'pKind'+--+-- * 'pAdvertiserId'+--+-- * 'pEndDate'+--+-- * 'pOverview'+--+-- * 'pTargetImpressions'+--+-- * 'pStartDate'+--+-- * 'pTargetCpcNanos'+--+-- * 'pAccountId'+--+-- * 'pName'+--+-- * 'pLastModifiedInfo'+--+-- * 'pId'+--+-- * 'pAudienceAgeGroup'+--+-- * 'pSubAccountId'+--+-- * 'pAudienceGender'+--+-- * 'pClientName'+--+-- * 'pTargetCpaNanos'+project+    :: Project+project =+    Project'+    { _pTargetClicks = Nothing+    , _pClientBillingCode = Nothing+    , _pTargetCpmNanos = Nothing+    , _pTargetConversions = Nothing+    , _pBudget = Nothing+    , _pKind = "dfareporting#project"+    , _pAdvertiserId = Nothing+    , _pEndDate = Nothing+    , _pOverview = Nothing+    , _pTargetImpressions = Nothing+    , _pStartDate = Nothing+    , _pTargetCpcNanos = Nothing+    , _pAccountId = Nothing+    , _pName = Nothing+    , _pLastModifiedInfo = Nothing+    , _pId = Nothing+    , _pAudienceAgeGroup = Nothing+    , _pSubAccountId = Nothing+    , _pAudienceGender = Nothing+    , _pClientName = Nothing+    , _pTargetCpaNanos = Nothing+    }++-- | Number of clicks that the advertiser is targeting.+pTargetClicks :: Lens' Project (Maybe Int64)+pTargetClicks+  = lens _pTargetClicks+      (\ s a -> s{_pTargetClicks = a})+      . mapping _Coerce++-- | Client billing code of this project.+pClientBillingCode :: Lens' Project (Maybe Text)+pClientBillingCode+  = lens _pClientBillingCode+      (\ s a -> s{_pClientBillingCode = a})++-- | CPM that the advertiser is targeting.+pTargetCpmNanos :: Lens' Project (Maybe Int64)+pTargetCpmNanos+  = lens _pTargetCpmNanos+      (\ s a -> s{_pTargetCpmNanos = a})+      . mapping _Coerce++-- | Number of conversions that the advertiser is targeting.+pTargetConversions :: Lens' Project (Maybe Int64)+pTargetConversions+  = lens _pTargetConversions+      (\ s a -> s{_pTargetConversions = a})+      . mapping _Coerce++-- | Budget of this project in the currency specified by the current account.+-- The value stored in this field represents only the non-fractional+-- amount. For example, for USD, the smallest value that can be represented+-- by this field is 1 US dollar.+pBudget :: Lens' Project (Maybe Int64)+pBudget+  = lens _pBudget (\ s a -> s{_pBudget = a}) .+      mapping _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#project\".+pKind :: Lens' Project Text+pKind = lens _pKind (\ s a -> s{_pKind = a})++-- | Advertiser ID of this project.+pAdvertiserId :: Lens' Project (Maybe Int64)+pAdvertiserId+  = lens _pAdvertiserId+      (\ s a -> s{_pAdvertiserId = a})+      . mapping _Coerce++-- | End date of the project.+pEndDate :: Lens' Project (Maybe Day)+pEndDate+  = lens _pEndDate (\ s a -> s{_pEndDate = a}) .+      mapping _Date++-- | Overview of this project.+pOverview :: Lens' Project (Maybe Text)+pOverview+  = lens _pOverview (\ s a -> s{_pOverview = a})++-- | Number of impressions that the advertiser is targeting.+pTargetImpressions :: Lens' Project (Maybe Int64)+pTargetImpressions+  = lens _pTargetImpressions+      (\ s a -> s{_pTargetImpressions = a})+      . mapping _Coerce++-- | Start date of the project.+pStartDate :: Lens' Project (Maybe Day)+pStartDate+  = lens _pStartDate (\ s a -> s{_pStartDate = a}) .+      mapping _Date++-- | CPC that the advertiser is targeting.+pTargetCpcNanos :: Lens' Project (Maybe Int64)+pTargetCpcNanos+  = lens _pTargetCpcNanos+      (\ s a -> s{_pTargetCpcNanos = a})+      . mapping _Coerce++-- | Account ID of this project.+pAccountId :: Lens' Project (Maybe Int64)+pAccountId+  = lens _pAccountId (\ s a -> s{_pAccountId = a}) .+      mapping _Coerce++-- | Name of this project.+pName :: Lens' Project (Maybe Text)+pName = lens _pName (\ s a -> s{_pName = a})++-- | Information about the most recent modification of this project.+pLastModifiedInfo :: Lens' Project (Maybe LastModifiedInfo)+pLastModifiedInfo+  = lens _pLastModifiedInfo+      (\ s a -> s{_pLastModifiedInfo = a})++-- | ID of this project. This is a read-only, auto-generated field.+pId :: Lens' Project (Maybe Int64)+pId+  = lens _pId (\ s a -> s{_pId = a}) . mapping _Coerce++-- | Audience age group of this project.+pAudienceAgeGroup :: Lens' Project (Maybe ProjectAudienceAgeGroup)+pAudienceAgeGroup+  = lens _pAudienceAgeGroup+      (\ s a -> s{_pAudienceAgeGroup = a})++-- | Subaccount ID of this project.+pSubAccountId :: Lens' Project (Maybe Int64)+pSubAccountId+  = lens _pSubAccountId+      (\ s a -> s{_pSubAccountId = a})+      . mapping _Coerce++-- | Audience gender of this project.+pAudienceGender :: Lens' Project (Maybe ProjectAudienceGender)+pAudienceGender+  = lens _pAudienceGender+      (\ s a -> s{_pAudienceGender = a})++-- | Name of the project client.+pClientName :: Lens' Project (Maybe Text)+pClientName+  = lens _pClientName (\ s a -> s{_pClientName = a})++-- | CPA that the advertiser is targeting.+pTargetCpaNanos :: Lens' Project (Maybe Int64)+pTargetCpaNanos+  = lens _pTargetCpaNanos+      (\ s a -> s{_pTargetCpaNanos = a})+      . mapping _Coerce++instance FromJSON Project where+        parseJSON+          = withObject "Project"+              (\ o ->+                 Project' <$>+                   (o .:? "targetClicks") <*>+                     (o .:? "clientBillingCode")+                     <*> (o .:? "targetCpmNanos")+                     <*> (o .:? "targetConversions")+                     <*> (o .:? "budget")+                     <*> (o .:? "kind" .!= "dfareporting#project")+                     <*> (o .:? "advertiserId")+                     <*> (o .:? "endDate")+                     <*> (o .:? "overview")+                     <*> (o .:? "targetImpressions")+                     <*> (o .:? "startDate")+                     <*> (o .:? "targetCpcNanos")+                     <*> (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "lastModifiedInfo")+                     <*> (o .:? "id")+                     <*> (o .:? "audienceAgeGroup")+                     <*> (o .:? "subaccountId")+                     <*> (o .:? "audienceGender")+                     <*> (o .:? "clientName")+                     <*> (o .:? "targetCpaNanos"))++instance ToJSON Project where+        toJSON Project'{..}+          = object+              (catMaybes+                 [("targetClicks" .=) <$> _pTargetClicks,+                  ("clientBillingCode" .=) <$> _pClientBillingCode,+                  ("targetCpmNanos" .=) <$> _pTargetCpmNanos,+                  ("targetConversions" .=) <$> _pTargetConversions,+                  ("budget" .=) <$> _pBudget, Just ("kind" .= _pKind),+                  ("advertiserId" .=) <$> _pAdvertiserId,+                  ("endDate" .=) <$> _pEndDate,+                  ("overview" .=) <$> _pOverview,+                  ("targetImpressions" .=) <$> _pTargetImpressions,+                  ("startDate" .=) <$> _pStartDate,+                  ("targetCpcNanos" .=) <$> _pTargetCpcNanos,+                  ("accountId" .=) <$> _pAccountId,+                  ("name" .=) <$> _pName,+                  ("lastModifiedInfo" .=) <$> _pLastModifiedInfo,+                  ("id" .=) <$> _pId,+                  ("audienceAgeGroup" .=) <$> _pAudienceAgeGroup,+                  ("subaccountId" .=) <$> _pSubAccountId,+                  ("audienceGender" .=) <$> _pAudienceGender,+                  ("clientName" .=) <$> _pClientName,+                  ("targetCpaNanos" .=) <$> _pTargetCpaNanos])++-- | The report criteria for a report of type \"FLOODLIGHT\".+--+-- /See:/ 'reportFloodlightCriteria' smart constructor.+data ReportFloodlightCriteria = ReportFloodlightCriteria'+    { _rfcReportProperties      :: !(Maybe ReportFloodlightCriteriaReportProperties)+    , _rfcMetricNames           :: !(Maybe [Text])+    , _rfcCustomRichMediaEvents :: !(Maybe [DimensionValue])+    , _rfcDimensionFilters      :: !(Maybe [DimensionValue])+    , _rfcDateRange             :: !(Maybe DateRange)+    , _rfcFloodlightConfigId    :: !(Maybe DimensionValue)+    , _rfcDimensions            :: !(Maybe [SortedDimension])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ReportFloodlightCriteria' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rfcReportProperties'+--+-- * 'rfcMetricNames'+--+-- * 'rfcCustomRichMediaEvents'+--+-- * 'rfcDimensionFilters'+--+-- * 'rfcDateRange'+--+-- * 'rfcFloodlightConfigId'+--+-- * 'rfcDimensions'+reportFloodlightCriteria+    :: ReportFloodlightCriteria+reportFloodlightCriteria =+    ReportFloodlightCriteria'+    { _rfcReportProperties = Nothing+    , _rfcMetricNames = Nothing+    , _rfcCustomRichMediaEvents = Nothing+    , _rfcDimensionFilters = Nothing+    , _rfcDateRange = Nothing+    , _rfcFloodlightConfigId = Nothing+    , _rfcDimensions = Nothing+    }++-- | The properties of the report.+rfcReportProperties :: Lens' ReportFloodlightCriteria (Maybe ReportFloodlightCriteriaReportProperties)+rfcReportProperties+  = lens _rfcReportProperties+      (\ s a -> s{_rfcReportProperties = a})++-- | The list of names of metrics the report should include.+rfcMetricNames :: Lens' ReportFloodlightCriteria [Text]+rfcMetricNames+  = lens _rfcMetricNames+      (\ s a -> s{_rfcMetricNames = a})+      . _Default+      . _Coerce++-- | The list of custom rich media events to include.+rfcCustomRichMediaEvents :: Lens' ReportFloodlightCriteria [DimensionValue]+rfcCustomRichMediaEvents+  = lens _rfcCustomRichMediaEvents+      (\ s a -> s{_rfcCustomRichMediaEvents = a})+      . _Default+      . _Coerce++-- | The list of filters on which dimensions are filtered. Filters for+-- different dimensions are ANDed, filters for the same dimension are+-- grouped together and ORed.+rfcDimensionFilters :: Lens' ReportFloodlightCriteria [DimensionValue]+rfcDimensionFilters+  = lens _rfcDimensionFilters+      (\ s a -> s{_rfcDimensionFilters = a})+      . _Default+      . _Coerce++-- | The date range this report should be run for.+rfcDateRange :: Lens' ReportFloodlightCriteria (Maybe DateRange)+rfcDateRange+  = lens _rfcDateRange (\ s a -> s{_rfcDateRange = a})++-- | The floodlight ID for which to show data in this report. All advertisers+-- associated with that ID will automatically be added. The dimension of+-- the value needs to be \'dfa:floodlightConfigId\'.+rfcFloodlightConfigId :: Lens' ReportFloodlightCriteria (Maybe DimensionValue)+rfcFloodlightConfigId+  = lens _rfcFloodlightConfigId+      (\ s a -> s{_rfcFloodlightConfigId = a})++-- | The list of dimensions the report should include.+rfcDimensions :: Lens' ReportFloodlightCriteria [SortedDimension]+rfcDimensions+  = lens _rfcDimensions+      (\ s a -> s{_rfcDimensions = a})+      . _Default+      . _Coerce++instance FromJSON ReportFloodlightCriteria where+        parseJSON+          = withObject "ReportFloodlightCriteria"+              (\ o ->+                 ReportFloodlightCriteria' <$>+                   (o .:? "reportProperties") <*>+                     (o .:? "metricNames" .!= mempty)+                     <*> (o .:? "customRichMediaEvents" .!= mempty)+                     <*> (o .:? "dimensionFilters" .!= mempty)+                     <*> (o .:? "dateRange")+                     <*> (o .:? "floodlightConfigId")+                     <*> (o .:? "dimensions" .!= mempty))++instance ToJSON ReportFloodlightCriteria where+        toJSON ReportFloodlightCriteria'{..}+          = object+              (catMaybes+                 [("reportProperties" .=) <$> _rfcReportProperties,+                  ("metricNames" .=) <$> _rfcMetricNames,+                  ("customRichMediaEvents" .=) <$>+                    _rfcCustomRichMediaEvents,+                  ("dimensionFilters" .=) <$> _rfcDimensionFilters,+                  ("dateRange" .=) <$> _rfcDateRange,+                  ("floodlightConfigId" .=) <$> _rfcFloodlightConfigId,+                  ("dimensions" .=) <$> _rfcDimensions])++-- | Represents the dimensions of ads, placements, creatives, or creative+-- assets.+--+-- /See:/ 'size' smart constructor.+data Size = Size'+    { _sHeight :: !(Maybe (Textual Int32))+    , _sKind   :: !Text+    , _sWidth  :: !(Maybe (Textual Int32))+    , _sIab    :: !(Maybe Bool)+    , _sId     :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Size' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'sHeight'+--+-- * 'sKind'+--+-- * 'sWidth'+--+-- * 'sIab'+--+-- * 'sId'+size+    :: Size+size =+    Size'+    { _sHeight = Nothing+    , _sKind = "dfareporting#size"+    , _sWidth = Nothing+    , _sIab = Nothing+    , _sId = Nothing+    }++-- | Height of this size.+sHeight :: Lens' Size (Maybe Int32)+sHeight+  = lens _sHeight (\ s a -> s{_sHeight = a}) .+      mapping _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#size\".+sKind :: Lens' Size Text+sKind = lens _sKind (\ s a -> s{_sKind = a})++-- | Width of this size.+sWidth :: Lens' Size (Maybe Int32)+sWidth+  = lens _sWidth (\ s a -> s{_sWidth = a}) .+      mapping _Coerce++-- | IAB standard size. This is a read-only, auto-generated field.+sIab :: Lens' Size (Maybe Bool)+sIab = lens _sIab (\ s a -> s{_sIab = a})++-- | ID of this size. This is a read-only, auto-generated field.+sId :: Lens' Size (Maybe Int64)+sId+  = lens _sId (\ s a -> s{_sId = a}) . mapping _Coerce++instance FromJSON Size where+        parseJSON+          = withObject "Size"+              (\ o ->+                 Size' <$>+                   (o .:? "height") <*>+                     (o .:? "kind" .!= "dfareporting#size")+                     <*> (o .:? "width")+                     <*> (o .:? "iab")+                     <*> (o .:? "id"))++instance ToJSON Size where+        toJSON Size'{..}+          = object+              (catMaybes+                 [("height" .=) <$> _sHeight, Just ("kind" .= _sKind),+                  ("width" .=) <$> _sWidth, ("iab" .=) <$> _sIab,+                  ("id" .=) <$> _sId])++-- | Object Filter.+--+-- /See:/ 'objectFilter' smart constructor.+data ObjectFilter = ObjectFilter'+    { _ofStatus    :: !(Maybe ObjectFilterStatus)+    , _ofKind      :: !Text+    , _ofObjectIds :: !(Maybe [Textual Int64])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ObjectFilter' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ofStatus'+--+-- * 'ofKind'+--+-- * 'ofObjectIds'+objectFilter+    :: ObjectFilter+objectFilter =+    ObjectFilter'+    { _ofStatus = Nothing+    , _ofKind = "dfareporting#objectFilter"+    , _ofObjectIds = Nothing+    }++-- | Status of the filter. NONE means the user has access to none of the+-- objects. ALL means the user has access to all objects. ASSIGNED means+-- the user has access to the objects with IDs in the objectIds list.+ofStatus :: Lens' ObjectFilter (Maybe ObjectFilterStatus)+ofStatus = lens _ofStatus (\ s a -> s{_ofStatus = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#objectFilter\".+ofKind :: Lens' ObjectFilter Text+ofKind = lens _ofKind (\ s a -> s{_ofKind = a})++-- | Applicable when status is ASSIGNED. The user has access to objects with+-- these object IDs.+ofObjectIds :: Lens' ObjectFilter [Int64]+ofObjectIds+  = lens _ofObjectIds (\ s a -> s{_ofObjectIds = a}) .+      _Default+      . _Coerce++instance FromJSON ObjectFilter where+        parseJSON+          = withObject "ObjectFilter"+              (\ o ->+                 ObjectFilter' <$>+                   (o .:? "status") <*>+                     (o .:? "kind" .!= "dfareporting#objectFilter")+                     <*> (o .:? "objectIds" .!= mempty))++instance ToJSON ObjectFilter where+        toJSON ObjectFilter'{..}+          = object+              (catMaybes+                 [("status" .=) <$> _ofStatus,+                  Just ("kind" .= _ofKind),+                  ("objectIds" .=) <$> _ofObjectIds])++-- | Reporting Configuration+--+-- /See:/ 'reportsConfiguration' smart constructor.+data ReportsConfiguration = ReportsConfiguration'+    { _rcExposureToConversionEnabled :: !(Maybe Bool)+    , _rcReportGenerationTimeZoneId  :: !(Maybe (Textual Int64))+    , _rcLookbackConfiguration       :: !(Maybe LookbackConfiguration)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ReportsConfiguration' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rcExposureToConversionEnabled'+--+-- * 'rcReportGenerationTimeZoneId'+--+-- * 'rcLookbackConfiguration'+reportsConfiguration+    :: ReportsConfiguration+reportsConfiguration =+    ReportsConfiguration'+    { _rcExposureToConversionEnabled = Nothing+    , _rcReportGenerationTimeZoneId = Nothing+    , _rcLookbackConfiguration = Nothing+    }++-- | Whether the exposure to conversion report is enabled. This report shows+-- detailed pathway information on up to 10 of the most recent ad exposures+-- seen by a user before converting.+rcExposureToConversionEnabled :: Lens' ReportsConfiguration (Maybe Bool)+rcExposureToConversionEnabled+  = lens _rcExposureToConversionEnabled+      (\ s a -> s{_rcExposureToConversionEnabled = a})++-- | Report generation time zone ID of this account. This is a required field+-- that can only be changed by a superuser. Acceptable values are: - \"1\"+-- for \"America\/New_York\" - \"2\" for \"Europe\/London\" - \"3\" for+-- \"Europe\/Paris\" - \"4\" for \"Africa\/Johannesburg\" - \"5\" for+-- \"Asia\/Jerusalem\" - \"6\" for \"Asia\/Shanghai\" - \"7\" for+-- \"Asia\/Hong_Kong\" - \"8\" for \"Asia\/Tokyo\" - \"9\" for+-- \"Australia\/Sydney\" - \"10\" for \"Asia\/Dubai\" - \"11\" for+-- \"America\/Los_Angeles\" - \"12\" for \"Pacific\/Auckland\" - \"13\" for+-- \"America\/Sao_Paulo\"+rcReportGenerationTimeZoneId :: Lens' ReportsConfiguration (Maybe Int64)+rcReportGenerationTimeZoneId+  = lens _rcReportGenerationTimeZoneId+      (\ s a -> s{_rcReportGenerationTimeZoneId = a})+      . mapping _Coerce++-- | Default lookback windows for new advertisers in this account.+rcLookbackConfiguration :: Lens' ReportsConfiguration (Maybe LookbackConfiguration)+rcLookbackConfiguration+  = lens _rcLookbackConfiguration+      (\ s a -> s{_rcLookbackConfiguration = a})++instance FromJSON ReportsConfiguration where+        parseJSON+          = withObject "ReportsConfiguration"+              (\ o ->+                 ReportsConfiguration' <$>+                   (o .:? "exposureToConversionEnabled") <*>+                     (o .:? "reportGenerationTimeZoneId")+                     <*> (o .:? "lookbackConfiguration"))++instance ToJSON ReportsConfiguration where+        toJSON ReportsConfiguration'{..}+          = object+              (catMaybes+                 [("exposureToConversionEnabled" .=) <$>+                    _rcExposureToConversionEnabled,+                  ("reportGenerationTimeZoneId" .=) <$>+                    _rcReportGenerationTimeZoneId,+                  ("lookbackConfiguration" .=) <$>+                    _rcLookbackConfiguration])++-- | Pricing Schedule+--+-- /See:/ 'pricingSchedule' smart constructor.+data PricingSchedule = PricingSchedule'+    { _psTestingStartDate      :: !(Maybe Date')+    , _psFloodlightActivityId  :: !(Maybe (Textual Int64))+    , _psEndDate               :: !(Maybe Date')+    , _psDisregardOverdelivery :: !(Maybe Bool)+    , _psStartDate             :: !(Maybe Date')+    , _psCapCostOption         :: !(Maybe PricingScheduleCapCostOption)+    , _psPricingType           :: !(Maybe PricingSchedulePricingType)+    , _psPricingPeriods        :: !(Maybe [PricingSchedulePricingPeriod])+    , _psFlighted              :: !(Maybe Bool)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'PricingSchedule' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'psTestingStartDate'+--+-- * 'psFloodlightActivityId'+--+-- * 'psEndDate'+--+-- * 'psDisregardOverdelivery'+--+-- * 'psStartDate'+--+-- * 'psCapCostOption'+--+-- * 'psPricingType'+--+-- * 'psPricingPeriods'+--+-- * 'psFlighted'+pricingSchedule+    :: PricingSchedule+pricingSchedule =+    PricingSchedule'+    { _psTestingStartDate = Nothing+    , _psFloodlightActivityId = Nothing+    , _psEndDate = Nothing+    , _psDisregardOverdelivery = Nothing+    , _psStartDate = Nothing+    , _psCapCostOption = Nothing+    , _psPricingType = Nothing+    , _psPricingPeriods = Nothing+    , _psFlighted = Nothing+    }++-- | Testing start date of this placement. The hours, minutes, and seconds of+-- the start date should not be set, as doing so will result in an error.+psTestingStartDate :: Lens' PricingSchedule (Maybe Day)+psTestingStartDate+  = lens _psTestingStartDate+      (\ s a -> s{_psTestingStartDate = a})+      . mapping _Date++-- | Floodlight activity ID associated with this placement. This field should+-- be set when placement pricing type is set to PRICING_TYPE_CPA.+psFloodlightActivityId :: Lens' PricingSchedule (Maybe Int64)+psFloodlightActivityId+  = lens _psFloodlightActivityId+      (\ s a -> s{_psFloodlightActivityId = a})+      . mapping _Coerce++-- | Placement end date. This date must be later than, or the same day as,+-- the placement start date, but not later than the campaign end date. If,+-- for example, you set 6\/25\/2015 as both the start and end dates, the+-- effective placement date is just that day only, 6\/25\/2015. The hours,+-- minutes, and seconds of the end date should not be set, as doing so will+-- result in an error. This field is required on insertion.+psEndDate :: Lens' PricingSchedule (Maybe Day)+psEndDate+  = lens _psEndDate (\ s a -> s{_psEndDate = a}) .+      mapping _Date++-- | Whether cap costs are ignored by ad serving.+psDisregardOverdelivery :: Lens' PricingSchedule (Maybe Bool)+psDisregardOverdelivery+  = lens _psDisregardOverdelivery+      (\ s a -> s{_psDisregardOverdelivery = a})++-- | Placement start date. This date must be later than, or the same day as,+-- the campaign start date. The hours, minutes, and seconds of the start+-- date should not be set, as doing so will result in an error. This field+-- is required on insertion.+psStartDate :: Lens' PricingSchedule (Maybe Day)+psStartDate+  = lens _psStartDate (\ s a -> s{_psStartDate = a}) .+      mapping _Date++-- | Placement cap cost option.+psCapCostOption :: Lens' PricingSchedule (Maybe PricingScheduleCapCostOption)+psCapCostOption+  = lens _psCapCostOption+      (\ s a -> s{_psCapCostOption = a})++-- | Placement pricing type. This field is required on insertion.+psPricingType :: Lens' PricingSchedule (Maybe PricingSchedulePricingType)+psPricingType+  = lens _psPricingType+      (\ s a -> s{_psPricingType = a})++-- | Pricing periods for this placement.+psPricingPeriods :: Lens' PricingSchedule [PricingSchedulePricingPeriod]+psPricingPeriods+  = lens _psPricingPeriods+      (\ s a -> s{_psPricingPeriods = a})+      . _Default+      . _Coerce++-- | Whether this placement is flighted. If true, pricing periods will be+-- computed automatically.+psFlighted :: Lens' PricingSchedule (Maybe Bool)+psFlighted+  = lens _psFlighted (\ s a -> s{_psFlighted = a})++instance FromJSON PricingSchedule where+        parseJSON+          = withObject "PricingSchedule"+              (\ o ->+                 PricingSchedule' <$>+                   (o .:? "testingStartDate") <*>+                     (o .:? "floodlightActivityId")+                     <*> (o .:? "endDate")+                     <*> (o .:? "disregardOverdelivery")+                     <*> (o .:? "startDate")+                     <*> (o .:? "capCostOption")+                     <*> (o .:? "pricingType")+                     <*> (o .:? "pricingPeriods" .!= mempty)+                     <*> (o .:? "flighted"))++instance ToJSON PricingSchedule where+        toJSON PricingSchedule'{..}+          = object+              (catMaybes+                 [("testingStartDate" .=) <$> _psTestingStartDate,+                  ("floodlightActivityId" .=) <$>+                    _psFloodlightActivityId,+                  ("endDate" .=) <$> _psEndDate,+                  ("disregardOverdelivery" .=) <$>+                    _psDisregardOverdelivery,+                  ("startDate" .=) <$> _psStartDate,+                  ("capCostOption" .=) <$> _psCapCostOption,+                  ("pricingType" .=) <$> _psPricingType,+                  ("pricingPeriods" .=) <$> _psPricingPeriods,+                  ("flighted" .=) <$> _psFlighted])++-- | Contains information about a postal code that can be targeted by ads.+--+-- /See:/ 'postalCode' smart constructor.+data PostalCode = PostalCode'+    { _pcKind          :: !Text+    , _pcCode          :: !(Maybe Text)+    , _pcCountryCode   :: !(Maybe Text)+    , _pcId            :: !(Maybe Text)+    , _pcCountryDartId :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'PostalCode' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'pcKind'+--+-- * 'pcCode'+--+-- * 'pcCountryCode'+--+-- * 'pcId'+--+-- * 'pcCountryDartId'+postalCode+    :: PostalCode+postalCode =+    PostalCode'+    { _pcKind = "dfareporting#postalCode"+    , _pcCode = Nothing+    , _pcCountryCode = Nothing+    , _pcId = Nothing+    , _pcCountryDartId = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#postalCode\".+pcKind :: Lens' PostalCode Text+pcKind = lens _pcKind (\ s a -> s{_pcKind = a})++-- | Postal code. This is equivalent to the id field.+pcCode :: Lens' PostalCode (Maybe Text)+pcCode = lens _pcCode (\ s a -> s{_pcCode = a})++-- | Country code of the country to which this postal code belongs.+pcCountryCode :: Lens' PostalCode (Maybe Text)+pcCountryCode+  = lens _pcCountryCode+      (\ s a -> s{_pcCountryCode = a})++-- | ID of this postal code.+pcId :: Lens' PostalCode (Maybe Text)+pcId = lens _pcId (\ s a -> s{_pcId = a})++-- | DART ID of the country to which this postal code belongs.+pcCountryDartId :: Lens' PostalCode (Maybe Int64)+pcCountryDartId+  = lens _pcCountryDartId+      (\ s a -> s{_pcCountryDartId = a})+      . mapping _Coerce++instance FromJSON PostalCode where+        parseJSON+          = withObject "PostalCode"+              (\ o ->+                 PostalCode' <$>+                   (o .:? "kind" .!= "dfareporting#postalCode") <*>+                     (o .:? "code")+                     <*> (o .:? "countryCode")+                     <*> (o .:? "id")+                     <*> (o .:? "countryDartId"))++instance ToJSON PostalCode where+        toJSON PostalCode'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _pcKind), ("code" .=) <$> _pcCode,+                  ("countryCode" .=) <$> _pcCountryCode,+                  ("id" .=) <$> _pcId,+                  ("countryDartId" .=) <$> _pcCountryDartId])++-- | Account Permission List Response+--+-- /See:/ 'accountPermissionsListResponse' smart constructor.+data AccountPermissionsListResponse = AccountPermissionsListResponse'+    { _aplrKind               :: !Text+    , _aplrAccountPermissions :: !(Maybe [AccountPermission])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'AccountPermissionsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'aplrKind'+--+-- * 'aplrAccountPermissions'+accountPermissionsListResponse+    :: AccountPermissionsListResponse+accountPermissionsListResponse =+    AccountPermissionsListResponse'+    { _aplrKind = "dfareporting#accountPermissionsListResponse"+    , _aplrAccountPermissions = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#accountPermissionsListResponse\".+aplrKind :: Lens' AccountPermissionsListResponse Text+aplrKind = lens _aplrKind (\ s a -> s{_aplrKind = a})++-- | Account permission collection.+aplrAccountPermissions :: Lens' AccountPermissionsListResponse [AccountPermission]+aplrAccountPermissions+  = lens _aplrAccountPermissions+      (\ s a -> s{_aplrAccountPermissions = a})+      . _Default+      . _Coerce++instance FromJSON AccountPermissionsListResponse+         where+        parseJSON+          = withObject "AccountPermissionsListResponse"+              (\ o ->+                 AccountPermissionsListResponse' <$>+                   (o .:? "kind" .!=+                      "dfareporting#accountPermissionsListResponse")+                     <*> (o .:? "accountPermissions" .!= mempty))++instance ToJSON AccountPermissionsListResponse where+        toJSON AccountPermissionsListResponse'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _aplrKind),+                  ("accountPermissions" .=) <$>+                    _aplrAccountPermissions])++-- | Contains information about a country that can be targeted by ads.+--+-- /See:/ 'country' smart constructor.+data Country = Country'+    { _cKind        :: !Text+    , _cName        :: !(Maybe Text)+    , _cCountryCode :: !(Maybe Text)+    , _cDartId      :: !(Maybe (Textual Int64))+    , _cSSLEnabled  :: !(Maybe Bool)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Country' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cKind'+--+-- * 'cName'+--+-- * 'cCountryCode'+--+-- * 'cDartId'+--+-- * 'cSSLEnabled'+country+    :: Country+country =+    Country'+    { _cKind = "dfareporting#country"+    , _cName = Nothing+    , _cCountryCode = Nothing+    , _cDartId = Nothing+    , _cSSLEnabled = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#country\".+cKind :: Lens' Country Text+cKind = lens _cKind (\ s a -> s{_cKind = a})++-- | Name of this country.+cName :: Lens' Country (Maybe Text)+cName = lens _cName (\ s a -> s{_cName = a})++-- | Country code.+cCountryCode :: Lens' Country (Maybe Text)+cCountryCode+  = lens _cCountryCode (\ s a -> s{_cCountryCode = a})++-- | DART ID of this country. This is the ID used for targeting and+-- generating reports.+cDartId :: Lens' Country (Maybe Int64)+cDartId+  = lens _cDartId (\ s a -> s{_cDartId = a}) .+      mapping _Coerce++-- | Whether ad serving supports secure servers in this country.+cSSLEnabled :: Lens' Country (Maybe Bool)+cSSLEnabled+  = lens _cSSLEnabled (\ s a -> s{_cSSLEnabled = a})++instance FromJSON Country where+        parseJSON+          = withObject "Country"+              (\ o ->+                 Country' <$>+                   (o .:? "kind" .!= "dfareporting#country") <*>+                     (o .:? "name")+                     <*> (o .:? "countryCode")+                     <*> (o .:? "dartId")+                     <*> (o .:? "sslEnabled"))++instance ToJSON Country where+        toJSON Country'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _cKind), ("name" .=) <$> _cName,+                  ("countryCode" .=) <$> _cCountryCode,+                  ("dartId" .=) <$> _cDartId,+                  ("sslEnabled" .=) <$> _cSSLEnabled])++-- | Operating System Version List Response+--+-- /See:/ 'operatingSystemVersionsListResponse' smart constructor.+data OperatingSystemVersionsListResponse = OperatingSystemVersionsListResponse'+    { _osvlrKind                    :: !Text+    , _osvlrOperatingSystemVersions :: !(Maybe [OperatingSystemVersion])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'OperatingSystemVersionsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'osvlrKind'+--+-- * 'osvlrOperatingSystemVersions'+operatingSystemVersionsListResponse+    :: OperatingSystemVersionsListResponse+operatingSystemVersionsListResponse =+    OperatingSystemVersionsListResponse'+    { _osvlrKind = "dfareporting#operatingSystemVersionsListResponse"+    , _osvlrOperatingSystemVersions = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#operatingSystemVersionsListResponse\".+osvlrKind :: Lens' OperatingSystemVersionsListResponse Text+osvlrKind+  = lens _osvlrKind (\ s a -> s{_osvlrKind = a})++-- | Operating system version collection.+osvlrOperatingSystemVersions :: Lens' OperatingSystemVersionsListResponse [OperatingSystemVersion]+osvlrOperatingSystemVersions+  = lens _osvlrOperatingSystemVersions+      (\ s a -> s{_osvlrOperatingSystemVersions = a})+      . _Default+      . _Coerce++instance FromJSON OperatingSystemVersionsListResponse+         where+        parseJSON+          = withObject "OperatingSystemVersionsListResponse"+              (\ o ->+                 OperatingSystemVersionsListResponse' <$>+                   (o .:? "kind" .!=+                      "dfareporting#operatingSystemVersionsListResponse")+                     <*> (o .:? "operatingSystemVersions" .!= mempty))++instance ToJSON OperatingSystemVersionsListResponse+         where+        toJSON OperatingSystemVersionsListResponse'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _osvlrKind),+                  ("operatingSystemVersions" .=) <$>+                    _osvlrOperatingSystemVersions])++-- | Click Through URL Suffix settings.+--+-- /See:/ 'clickThroughURLSuffixProperties' smart constructor.+data ClickThroughURLSuffixProperties = ClickThroughURLSuffixProperties'+    { _ctuspOverrideInheritedSuffix :: !(Maybe Bool)+    , _ctuspClickThroughURLSuffix   :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ClickThroughURLSuffixProperties' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ctuspOverrideInheritedSuffix'+--+-- * 'ctuspClickThroughURLSuffix'+clickThroughURLSuffixProperties+    :: ClickThroughURLSuffixProperties+clickThroughURLSuffixProperties =+    ClickThroughURLSuffixProperties'+    { _ctuspOverrideInheritedSuffix = Nothing+    , _ctuspClickThroughURLSuffix = Nothing+    }++-- | Whether this entity should override the inherited click-through URL+-- suffix with its own defined value.+ctuspOverrideInheritedSuffix :: Lens' ClickThroughURLSuffixProperties (Maybe Bool)+ctuspOverrideInheritedSuffix+  = lens _ctuspOverrideInheritedSuffix+      (\ s a -> s{_ctuspOverrideInheritedSuffix = a})++-- | Click-through URL suffix to apply to all ads in this entity\'s scope.+-- Must be less than 128 characters long.+ctuspClickThroughURLSuffix :: Lens' ClickThroughURLSuffixProperties (Maybe Text)+ctuspClickThroughURLSuffix+  = lens _ctuspClickThroughURLSuffix+      (\ s a -> s{_ctuspClickThroughURLSuffix = a})++instance FromJSON ClickThroughURLSuffixProperties+         where+        parseJSON+          = withObject "ClickThroughURLSuffixProperties"+              (\ o ->+                 ClickThroughURLSuffixProperties' <$>+                   (o .:? "overrideInheritedSuffix") <*>+                     (o .:? "clickThroughUrlSuffix"))++instance ToJSON ClickThroughURLSuffixProperties where+        toJSON ClickThroughURLSuffixProperties'{..}+          = object+              (catMaybes+                 [("overrideInheritedSuffix" .=) <$>+                    _ctuspOverrideInheritedSuffix,+                  ("clickThroughUrlSuffix" .=) <$>+                    _ctuspClickThroughURLSuffix])++-- | Pricing Information+--+-- /See:/ 'pricing' smart constructor.+data Pricing = Pricing'+    { _priEndDate     :: !(Maybe Date')+    , _priStartDate   :: !(Maybe Date')+    , _priGroupType   :: !(Maybe PricingGroupType)+    , _priPricingType :: !(Maybe PricingPricingType)+    , _priFlights     :: !(Maybe [Flight])+    , _priCapCostType :: !(Maybe PricingCapCostType)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Pricing' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'priEndDate'+--+-- * 'priStartDate'+--+-- * 'priGroupType'+--+-- * 'priPricingType'+--+-- * 'priFlights'+--+-- * 'priCapCostType'+pricing+    :: Pricing+pricing =+    Pricing'+    { _priEndDate = Nothing+    , _priStartDate = Nothing+    , _priGroupType = Nothing+    , _priPricingType = Nothing+    , _priFlights = Nothing+    , _priCapCostType = Nothing+    }++-- | End date of this inventory item.+priEndDate :: Lens' Pricing (Maybe Day)+priEndDate+  = lens _priEndDate (\ s a -> s{_priEndDate = a}) .+      mapping _Date++-- | Start date of this inventory item.+priStartDate :: Lens' Pricing (Maybe Day)+priStartDate+  = lens _priStartDate (\ s a -> s{_priStartDate = a})+      . mapping _Date++-- | Group type of this inventory item if it represents a placement group. Is+-- null otherwise. There are two type of placement groups:+-- PLANNING_PLACEMENT_GROUP_TYPE_PACKAGE is a simple group of inventory+-- items that acts as a single pricing point for a group of tags.+-- PLANNING_PLACEMENT_GROUP_TYPE_ROADBLOCK is a group of inventory items+-- that not only acts as a single pricing point, but also assumes that all+-- the tags in it will be served at the same time. A roadblock requires one+-- of its assigned inventory items to be marked as primary.+priGroupType :: Lens' Pricing (Maybe PricingGroupType)+priGroupType+  = lens _priGroupType (\ s a -> s{_priGroupType = a})++-- | Pricing type of this inventory item.+priPricingType :: Lens' Pricing (Maybe PricingPricingType)+priPricingType+  = lens _priPricingType+      (\ s a -> s{_priPricingType = a})++-- | Flights of this inventory item. A flight (a.k.a. pricing period)+-- represents the inventory item pricing information for a specific period+-- of time.+priFlights :: Lens' Pricing [Flight]+priFlights+  = lens _priFlights (\ s a -> s{_priFlights = a}) .+      _Default+      . _Coerce++-- | Cap cost type of this inventory item.+priCapCostType :: Lens' Pricing (Maybe PricingCapCostType)+priCapCostType+  = lens _priCapCostType+      (\ s a -> s{_priCapCostType = a})++instance FromJSON Pricing where+        parseJSON+          = withObject "Pricing"+              (\ o ->+                 Pricing' <$>+                   (o .:? "endDate") <*> (o .:? "startDate") <*>+                     (o .:? "groupType")+                     <*> (o .:? "pricingType")+                     <*> (o .:? "flights" .!= mempty)+                     <*> (o .:? "capCostType"))++instance ToJSON Pricing where+        toJSON Pricing'{..}+          = object+              (catMaybes+                 [("endDate" .=) <$> _priEndDate,+                  ("startDate" .=) <$> _priStartDate,+                  ("groupType" .=) <$> _priGroupType,+                  ("pricingType" .=) <$> _priPricingType,+                  ("flights" .=) <$> _priFlights,+                  ("capCostType" .=) <$> _priCapCostType])++-- | Audience Segment Group.+--+-- /See:/ 'audienceSegmentGroup' smart constructor.+data AudienceSegmentGroup = AudienceSegmentGroup'+    { _asgAudienceSegments :: !(Maybe [AudienceSegment])+    , _asgName             :: !(Maybe Text)+    , _asgId               :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'AudienceSegmentGroup' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'asgAudienceSegments'+--+-- * 'asgName'+--+-- * 'asgId'+audienceSegmentGroup+    :: AudienceSegmentGroup+audienceSegmentGroup =+    AudienceSegmentGroup'+    { _asgAudienceSegments = Nothing+    , _asgName = Nothing+    , _asgId = Nothing+    }++-- | Audience segments assigned to this group. The number of segments must be+-- between 2 and 100.+asgAudienceSegments :: Lens' AudienceSegmentGroup [AudienceSegment]+asgAudienceSegments+  = lens _asgAudienceSegments+      (\ s a -> s{_asgAudienceSegments = a})+      . _Default+      . _Coerce++-- | Name of this audience segment group. This is a required field and must+-- be less than 65 characters long.+asgName :: Lens' AudienceSegmentGroup (Maybe Text)+asgName = lens _asgName (\ s a -> s{_asgName = a})++-- | ID of this audience segment group. This is a read-only, auto-generated+-- field.+asgId :: Lens' AudienceSegmentGroup (Maybe Int64)+asgId+  = lens _asgId (\ s a -> s{_asgId = a}) .+      mapping _Coerce++instance FromJSON AudienceSegmentGroup where+        parseJSON+          = withObject "AudienceSegmentGroup"+              (\ o ->+                 AudienceSegmentGroup' <$>+                   (o .:? "audienceSegments" .!= mempty) <*>+                     (o .:? "name")+                     <*> (o .:? "id"))++instance ToJSON AudienceSegmentGroup where+        toJSON AudienceSegmentGroup'{..}+          = object+              (catMaybes+                 [("audienceSegments" .=) <$> _asgAudienceSegments,+                  ("name" .=) <$> _asgName, ("id" .=) <$> _asgId])++-- | Contains information about an operating system that can be targeted by+-- ads.+--+-- /See:/ 'operatingSystem' smart constructor.+data OperatingSystem = OperatingSystem'+    { _osDesktop :: !(Maybe Bool)+    , _osKind    :: !Text+    , _osName    :: !(Maybe Text)+    , _osMobile  :: !(Maybe Bool)+    , _osDartId  :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'OperatingSystem' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'osDesktop'+--+-- * 'osKind'+--+-- * 'osName'+--+-- * 'osMobile'+--+-- * 'osDartId'+operatingSystem+    :: OperatingSystem+operatingSystem =+    OperatingSystem'+    { _osDesktop = Nothing+    , _osKind = "dfareporting#operatingSystem"+    , _osName = Nothing+    , _osMobile = Nothing+    , _osDartId = Nothing+    }++-- | Whether this operating system is for desktop.+osDesktop :: Lens' OperatingSystem (Maybe Bool)+osDesktop+  = lens _osDesktop (\ s a -> s{_osDesktop = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#operatingSystem\".+osKind :: Lens' OperatingSystem Text+osKind = lens _osKind (\ s a -> s{_osKind = a})++-- | Name of this operating system.+osName :: Lens' OperatingSystem (Maybe Text)+osName = lens _osName (\ s a -> s{_osName = a})++-- | Whether this operating system is for mobile.+osMobile :: Lens' OperatingSystem (Maybe Bool)+osMobile = lens _osMobile (\ s a -> s{_osMobile = a})++-- | DART ID of this operating system. This is the ID used for targeting.+osDartId :: Lens' OperatingSystem (Maybe Int64)+osDartId+  = lens _osDartId (\ s a -> s{_osDartId = a}) .+      mapping _Coerce++instance FromJSON OperatingSystem where+        parseJSON+          = withObject "OperatingSystem"+              (\ o ->+                 OperatingSystem' <$>+                   (o .:? "desktop") <*>+                     (o .:? "kind" .!= "dfareporting#operatingSystem")+                     <*> (o .:? "name")+                     <*> (o .:? "mobile")+                     <*> (o .:? "dartId"))++instance ToJSON OperatingSystem where+        toJSON OperatingSystem'{..}+          = object+              (catMaybes+                 [("desktop" .=) <$> _osDesktop,+                  Just ("kind" .= _osKind), ("name" .=) <$> _osName,+                  ("mobile" .=) <$> _osMobile,+                  ("dartId" .=) <$> _osDartId])++-- | Flight+--+-- /See:/ 'flight' smart constructor.+data Flight = Flight'+    { _fRateOrCost :: !(Maybe (Textual Int64))+    , _fEndDate    :: !(Maybe Date')+    , _fStartDate  :: !(Maybe Date')+    , _fUnits      :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Flight' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'fRateOrCost'+--+-- * 'fEndDate'+--+-- * 'fStartDate'+--+-- * 'fUnits'+flight+    :: Flight+flight =+    Flight'+    { _fRateOrCost = Nothing+    , _fEndDate = Nothing+    , _fStartDate = Nothing+    , _fUnits = Nothing+    }++-- | Rate or cost of this flight.+fRateOrCost :: Lens' Flight (Maybe Int64)+fRateOrCost+  = lens _fRateOrCost (\ s a -> s{_fRateOrCost = a}) .+      mapping _Coerce++-- | Inventory item flight end date.+fEndDate :: Lens' Flight (Maybe Day)+fEndDate+  = lens _fEndDate (\ s a -> s{_fEndDate = a}) .+      mapping _Date++-- | Inventory item flight start date.+fStartDate :: Lens' Flight (Maybe Day)+fStartDate+  = lens _fStartDate (\ s a -> s{_fStartDate = a}) .+      mapping _Date++-- | Units of this flight.+fUnits :: Lens' Flight (Maybe Int64)+fUnits+  = lens _fUnits (\ s a -> s{_fUnits = a}) .+      mapping _Coerce++instance FromJSON Flight where+        parseJSON+          = withObject "Flight"+              (\ o ->+                 Flight' <$>+                   (o .:? "rateOrCost") <*> (o .:? "endDate") <*>+                     (o .:? "startDate")+                     <*> (o .:? "units"))++instance ToJSON Flight where+        toJSON Flight'{..}+          = object+              (catMaybes+                 [("rateOrCost" .=) <$> _fRateOrCost,+                  ("endDate" .=) <$> _fEndDate,+                  ("startDate" .=) <$> _fStartDate,+                  ("units" .=) <$> _fUnits])++-- | City List Response+--+-- /See:/ 'citiesListResponse' smart constructor.+data CitiesListResponse = CitiesListResponse'+    { _citKind   :: !Text+    , _citCities :: !(Maybe [City])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CitiesListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'citKind'+--+-- * 'citCities'+citiesListResponse+    :: CitiesListResponse+citiesListResponse =+    CitiesListResponse'+    { _citKind = "dfareporting#citiesListResponse"+    , _citCities = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#citiesListResponse\".+citKind :: Lens' CitiesListResponse Text+citKind = lens _citKind (\ s a -> s{_citKind = a})++-- | City collection.+citCities :: Lens' CitiesListResponse [City]+citCities+  = lens _citCities (\ s a -> s{_citCities = a}) .+      _Default+      . _Coerce++instance FromJSON CitiesListResponse where+        parseJSON+          = withObject "CitiesListResponse"+              (\ o ->+                 CitiesListResponse' <$>+                   (o .:? "kind" .!= "dfareporting#citiesListResponse")+                     <*> (o .:? "cities" .!= mempty))++instance ToJSON CitiesListResponse where+        toJSON CitiesListResponse'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _citKind),+                  ("cities" .=) <$> _citCities])++-- | Represents a dimension.+--+-- /See:/ 'dimension' smart constructor.+data Dimension = Dimension'+    { _dKind :: !Text+    , _dName :: !(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:+--+-- * 'dKind'+--+-- * 'dName'+dimension+    :: Dimension+dimension =+    Dimension'+    { _dKind = "dfareporting#dimension"+    , _dName = Nothing+    }++-- | The kind of resource this is, in this case dfareporting#dimension.+dKind :: Lens' Dimension Text+dKind = lens _dKind (\ s a -> s{_dKind = a})++-- | The dimension name, e.g. dfa:advertiser+dName :: Lens' Dimension (Maybe Text)+dName = lens _dName (\ s a -> s{_dName = a})++instance FromJSON Dimension where+        parseJSON+          = withObject "Dimension"+              (\ o ->+                 Dimension' <$>+                   (o .:? "kind" .!= "dfareporting#dimension") <*>+                     (o .:? "name"))++instance ToJSON Dimension where+        toJSON Dimension'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _dKind), ("name" .=) <$> _dName])++-- | The report criteria for a report of type \"REACH\".+--+-- /See:/ 'reportReachCriteria' smart constructor.+data ReportReachCriteria = ReportReachCriteria'+    { _rrcReachByFrequencyMetricNames    :: !(Maybe [Text])+    , _rrcEnableAllDimensionCombinations :: !(Maybe Bool)+    , _rrcMetricNames                    :: !(Maybe [Text])+    , _rrcCustomRichMediaEvents          :: !(Maybe CustomRichMediaEvents)+    , _rrcDimensionFilters               :: !(Maybe [DimensionValue])+    , _rrcActivities                     :: !(Maybe Activities)+    , _rrcDateRange                      :: !(Maybe DateRange)+    , _rrcDimensions                     :: !(Maybe [SortedDimension])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ReportReachCriteria' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rrcReachByFrequencyMetricNames'+--+-- * 'rrcEnableAllDimensionCombinations'+--+-- * 'rrcMetricNames'+--+-- * 'rrcCustomRichMediaEvents'+--+-- * 'rrcDimensionFilters'+--+-- * 'rrcActivities'+--+-- * 'rrcDateRange'+--+-- * 'rrcDimensions'+reportReachCriteria+    :: ReportReachCriteria+reportReachCriteria =+    ReportReachCriteria'+    { _rrcReachByFrequencyMetricNames = Nothing+    , _rrcEnableAllDimensionCombinations = Nothing+    , _rrcMetricNames = Nothing+    , _rrcCustomRichMediaEvents = Nothing+    , _rrcDimensionFilters = Nothing+    , _rrcActivities = Nothing+    , _rrcDateRange = Nothing+    , _rrcDimensions = Nothing+    }++-- | The list of names of Reach By Frequency metrics the report should+-- include.+rrcReachByFrequencyMetricNames :: Lens' ReportReachCriteria [Text]+rrcReachByFrequencyMetricNames+  = lens _rrcReachByFrequencyMetricNames+      (\ s a -> s{_rrcReachByFrequencyMetricNames = a})+      . _Default+      . _Coerce++-- | Whether to enable all reach dimension combinations in the report.+-- Defaults to false. If enabled, the date range of the report should be+-- within the last three months.+rrcEnableAllDimensionCombinations :: Lens' ReportReachCriteria (Maybe Bool)+rrcEnableAllDimensionCombinations+  = lens _rrcEnableAllDimensionCombinations+      (\ s a -> s{_rrcEnableAllDimensionCombinations = a})++-- | The list of names of metrics the report should include.+rrcMetricNames :: Lens' ReportReachCriteria [Text]+rrcMetricNames+  = lens _rrcMetricNames+      (\ s a -> s{_rrcMetricNames = a})+      . _Default+      . _Coerce++-- | Custom Rich Media Events group.+rrcCustomRichMediaEvents :: Lens' ReportReachCriteria (Maybe CustomRichMediaEvents)+rrcCustomRichMediaEvents+  = lens _rrcCustomRichMediaEvents+      (\ s a -> s{_rrcCustomRichMediaEvents = a})++-- | The list of filters on which dimensions are filtered. Filters for+-- different dimensions are ANDed, filters for the same dimension are+-- grouped together and ORed.+rrcDimensionFilters :: Lens' ReportReachCriteria [DimensionValue]+rrcDimensionFilters+  = lens _rrcDimensionFilters+      (\ s a -> s{_rrcDimensionFilters = a})+      . _Default+      . _Coerce++-- | Activity group.+rrcActivities :: Lens' ReportReachCriteria (Maybe Activities)+rrcActivities+  = lens _rrcActivities+      (\ s a -> s{_rrcActivities = a})++-- | The date range this report should be run for.+rrcDateRange :: Lens' ReportReachCriteria (Maybe DateRange)+rrcDateRange+  = lens _rrcDateRange (\ s a -> s{_rrcDateRange = a})++-- | The list of dimensions the report should include.+rrcDimensions :: Lens' ReportReachCriteria [SortedDimension]+rrcDimensions+  = lens _rrcDimensions+      (\ s a -> s{_rrcDimensions = a})+      . _Default+      . _Coerce++instance FromJSON ReportReachCriteria where+        parseJSON+          = withObject "ReportReachCriteria"+              (\ o ->+                 ReportReachCriteria' <$>+                   (o .:? "reachByFrequencyMetricNames" .!= mempty) <*>+                     (o .:? "enableAllDimensionCombinations")+                     <*> (o .:? "metricNames" .!= mempty)+                     <*> (o .:? "customRichMediaEvents")+                     <*> (o .:? "dimensionFilters" .!= mempty)+                     <*> (o .:? "activities")+                     <*> (o .:? "dateRange")+                     <*> (o .:? "dimensions" .!= mempty))++instance ToJSON ReportReachCriteria where+        toJSON ReportReachCriteria'{..}+          = object+              (catMaybes+                 [("reachByFrequencyMetricNames" .=) <$>+                    _rrcReachByFrequencyMetricNames,+                  ("enableAllDimensionCombinations" .=) <$>+                    _rrcEnableAllDimensionCombinations,+                  ("metricNames" .=) <$> _rrcMetricNames,+                  ("customRichMediaEvents" .=) <$>+                    _rrcCustomRichMediaEvents,+                  ("dimensionFilters" .=) <$> _rrcDimensionFilters,+                  ("activities" .=) <$> _rrcActivities,+                  ("dateRange" .=) <$> _rrcDateRange,+                  ("dimensions" .=) <$> _rrcDimensions])++-- | Represents a Custom Rich Media Events group.+--+-- /See:/ 'customRichMediaEvents' smart constructor.+data CustomRichMediaEvents = CustomRichMediaEvents'+    { _crmeKind             :: !Text+    , _crmeFilteredEventIds :: !(Maybe [DimensionValue])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CustomRichMediaEvents' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'crmeKind'+--+-- * 'crmeFilteredEventIds'+customRichMediaEvents+    :: CustomRichMediaEvents+customRichMediaEvents =+    CustomRichMediaEvents'+    { _crmeKind = "dfareporting#customRichMediaEvents"+    , _crmeFilteredEventIds = Nothing+    }++-- | The kind of resource this is, in this case+-- dfareporting#customRichMediaEvents.+crmeKind :: Lens' CustomRichMediaEvents Text+crmeKind = lens _crmeKind (\ s a -> s{_crmeKind = a})++-- | List of custom rich media event IDs. Dimension values must be all of+-- type dfa:richMediaEventTypeIdAndName.+crmeFilteredEventIds :: Lens' CustomRichMediaEvents [DimensionValue]+crmeFilteredEventIds+  = lens _crmeFilteredEventIds+      (\ s a -> s{_crmeFilteredEventIds = a})+      . _Default+      . _Coerce++instance FromJSON CustomRichMediaEvents where+        parseJSON+          = withObject "CustomRichMediaEvents"+              (\ o ->+                 CustomRichMediaEvents' <$>+                   (o .:? "kind" .!=+                      "dfareporting#customRichMediaEvents")+                     <*> (o .:? "filteredEventIds" .!= mempty))++instance ToJSON CustomRichMediaEvents where+        toJSON CustomRichMediaEvents'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _crmeKind),+                  ("filteredEventIds" .=) <$> _crmeFilteredEventIds])++-- | Targetable remarketing list response+--+-- /See:/ 'targetableRemarketingListsListResponse' smart constructor.+data TargetableRemarketingListsListResponse = TargetableRemarketingListsListResponse'+    { _trllrNextPageToken              :: !(Maybe Text)+    , _trllrKind                       :: !Text+    , _trllrTargetableRemarketingLists :: !(Maybe [TargetableRemarketingList])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'TargetableRemarketingListsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'trllrNextPageToken'+--+-- * 'trllrKind'+--+-- * 'trllrTargetableRemarketingLists'+targetableRemarketingListsListResponse+    :: TargetableRemarketingListsListResponse+targetableRemarketingListsListResponse =+    TargetableRemarketingListsListResponse'+    { _trllrNextPageToken = Nothing+    , _trllrKind = "dfareporting#targetableRemarketingListsListResponse"+    , _trllrTargetableRemarketingLists = Nothing+    }++-- | Pagination token to be used for the next list operation.+trllrNextPageToken :: Lens' TargetableRemarketingListsListResponse (Maybe Text)+trllrNextPageToken+  = lens _trllrNextPageToken+      (\ s a -> s{_trllrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#targetableRemarketingListsListResponse\".+trllrKind :: Lens' TargetableRemarketingListsListResponse Text+trllrKind+  = lens _trllrKind (\ s a -> s{_trllrKind = a})++-- | Targetable remarketing list collection.+trllrTargetableRemarketingLists :: Lens' TargetableRemarketingListsListResponse [TargetableRemarketingList]+trllrTargetableRemarketingLists+  = lens _trllrTargetableRemarketingLists+      (\ s a -> s{_trllrTargetableRemarketingLists = a})+      . _Default+      . _Coerce++instance FromJSON+         TargetableRemarketingListsListResponse where+        parseJSON+          = withObject "TargetableRemarketingListsListResponse"+              (\ o ->+                 TargetableRemarketingListsListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!=+                        "dfareporting#targetableRemarketingListsListResponse")+                     <*> (o .:? "targetableRemarketingLists" .!= mempty))++instance ToJSON+         TargetableRemarketingListsListResponse where+        toJSON TargetableRemarketingListsListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _trllrNextPageToken,+                  Just ("kind" .= _trllrKind),+                  ("targetableRemarketingLists" .=) <$>+                    _trllrTargetableRemarketingLists])++-- | Change Log List Response+--+-- /See:/ 'changeLogsListResponse' smart constructor.+data ChangeLogsListResponse = ChangeLogsListResponse'+    { _cllrNextPageToken :: !(Maybe Text)+    , _cllrKind          :: !Text+    , _cllrChangeLogs    :: !(Maybe [ChangeLog])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ChangeLogsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cllrNextPageToken'+--+-- * 'cllrKind'+--+-- * 'cllrChangeLogs'+changeLogsListResponse+    :: ChangeLogsListResponse+changeLogsListResponse =+    ChangeLogsListResponse'+    { _cllrNextPageToken = Nothing+    , _cllrKind = "dfareporting#changeLogsListResponse"+    , _cllrChangeLogs = Nothing+    }++-- | Pagination token to be used for the next list operation.+cllrNextPageToken :: Lens' ChangeLogsListResponse (Maybe Text)+cllrNextPageToken+  = lens _cllrNextPageToken+      (\ s a -> s{_cllrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#changeLogsListResponse\".+cllrKind :: Lens' ChangeLogsListResponse Text+cllrKind = lens _cllrKind (\ s a -> s{_cllrKind = a})++-- | Change log collection.+cllrChangeLogs :: Lens' ChangeLogsListResponse [ChangeLog]+cllrChangeLogs+  = lens _cllrChangeLogs+      (\ s a -> s{_cllrChangeLogs = a})+      . _Default+      . _Coerce++instance FromJSON ChangeLogsListResponse where+        parseJSON+          = withObject "ChangeLogsListResponse"+              (\ o ->+                 ChangeLogsListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!=+                        "dfareporting#changeLogsListResponse")+                     <*> (o .:? "changeLogs" .!= mempty))++instance ToJSON ChangeLogsListResponse where+        toJSON ChangeLogsListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _cllrNextPageToken,+                  Just ("kind" .= _cllrKind),+                  ("changeLogs" .=) <$> _cllrChangeLogs])++-- | AccountUserProfiles contains properties of a DCM user profile. This+-- resource is specifically for managing user profiles, whereas+-- UserProfiles is for accessing the API.+--+-- /See:/ 'accountUserProFile' smart constructor.+data AccountUserProFile = AccountUserProFile'+    { _aupfEmail            :: !(Maybe Text)+    , _aupfUserRoleFilter   :: !(Maybe ObjectFilter)+    , _aupfAdvertiserFilter :: !(Maybe ObjectFilter)+    , _aupfUserRoleId       :: !(Maybe (Textual Int64))+    , _aupfKind             :: !Text+    , _aupfLocale           :: !(Maybe Text)+    , _aupfSiteFilter       :: !(Maybe ObjectFilter)+    , _aupfTraffickerType   :: !(Maybe AccountUserProFileTraffickerType)+    , _aupfActive           :: !(Maybe Bool)+    , _aupfAccountId        :: !(Maybe (Textual Int64))+    , _aupfName             :: !(Maybe Text)+    , _aupfId               :: !(Maybe (Textual Int64))+    , _aupfUserAccessType   :: !(Maybe AccountUserProFileUserAccessType)+    , _aupfComments         :: !(Maybe Text)+    , _aupfSubAccountId     :: !(Maybe (Textual Int64))+    , _aupfCampaignFilter   :: !(Maybe ObjectFilter)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'AccountUserProFile' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'aupfEmail'+--+-- * 'aupfUserRoleFilter'+--+-- * 'aupfAdvertiserFilter'+--+-- * 'aupfUserRoleId'+--+-- * 'aupfKind'+--+-- * 'aupfLocale'+--+-- * 'aupfSiteFilter'+--+-- * 'aupfTraffickerType'+--+-- * 'aupfActive'+--+-- * 'aupfAccountId'+--+-- * 'aupfName'+--+-- * 'aupfId'+--+-- * 'aupfUserAccessType'+--+-- * 'aupfComments'+--+-- * 'aupfSubAccountId'+--+-- * 'aupfCampaignFilter'+accountUserProFile+    :: AccountUserProFile+accountUserProFile =+    AccountUserProFile'+    { _aupfEmail = Nothing+    , _aupfUserRoleFilter = Nothing+    , _aupfAdvertiserFilter = Nothing+    , _aupfUserRoleId = Nothing+    , _aupfKind = "dfareporting#accountUserProfile"+    , _aupfLocale = Nothing+    , _aupfSiteFilter = Nothing+    , _aupfTraffickerType = Nothing+    , _aupfActive = Nothing+    , _aupfAccountId = Nothing+    , _aupfName = Nothing+    , _aupfId = Nothing+    , _aupfUserAccessType = Nothing+    , _aupfComments = Nothing+    , _aupfSubAccountId = Nothing+    , _aupfCampaignFilter = Nothing+    }++-- | Email of the user profile. The email addresss must be linked to a Google+-- Account. This field is required on insertion and is read-only after+-- insertion.+aupfEmail :: Lens' AccountUserProFile (Maybe Text)+aupfEmail+  = lens _aupfEmail (\ s a -> s{_aupfEmail = a})++-- | Filter that describes which user roles are visible to the user profile.+aupfUserRoleFilter :: Lens' AccountUserProFile (Maybe ObjectFilter)+aupfUserRoleFilter+  = lens _aupfUserRoleFilter+      (\ s a -> s{_aupfUserRoleFilter = a})++-- | Filter that describes which advertisers are visible to the user profile.+aupfAdvertiserFilter :: Lens' AccountUserProFile (Maybe ObjectFilter)+aupfAdvertiserFilter+  = lens _aupfAdvertiserFilter+      (\ s a -> s{_aupfAdvertiserFilter = a})++-- | User role ID of the user profile. This is a required field.+aupfUserRoleId :: Lens' AccountUserProFile (Maybe Int64)+aupfUserRoleId+  = lens _aupfUserRoleId+      (\ s a -> s{_aupfUserRoleId = a})+      . mapping _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#accountUserProfile\".+aupfKind :: Lens' AccountUserProFile Text+aupfKind = lens _aupfKind (\ s a -> s{_aupfKind = a})++-- | Locale of the user profile. This is a required field. Acceptable values+-- are: - \"cs\" (Czech) - \"de\" (German) - \"en\" (English) - \"en-GB\"+-- (English United Kingdom) - \"es\" (Spanish) - \"fr\" (French) - \"it\"+-- (Italian) - \"ja\" (Japanese) - \"ko\" (Korean) - \"pl\" (Polish) -+-- \"pt-BR\" (Portuguese Brazil) - \"ru\" (Russian) - \"sv\" (Swedish) -+-- \"tr\" (Turkish) - \"zh-CN\" (Chinese Simplified) - \"zh-TW\" (Chinese+-- Traditional)+aupfLocale :: Lens' AccountUserProFile (Maybe Text)+aupfLocale+  = lens _aupfLocale (\ s a -> s{_aupfLocale = a})++-- | Filter that describes which sites are visible to the user profile.+aupfSiteFilter :: Lens' AccountUserProFile (Maybe ObjectFilter)+aupfSiteFilter+  = lens _aupfSiteFilter+      (\ s a -> s{_aupfSiteFilter = a})++-- | Trafficker type of this user profile.+aupfTraffickerType :: Lens' AccountUserProFile (Maybe AccountUserProFileTraffickerType)+aupfTraffickerType+  = lens _aupfTraffickerType+      (\ s a -> s{_aupfTraffickerType = a})++-- | Whether this user profile is active. This defaults to false, and must be+-- set true on insert for the user profile to be usable.+aupfActive :: Lens' AccountUserProFile (Maybe Bool)+aupfActive+  = lens _aupfActive (\ s a -> s{_aupfActive = a})++-- | Account ID of the user profile. This is a read-only field that can be+-- left blank.+aupfAccountId :: Lens' AccountUserProFile (Maybe Int64)+aupfAccountId+  = lens _aupfAccountId+      (\ s a -> s{_aupfAccountId = a})+      . mapping _Coerce++-- | Name of the user profile. This is a required field. Must be less than 64+-- characters long, must be globally unique, and cannot contain whitespace+-- or any of the following characters: \"&;\"#%,\".+aupfName :: Lens' AccountUserProFile (Maybe Text)+aupfName = lens _aupfName (\ s a -> s{_aupfName = a})++-- | ID of the user profile. This is a read-only, auto-generated field.+aupfId :: Lens' AccountUserProFile (Maybe Int64)+aupfId+  = lens _aupfId (\ s a -> s{_aupfId = a}) .+      mapping _Coerce++-- | User type of the user profile. This is a read-only field that can be+-- left blank.+aupfUserAccessType :: Lens' AccountUserProFile (Maybe AccountUserProFileUserAccessType)+aupfUserAccessType+  = lens _aupfUserAccessType+      (\ s a -> s{_aupfUserAccessType = a})++-- | Comments for this user profile.+aupfComments :: Lens' AccountUserProFile (Maybe Text)+aupfComments+  = lens _aupfComments (\ s a -> s{_aupfComments = a})++-- | Subaccount ID of the user profile. This is a read-only field that can be+-- left blank.+aupfSubAccountId :: Lens' AccountUserProFile (Maybe Int64)+aupfSubAccountId+  = lens _aupfSubAccountId+      (\ s a -> s{_aupfSubAccountId = a})+      . mapping _Coerce++-- | Filter that describes which campaigns are visible to the user profile.+aupfCampaignFilter :: Lens' AccountUserProFile (Maybe ObjectFilter)+aupfCampaignFilter+  = lens _aupfCampaignFilter+      (\ s a -> s{_aupfCampaignFilter = a})++instance FromJSON AccountUserProFile where+        parseJSON+          = withObject "AccountUserProFile"+              (\ o ->+                 AccountUserProFile' <$>+                   (o .:? "email") <*> (o .:? "userRoleFilter") <*>+                     (o .:? "advertiserFilter")+                     <*> (o .:? "userRoleId")+                     <*>+                     (o .:? "kind" .!= "dfareporting#accountUserProfile")+                     <*> (o .:? "locale")+                     <*> (o .:? "siteFilter")+                     <*> (o .:? "traffickerType")+                     <*> (o .:? "active")+                     <*> (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "id")+                     <*> (o .:? "userAccessType")+                     <*> (o .:? "comments")+                     <*> (o .:? "subaccountId")+                     <*> (o .:? "campaignFilter"))++instance ToJSON AccountUserProFile where+        toJSON AccountUserProFile'{..}+          = object+              (catMaybes+                 [("email" .=) <$> _aupfEmail,+                  ("userRoleFilter" .=) <$> _aupfUserRoleFilter,+                  ("advertiserFilter" .=) <$> _aupfAdvertiserFilter,+                  ("userRoleId" .=) <$> _aupfUserRoleId,+                  Just ("kind" .= _aupfKind),+                  ("locale" .=) <$> _aupfLocale,+                  ("siteFilter" .=) <$> _aupfSiteFilter,+                  ("traffickerType" .=) <$> _aupfTraffickerType,+                  ("active" .=) <$> _aupfActive,+                  ("accountId" .=) <$> _aupfAccountId,+                  ("name" .=) <$> _aupfName, ("id" .=) <$> _aupfId,+                  ("userAccessType" .=) <$> _aupfUserAccessType,+                  ("comments" .=) <$> _aupfComments,+                  ("subaccountId" .=) <$> _aupfSubAccountId,+                  ("campaignFilter" .=) <$> _aupfCampaignFilter])++-- | Represents a DimensionValue resource.+--+-- /See:/ 'dimensionValue' smart constructor.+data DimensionValue = DimensionValue'+    { _dvEtag          :: !(Maybe Text)+    , _dvKind          :: !Text+    , _dvValue         :: !(Maybe Text)+    , _dvMatchType     :: !(Maybe DimensionValueMatchType)+    , _dvDimensionName :: !(Maybe Text)+    , _dvId            :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DimensionValue' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dvEtag'+--+-- * 'dvKind'+--+-- * 'dvValue'+--+-- * 'dvMatchType'+--+-- * 'dvDimensionName'+--+-- * 'dvId'+dimensionValue+    :: DimensionValue+dimensionValue =+    DimensionValue'+    { _dvEtag = Nothing+    , _dvKind = "dfareporting#dimensionValue"+    , _dvValue = Nothing+    , _dvMatchType = Nothing+    , _dvDimensionName = Nothing+    , _dvId = Nothing+    }++-- | The eTag of this response for caching purposes.+dvEtag :: Lens' DimensionValue (Maybe Text)+dvEtag = lens _dvEtag (\ s a -> s{_dvEtag = a})++-- | The kind of resource this is, in this case dfareporting#dimensionValue.+dvKind :: Lens' DimensionValue Text+dvKind = lens _dvKind (\ s a -> s{_dvKind = a})++-- | The value of the dimension.+dvValue :: Lens' DimensionValue (Maybe Text)+dvValue = lens _dvValue (\ s a -> s{_dvValue = a})++-- | Determines how the \'value\' field is matched when filtering. If not+-- specified, defaults to EXACT. If set to WILDCARD_EXPRESSION, \'*\' is+-- allowed as a placeholder for variable length character sequences, and it+-- can be escaped with a backslash. Note, only paid search dimensions+-- (\'dfa:paidSearch*\') allow a matchType other than EXACT.+dvMatchType :: Lens' DimensionValue (Maybe DimensionValueMatchType)+dvMatchType+  = lens _dvMatchType (\ s a -> s{_dvMatchType = a})++-- | The name of the dimension.+dvDimensionName :: Lens' DimensionValue (Maybe Text)+dvDimensionName+  = lens _dvDimensionName+      (\ s a -> s{_dvDimensionName = a})++-- | The ID associated with the value if available.+dvId :: Lens' DimensionValue (Maybe Text)+dvId = lens _dvId (\ s a -> s{_dvId = a})++instance FromJSON DimensionValue where+        parseJSON+          = withObject "DimensionValue"+              (\ o ->+                 DimensionValue' <$>+                   (o .:? "etag") <*>+                     (o .:? "kind" .!= "dfareporting#dimensionValue")+                     <*> (o .:? "value")+                     <*> (o .:? "matchType")+                     <*> (o .:? "dimensionName")+                     <*> (o .:? "id"))++instance ToJSON DimensionValue where+        toJSON DimensionValue'{..}+          = object+              (catMaybes+                 [("etag" .=) <$> _dvEtag, Just ("kind" .= _dvKind),+                  ("value" .=) <$> _dvValue,+                  ("matchType" .=) <$> _dvMatchType,+                  ("dimensionName" .=) <$> _dvDimensionName,+                  ("id" .=) <$> _dvId])++-- | Represents an activity group.+--+-- /See:/ 'activities' smart constructor.+data Activities = Activities'+    { _actKind        :: !Text+    , _actMetricNames :: !(Maybe [Text])+    , _actFilters     :: !(Maybe [DimensionValue])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Activities' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'actKind'+--+-- * 'actMetricNames'+--+-- * 'actFilters'+activities+    :: Activities+activities =+    Activities'+    { _actKind = "dfareporting#activities"+    , _actMetricNames = Nothing+    , _actFilters = Nothing+    }++-- | The kind of resource this is, in this case dfareporting#activities.+actKind :: Lens' Activities Text+actKind = lens _actKind (\ s a -> s{_actKind = a})++-- | List of names of floodlight activity metrics.+actMetricNames :: Lens' Activities [Text]+actMetricNames+  = lens _actMetricNames+      (\ s a -> s{_actMetricNames = a})+      . _Default+      . _Coerce++-- | List of activity filters. The dimension values need to be all either of+-- type \"dfa:activity\" or \"dfa:activityGroup\".+actFilters :: Lens' Activities [DimensionValue]+actFilters+  = lens _actFilters (\ s a -> s{_actFilters = a}) .+      _Default+      . _Coerce++instance FromJSON Activities where+        parseJSON+          = withObject "Activities"+              (\ o ->+                 Activities' <$>+                   (o .:? "kind" .!= "dfareporting#activities") <*>+                     (o .:? "metricNames" .!= mempty)+                     <*> (o .:? "filters" .!= mempty))++instance ToJSON Activities where+        toJSON Activities'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _actKind),+                  ("metricNames" .=) <$> _actMetricNames,+                  ("filters" .=) <$> _actFilters])++-- | User Role Permission Group List Response+--+-- /See:/ 'userRolePermissionGroupsListResponse' smart constructor.+data UserRolePermissionGroupsListResponse = UserRolePermissionGroupsListResponse'+    { _urpglrUserRolePermissionGroups :: !(Maybe [UserRolePermissionGroup])+    , _urpglrKind                     :: !Text+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'UserRolePermissionGroupsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'urpglrUserRolePermissionGroups'+--+-- * 'urpglrKind'+userRolePermissionGroupsListResponse+    :: UserRolePermissionGroupsListResponse+userRolePermissionGroupsListResponse =+    UserRolePermissionGroupsListResponse'+    { _urpglrUserRolePermissionGroups = Nothing+    , _urpglrKind = "dfareporting#userRolePermissionGroupsListResponse"+    }++-- | User role permission group collection.+urpglrUserRolePermissionGroups :: Lens' UserRolePermissionGroupsListResponse [UserRolePermissionGroup]+urpglrUserRolePermissionGroups+  = lens _urpglrUserRolePermissionGroups+      (\ s a -> s{_urpglrUserRolePermissionGroups = a})+      . _Default+      . _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#userRolePermissionGroupsListResponse\".+urpglrKind :: Lens' UserRolePermissionGroupsListResponse Text+urpglrKind+  = lens _urpglrKind (\ s a -> s{_urpglrKind = a})++instance FromJSON+         UserRolePermissionGroupsListResponse where+        parseJSON+          = withObject "UserRolePermissionGroupsListResponse"+              (\ o ->+                 UserRolePermissionGroupsListResponse' <$>+                   (o .:? "userRolePermissionGroups" .!= mempty) <*>+                     (o .:? "kind" .!=+                        "dfareporting#userRolePermissionGroupsListResponse"))++instance ToJSON UserRolePermissionGroupsListResponse+         where+        toJSON UserRolePermissionGroupsListResponse'{..}+          = object+              (catMaybes+                 [("userRolePermissionGroups" .=) <$>+                    _urpglrUserRolePermissionGroups,+                  Just ("kind" .= _urpglrKind)])++-- | Placement Tag+--+-- /See:/ 'placementTag' smart constructor.+data PlacementTag = PlacementTag'+    { _ptPlacementId :: !(Maybe (Textual Int64))+    , _ptTagDatas    :: !(Maybe [TagData])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'PlacementTag' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ptPlacementId'+--+-- * 'ptTagDatas'+placementTag+    :: PlacementTag+placementTag =+    PlacementTag'+    { _ptPlacementId = Nothing+    , _ptTagDatas = Nothing+    }++-- | Placement ID+ptPlacementId :: Lens' PlacementTag (Maybe Int64)+ptPlacementId+  = lens _ptPlacementId+      (\ s a -> s{_ptPlacementId = a})+      . mapping _Coerce++-- | Tags generated for this placement.+ptTagDatas :: Lens' PlacementTag [TagData]+ptTagDatas+  = lens _ptTagDatas (\ s a -> s{_ptTagDatas = a}) .+      _Default+      . _Coerce++instance FromJSON PlacementTag where+        parseJSON+          = withObject "PlacementTag"+              (\ o ->+                 PlacementTag' <$>+                   (o .:? "placementId") <*>+                     (o .:? "tagDatas" .!= mempty))++instance ToJSON PlacementTag where+        toJSON PlacementTag'{..}+          = object+              (catMaybes+                 [("placementId" .=) <$> _ptPlacementId,+                  ("tagDatas" .=) <$> _ptTagDatas])++-- | Remarketing list response+--+-- /See:/ 'remarketingListsListResponse' smart constructor.+data RemarketingListsListResponse = RemarketingListsListResponse'+    { _rllrNextPageToken    :: !(Maybe Text)+    , _rllrRemarketingLists :: !(Maybe [RemarketingList])+    , _rllrKind             :: !Text+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'RemarketingListsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rllrNextPageToken'+--+-- * 'rllrRemarketingLists'+--+-- * 'rllrKind'+remarketingListsListResponse+    :: RemarketingListsListResponse+remarketingListsListResponse =+    RemarketingListsListResponse'+    { _rllrNextPageToken = Nothing+    , _rllrRemarketingLists = Nothing+    , _rllrKind = "dfareporting#remarketingListsListResponse"+    }++-- | Pagination token to be used for the next list operation.+rllrNextPageToken :: Lens' RemarketingListsListResponse (Maybe Text)+rllrNextPageToken+  = lens _rllrNextPageToken+      (\ s a -> s{_rllrNextPageToken = a})++-- | Remarketing list collection.+rllrRemarketingLists :: Lens' RemarketingListsListResponse [RemarketingList]+rllrRemarketingLists+  = lens _rllrRemarketingLists+      (\ s a -> s{_rllrRemarketingLists = a})+      . _Default+      . _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#remarketingListsListResponse\".+rllrKind :: Lens' RemarketingListsListResponse Text+rllrKind = lens _rllrKind (\ s a -> s{_rllrKind = a})++instance FromJSON RemarketingListsListResponse where+        parseJSON+          = withObject "RemarketingListsListResponse"+              (\ o ->+                 RemarketingListsListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "remarketingLists" .!= mempty)+                     <*>+                     (o .:? "kind" .!=+                        "dfareporting#remarketingListsListResponse"))++instance ToJSON RemarketingListsListResponse where+        toJSON RemarketingListsListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _rllrNextPageToken,+                  ("remarketingLists" .=) <$> _rllrRemarketingLists,+                  Just ("kind" .= _rllrKind)])++-- | Contains properties of a dynamic targeting key. Dynamic targeting keys+-- are unique, user-friendly labels, created at the advertiser level in+-- DCM, that can be assigned to ads, creatives, and placements and used for+-- targeting with DoubleClick Studio dynamic creatives. Use these labels+-- instead of numeric DCM IDs (such as placement IDs) to save time and+-- avoid errors in your dynamic feeds.+--+-- /See:/ 'dynamicTargetingKey' smart constructor.+data DynamicTargetingKey = DynamicTargetingKey'+    { _dtkObjectType :: !(Maybe DynamicTargetingKeyObjectType)+    , _dtkKind       :: !Text+    , _dtkObjectId   :: !(Maybe (Textual Int64))+    , _dtkName       :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DynamicTargetingKey' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dtkObjectType'+--+-- * 'dtkKind'+--+-- * 'dtkObjectId'+--+-- * 'dtkName'+dynamicTargetingKey+    :: DynamicTargetingKey+dynamicTargetingKey =+    DynamicTargetingKey'+    { _dtkObjectType = Nothing+    , _dtkKind = "dfareporting#dynamicTargetingKey"+    , _dtkObjectId = Nothing+    , _dtkName = Nothing+    }++-- | Type of the object of this dynamic targeting key. This is a required+-- field.+dtkObjectType :: Lens' DynamicTargetingKey (Maybe DynamicTargetingKeyObjectType)+dtkObjectType+  = lens _dtkObjectType+      (\ s a -> s{_dtkObjectType = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#dynamicTargetingKey\".+dtkKind :: Lens' DynamicTargetingKey Text+dtkKind = lens _dtkKind (\ s a -> s{_dtkKind = a})++-- | ID of the object of this dynamic targeting key. This is a required+-- field.+dtkObjectId :: Lens' DynamicTargetingKey (Maybe Int64)+dtkObjectId+  = lens _dtkObjectId (\ s a -> s{_dtkObjectId = a}) .+      mapping _Coerce++-- | Name of this dynamic targeting key. This is a required field. Must be+-- less than 256 characters long and cannot contain commas. All characters+-- are converted to lowercase.+dtkName :: Lens' DynamicTargetingKey (Maybe Text)+dtkName = lens _dtkName (\ s a -> s{_dtkName = a})++instance FromJSON DynamicTargetingKey where+        parseJSON+          = withObject "DynamicTargetingKey"+              (\ o ->+                 DynamicTargetingKey' <$>+                   (o .:? "objectType") <*>+                     (o .:? "kind" .!= "dfareporting#dynamicTargetingKey")+                     <*> (o .:? "objectId")+                     <*> (o .:? "name"))++instance ToJSON DynamicTargetingKey where+        toJSON DynamicTargetingKey'{..}+          = object+              (catMaybes+                 [("objectType" .=) <$> _dtkObjectType,+                  Just ("kind" .= _dtkKind),+                  ("objectId" .=) <$> _dtkObjectId,+                  ("name" .=) <$> _dtkName])++-- | Contains properties of a Creative.+--+-- /See:/ 'creative' smart constructor.+data Creative = Creative'+    { _creConvertFlashToHTML5                 :: !(Maybe Bool)+    , _creBackupImageTargetWindow             :: !(Maybe TargetWindow)+    , _creRenderingIdDimensionValue           :: !(Maybe DimensionValue)+    , _creCustomKeyValues                     :: !(Maybe [Text])+    , _creVideoDuration                       :: !(Maybe (Textual Double))+    , _creRenderingId                         :: !(Maybe (Textual Int64))+    , _creThirdPartyBackupImageImpressionsURL :: !(Maybe Text)+    , _creFsCommand                           :: !(Maybe FsCommand)+    , _creAllowScriptAccess                   :: !(Maybe Bool)+    , _creHTMLCodeLocked                      :: !(Maybe Bool)+    , _creRequiredFlashPluginVersion          :: !(Maybe Text)+    , _creAuthoringTool                       :: !(Maybe CreativeAuthoringTool)+    , _creSize                                :: !(Maybe Size)+    , _creThirdPartyURLs                      :: !(Maybe [ThirdPartyTrackingURL])+    , _creCounterCustomEvents                 :: !(Maybe [CreativeCustomEvent])+    , _creKind                                :: !Text+    , _creSSLOverride                         :: !(Maybe Bool)+    , _creHTMLCode                            :: !(Maybe Text)+    , _creAdvertiserId                        :: !(Maybe (Textual Int64))+    , _creRequiredFlashVersion                :: !(Maybe (Textual Int32))+    , _creBackgRoundColor                     :: !(Maybe Text)+    , _creAdTagKeys                           :: !(Maybe [Text])+    , _creSkippable                           :: !(Maybe Bool)+    , _creSSLCompliant                        :: !(Maybe Bool)+    , _creIdDimensionValue                    :: !(Maybe DimensionValue)+    , _creBackupImageReportingLabel           :: !(Maybe Text)+    , _creCommercialId                        :: !(Maybe Text)+    , _creActive                              :: !(Maybe Bool)+    , _creExitCustomEvents                    :: !(Maybe [CreativeCustomEvent])+    , _creAccountId                           :: !(Maybe (Textual Int64))+    , _creBackupImageClickThroughURL          :: !(Maybe Text)+    , _creName                                :: !(Maybe Text)+    , _creOverrideCss                         :: !(Maybe Text)+    , _creVideoDescription                    :: !(Maybe Text)+    , _creClickTags                           :: !(Maybe [ClickTag])+    , _creAdParameters                        :: !(Maybe Text)+    , _creVersion                             :: !(Maybe (Textual Int32))+    , _creLatestTraffickedCreativeId          :: !(Maybe (Textual Int64))+    , _creThirdPartyRichMediaImpressionsURL   :: !(Maybe Text)+    , _creLastModifiedInfo                    :: !(Maybe LastModifiedInfo)+    , _creId                                  :: !(Maybe (Textual Int64))+    , _creAuthoringSource                     :: !(Maybe CreativeAuthoringSource)+    , _creStudioAdvertiserId                  :: !(Maybe (Textual Int64))+    , _creCreativeAssets                      :: !(Maybe [CreativeAsset])+    , _creSubAccountId                        :: !(Maybe (Textual Int64))+    , _creType                                :: !(Maybe CreativeType)+    , _creTimerCustomEvents                   :: !(Maybe [CreativeCustomEvent])+    , _creStudioCreativeId                    :: !(Maybe (Textual Int64))+    , _creCompatibility                       :: !(Maybe [CreativeCompatibilityItem])+    , _creBackupImageFeatures                 :: !(Maybe [CreativeBackupImageFeaturesItem])+    , _creArtworkType                         :: !(Maybe CreativeArtworkType)+    , _creArchived                            :: !(Maybe Bool)+    , _creCompanionCreatives                  :: !(Maybe [Textual Int64])+    , _creTotalFileSize                       :: !(Maybe (Textual Int64))+    , _creStudioTraffickedCreativeId          :: !(Maybe (Textual Int64))+    , _creRedirectURL                         :: !(Maybe Text)+    , _creAutoAdvanceImages                   :: !(Maybe Bool)+    , _creCreativeFieldAssignments            :: !(Maybe [CreativeFieldAssignment])+    } 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:+--+-- * 'creConvertFlashToHTML5'+--+-- * 'creBackupImageTargetWindow'+--+-- * 'creRenderingIdDimensionValue'+--+-- * 'creCustomKeyValues'+--+-- * 'creVideoDuration'+--+-- * 'creRenderingId'+--+-- * 'creThirdPartyBackupImageImpressionsURL'+--+-- * 'creFsCommand'+--+-- * 'creAllowScriptAccess'+--+-- * 'creHTMLCodeLocked'+--+-- * 'creRequiredFlashPluginVersion'+--+-- * 'creAuthoringTool'+--+-- * 'creSize'+--+-- * 'creThirdPartyURLs'+--+-- * 'creCounterCustomEvents'+--+-- * 'creKind'+--+-- * 'creSSLOverride'+--+-- * 'creHTMLCode'+--+-- * 'creAdvertiserId'+--+-- * 'creRequiredFlashVersion'+--+-- * 'creBackgRoundColor'+--+-- * 'creAdTagKeys'+--+-- * 'creSkippable'+--+-- * 'creSSLCompliant'+--+-- * 'creIdDimensionValue'+--+-- * 'creBackupImageReportingLabel'+--+-- * 'creCommercialId'+--+-- * 'creActive'+--+-- * 'creExitCustomEvents'+--+-- * 'creAccountId'+--+-- * 'creBackupImageClickThroughURL'+--+-- * 'creName'+--+-- * 'creOverrideCss'+--+-- * 'creVideoDescription'+--+-- * 'creClickTags'+--+-- * 'creAdParameters'+--+-- * 'creVersion'+--+-- * 'creLatestTraffickedCreativeId'+--+-- * 'creThirdPartyRichMediaImpressionsURL'+--+-- * 'creLastModifiedInfo'+--+-- * 'creId'+--+-- * 'creAuthoringSource'+--+-- * 'creStudioAdvertiserId'+--+-- * 'creCreativeAssets'+--+-- * 'creSubAccountId'+--+-- * 'creType'+--+-- * 'creTimerCustomEvents'+--+-- * 'creStudioCreativeId'+--+-- * 'creCompatibility'+--+-- * 'creBackupImageFeatures'+--+-- * 'creArtworkType'+--+-- * 'creArchived'+--+-- * 'creCompanionCreatives'+--+-- * 'creTotalFileSize'+--+-- * 'creStudioTraffickedCreativeId'+--+-- * 'creRedirectURL'+--+-- * 'creAutoAdvanceImages'+--+-- * 'creCreativeFieldAssignments'+creative+    :: Creative+creative =+    Creative'+    { _creConvertFlashToHTML5 = Nothing+    , _creBackupImageTargetWindow = Nothing+    , _creRenderingIdDimensionValue = Nothing+    , _creCustomKeyValues = Nothing+    , _creVideoDuration = Nothing+    , _creRenderingId = Nothing+    , _creThirdPartyBackupImageImpressionsURL = Nothing+    , _creFsCommand = Nothing+    , _creAllowScriptAccess = Nothing+    , _creHTMLCodeLocked = Nothing+    , _creRequiredFlashPluginVersion = Nothing+    , _creAuthoringTool = Nothing+    , _creSize = Nothing+    , _creThirdPartyURLs = Nothing+    , _creCounterCustomEvents = Nothing+    , _creKind = "dfareporting#creative"+    , _creSSLOverride = Nothing+    , _creHTMLCode = Nothing+    , _creAdvertiserId = Nothing+    , _creRequiredFlashVersion = Nothing+    , _creBackgRoundColor = Nothing+    , _creAdTagKeys = Nothing+    , _creSkippable = Nothing+    , _creSSLCompliant = Nothing+    , _creIdDimensionValue = Nothing+    , _creBackupImageReportingLabel = Nothing+    , _creCommercialId = Nothing+    , _creActive = Nothing+    , _creExitCustomEvents = Nothing+    , _creAccountId = Nothing+    , _creBackupImageClickThroughURL = Nothing+    , _creName = Nothing+    , _creOverrideCss = Nothing+    , _creVideoDescription = Nothing+    , _creClickTags = Nothing+    , _creAdParameters = Nothing+    , _creVersion = Nothing+    , _creLatestTraffickedCreativeId = Nothing+    , _creThirdPartyRichMediaImpressionsURL = Nothing+    , _creLastModifiedInfo = Nothing+    , _creId = Nothing+    , _creAuthoringSource = Nothing+    , _creStudioAdvertiserId = Nothing+    , _creCreativeAssets = Nothing+    , _creSubAccountId = Nothing+    , _creType = Nothing+    , _creTimerCustomEvents = Nothing+    , _creStudioCreativeId = Nothing+    , _creCompatibility = Nothing+    , _creBackupImageFeatures = Nothing+    , _creArtworkType = Nothing+    , _creArchived = Nothing+    , _creCompanionCreatives = Nothing+    , _creTotalFileSize = Nothing+    , _creStudioTraffickedCreativeId = Nothing+    , _creRedirectURL = Nothing+    , _creAutoAdvanceImages = Nothing+    , _creCreativeFieldAssignments = Nothing+    }++-- | Whether Flash assets associated with the creative need to be+-- automatically converted to HTML5. This flag is enabled by default and+-- users can choose to disable it if they don\'t want the system to+-- generate and use HTML5 asset for this creative. Applicable to the+-- following creative type: FLASH_INPAGE. Applicable to DISPLAY when the+-- primary asset type is not HTML_IMAGE.+creConvertFlashToHTML5 :: Lens' Creative (Maybe Bool)+creConvertFlashToHTML5+  = lens _creConvertFlashToHTML5+      (\ s a -> s{_creConvertFlashToHTML5 = a})++-- | Target window for backup image. Applicable to the following creative+-- types: FLASH_INPAGE and HTML5_BANNER. Applicable to DISPLAY when the+-- primary asset type is not HTML_IMAGE.+creBackupImageTargetWindow :: Lens' Creative (Maybe TargetWindow)+creBackupImageTargetWindow+  = lens _creBackupImageTargetWindow+      (\ s a -> s{_creBackupImageTargetWindow = a})++-- | Dimension value for the rendering ID of this creative. This is a+-- read-only field. Applicable to all creative types.+creRenderingIdDimensionValue :: Lens' Creative (Maybe DimensionValue)+creRenderingIdDimensionValue+  = lens _creRenderingIdDimensionValue+      (\ s a -> s{_creRenderingIdDimensionValue = a})++-- | Custom key-values for a Rich Media creative. Key-values let you+-- customize the creative settings of a Rich Media ad running on your site+-- without having to contact the advertiser. You can use key-values to+-- dynamically change the look or functionality of a creative. Applicable+-- to the following creative types: all RICH_MEDIA, and all VPAID.+creCustomKeyValues :: Lens' Creative [Text]+creCustomKeyValues+  = lens _creCustomKeyValues+      (\ s a -> s{_creCustomKeyValues = a})+      . _Default+      . _Coerce++-- | Creative video duration in seconds. This is a read-only field.+-- Applicable to the following creative types: INSTREAM_VIDEO, all+-- RICH_MEDIA, and all VPAID.+creVideoDuration :: Lens' Creative (Maybe Double)+creVideoDuration+  = lens _creVideoDuration+      (\ s a -> s{_creVideoDuration = a})+      . mapping _Coerce++-- | ID of current rendering version. This is a read-only field. Applicable+-- to all creative types.+creRenderingId :: Lens' Creative (Maybe Int64)+creRenderingId+  = lens _creRenderingId+      (\ s a -> s{_creRenderingId = a})+      . mapping _Coerce++-- | Third-party URL used to record backup image impressions. Applicable to+-- the following creative types: all RICH_MEDIA.+creThirdPartyBackupImageImpressionsURL :: Lens' Creative (Maybe Text)+creThirdPartyBackupImageImpressionsURL+  = lens _creThirdPartyBackupImageImpressionsURL+      (\ s a ->+         s{_creThirdPartyBackupImageImpressionsURL = a})++-- | OpenWindow FSCommand of this creative. This lets the SWF file+-- communicate with either Flash Player or the program hosting Flash+-- Player, such as a web browser. This is only triggered if+-- allowScriptAccess field is true. Applicable to the following creative+-- types: FLASH_INPAGE.+creFsCommand :: Lens' Creative (Maybe FsCommand)+creFsCommand+  = lens _creFsCommand (\ s a -> s{_creFsCommand = a})++-- | Whether script access is allowed for this creative. This is a read-only+-- and deprecated field which will automatically be set to true on update.+-- Applicable to the following creative types: FLASH_INPAGE.+creAllowScriptAccess :: Lens' Creative (Maybe Bool)+creAllowScriptAccess+  = lens _creAllowScriptAccess+      (\ s a -> s{_creAllowScriptAccess = a})++-- | Whether HTML code is DCM-generated or manually entered. Set to true to+-- ignore changes to htmlCode. Applicable to the following creative types:+-- FLASH_INPAGE and HTML5_BANNER.+creHTMLCodeLocked :: Lens' Creative (Maybe Bool)+creHTMLCodeLocked+  = lens _creHTMLCodeLocked+      (\ s a -> s{_creHTMLCodeLocked = a})++-- | The minimum required Flash plugin version for this creative. For+-- example, 11.2.202.235. This is a read-only field. Applicable to the+-- following creative types: all RICH_MEDIA, and all VPAID.+creRequiredFlashPluginVersion :: Lens' Creative (Maybe Text)+creRequiredFlashPluginVersion+  = lens _creRequiredFlashPluginVersion+      (\ s a -> s{_creRequiredFlashPluginVersion = a})++-- | Authoring tool for HTML5 banner creatives. This is a read-only field.+-- Applicable to the following creative types: HTML5_BANNER.+creAuthoringTool :: Lens' Creative (Maybe CreativeAuthoringTool)+creAuthoringTool+  = lens _creAuthoringTool+      (\ s a -> s{_creAuthoringTool = a})++-- | Size associated with this creative. When inserting or updating a+-- creative either the size ID field or size width and height fields can be+-- used. This is a required field when applicable; however for IMAGE,+-- FLASH_INPAGE creatives, and for DISPLAY creatives with a primary asset+-- of type HTML_IMAGE, if left blank, this field will be automatically set+-- using the actual size of the associated image assets. Applicable to the+-- following creative types: DISPLAY, DISPLAY_IMAGE_GALLERY, FLASH_INPAGE,+-- HTML5_BANNER, IMAGE, and all RICH_MEDIA.+creSize :: Lens' Creative (Maybe Size)+creSize = lens _creSize (\ s a -> s{_creSize = a})++-- | Third-party URLs for tracking in-stream video creative events.+-- Applicable to the following creative types: all INSTREAM_VIDEO and all+-- VPAID.+creThirdPartyURLs :: Lens' Creative [ThirdPartyTrackingURL]+creThirdPartyURLs+  = lens _creThirdPartyURLs+      (\ s a -> s{_creThirdPartyURLs = a})+      . _Default+      . _Coerce++-- | List of counter events configured for the creative. For+-- DISPLAY_IMAGE_GALLERY creatives, these are read-only and auto-generated+-- from clickTags. Applicable to the following creative types:+-- DISPLAY_IMAGE_GALLERY, all RICH_MEDIA, and all VPAID.+creCounterCustomEvents :: Lens' Creative [CreativeCustomEvent]+creCounterCustomEvents+  = lens _creCounterCustomEvents+      (\ s a -> s{_creCounterCustomEvents = a})+      . _Default+      . _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#creative\".+creKind :: Lens' Creative Text+creKind = lens _creKind (\ s a -> s{_creKind = a})++-- | Whether creative should be treated as SSL compliant even if the system+-- scan shows it\'s not. Applicable to all creative types.+creSSLOverride :: Lens' Creative (Maybe Bool)+creSSLOverride+  = lens _creSSLOverride+      (\ s a -> s{_creSSLOverride = a})++-- | HTML code for the creative. This is a required field when applicable.+-- This field is ignored if htmlCodeLocked is false. Applicable to the+-- following creative types: all CUSTOM, FLASH_INPAGE, and HTML5_BANNER,+-- and all RICH_MEDIA.+creHTMLCode :: Lens' Creative (Maybe Text)+creHTMLCode+  = lens _creHTMLCode (\ s a -> s{_creHTMLCode = a})++-- | Advertiser ID of this creative. This is a required field. Applicable to+-- all creative types.+creAdvertiserId :: Lens' Creative (Maybe Int64)+creAdvertiserId+  = lens _creAdvertiserId+      (\ s a -> s{_creAdvertiserId = a})+      . mapping _Coerce++-- | The internal Flash version for this creative as calculated by+-- DoubleClick Studio. This is a read-only field. Applicable to the+-- following creative types: FLASH_INPAGE all RICH_MEDIA, and all VPAID.+-- Applicable to DISPLAY when the primary asset type is not HTML_IMAGE.+creRequiredFlashVersion :: Lens' Creative (Maybe Int32)+creRequiredFlashVersion+  = lens _creRequiredFlashVersion+      (\ s a -> s{_creRequiredFlashVersion = a})+      . mapping _Coerce++-- | The 6-character HTML color code, beginning with #, for the background of+-- the window area where the Flash file is displayed. Default is white.+-- Applicable to the following creative types: FLASH_INPAGE.+creBackgRoundColor :: Lens' Creative (Maybe Text)+creBackgRoundColor+  = lens _creBackgRoundColor+      (\ s a -> s{_creBackgRoundColor = a})++-- | Keywords for a Rich Media creative. Keywords let you customize the+-- creative settings of a Rich Media ad running on your site without having+-- to contact the advertiser. You can use keywords to dynamically change+-- the look or functionality of a creative. Applicable to the following+-- creative types: all RICH_MEDIA, and all VPAID.+creAdTagKeys :: Lens' Creative [Text]+creAdTagKeys+  = lens _creAdTagKeys (\ s a -> s{_creAdTagKeys = a})+      . _Default+      . _Coerce++-- | Whether the user can choose to skip the creative. Applicable to the+-- following creative types: all INSTREAM_VIDEO and all VPAID.+creSkippable :: Lens' Creative (Maybe Bool)+creSkippable+  = lens _creSkippable (\ s a -> s{_creSkippable = a})++-- | Whether the creative is SSL-compliant. This is a read-only field.+-- Applicable to all creative types.+creSSLCompliant :: Lens' Creative (Maybe Bool)+creSSLCompliant+  = lens _creSSLCompliant+      (\ s a -> s{_creSSLCompliant = a})++-- | Dimension value for the ID of this creative. This is a read-only field.+-- Applicable to all creative types.+creIdDimensionValue :: Lens' Creative (Maybe DimensionValue)+creIdDimensionValue+  = lens _creIdDimensionValue+      (\ s a -> s{_creIdDimensionValue = a})++-- | Reporting label used for HTML5 banner backup image. Applicable to the+-- following creative types: DISPLAY when the primary asset type is not+-- HTML_IMAGE.+creBackupImageReportingLabel :: Lens' Creative (Maybe Text)+creBackupImageReportingLabel+  = lens _creBackupImageReportingLabel+      (\ s a -> s{_creBackupImageReportingLabel = a})++-- | Industry standard ID assigned to creative for reach and frequency.+-- Applicable to the following creative types: all INSTREAM_VIDEO and all+-- VPAID.+creCommercialId :: Lens' Creative (Maybe Text)+creCommercialId+  = lens _creCommercialId+      (\ s a -> s{_creCommercialId = a})++-- | Whether the creative is active. Applicable to all creative types.+creActive :: Lens' Creative (Maybe Bool)+creActive+  = lens _creActive (\ s a -> s{_creActive = a})++-- | List of exit events configured for the creative. For DISPLAY and+-- DISPLAY_IMAGE_GALLERY creatives, these are read-only and auto-generated+-- from clickTags, For DISPLAY, an event is also created from the+-- backupImageReportingLabel. Applicable to the following creative types:+-- DISPLAY_IMAGE_GALLERY, all RICH_MEDIA, and all VPAID. Applicable to+-- DISPLAY when the primary asset type is not HTML_IMAGE.+creExitCustomEvents :: Lens' Creative [CreativeCustomEvent]+creExitCustomEvents+  = lens _creExitCustomEvents+      (\ s a -> s{_creExitCustomEvents = a})+      . _Default+      . _Coerce++-- | Account ID of this creative. This field, if left unset, will be+-- auto-generated for both insert and update operations. Applicable to all+-- creative types.+creAccountId :: Lens' Creative (Maybe Int64)+creAccountId+  = lens _creAccountId (\ s a -> s{_creAccountId = a})+      . mapping _Coerce++-- | Click-through URL for backup image. Applicable to the following creative+-- types: FLASH_INPAGE and HTML5_BANNER. Applicable to DISPLAY when the+-- primary asset type is not HTML_IMAGE.+creBackupImageClickThroughURL :: Lens' Creative (Maybe Text)+creBackupImageClickThroughURL+  = lens _creBackupImageClickThroughURL+      (\ s a -> s{_creBackupImageClickThroughURL = a})++-- | Name of the creative. This is a required field and must be less than 256+-- characters long. Applicable to all creative types.+creName :: Lens' Creative (Maybe Text)+creName = lens _creName (\ s a -> s{_creName = a})++-- | Override CSS value for rich media creatives. Applicable to the following+-- creative types: all RICH_MEDIA.+creOverrideCss :: Lens' Creative (Maybe Text)+creOverrideCss+  = lens _creOverrideCss+      (\ s a -> s{_creOverrideCss = a})++-- | Description of the video ad. Applicable to the following creative types:+-- all INSTREAM_VIDEO and all VPAID.+creVideoDescription :: Lens' Creative (Maybe Text)+creVideoDescription+  = lens _creVideoDescription+      (\ s a -> s{_creVideoDescription = a})++-- | Click tags of the creative. For DISPLAY, FLASH_INPAGE, and HTML5_BANNER+-- creatives, this is a subset of detected click tags for the assets+-- associated with this creative. After creating a flash asset, detected+-- click tags will be returned in the creativeAssetMetadata. When inserting+-- the creative, populate the creative clickTags field using the+-- creativeAssetMetadata.clickTags field. For DISPLAY_IMAGE_GALLERY+-- creatives, there should be exactly one entry in this list for each image+-- creative asset. A click tag is matched with a corresponding creative+-- asset by matching the clickTag.name field with the+-- creativeAsset.assetIdentifier.name field. Applicable to the following+-- creative types: DISPLAY_IMAGE_GALLERY, FLASH_INPAGE, HTML5_BANNER.+-- Applicable to DISPLAY when the primary asset type is not HTML_IMAGE.+creClickTags :: Lens' Creative [ClickTag]+creClickTags+  = lens _creClickTags (\ s a -> s{_creClickTags = a})+      . _Default+      . _Coerce++-- | Ad parameters user for VPAID creative. This is a read-only field.+-- Applicable to the following creative types: all VPAID.+creAdParameters :: Lens' Creative (Maybe Text)+creAdParameters+  = lens _creAdParameters+      (\ s a -> s{_creAdParameters = a})++-- | The version number helps you keep track of multiple versions of your+-- creative in your reports. The version number will always be+-- auto-generated during insert operations to start at 1. For tracking+-- creatives the version cannot be incremented and will always remain at 1.+-- For all other creative types the version can be incremented only by 1+-- during update operations. In addition, the version will be automatically+-- incremented by 1 when undergoing Rich Media creative merging. Applicable+-- to all creative types.+creVersion :: Lens' Creative (Maybe Int32)+creVersion+  = lens _creVersion (\ s a -> s{_creVersion = a}) .+      mapping _Coerce++-- | Latest Studio trafficked creative ID associated with rich media and+-- VPAID creatives. This is a read-only field. Applicable to the following+-- creative types: all RICH_MEDIA, and all VPAID.+creLatestTraffickedCreativeId :: Lens' Creative (Maybe Int64)+creLatestTraffickedCreativeId+  = lens _creLatestTraffickedCreativeId+      (\ s a -> s{_creLatestTraffickedCreativeId = a})+      . mapping _Coerce++-- | Third-party URL used to record rich media impressions. Applicable to the+-- following creative types: all RICH_MEDIA.+creThirdPartyRichMediaImpressionsURL :: Lens' Creative (Maybe Text)+creThirdPartyRichMediaImpressionsURL+  = lens _creThirdPartyRichMediaImpressionsURL+      (\ s a ->+         s{_creThirdPartyRichMediaImpressionsURL = a})++-- | Creative last modification information. This is a read-only field.+-- Applicable to all creative types.+creLastModifiedInfo :: Lens' Creative (Maybe LastModifiedInfo)+creLastModifiedInfo+  = lens _creLastModifiedInfo+      (\ s a -> s{_creLastModifiedInfo = a})++-- | ID of this creative. This is a read-only, auto-generated field.+-- Applicable to all creative types.+creId :: Lens' Creative (Maybe Int64)+creId+  = lens _creId (\ s a -> s{_creId = a}) .+      mapping _Coerce++-- | Source application where creative was authored. Presently, only DBM+-- authored creatives will have this field set. Applicable to all creative+-- types.+creAuthoringSource :: Lens' Creative (Maybe CreativeAuthoringSource)+creAuthoringSource+  = lens _creAuthoringSource+      (\ s a -> s{_creAuthoringSource = a})++-- | Studio advertiser ID associated with rich media and VPAID creatives.+-- This is a read-only field. Applicable to the following creative types:+-- all RICH_MEDIA, and all VPAID.+creStudioAdvertiserId :: Lens' Creative (Maybe Int64)+creStudioAdvertiserId+  = lens _creStudioAdvertiserId+      (\ s a -> s{_creStudioAdvertiserId = a})+      . mapping _Coerce++-- | Assets associated with a creative. Applicable to all but the following+-- creative types: INTERNAL_REDIRECT, INTERSTITIAL_INTERNAL_REDIRECT, and+-- REDIRECT+creCreativeAssets :: Lens' Creative [CreativeAsset]+creCreativeAssets+  = lens _creCreativeAssets+      (\ s a -> s{_creCreativeAssets = a})+      . _Default+      . _Coerce++-- | Subaccount ID of this creative. This field, if left unset, will be+-- auto-generated for both insert and update operations. Applicable to all+-- creative types.+creSubAccountId :: Lens' Creative (Maybe Int64)+creSubAccountId+  = lens _creSubAccountId+      (\ s a -> s{_creSubAccountId = a})+      . mapping _Coerce++-- | Type of this creative.This is a required field. Applicable to all+-- creative types.+creType :: Lens' Creative (Maybe CreativeType)+creType = lens _creType (\ s a -> s{_creType = a})++-- | List of timer events configured for the creative. For+-- DISPLAY_IMAGE_GALLERY creatives, these are read-only and auto-generated+-- from clickTags. Applicable to the following creative types:+-- DISPLAY_IMAGE_GALLERY, all RICH_MEDIA, and all VPAID. Applicable to+-- DISPLAY when the primary asset is not HTML_IMAGE.+creTimerCustomEvents :: Lens' Creative [CreativeCustomEvent]+creTimerCustomEvents+  = lens _creTimerCustomEvents+      (\ s a -> s{_creTimerCustomEvents = a})+      . _Default+      . _Coerce++-- | Studio creative ID associated with rich media and VPAID creatives. This+-- is a read-only field. Applicable to the following creative types: all+-- RICH_MEDIA, and all VPAID.+creStudioCreativeId :: Lens' Creative (Maybe Int64)+creStudioCreativeId+  = lens _creStudioCreativeId+      (\ s a -> s{_creStudioCreativeId = a})+      . mapping _Coerce++-- | Compatibilities associated with this creative. This is a read-only+-- field. DISPLAY and DISPLAY_INTERSTITIAL refer to rendering either on+-- desktop or on mobile devices or in mobile apps for regular or+-- interstitial ads, respectively. APP and APP_INTERSTITIAL are for+-- rendering in mobile apps. Only pre-existing creatives may have these+-- compatibilities since new creatives will either be assigned DISPLAY or+-- DISPLAY_INTERSTITIAL instead. IN_STREAM_VIDEO refers to rendering in+-- in-stream video ads developed with the VAST standard. Applicable to all+-- creative types. Acceptable values are: - \"APP\" - \"APP_INTERSTITIAL\"+-- - \"IN_STREAM_VIDEO\" - \"DISPLAY\" - \"DISPLAY_INTERSTITIAL\"+creCompatibility :: Lens' Creative [CreativeCompatibilityItem]+creCompatibility+  = lens _creCompatibility+      (\ s a -> s{_creCompatibility = a})+      . _Default+      . _Coerce++-- | List of feature dependencies that will cause a backup image to be served+-- if the browser that serves the ad does not support them. Feature+-- dependencies are features that a browser must be able to support in+-- order to render your HTML5 creative asset correctly. This field is+-- initially auto-generated to contain all features detected by DCM for all+-- the assets of this creative and can then be modified by the client. To+-- reset this field, copy over all the creativeAssets\' detected features.+-- Applicable to the following creative types: HTML5_BANNER. Applicable to+-- DISPLAY when the primary asset type is not HTML_IMAGE.+creBackupImageFeatures :: Lens' Creative [CreativeBackupImageFeaturesItem]+creBackupImageFeatures+  = lens _creBackupImageFeatures+      (\ s a -> s{_creBackupImageFeatures = a})+      . _Default+      . _Coerce++-- | Type of artwork used for the creative. This is a read-only field.+-- Applicable to the following creative types: all RICH_MEDIA, and all+-- VPAID.+creArtworkType :: Lens' Creative (Maybe CreativeArtworkType)+creArtworkType+  = lens _creArtworkType+      (\ s a -> s{_creArtworkType = a})++-- | Whether the creative is archived. Applicable to all creative types.+creArchived :: Lens' Creative (Maybe Bool)+creArchived+  = lens _creArchived (\ s a -> s{_creArchived = a})++-- | List of companion creatives assigned to an in-Stream videocreative.+-- Acceptable values include IDs of existing flash and image creatives.+-- Applicable to the following creative types: all INSTREAM_VIDEO and all+-- VPAID.+creCompanionCreatives :: Lens' Creative [Int64]+creCompanionCreatives+  = lens _creCompanionCreatives+      (\ s a -> s{_creCompanionCreatives = a})+      . _Default+      . _Coerce++-- | Combined size of all creative assets. This is a read-only field.+-- Applicable to the following creative types: all RICH_MEDIA, and all+-- VPAID.+creTotalFileSize :: Lens' Creative (Maybe Int64)+creTotalFileSize+  = lens _creTotalFileSize+      (\ s a -> s{_creTotalFileSize = a})+      . mapping _Coerce++-- | Studio trafficked creative ID associated with rich media and VPAID+-- creatives. This is a read-only field. Applicable to the following+-- creative types: all RICH_MEDIA, and all VPAID.+creStudioTraffickedCreativeId :: Lens' Creative (Maybe Int64)+creStudioTraffickedCreativeId+  = lens _creStudioTraffickedCreativeId+      (\ s a -> s{_creStudioTraffickedCreativeId = a})+      . mapping _Coerce++-- | URL of hosted image or hosted video or another ad tag. For+-- INSTREAM_VIDEO_REDIRECT creatives this is the in-stream video redirect+-- URL. The standard for a VAST (Video Ad Serving Template) ad response+-- allows for a redirect link to another VAST 2.0 or 3.0 call. This is a+-- required field when applicable. Applicable to the following creative+-- types: DISPLAY_REDIRECT, INTERNAL_REDIRECT,+-- INTERSTITIAL_INTERNAL_REDIRECT, and INSTREAM_VIDEO_REDIRECT+creRedirectURL :: Lens' Creative (Maybe Text)+creRedirectURL+  = lens _creRedirectURL+      (\ s a -> s{_creRedirectURL = a})++-- | Whether images are automatically advanced for enhanced image creatives.+-- Applicable to the following creative types: DISPLAY_IMAGE_GALLERY.+creAutoAdvanceImages :: Lens' Creative (Maybe Bool)+creAutoAdvanceImages+  = lens _creAutoAdvanceImages+      (\ s a -> s{_creAutoAdvanceImages = a})++-- | Creative field assignments for this creative. Applicable to all creative+-- types.+creCreativeFieldAssignments :: Lens' Creative [CreativeFieldAssignment]+creCreativeFieldAssignments+  = lens _creCreativeFieldAssignments+      (\ s a -> s{_creCreativeFieldAssignments = a})+      . _Default+      . _Coerce++instance FromJSON Creative where+        parseJSON+          = withObject "Creative"+              (\ o ->+                 Creative' <$>+                   (o .:? "convertFlashToHtml5") <*>+                     (o .:? "backupImageTargetWindow")+                     <*> (o .:? "renderingIdDimensionValue")+                     <*> (o .:? "customKeyValues" .!= mempty)+                     <*> (o .:? "videoDuration")+                     <*> (o .:? "renderingId")+                     <*> (o .:? "thirdPartyBackupImageImpressionsUrl")+                     <*> (o .:? "fsCommand")+                     <*> (o .:? "allowScriptAccess")+                     <*> (o .:? "htmlCodeLocked")+                     <*> (o .:? "requiredFlashPluginVersion")+                     <*> (o .:? "authoringTool")+                     <*> (o .:? "size")+                     <*> (o .:? "thirdPartyUrls" .!= mempty)+                     <*> (o .:? "counterCustomEvents" .!= mempty)+                     <*> (o .:? "kind" .!= "dfareporting#creative")+                     <*> (o .:? "sslOverride")+                     <*> (o .:? "htmlCode")+                     <*> (o .:? "advertiserId")+                     <*> (o .:? "requiredFlashVersion")+                     <*> (o .:? "backgroundColor")+                     <*> (o .:? "adTagKeys" .!= mempty)+                     <*> (o .:? "skippable")+                     <*> (o .:? "sslCompliant")+                     <*> (o .:? "idDimensionValue")+                     <*> (o .:? "backupImageReportingLabel")+                     <*> (o .:? "commercialId")+                     <*> (o .:? "active")+                     <*> (o .:? "exitCustomEvents" .!= mempty)+                     <*> (o .:? "accountId")+                     <*> (o .:? "backupImageClickThroughUrl")+                     <*> (o .:? "name")+                     <*> (o .:? "overrideCss")+                     <*> (o .:? "videoDescription")+                     <*> (o .:? "clickTags" .!= mempty)+                     <*> (o .:? "adParameters")+                     <*> (o .:? "version")+                     <*> (o .:? "latestTraffickedCreativeId")+                     <*> (o .:? "thirdPartyRichMediaImpressionsUrl")+                     <*> (o .:? "lastModifiedInfo")+                     <*> (o .:? "id")+                     <*> (o .:? "authoringSource")+                     <*> (o .:? "studioAdvertiserId")+                     <*> (o .:? "creativeAssets" .!= mempty)+                     <*> (o .:? "subaccountId")+                     <*> (o .:? "type")+                     <*> (o .:? "timerCustomEvents" .!= mempty)+                     <*> (o .:? "studioCreativeId")+                     <*> (o .:? "compatibility" .!= mempty)+                     <*> (o .:? "backupImageFeatures" .!= mempty)+                     <*> (o .:? "artworkType")+                     <*> (o .:? "archived")+                     <*> (o .:? "companionCreatives" .!= mempty)+                     <*> (o .:? "totalFileSize")+                     <*> (o .:? "studioTraffickedCreativeId")+                     <*> (o .:? "redirectUrl")+                     <*> (o .:? "auto_advance_images")+                     <*> (o .:? "creativeFieldAssignments" .!= mempty))++instance ToJSON Creative where+        toJSON Creative'{..}+          = object+              (catMaybes+                 [("convertFlashToHtml5" .=) <$>+                    _creConvertFlashToHTML5,+                  ("backupImageTargetWindow" .=) <$>+                    _creBackupImageTargetWindow,+                  ("renderingIdDimensionValue" .=) <$>+                    _creRenderingIdDimensionValue,+                  ("customKeyValues" .=) <$> _creCustomKeyValues,+                  ("videoDuration" .=) <$> _creVideoDuration,+                  ("renderingId" .=) <$> _creRenderingId,+                  ("thirdPartyBackupImageImpressionsUrl" .=) <$>+                    _creThirdPartyBackupImageImpressionsURL,+                  ("fsCommand" .=) <$> _creFsCommand,+                  ("allowScriptAccess" .=) <$> _creAllowScriptAccess,+                  ("htmlCodeLocked" .=) <$> _creHTMLCodeLocked,+                  ("requiredFlashPluginVersion" .=) <$>+                    _creRequiredFlashPluginVersion,+                  ("authoringTool" .=) <$> _creAuthoringTool,+                  ("size" .=) <$> _creSize,+                  ("thirdPartyUrls" .=) <$> _creThirdPartyURLs,+                  ("counterCustomEvents" .=) <$>+                    _creCounterCustomEvents,+                  Just ("kind" .= _creKind),+                  ("sslOverride" .=) <$> _creSSLOverride,+                  ("htmlCode" .=) <$> _creHTMLCode,+                  ("advertiserId" .=) <$> _creAdvertiserId,+                  ("requiredFlashVersion" .=) <$>+                    _creRequiredFlashVersion,+                  ("backgroundColor" .=) <$> _creBackgRoundColor,+                  ("adTagKeys" .=) <$> _creAdTagKeys,+                  ("skippable" .=) <$> _creSkippable,+                  ("sslCompliant" .=) <$> _creSSLCompliant,+                  ("idDimensionValue" .=) <$> _creIdDimensionValue,+                  ("backupImageReportingLabel" .=) <$>+                    _creBackupImageReportingLabel,+                  ("commercialId" .=) <$> _creCommercialId,+                  ("active" .=) <$> _creActive,+                  ("exitCustomEvents" .=) <$> _creExitCustomEvents,+                  ("accountId" .=) <$> _creAccountId,+                  ("backupImageClickThroughUrl" .=) <$>+                    _creBackupImageClickThroughURL,+                  ("name" .=) <$> _creName,+                  ("overrideCss" .=) <$> _creOverrideCss,+                  ("videoDescription" .=) <$> _creVideoDescription,+                  ("clickTags" .=) <$> _creClickTags,+                  ("adParameters" .=) <$> _creAdParameters,+                  ("version" .=) <$> _creVersion,+                  ("latestTraffickedCreativeId" .=) <$>+                    _creLatestTraffickedCreativeId,+                  ("thirdPartyRichMediaImpressionsUrl" .=) <$>+                    _creThirdPartyRichMediaImpressionsURL,+                  ("lastModifiedInfo" .=) <$> _creLastModifiedInfo,+                  ("id" .=) <$> _creId,+                  ("authoringSource" .=) <$> _creAuthoringSource,+                  ("studioAdvertiserId" .=) <$> _creStudioAdvertiserId,+                  ("creativeAssets" .=) <$> _creCreativeAssets,+                  ("subaccountId" .=) <$> _creSubAccountId,+                  ("type" .=) <$> _creType,+                  ("timerCustomEvents" .=) <$> _creTimerCustomEvents,+                  ("studioCreativeId" .=) <$> _creStudioCreativeId,+                  ("compatibility" .=) <$> _creCompatibility,+                  ("backupImageFeatures" .=) <$>+                    _creBackupImageFeatures,+                  ("artworkType" .=) <$> _creArtworkType,+                  ("archived" .=) <$> _creArchived,+                  ("companionCreatives" .=) <$> _creCompanionCreatives,+                  ("totalFileSize" .=) <$> _creTotalFileSize,+                  ("studioTraffickedCreativeId" .=) <$>+                    _creStudioTraffickedCreativeId,+                  ("redirectUrl" .=) <$> _creRedirectURL,+                  ("auto_advance_images" .=) <$> _creAutoAdvanceImages,+                  ("creativeFieldAssignments" .=) <$>+                    _creCreativeFieldAssignments])++-- | Site Contact+--+-- /See:/ 'siteContact' smart constructor.+data SiteContact = SiteContact'+    { _scEmail       :: !(Maybe Text)+    , _scPhone       :: !(Maybe Text)+    , _scLastName    :: !(Maybe Text)+    , _scAddress     :: !(Maybe Text)+    , _scFirstName   :: !(Maybe Text)+    , _scId          :: !(Maybe (Textual Int64))+    , _scTitle       :: !(Maybe Text)+    , _scContactType :: !(Maybe SiteContactContactType)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'SiteContact' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'scEmail'+--+-- * 'scPhone'+--+-- * 'scLastName'+--+-- * 'scAddress'+--+-- * 'scFirstName'+--+-- * 'scId'+--+-- * 'scTitle'+--+-- * 'scContactType'+siteContact+    :: SiteContact+siteContact =+    SiteContact'+    { _scEmail = Nothing+    , _scPhone = Nothing+    , _scLastName = Nothing+    , _scAddress = Nothing+    , _scFirstName = Nothing+    , _scId = Nothing+    , _scTitle = Nothing+    , _scContactType = Nothing+    }++-- | Email address of this site contact. This is a required field.+scEmail :: Lens' SiteContact (Maybe Text)+scEmail = lens _scEmail (\ s a -> s{_scEmail = a})++-- | Primary phone number of this site contact.+scPhone :: Lens' SiteContact (Maybe Text)+scPhone = lens _scPhone (\ s a -> s{_scPhone = a})++-- | Last name of this site contact.+scLastName :: Lens' SiteContact (Maybe Text)+scLastName+  = lens _scLastName (\ s a -> s{_scLastName = a})++-- | Address of this site contact.+scAddress :: Lens' SiteContact (Maybe Text)+scAddress+  = lens _scAddress (\ s a -> s{_scAddress = a})++-- | First name of this site contact.+scFirstName :: Lens' SiteContact (Maybe Text)+scFirstName+  = lens _scFirstName (\ s a -> s{_scFirstName = a})++-- | ID of this site contact. This is a read-only, auto-generated field.+scId :: Lens' SiteContact (Maybe Int64)+scId+  = lens _scId (\ s a -> s{_scId = a}) .+      mapping _Coerce++-- | Title or designation of this site contact.+scTitle :: Lens' SiteContact (Maybe Text)+scTitle = lens _scTitle (\ s a -> s{_scTitle = a})++-- | Site contact type.+scContactType :: Lens' SiteContact (Maybe SiteContactContactType)+scContactType+  = lens _scContactType+      (\ s a -> s{_scContactType = a})++instance FromJSON SiteContact where+        parseJSON+          = withObject "SiteContact"+              (\ o ->+                 SiteContact' <$>+                   (o .:? "email") <*> (o .:? "phone") <*>+                     (o .:? "lastName")+                     <*> (o .:? "address")+                     <*> (o .:? "firstName")+                     <*> (o .:? "id")+                     <*> (o .:? "title")+                     <*> (o .:? "contactType"))++instance ToJSON SiteContact where+        toJSON SiteContact'{..}+          = object+              (catMaybes+                 [("email" .=) <$> _scEmail,+                  ("phone" .=) <$> _scPhone,+                  ("lastName" .=) <$> _scLastName,+                  ("address" .=) <$> _scAddress,+                  ("firstName" .=) <$> _scFirstName,+                  ("id" .=) <$> _scId, ("title" .=) <$> _scTitle,+                  ("contactType" .=) <$> _scContactType])++-- | Account List Response+--+-- /See:/ 'accountsListResponse' smart constructor.+data AccountsListResponse = AccountsListResponse'+    { _accNextPageToken :: !(Maybe Text)+    , _accAccounts      :: !(Maybe [Account])+    , _accKind          :: !Text+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'AccountsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'accNextPageToken'+--+-- * 'accAccounts'+--+-- * 'accKind'+accountsListResponse+    :: AccountsListResponse+accountsListResponse =+    AccountsListResponse'+    { _accNextPageToken = Nothing+    , _accAccounts = Nothing+    , _accKind = "dfareporting#accountsListResponse"+    }++-- | Pagination token to be used for the next list operation.+accNextPageToken :: Lens' AccountsListResponse (Maybe Text)+accNextPageToken+  = lens _accNextPageToken+      (\ s a -> s{_accNextPageToken = a})++-- | Account collection.+accAccounts :: Lens' AccountsListResponse [Account]+accAccounts+  = lens _accAccounts (\ s a -> s{_accAccounts = a}) .+      _Default+      . _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#accountsListResponse\".+accKind :: Lens' AccountsListResponse Text+accKind = lens _accKind (\ s a -> s{_accKind = a})++instance FromJSON AccountsListResponse where+        parseJSON+          = withObject "AccountsListResponse"+              (\ o ->+                 AccountsListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "accounts" .!= mempty)+                     <*>+                     (o .:? "kind" .!=+                        "dfareporting#accountsListResponse"))++instance ToJSON AccountsListResponse where+        toJSON AccountsListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _accNextPageToken,+                  ("accounts" .=) <$> _accAccounts,+                  Just ("kind" .= _accKind)])++-- | Represents a date range.+--+-- /See:/ 'dateRange' smart constructor.+data DateRange = DateRange'+    { _drKind              :: !Text+    , _drEndDate           :: !(Maybe Date')+    , _drStartDate         :: !(Maybe Date')+    , _drRelativeDateRange :: !(Maybe DateRangeRelativeDateRange)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DateRange' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'drKind'+--+-- * 'drEndDate'+--+-- * 'drStartDate'+--+-- * 'drRelativeDateRange'+dateRange+    :: DateRange+dateRange =+    DateRange'+    { _drKind = "dfareporting#dateRange"+    , _drEndDate = Nothing+    , _drStartDate = Nothing+    , _drRelativeDateRange = Nothing+    }++-- | The kind of resource this is, in this case dfareporting#dateRange.+drKind :: Lens' DateRange Text+drKind = lens _drKind (\ s a -> s{_drKind = a})++-- | The end date of the date range, inclusive. A string of the format:+-- \"yyyy-MM-dd\".+drEndDate :: Lens' DateRange (Maybe Day)+drEndDate+  = lens _drEndDate (\ s a -> s{_drEndDate = a}) .+      mapping _Date++-- | The start date of the date range, inclusive. A string of the format:+-- \"yyyy-MM-dd\".+drStartDate :: Lens' DateRange (Maybe Day)+drStartDate+  = lens _drStartDate (\ s a -> s{_drStartDate = a}) .+      mapping _Date++-- | The date range relative to the date of when the report is run.+drRelativeDateRange :: Lens' DateRange (Maybe DateRangeRelativeDateRange)+drRelativeDateRange+  = lens _drRelativeDateRange+      (\ s a -> s{_drRelativeDateRange = a})++instance FromJSON DateRange where+        parseJSON+          = withObject "DateRange"+              (\ o ->+                 DateRange' <$>+                   (o .:? "kind" .!= "dfareporting#dateRange") <*>+                     (o .:? "endDate")+                     <*> (o .:? "startDate")+                     <*> (o .:? "relativeDateRange"))++instance ToJSON DateRange where+        toJSON DateRange'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _drKind),+                  ("endDate" .=) <$> _drEndDate,+                  ("startDate" .=) <$> _drStartDate,+                  ("relativeDateRange" .=) <$> _drRelativeDateRange])++-- | Represents a Report resource.+--+-- /See:/ 'report' smart constructor.+data Report = Report'+    { _rDelivery                    :: !(Maybe ReportDelivery)+    , _rEtag                        :: !(Maybe Text)+    , _rOwnerProFileId              :: !(Maybe (Textual Int64))+    , _rSchedule                    :: !(Maybe ReportSchedule)+    , _rPathToConversionCriteria    :: !(Maybe ReportPathToConversionCriteria)+    , _rKind                        :: !Text+    , _rFormat                      :: !(Maybe ReportFormat)+    , _rReachCriteria               :: !(Maybe ReportReachCriteria)+    , _rLastModifiedTime            :: !(Maybe (Textual Word64))+    , _rAccountId                   :: !(Maybe (Textual Int64))+    , _rName                        :: !(Maybe Text)+    , _rId                          :: !(Maybe (Textual Int64))+    , _rCrossDimensionReachCriteria :: !(Maybe ReportCrossDimensionReachCriteria)+    , _rType                        :: !(Maybe ReportType)+    , _rSubAccountId                :: !(Maybe (Textual Int64))+    , _rFloodlightCriteria          :: !(Maybe ReportFloodlightCriteria)+    , _rCriteria                    :: !(Maybe ReportCriteria)+    , _rFileName                    :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Report' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rDelivery'+--+-- * 'rEtag'+--+-- * 'rOwnerProFileId'+--+-- * 'rSchedule'+--+-- * 'rPathToConversionCriteria'+--+-- * 'rKind'+--+-- * 'rFormat'+--+-- * 'rReachCriteria'+--+-- * 'rLastModifiedTime'+--+-- * 'rAccountId'+--+-- * 'rName'+--+-- * 'rId'+--+-- * 'rCrossDimensionReachCriteria'+--+-- * 'rType'+--+-- * 'rSubAccountId'+--+-- * 'rFloodlightCriteria'+--+-- * 'rCriteria'+--+-- * 'rFileName'+report+    :: Report+report =+    Report'+    { _rDelivery = Nothing+    , _rEtag = Nothing+    , _rOwnerProFileId = Nothing+    , _rSchedule = Nothing+    , _rPathToConversionCriteria = Nothing+    , _rKind = "dfareporting#report"+    , _rFormat = Nothing+    , _rReachCriteria = Nothing+    , _rLastModifiedTime = Nothing+    , _rAccountId = Nothing+    , _rName = Nothing+    , _rId = Nothing+    , _rCrossDimensionReachCriteria = Nothing+    , _rType = Nothing+    , _rSubAccountId = Nothing+    , _rFloodlightCriteria = Nothing+    , _rCriteria = Nothing+    , _rFileName = Nothing+    }++-- | The report\'s email delivery settings.+rDelivery :: Lens' Report (Maybe ReportDelivery)+rDelivery+  = lens _rDelivery (\ s a -> s{_rDelivery = a})++-- | The eTag of this response for caching purposes.+rEtag :: Lens' Report (Maybe Text)+rEtag = lens _rEtag (\ s a -> s{_rEtag = a})++-- | The user profile id of the owner of this report.+rOwnerProFileId :: Lens' Report (Maybe Int64)+rOwnerProFileId+  = lens _rOwnerProFileId+      (\ s a -> s{_rOwnerProFileId = a})+      . mapping _Coerce++-- | The report\'s schedule. Can only be set if the report\'s \'dateRange\'+-- is a relative date range and the relative date range is not \"TODAY\".+rSchedule :: Lens' Report (Maybe ReportSchedule)+rSchedule+  = lens _rSchedule (\ s a -> s{_rSchedule = a})++-- | The report criteria for a report of type \"PATH_TO_CONVERSION\".+rPathToConversionCriteria :: Lens' Report (Maybe ReportPathToConversionCriteria)+rPathToConversionCriteria+  = lens _rPathToConversionCriteria+      (\ s a -> s{_rPathToConversionCriteria = a})++-- | The kind of resource this is, in this case dfareporting#report.+rKind :: Lens' Report Text+rKind = lens _rKind (\ s a -> s{_rKind = a})++-- | The output format of the report. If not specified, default format is+-- \"CSV\". Note that the actual format in the completed report file might+-- differ if for instance the report\'s size exceeds the format\'s+-- capabilities. \"CSV\" will then be the fallback format.+rFormat :: Lens' Report (Maybe ReportFormat)+rFormat = lens _rFormat (\ s a -> s{_rFormat = a})++-- | The report criteria for a report of type \"REACH\".+rReachCriteria :: Lens' Report (Maybe ReportReachCriteria)+rReachCriteria+  = lens _rReachCriteria+      (\ s a -> s{_rReachCriteria = a})++-- | The timestamp (in milliseconds since epoch) of when this report was last+-- modified.+rLastModifiedTime :: Lens' Report (Maybe Word64)+rLastModifiedTime+  = lens _rLastModifiedTime+      (\ s a -> s{_rLastModifiedTime = a})+      . mapping _Coerce++-- | The account ID to which this report belongs.+rAccountId :: Lens' Report (Maybe Int64)+rAccountId+  = lens _rAccountId (\ s a -> s{_rAccountId = a}) .+      mapping _Coerce++-- | The name of the report.+rName :: Lens' Report (Maybe Text)+rName = lens _rName (\ s a -> s{_rName = a})++-- | The unique ID identifying this report resource.+rId :: Lens' Report (Maybe Int64)+rId+  = lens _rId (\ s a -> s{_rId = a}) . mapping _Coerce++-- | The report criteria for a report of type \"CROSS_DIMENSION_REACH\".+rCrossDimensionReachCriteria :: Lens' Report (Maybe ReportCrossDimensionReachCriteria)+rCrossDimensionReachCriteria+  = lens _rCrossDimensionReachCriteria+      (\ s a -> s{_rCrossDimensionReachCriteria = a})++-- | The type of the report.+rType :: Lens' Report (Maybe ReportType)+rType = lens _rType (\ s a -> s{_rType = a})++-- | The subaccount ID to which this report belongs if applicable.+rSubAccountId :: Lens' Report (Maybe Int64)+rSubAccountId+  = lens _rSubAccountId+      (\ s a -> s{_rSubAccountId = a})+      . mapping _Coerce++-- | The report criteria for a report of type \"FLOODLIGHT\".+rFloodlightCriteria :: Lens' Report (Maybe ReportFloodlightCriteria)+rFloodlightCriteria+  = lens _rFloodlightCriteria+      (\ s a -> s{_rFloodlightCriteria = a})++-- | The report criteria for a report of type \"STANDARD\".+rCriteria :: Lens' Report (Maybe ReportCriteria)+rCriteria+  = lens _rCriteria (\ s a -> s{_rCriteria = a})++-- | The filename used when generating report files for this report.+rFileName :: Lens' Report (Maybe Text)+rFileName+  = lens _rFileName (\ s a -> s{_rFileName = a})++instance FromJSON Report where+        parseJSON+          = withObject "Report"+              (\ o ->+                 Report' <$>+                   (o .:? "delivery") <*> (o .:? "etag") <*>+                     (o .:? "ownerProfileId")+                     <*> (o .:? "schedule")+                     <*> (o .:? "pathToConversionCriteria")+                     <*> (o .:? "kind" .!= "dfareporting#report")+                     <*> (o .:? "format")+                     <*> (o .:? "reachCriteria")+                     <*> (o .:? "lastModifiedTime")+                     <*> (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "id")+                     <*> (o .:? "crossDimensionReachCriteria")+                     <*> (o .:? "type")+                     <*> (o .:? "subAccountId")+                     <*> (o .:? "floodlightCriteria")+                     <*> (o .:? "criteria")+                     <*> (o .:? "fileName"))++instance ToJSON Report where+        toJSON Report'{..}+          = object+              (catMaybes+                 [("delivery" .=) <$> _rDelivery,+                  ("etag" .=) <$> _rEtag,+                  ("ownerProfileId" .=) <$> _rOwnerProFileId,+                  ("schedule" .=) <$> _rSchedule,+                  ("pathToConversionCriteria" .=) <$>+                    _rPathToConversionCriteria,+                  Just ("kind" .= _rKind), ("format" .=) <$> _rFormat,+                  ("reachCriteria" .=) <$> _rReachCriteria,+                  ("lastModifiedTime" .=) <$> _rLastModifiedTime,+                  ("accountId" .=) <$> _rAccountId,+                  ("name" .=) <$> _rName, ("id" .=) <$> _rId,+                  ("crossDimensionReachCriteria" .=) <$>+                    _rCrossDimensionReachCriteria,+                  ("type" .=) <$> _rType,+                  ("subAccountId" .=) <$> _rSubAccountId,+                  ("floodlightCriteria" .=) <$> _rFloodlightCriteria,+                  ("criteria" .=) <$> _rCriteria,+                  ("fileName" .=) <$> _rFileName])++-- | Contains properties of a DCM campaign.+--+-- /See:/ 'campaign' smart constructor.+data Campaign = Campaign'+    { _camCreativeOptimizationConfiguration            :: !(Maybe CreativeOptimizationConfiguration)+    , _camCreativeGroupIds                             :: !(Maybe [Textual Int64])+    , _camNielsenOCREnabled                            :: !(Maybe Bool)+    , _camKind                                         :: !Text+    , _camClickThroughURLSuffixProperties              :: !(Maybe ClickThroughURLSuffixProperties)+    , _camAdvertiserId                                 :: !(Maybe (Textual Int64))+    , _camEndDate                                      :: !(Maybe Date')+    , _camAdvertiserIdDimensionValue                   :: !(Maybe DimensionValue)+    , _camIdDimensionValue                             :: !(Maybe DimensionValue)+    , _camEventTagOverrides                            :: !(Maybe [EventTagOverride])+    , _camLookbackConfiguration                        :: !(Maybe LookbackConfiguration)+    , _camStartDate                                    :: !(Maybe Date')+    , _camAccountId                                    :: !(Maybe (Textual Int64))+    , _camComscoreVceEnabled                           :: !(Maybe Bool)+    , _camName                                         :: !(Maybe Text)+    , _camAdvertiserGroupId                            :: !(Maybe (Textual Int64))+    , _camBillingInvoiceCode                           :: !(Maybe Text)+    , _camCreateInfo                                   :: !(Maybe LastModifiedInfo)+    , _camLastModifiedInfo                             :: !(Maybe LastModifiedInfo)+    , _camId                                           :: !(Maybe (Textual Int64))+    , _camSubAccountId                                 :: !(Maybe (Textual Int64))+    , _camAdditionalCreativeOptimizationConfigurations :: !(Maybe [CreativeOptimizationConfiguration])+    , _camExternalId                                   :: !(Maybe Text)+    , _camComment                                      :: !(Maybe Text)+    , _camAudienceSegmentGroups                        :: !(Maybe [AudienceSegmentGroup])+    , _camArchived                                     :: !(Maybe Bool)+    , _camTraffickerEmails                             :: !(Maybe [Text])+    , _camDefaultClickThroughEventTagProperties        :: !(Maybe DefaultClickThroughEventTagProperties)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Campaign' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'camCreativeOptimizationConfiguration'+--+-- * 'camCreativeGroupIds'+--+-- * 'camNielsenOCREnabled'+--+-- * 'camKind'+--+-- * 'camClickThroughURLSuffixProperties'+--+-- * 'camAdvertiserId'+--+-- * 'camEndDate'+--+-- * 'camAdvertiserIdDimensionValue'+--+-- * 'camIdDimensionValue'+--+-- * 'camEventTagOverrides'+--+-- * 'camLookbackConfiguration'+--+-- * 'camStartDate'+--+-- * 'camAccountId'+--+-- * 'camComscoreVceEnabled'+--+-- * 'camName'+--+-- * 'camAdvertiserGroupId'+--+-- * 'camBillingInvoiceCode'+--+-- * 'camCreateInfo'+--+-- * 'camLastModifiedInfo'+--+-- * 'camId'+--+-- * 'camSubAccountId'+--+-- * 'camAdditionalCreativeOptimizationConfigurations'+--+-- * 'camExternalId'+--+-- * 'camComment'+--+-- * 'camAudienceSegmentGroups'+--+-- * 'camArchived'+--+-- * 'camTraffickerEmails'+--+-- * 'camDefaultClickThroughEventTagProperties'+campaign+    :: Campaign+campaign =+    Campaign'+    { _camCreativeOptimizationConfiguration = Nothing+    , _camCreativeGroupIds = Nothing+    , _camNielsenOCREnabled = Nothing+    , _camKind = "dfareporting#campaign"+    , _camClickThroughURLSuffixProperties = Nothing+    , _camAdvertiserId = Nothing+    , _camEndDate = Nothing+    , _camAdvertiserIdDimensionValue = Nothing+    , _camIdDimensionValue = Nothing+    , _camEventTagOverrides = Nothing+    , _camLookbackConfiguration = Nothing+    , _camStartDate = Nothing+    , _camAccountId = Nothing+    , _camComscoreVceEnabled = Nothing+    , _camName = Nothing+    , _camAdvertiserGroupId = Nothing+    , _camBillingInvoiceCode = Nothing+    , _camCreateInfo = Nothing+    , _camLastModifiedInfo = Nothing+    , _camId = Nothing+    , _camSubAccountId = Nothing+    , _camAdditionalCreativeOptimizationConfigurations = Nothing+    , _camExternalId = Nothing+    , _camComment = Nothing+    , _camAudienceSegmentGroups = Nothing+    , _camArchived = Nothing+    , _camTraffickerEmails = Nothing+    , _camDefaultClickThroughEventTagProperties = Nothing+    }++-- | Creative optimization configuration for the campaign.+camCreativeOptimizationConfiguration :: Lens' Campaign (Maybe CreativeOptimizationConfiguration)+camCreativeOptimizationConfiguration+  = lens _camCreativeOptimizationConfiguration+      (\ s a ->+         s{_camCreativeOptimizationConfiguration = a})++-- | List of creative group IDs that are assigned to the campaign.+camCreativeGroupIds :: Lens' Campaign [Int64]+camCreativeGroupIds+  = lens _camCreativeGroupIds+      (\ s a -> s{_camCreativeGroupIds = a})+      . _Default+      . _Coerce++-- | Whether Nielsen reports are enabled for this campaign.+camNielsenOCREnabled :: Lens' Campaign (Maybe Bool)+camNielsenOCREnabled+  = lens _camNielsenOCREnabled+      (\ s a -> s{_camNielsenOCREnabled = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#campaign\".+camKind :: Lens' Campaign Text+camKind = lens _camKind (\ s a -> s{_camKind = a})++-- | Click-through URL suffix override properties for this campaign.+camClickThroughURLSuffixProperties :: Lens' Campaign (Maybe ClickThroughURLSuffixProperties)+camClickThroughURLSuffixProperties+  = lens _camClickThroughURLSuffixProperties+      (\ s a -> s{_camClickThroughURLSuffixProperties = a})++-- | Advertiser ID of this campaign. This is a required field.+camAdvertiserId :: Lens' Campaign (Maybe Int64)+camAdvertiserId+  = lens _camAdvertiserId+      (\ s a -> s{_camAdvertiserId = a})+      . mapping _Coerce++-- | Date on which the campaign will stop running. On insert, the end date+-- must be today or a future date. The end date must be later than or be+-- the same as the start date. If, for example, you set 6\/25\/2015 as both+-- the start and end dates, the effective campaign run date is just that+-- day only, 6\/25\/2015. The hours, minutes, and seconds of the end date+-- should not be set, as doing so will result in an error. This is a+-- required field.+camEndDate :: Lens' Campaign (Maybe Day)+camEndDate+  = lens _camEndDate (\ s a -> s{_camEndDate = a}) .+      mapping _Date++-- | Dimension value for the advertiser ID of this campaign. This is a+-- read-only, auto-generated field.+camAdvertiserIdDimensionValue :: Lens' Campaign (Maybe DimensionValue)+camAdvertiserIdDimensionValue+  = lens _camAdvertiserIdDimensionValue+      (\ s a -> s{_camAdvertiserIdDimensionValue = a})++-- | Dimension value for the ID of this campaign. This is a read-only,+-- auto-generated field.+camIdDimensionValue :: Lens' Campaign (Maybe DimensionValue)+camIdDimensionValue+  = lens _camIdDimensionValue+      (\ s a -> s{_camIdDimensionValue = a})++-- | Overrides that can be used to activate or deactivate advertiser event+-- tags.+camEventTagOverrides :: Lens' Campaign [EventTagOverride]+camEventTagOverrides+  = lens _camEventTagOverrides+      (\ s a -> s{_camEventTagOverrides = a})+      . _Default+      . _Coerce++-- | Lookback window settings for the campaign.+camLookbackConfiguration :: Lens' Campaign (Maybe LookbackConfiguration)+camLookbackConfiguration+  = lens _camLookbackConfiguration+      (\ s a -> s{_camLookbackConfiguration = a})++-- | Date on which the campaign starts running. The start date can be any+-- date. The hours, minutes, and seconds of the start date should not be+-- set, as doing so will result in an error. This is a required field.+camStartDate :: Lens' Campaign (Maybe Day)+camStartDate+  = lens _camStartDate (\ s a -> s{_camStartDate = a})+      . mapping _Date++-- | Account ID of this campaign. This is a read-only field that can be left+-- blank.+camAccountId :: Lens' Campaign (Maybe Int64)+camAccountId+  = lens _camAccountId (\ s a -> s{_camAccountId = a})+      . mapping _Coerce++-- | Whether comScore vCE reports are enabled for this campaign.+camComscoreVceEnabled :: Lens' Campaign (Maybe Bool)+camComscoreVceEnabled+  = lens _camComscoreVceEnabled+      (\ s a -> s{_camComscoreVceEnabled = a})++-- | Name of this campaign. This is a required field and must be less than+-- 256 characters long and unique among campaigns of the same advertiser.+camName :: Lens' Campaign (Maybe Text)+camName = lens _camName (\ s a -> s{_camName = a})++-- | Advertiser group ID of the associated advertiser.+camAdvertiserGroupId :: Lens' Campaign (Maybe Int64)+camAdvertiserGroupId+  = lens _camAdvertiserGroupId+      (\ s a -> s{_camAdvertiserGroupId = a})+      . mapping _Coerce++-- | Billing invoice code included in the DCM client billing invoices+-- associated with the campaign.+camBillingInvoiceCode :: Lens' Campaign (Maybe Text)+camBillingInvoiceCode+  = lens _camBillingInvoiceCode+      (\ s a -> s{_camBillingInvoiceCode = a})++-- | Information about the creation of this campaign. This is a read-only+-- field.+camCreateInfo :: Lens' Campaign (Maybe LastModifiedInfo)+camCreateInfo+  = lens _camCreateInfo+      (\ s a -> s{_camCreateInfo = a})++-- | Information about the most recent modification of this campaign. This is+-- a read-only field.+camLastModifiedInfo :: Lens' Campaign (Maybe LastModifiedInfo)+camLastModifiedInfo+  = lens _camLastModifiedInfo+      (\ s a -> s{_camLastModifiedInfo = a})++-- | ID of this campaign. This is a read-only auto-generated field.+camId :: Lens' Campaign (Maybe Int64)+camId+  = lens _camId (\ s a -> s{_camId = a}) .+      mapping _Coerce++-- | Subaccount ID of this campaign. This is a read-only field that can be+-- left blank.+camSubAccountId :: Lens' Campaign (Maybe Int64)+camSubAccountId+  = lens _camSubAccountId+      (\ s a -> s{_camSubAccountId = a})+      . mapping _Coerce++-- | Additional creative optimization configurations for the campaign.+camAdditionalCreativeOptimizationConfigurations :: Lens' Campaign [CreativeOptimizationConfiguration]+camAdditionalCreativeOptimizationConfigurations+  = lens+      _camAdditionalCreativeOptimizationConfigurations+      (\ s a ->+         s{_camAdditionalCreativeOptimizationConfigurations =+             a})+      . _Default+      . _Coerce++-- | External ID for this campaign.+camExternalId :: Lens' Campaign (Maybe Text)+camExternalId+  = lens _camExternalId+      (\ s a -> s{_camExternalId = a})++-- | Arbitrary comments about this campaign. Must be less than 256 characters+-- long.+camComment :: Lens' Campaign (Maybe Text)+camComment+  = lens _camComment (\ s a -> s{_camComment = a})++-- | Audience segment groups assigned to this campaign. Cannot have more than+-- 300 segment groups.+camAudienceSegmentGroups :: Lens' Campaign [AudienceSegmentGroup]+camAudienceSegmentGroups+  = lens _camAudienceSegmentGroups+      (\ s a -> s{_camAudienceSegmentGroups = a})+      . _Default+      . _Coerce++-- | Whether this campaign has been archived.+camArchived :: Lens' Campaign (Maybe Bool)+camArchived+  = lens _camArchived (\ s a -> s{_camArchived = a})++-- | Campaign trafficker contact emails.+camTraffickerEmails :: Lens' Campaign [Text]+camTraffickerEmails+  = lens _camTraffickerEmails+      (\ s a -> s{_camTraffickerEmails = a})+      . _Default+      . _Coerce++-- | Click-through event tag ID override properties for this campaign.+camDefaultClickThroughEventTagProperties :: Lens' Campaign (Maybe DefaultClickThroughEventTagProperties)+camDefaultClickThroughEventTagProperties+  = lens _camDefaultClickThroughEventTagProperties+      (\ s a ->+         s{_camDefaultClickThroughEventTagProperties = a})++instance FromJSON Campaign where+        parseJSON+          = withObject "Campaign"+              (\ o ->+                 Campaign' <$>+                   (o .:? "creativeOptimizationConfiguration") <*>+                     (o .:? "creativeGroupIds" .!= mempty)+                     <*> (o .:? "nielsenOcrEnabled")+                     <*> (o .:? "kind" .!= "dfareporting#campaign")+                     <*> (o .:? "clickThroughUrlSuffixProperties")+                     <*> (o .:? "advertiserId")+                     <*> (o .:? "endDate")+                     <*> (o .:? "advertiserIdDimensionValue")+                     <*> (o .:? "idDimensionValue")+                     <*> (o .:? "eventTagOverrides" .!= mempty)+                     <*> (o .:? "lookbackConfiguration")+                     <*> (o .:? "startDate")+                     <*> (o .:? "accountId")+                     <*> (o .:? "comscoreVceEnabled")+                     <*> (o .:? "name")+                     <*> (o .:? "advertiserGroupId")+                     <*> (o .:? "billingInvoiceCode")+                     <*> (o .:? "createInfo")+                     <*> (o .:? "lastModifiedInfo")+                     <*> (o .:? "id")+                     <*> (o .:? "subaccountId")+                     <*>+                     (o .:? "additionalCreativeOptimizationConfigurations"+                        .!= mempty)+                     <*> (o .:? "externalId")+                     <*> (o .:? "comment")+                     <*> (o .:? "audienceSegmentGroups" .!= mempty)+                     <*> (o .:? "archived")+                     <*> (o .:? "traffickerEmails" .!= mempty)+                     <*> (o .:? "defaultClickThroughEventTagProperties"))++instance ToJSON Campaign where+        toJSON Campaign'{..}+          = object+              (catMaybes+                 [("creativeOptimizationConfiguration" .=) <$>+                    _camCreativeOptimizationConfiguration,+                  ("creativeGroupIds" .=) <$> _camCreativeGroupIds,+                  ("nielsenOcrEnabled" .=) <$> _camNielsenOCREnabled,+                  Just ("kind" .= _camKind),+                  ("clickThroughUrlSuffixProperties" .=) <$>+                    _camClickThroughURLSuffixProperties,+                  ("advertiserId" .=) <$> _camAdvertiserId,+                  ("endDate" .=) <$> _camEndDate,+                  ("advertiserIdDimensionValue" .=) <$>+                    _camAdvertiserIdDimensionValue,+                  ("idDimensionValue" .=) <$> _camIdDimensionValue,+                  ("eventTagOverrides" .=) <$> _camEventTagOverrides,+                  ("lookbackConfiguration" .=) <$>+                    _camLookbackConfiguration,+                  ("startDate" .=) <$> _camStartDate,+                  ("accountId" .=) <$> _camAccountId,+                  ("comscoreVceEnabled" .=) <$> _camComscoreVceEnabled,+                  ("name" .=) <$> _camName,+                  ("advertiserGroupId" .=) <$> _camAdvertiserGroupId,+                  ("billingInvoiceCode" .=) <$> _camBillingInvoiceCode,+                  ("createInfo" .=) <$> _camCreateInfo,+                  ("lastModifiedInfo" .=) <$> _camLastModifiedInfo,+                  ("id" .=) <$> _camId,+                  ("subaccountId" .=) <$> _camSubAccountId,+                  ("additionalCreativeOptimizationConfigurations" .=)+                    <$> _camAdditionalCreativeOptimizationConfigurations,+                  ("externalId" .=) <$> _camExternalId,+                  ("comment" .=) <$> _camComment,+                  ("audienceSegmentGroups" .=) <$>+                    _camAudienceSegmentGroups,+                  ("archived" .=) <$> _camArchived,+                  ("traffickerEmails" .=) <$> _camTraffickerEmails,+                  ("defaultClickThroughEventTagProperties" .=) <$>+                    _camDefaultClickThroughEventTagProperties])++-- | Third Party Authentication Token+--+-- /See:/ 'thirdPartyAuthenticationToken' smart constructor.+data ThirdPartyAuthenticationToken = ThirdPartyAuthenticationToken'+    { _tpatValue :: !(Maybe Text)+    , _tpatName  :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ThirdPartyAuthenticationToken' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'tpatValue'+--+-- * 'tpatName'+thirdPartyAuthenticationToken+    :: ThirdPartyAuthenticationToken+thirdPartyAuthenticationToken =+    ThirdPartyAuthenticationToken'+    { _tpatValue = Nothing+    , _tpatName = Nothing+    }++-- | Value of the third-party authentication token. This is a read-only,+-- auto-generated field.+tpatValue :: Lens' ThirdPartyAuthenticationToken (Maybe Text)+tpatValue+  = lens _tpatValue (\ s a -> s{_tpatValue = a})++-- | Name of the third-party authentication token.+tpatName :: Lens' ThirdPartyAuthenticationToken (Maybe Text)+tpatName = lens _tpatName (\ s a -> s{_tpatName = a})++instance FromJSON ThirdPartyAuthenticationToken where+        parseJSON+          = withObject "ThirdPartyAuthenticationToken"+              (\ o ->+                 ThirdPartyAuthenticationToken' <$>+                   (o .:? "value") <*> (o .:? "name"))++instance ToJSON ThirdPartyAuthenticationToken where+        toJSON ThirdPartyAuthenticationToken'{..}+          = object+              (catMaybes+                 [("value" .=) <$> _tpatValue,+                  ("name" .=) <$> _tpatName])++-- | Click-through URL+--+-- /See:/ 'clickThroughURL' smart constructor.+data ClickThroughURL = ClickThroughURL'+    { _ctuDefaultLandingPage      :: !(Maybe Bool)+    , _ctuComputedClickThroughURL :: !(Maybe Text)+    , _ctuCustomClickThroughURL   :: !(Maybe Text)+    , _ctuLandingPageId           :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ClickThroughURL' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ctuDefaultLandingPage'+--+-- * 'ctuComputedClickThroughURL'+--+-- * 'ctuCustomClickThroughURL'+--+-- * 'ctuLandingPageId'+clickThroughURL+    :: ClickThroughURL+clickThroughURL =+    ClickThroughURL'+    { _ctuDefaultLandingPage = Nothing+    , _ctuComputedClickThroughURL = Nothing+    , _ctuCustomClickThroughURL = Nothing+    , _ctuLandingPageId = Nothing+    }++-- | Whether the campaign default landing page is used.+ctuDefaultLandingPage :: Lens' ClickThroughURL (Maybe Bool)+ctuDefaultLandingPage+  = lens _ctuDefaultLandingPage+      (\ s a -> s{_ctuDefaultLandingPage = a})++-- | Read-only convenience field representing the actual URL that will be+-- used for this click-through. The URL is computed as follows: - If+-- defaultLandingPage is enabled then the campaign\'s default landing page+-- URL is assigned to this field. - If defaultLandingPage is not enabled+-- and a landingPageId is specified then that landing page\'s URL is+-- assigned to this field. - If neither of the above cases apply, then the+-- customClickThroughUrl is assigned to this field.+ctuComputedClickThroughURL :: Lens' ClickThroughURL (Maybe Text)+ctuComputedClickThroughURL+  = lens _ctuComputedClickThroughURL+      (\ s a -> s{_ctuComputedClickThroughURL = a})++-- | Custom click-through URL. Applicable if the defaultLandingPage field is+-- set to false and the landingPageId field is left unset.+ctuCustomClickThroughURL :: Lens' ClickThroughURL (Maybe Text)+ctuCustomClickThroughURL+  = lens _ctuCustomClickThroughURL+      (\ s a -> s{_ctuCustomClickThroughURL = a})++-- | ID of the landing page for the click-through URL. Applicable if the+-- defaultLandingPage field is set to false.+ctuLandingPageId :: Lens' ClickThroughURL (Maybe Int64)+ctuLandingPageId+  = lens _ctuLandingPageId+      (\ s a -> s{_ctuLandingPageId = a})+      . mapping _Coerce++instance FromJSON ClickThroughURL where+        parseJSON+          = withObject "ClickThroughURL"+              (\ o ->+                 ClickThroughURL' <$>+                   (o .:? "defaultLandingPage") <*>+                     (o .:? "computedClickThroughUrl")+                     <*> (o .:? "customClickThroughUrl")+                     <*> (o .:? "landingPageId"))++instance ToJSON ClickThroughURL where+        toJSON ClickThroughURL'{..}+          = object+              (catMaybes+                 [("defaultLandingPage" .=) <$>+                    _ctuDefaultLandingPage,+                  ("computedClickThroughUrl" .=) <$>+                    _ctuComputedClickThroughURL,+                  ("customClickThroughUrl" .=) <$>+                    _ctuCustomClickThroughURL,+                  ("landingPageId" .=) <$> _ctuLandingPageId])++-- | Browser List Response+--+-- /See:/ 'browsersListResponse' smart constructor.+data BrowsersListResponse = BrowsersListResponse'+    { _blrKind     :: !Text+    , _blrBrowsers :: !(Maybe [Browser])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'BrowsersListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'blrKind'+--+-- * 'blrBrowsers'+browsersListResponse+    :: BrowsersListResponse+browsersListResponse =+    BrowsersListResponse'+    { _blrKind = "dfareporting#browsersListResponse"+    , _blrBrowsers = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#browsersListResponse\".+blrKind :: Lens' BrowsersListResponse Text+blrKind = lens _blrKind (\ s a -> s{_blrKind = a})++-- | Browser collection.+blrBrowsers :: Lens' BrowsersListResponse [Browser]+blrBrowsers+  = lens _blrBrowsers (\ s a -> s{_blrBrowsers = a}) .+      _Default+      . _Coerce++instance FromJSON BrowsersListResponse where+        parseJSON+          = withObject "BrowsersListResponse"+              (\ o ->+                 BrowsersListResponse' <$>+                   (o .:? "kind" .!=+                      "dfareporting#browsersListResponse")+                     <*> (o .:? "browsers" .!= mempty))++instance ToJSON BrowsersListResponse where+        toJSON BrowsersListResponse'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _blrKind),+                  ("browsers" .=) <$> _blrBrowsers])++-- | Site Settings+--+-- /See:/ 'siteSettings' smart constructor.+data SiteSettings = SiteSettings'+    { _ssDisableNewCookie      :: !(Maybe Bool)+    , _ssDisableBrandSafeAds   :: !(Maybe Bool)+    , _ssLookbackConfiguration :: !(Maybe LookbackConfiguration)+    , _ssTagSetting            :: !(Maybe TagSetting)+    , _ssActiveViewOptOut      :: !(Maybe Bool)+    , _ssVideoActiveViewOptOut :: !(Maybe Bool)+    , _ssCreativeSettings      :: !(Maybe CreativeSettings)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'SiteSettings' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ssDisableNewCookie'+--+-- * 'ssDisableBrandSafeAds'+--+-- * 'ssLookbackConfiguration'+--+-- * 'ssTagSetting'+--+-- * 'ssActiveViewOptOut'+--+-- * 'ssVideoActiveViewOptOut'+--+-- * 'ssCreativeSettings'+siteSettings+    :: SiteSettings+siteSettings =+    SiteSettings'+    { _ssDisableNewCookie = Nothing+    , _ssDisableBrandSafeAds = Nothing+    , _ssLookbackConfiguration = Nothing+    , _ssTagSetting = Nothing+    , _ssActiveViewOptOut = Nothing+    , _ssVideoActiveViewOptOut = Nothing+    , _ssCreativeSettings = Nothing+    }++-- | Whether new cookies are disabled for this site.+ssDisableNewCookie :: Lens' SiteSettings (Maybe Bool)+ssDisableNewCookie+  = lens _ssDisableNewCookie+      (\ s a -> s{_ssDisableNewCookie = a})++-- | Whether brand safe ads are disabled for this site.+ssDisableBrandSafeAds :: Lens' SiteSettings (Maybe Bool)+ssDisableBrandSafeAds+  = lens _ssDisableBrandSafeAds+      (\ s a -> s{_ssDisableBrandSafeAds = a})++-- | Lookback window settings for this site.+ssLookbackConfiguration :: Lens' SiteSettings (Maybe LookbackConfiguration)+ssLookbackConfiguration+  = lens _ssLookbackConfiguration+      (\ s a -> s{_ssLookbackConfiguration = a})++-- | Configuration settings for dynamic and image floodlight tags.+ssTagSetting :: Lens' SiteSettings (Maybe TagSetting)+ssTagSetting+  = lens _ssTagSetting (\ s a -> s{_ssTagSetting = a})++-- | Whether active view creatives are disabled for this site.+ssActiveViewOptOut :: Lens' SiteSettings (Maybe Bool)+ssActiveViewOptOut+  = lens _ssActiveViewOptOut+      (\ s a -> s{_ssActiveViewOptOut = a})++-- | Whether Verification and ActiveView are disabled for in-stream video+-- creatives on this site. The same setting videoActiveViewOptOut exists on+-- the directory site level -- the opt out occurs if either of these+-- settings are true. These settings are distinct from+-- DirectorySites.settings.activeViewOptOut or+-- Sites.siteSettings.activeViewOptOut which only apply to display ads.+-- However, Accounts.activeViewOptOut opts out both video traffic, as well+-- as display ads, from Verification and ActiveView.+ssVideoActiveViewOptOut :: Lens' SiteSettings (Maybe Bool)+ssVideoActiveViewOptOut+  = lens _ssVideoActiveViewOptOut+      (\ s a -> s{_ssVideoActiveViewOptOut = a})++-- | Site-wide creative settings.+ssCreativeSettings :: Lens' SiteSettings (Maybe CreativeSettings)+ssCreativeSettings+  = lens _ssCreativeSettings+      (\ s a -> s{_ssCreativeSettings = a})++instance FromJSON SiteSettings where+        parseJSON+          = withObject "SiteSettings"+              (\ o ->+                 SiteSettings' <$>+                   (o .:? "disableNewCookie") <*>+                     (o .:? "disableBrandSafeAds")+                     <*> (o .:? "lookbackConfiguration")+                     <*> (o .:? "tagSetting")+                     <*> (o .:? "activeViewOptOut")+                     <*> (o .:? "videoActiveViewOptOut")+                     <*> (o .:? "creativeSettings"))++instance ToJSON SiteSettings where+        toJSON SiteSettings'{..}+          = object+              (catMaybes+                 [("disableNewCookie" .=) <$> _ssDisableNewCookie,+                  ("disableBrandSafeAds" .=) <$>+                    _ssDisableBrandSafeAds,+                  ("lookbackConfiguration" .=) <$>+                    _ssLookbackConfiguration,+                  ("tagSetting" .=) <$> _ssTagSetting,+                  ("activeViewOptOut" .=) <$> _ssActiveViewOptOut,+                  ("videoActiveViewOptOut" .=) <$>+                    _ssVideoActiveViewOptOut,+                  ("creativeSettings" .=) <$> _ssCreativeSettings])++-- | Content Category List Response+--+-- /See:/ 'contentCategoriesListResponse' smart constructor.+data ContentCategoriesListResponse = ContentCategoriesListResponse'+    { _cclrNextPageToken     :: !(Maybe Text)+    , _cclrKind              :: !Text+    , _cclrContentCategories :: !(Maybe [ContentCategory])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ContentCategoriesListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cclrNextPageToken'+--+-- * 'cclrKind'+--+-- * 'cclrContentCategories'+contentCategoriesListResponse+    :: ContentCategoriesListResponse+contentCategoriesListResponse =+    ContentCategoriesListResponse'+    { _cclrNextPageToken = Nothing+    , _cclrKind = "dfareporting#contentCategoriesListResponse"+    , _cclrContentCategories = Nothing+    }++-- | Pagination token to be used for the next list operation.+cclrNextPageToken :: Lens' ContentCategoriesListResponse (Maybe Text)+cclrNextPageToken+  = lens _cclrNextPageToken+      (\ s a -> s{_cclrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#contentCategoriesListResponse\".+cclrKind :: Lens' ContentCategoriesListResponse Text+cclrKind = lens _cclrKind (\ s a -> s{_cclrKind = a})++-- | Content category collection.+cclrContentCategories :: Lens' ContentCategoriesListResponse [ContentCategory]+cclrContentCategories+  = lens _cclrContentCategories+      (\ s a -> s{_cclrContentCategories = a})+      . _Default+      . _Coerce++instance FromJSON ContentCategoriesListResponse where+        parseJSON+          = withObject "ContentCategoriesListResponse"+              (\ o ->+                 ContentCategoriesListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!=+                        "dfareporting#contentCategoriesListResponse")+                     <*> (o .:? "contentCategories" .!= mempty))++instance ToJSON ContentCategoriesListResponse where+        toJSON ContentCategoriesListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _cclrNextPageToken,+                  Just ("kind" .= _cclrKind),+                  ("contentCategories" .=) <$> _cclrContentCategories])++-- | Creative List Response+--+-- /See:/ 'creativesListResponse' smart constructor.+data CreativesListResponse = CreativesListResponse'+    { _clrlNextPageToken :: !(Maybe Text)+    , _clrlKind          :: !Text+    , _clrlCreatives     :: !(Maybe [Creative])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CreativesListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'clrlNextPageToken'+--+-- * 'clrlKind'+--+-- * 'clrlCreatives'+creativesListResponse+    :: CreativesListResponse+creativesListResponse =+    CreativesListResponse'+    { _clrlNextPageToken = Nothing+    , _clrlKind = "dfareporting#creativesListResponse"+    , _clrlCreatives = Nothing+    }++-- | Pagination token to be used for the next list operation.+clrlNextPageToken :: Lens' CreativesListResponse (Maybe Text)+clrlNextPageToken+  = lens _clrlNextPageToken+      (\ s a -> s{_clrlNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#creativesListResponse\".+clrlKind :: Lens' CreativesListResponse Text+clrlKind = lens _clrlKind (\ s a -> s{_clrlKind = a})++-- | Creative collection.+clrlCreatives :: Lens' CreativesListResponse [Creative]+clrlCreatives+  = lens _clrlCreatives+      (\ s a -> s{_clrlCreatives = a})+      . _Default+      . _Coerce++instance FromJSON CreativesListResponse where+        parseJSON+          = withObject "CreativesListResponse"+              (\ o ->+                 CreativesListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!=+                        "dfareporting#creativesListResponse")+                     <*> (o .:? "creatives" .!= mempty))++instance ToJSON CreativesListResponse where+        toJSON CreativesListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _clrlNextPageToken,+                  Just ("kind" .= _clrlKind),+                  ("creatives" .=) <$> _clrlCreatives])++-- | Contains properties of a DCM account.+--+-- /See:/ 'account' smart constructor.+data Account = Account'+    { _aaAccountPermissionIds   :: !(Maybe [Textual Int64])+    , _aaMaximumImageSize       :: !(Maybe (Textual Int64))+    , _aaCurrencyId             :: !(Maybe (Textual Int64))+    , _aaReportsConfiguration   :: !(Maybe ReportsConfiguration)+    , _aaNielsenOCREnabled      :: !(Maybe Bool)+    , _aaKind                   :: !Text+    , _aaLocale                 :: !(Maybe Text)+    , _aaActive                 :: !(Maybe Bool)+    , _aaAvailablePermissionIds :: !(Maybe [Textual Int64])+    , _aaTeaserSizeLimit        :: !(Maybe (Textual Int64))+    , _aaComscoreVceEnabled     :: !(Maybe Bool)+    , _aaActiveViewOptOut       :: !(Maybe Bool)+    , _aaName                   :: !(Maybe Text)+    , _aaAccountProFile         :: !(Maybe AccountAccountProFile)+    , _aaId                     :: !(Maybe (Textual Int64))+    , _aaCountryId              :: !(Maybe (Textual Int64))+    , _aaActiveAdsLimitTier     :: !(Maybe AccountActiveAdsLimitTier)+    , _aaDefaultCreativeSizeId  :: !(Maybe (Textual Int64))+    , _aaDescription            :: !(Maybe Text)+    } 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:+--+-- * 'aaAccountPermissionIds'+--+-- * 'aaMaximumImageSize'+--+-- * 'aaCurrencyId'+--+-- * 'aaReportsConfiguration'+--+-- * 'aaNielsenOCREnabled'+--+-- * 'aaKind'+--+-- * 'aaLocale'+--+-- * 'aaActive'+--+-- * 'aaAvailablePermissionIds'+--+-- * 'aaTeaserSizeLimit'+--+-- * 'aaComscoreVceEnabled'+--+-- * 'aaActiveViewOptOut'+--+-- * 'aaName'+--+-- * 'aaAccountProFile'+--+-- * 'aaId'+--+-- * 'aaCountryId'+--+-- * 'aaActiveAdsLimitTier'+--+-- * 'aaDefaultCreativeSizeId'+--+-- * 'aaDescription'+account+    :: Account+account =+    Account'+    { _aaAccountPermissionIds = Nothing+    , _aaMaximumImageSize = Nothing+    , _aaCurrencyId = Nothing+    , _aaReportsConfiguration = Nothing+    , _aaNielsenOCREnabled = Nothing+    , _aaKind = "dfareporting#account"+    , _aaLocale = Nothing+    , _aaActive = Nothing+    , _aaAvailablePermissionIds = Nothing+    , _aaTeaserSizeLimit = Nothing+    , _aaComscoreVceEnabled = Nothing+    , _aaActiveViewOptOut = Nothing+    , _aaName = Nothing+    , _aaAccountProFile = Nothing+    , _aaId = Nothing+    , _aaCountryId = Nothing+    , _aaActiveAdsLimitTier = Nothing+    , _aaDefaultCreativeSizeId = Nothing+    , _aaDescription = Nothing+    }++-- | Account permissions assigned to this account.+aaAccountPermissionIds :: Lens' Account [Int64]+aaAccountPermissionIds+  = lens _aaAccountPermissionIds+      (\ s a -> s{_aaAccountPermissionIds = a})+      . _Default+      . _Coerce++-- | Maximum image size allowed for this account.+aaMaximumImageSize :: Lens' Account (Maybe Int64)+aaMaximumImageSize+  = lens _aaMaximumImageSize+      (\ s a -> s{_aaMaximumImageSize = a})+      . mapping _Coerce++-- | ID of currency associated with this account. This is a required field.+-- Acceptable values are: - \"1\" for USD - \"2\" for GBP - \"3\" for ESP -+-- \"4\" for SEK - \"5\" for CAD - \"6\" for JPY - \"7\" for DEM - \"8\"+-- for AUD - \"9\" for FRF - \"10\" for ITL - \"11\" for DKK - \"12\" for+-- NOK - \"13\" for FIM - \"14\" for ZAR - \"15\" for IEP - \"16\" for NLG+-- - \"17\" for EUR - \"18\" for KRW - \"19\" for TWD - \"20\" for SGD -+-- \"21\" for CNY - \"22\" for HKD - \"23\" for NZD - \"24\" for MYR -+-- \"25\" for BRL - \"26\" for PTE - \"27\" for MXP - \"28\" for CLP -+-- \"29\" for TRY - \"30\" for ARS - \"31\" for PEN - \"32\" for ILS -+-- \"33\" for CHF - \"34\" for VEF - \"35\" for COP - \"36\" for GTQ -+-- \"37\" for PLN - \"39\" for INR - \"40\" for THB - \"41\" for IDR -+-- \"42\" for CZK - \"43\" for RON - \"44\" for HUF - \"45\" for RUB -+-- \"46\" for AED - \"47\" for BGN - \"48\" for HRK+aaCurrencyId :: Lens' Account (Maybe Int64)+aaCurrencyId+  = lens _aaCurrencyId (\ s a -> s{_aaCurrencyId = a})+      . mapping _Coerce++-- | Reporting configuration of this account.+aaReportsConfiguration :: Lens' Account (Maybe ReportsConfiguration)+aaReportsConfiguration+  = lens _aaReportsConfiguration+      (\ s a -> s{_aaReportsConfiguration = a})++-- | Whether campaigns created in this account will be enabled for Nielsen+-- OCR reach ratings by default.+aaNielsenOCREnabled :: Lens' Account (Maybe Bool)+aaNielsenOCREnabled+  = lens _aaNielsenOCREnabled+      (\ s a -> s{_aaNielsenOCREnabled = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#account\".+aaKind :: Lens' Account Text+aaKind = lens _aaKind (\ s a -> s{_aaKind = a})++-- | Locale of this account. Acceptable values are: - \"cs\" (Czech) - \"de\"+-- (German) - \"en\" (English) - \"en-GB\" (English United Kingdom) -+-- \"es\" (Spanish) - \"fr\" (French) - \"it\" (Italian) - \"ja\"+-- (Japanese) - \"ko\" (Korean) - \"pl\" (Polish) - \"pt-BR\" (Portuguese+-- Brazil) - \"ru\" (Russian) - \"sv\" (Swedish) - \"tr\" (Turkish) -+-- \"zh-CN\" (Chinese Simplified) - \"zh-TW\" (Chinese Traditional)+aaLocale :: Lens' Account (Maybe Text)+aaLocale = lens _aaLocale (\ s a -> s{_aaLocale = a})++-- | Whether this account is active.+aaActive :: Lens' Account (Maybe Bool)+aaActive = lens _aaActive (\ s a -> s{_aaActive = a})++-- | User role permissions available to the user roles of this account.+aaAvailablePermissionIds :: Lens' Account [Int64]+aaAvailablePermissionIds+  = lens _aaAvailablePermissionIds+      (\ s a -> s{_aaAvailablePermissionIds = a})+      . _Default+      . _Coerce++-- | File size limit in kilobytes of Rich Media teaser creatives. Must be+-- between 1 and 10240.+aaTeaserSizeLimit :: Lens' Account (Maybe Int64)+aaTeaserSizeLimit+  = lens _aaTeaserSizeLimit+      (\ s a -> s{_aaTeaserSizeLimit = a})+      . mapping _Coerce++-- | Whether campaigns created in this account will be enabled for comScore+-- vCE by default.+aaComscoreVceEnabled :: Lens' Account (Maybe Bool)+aaComscoreVceEnabled+  = lens _aaComscoreVceEnabled+      (\ s a -> s{_aaComscoreVceEnabled = a})++-- | Whether to serve creatives with Active View tags. If disabled,+-- viewability data will not be available for any impressions.+aaActiveViewOptOut :: Lens' Account (Maybe Bool)+aaActiveViewOptOut+  = lens _aaActiveViewOptOut+      (\ s a -> s{_aaActiveViewOptOut = a})++-- | Name of this account. This is a required field, and must be less than+-- 128 characters long and be globally unique.+aaName :: Lens' Account (Maybe Text)+aaName = lens _aaName (\ s a -> s{_aaName = a})++-- | Profile for this account. This is a read-only field that can be left+-- blank.+aaAccountProFile :: Lens' Account (Maybe AccountAccountProFile)+aaAccountProFile+  = lens _aaAccountProFile+      (\ s a -> s{_aaAccountProFile = a})++-- | ID of this account. This is a read-only, auto-generated field.+aaId :: Lens' Account (Maybe Int64)+aaId+  = lens _aaId (\ s a -> s{_aaId = a}) .+      mapping _Coerce++-- | ID of the country associated with this account.+aaCountryId :: Lens' Account (Maybe Int64)+aaCountryId+  = lens _aaCountryId (\ s a -> s{_aaCountryId = a}) .+      mapping _Coerce++-- | Maximum number of active ads allowed for this account.+aaActiveAdsLimitTier :: Lens' Account (Maybe AccountActiveAdsLimitTier)+aaActiveAdsLimitTier+  = lens _aaActiveAdsLimitTier+      (\ s a -> s{_aaActiveAdsLimitTier = a})++-- | Default placement dimensions for this account.+aaDefaultCreativeSizeId :: Lens' Account (Maybe Int64)+aaDefaultCreativeSizeId+  = lens _aaDefaultCreativeSizeId+      (\ s a -> s{_aaDefaultCreativeSizeId = a})+      . mapping _Coerce++-- | Description of this account.+aaDescription :: Lens' Account (Maybe Text)+aaDescription+  = lens _aaDescription+      (\ s a -> s{_aaDescription = a})++instance FromJSON Account where+        parseJSON+          = withObject "Account"+              (\ o ->+                 Account' <$>+                   (o .:? "accountPermissionIds" .!= mempty) <*>+                     (o .:? "maximumImageSize")+                     <*> (o .:? "currencyId")+                     <*> (o .:? "reportsConfiguration")+                     <*> (o .:? "nielsenOcrEnabled")+                     <*> (o .:? "kind" .!= "dfareporting#account")+                     <*> (o .:? "locale")+                     <*> (o .:? "active")+                     <*> (o .:? "availablePermissionIds" .!= mempty)+                     <*> (o .:? "teaserSizeLimit")+                     <*> (o .:? "comscoreVceEnabled")+                     <*> (o .:? "activeViewOptOut")+                     <*> (o .:? "name")+                     <*> (o .:? "accountProfile")+                     <*> (o .:? "id")+                     <*> (o .:? "countryId")+                     <*> (o .:? "activeAdsLimitTier")+                     <*> (o .:? "defaultCreativeSizeId")+                     <*> (o .:? "description"))++instance ToJSON Account where+        toJSON Account'{..}+          = object+              (catMaybes+                 [("accountPermissionIds" .=) <$>+                    _aaAccountPermissionIds,+                  ("maximumImageSize" .=) <$> _aaMaximumImageSize,+                  ("currencyId" .=) <$> _aaCurrencyId,+                  ("reportsConfiguration" .=) <$>+                    _aaReportsConfiguration,+                  ("nielsenOcrEnabled" .=) <$> _aaNielsenOCREnabled,+                  Just ("kind" .= _aaKind),+                  ("locale" .=) <$> _aaLocale,+                  ("active" .=) <$> _aaActive,+                  ("availablePermissionIds" .=) <$>+                    _aaAvailablePermissionIds,+                  ("teaserSizeLimit" .=) <$> _aaTeaserSizeLimit,+                  ("comscoreVceEnabled" .=) <$> _aaComscoreVceEnabled,+                  ("activeViewOptOut" .=) <$> _aaActiveViewOptOut,+                  ("name" .=) <$> _aaName,+                  ("accountProfile" .=) <$> _aaAccountProFile,+                  ("id" .=) <$> _aaId,+                  ("countryId" .=) <$> _aaCountryId,+                  ("activeAdsLimitTier" .=) <$> _aaActiveAdsLimitTier,+                  ("defaultCreativeSizeId" .=) <$>+                    _aaDefaultCreativeSizeId,+                  ("description" .=) <$> _aaDescription])++-- | Insert Conversions Request.+--+-- /See:/ 'conversionsBatchInsertRequest' smart constructor.+data ConversionsBatchInsertRequest = ConversionsBatchInsertRequest'+    { _cbirKind           :: !Text+    , _cbirConversions    :: !(Maybe [Conversion])+    , _cbirEncryptionInfo :: !(Maybe EncryptionInfo)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ConversionsBatchInsertRequest' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cbirKind'+--+-- * 'cbirConversions'+--+-- * 'cbirEncryptionInfo'+conversionsBatchInsertRequest+    :: ConversionsBatchInsertRequest+conversionsBatchInsertRequest =+    ConversionsBatchInsertRequest'+    { _cbirKind = "dfareporting#conversionsBatchInsertRequest"+    , _cbirConversions = Nothing+    , _cbirEncryptionInfo = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#conversionsBatchInsertRequest\".+cbirKind :: Lens' ConversionsBatchInsertRequest Text+cbirKind = lens _cbirKind (\ s a -> s{_cbirKind = a})++-- | The set of conversions to insert.+cbirConversions :: Lens' ConversionsBatchInsertRequest [Conversion]+cbirConversions+  = lens _cbirConversions+      (\ s a -> s{_cbirConversions = a})+      . _Default+      . _Coerce++-- | Describes how encryptedUserId is encrypted. This is a required field if+-- encryptedUserId is used.+cbirEncryptionInfo :: Lens' ConversionsBatchInsertRequest (Maybe EncryptionInfo)+cbirEncryptionInfo+  = lens _cbirEncryptionInfo+      (\ s a -> s{_cbirEncryptionInfo = a})++instance FromJSON ConversionsBatchInsertRequest where+        parseJSON+          = withObject "ConversionsBatchInsertRequest"+              (\ o ->+                 ConversionsBatchInsertRequest' <$>+                   (o .:? "kind" .!=+                      "dfareporting#conversionsBatchInsertRequest")+                     <*> (o .:? "conversions" .!= mempty)+                     <*> (o .:? "encryptionInfo"))++instance ToJSON ConversionsBatchInsertRequest where+        toJSON ConversionsBatchInsertRequest'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _cbirKind),+                  ("conversions" .=) <$> _cbirConversions,+                  ("encryptionInfo" .=) <$> _cbirEncryptionInfo])++-- | Account User Profile List Response+--+-- /See:/ 'accountUserProFilesListResponse' smart constructor.+data AccountUserProFilesListResponse = AccountUserProFilesListResponse'+    { _aupflrNextPageToken       :: !(Maybe Text)+    , _aupflrAccountUserProFiles :: !(Maybe [AccountUserProFile])+    , _aupflrKind                :: !Text+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'AccountUserProFilesListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'aupflrNextPageToken'+--+-- * 'aupflrAccountUserProFiles'+--+-- * 'aupflrKind'+accountUserProFilesListResponse+    :: AccountUserProFilesListResponse+accountUserProFilesListResponse =+    AccountUserProFilesListResponse'+    { _aupflrNextPageToken = Nothing+    , _aupflrAccountUserProFiles = Nothing+    , _aupflrKind = "dfareporting#accountUserProfilesListResponse"+    }++-- | Pagination token to be used for the next list operation.+aupflrNextPageToken :: Lens' AccountUserProFilesListResponse (Maybe Text)+aupflrNextPageToken+  = lens _aupflrNextPageToken+      (\ s a -> s{_aupflrNextPageToken = a})++-- | Account user profile collection.+aupflrAccountUserProFiles :: Lens' AccountUserProFilesListResponse [AccountUserProFile]+aupflrAccountUserProFiles+  = lens _aupflrAccountUserProFiles+      (\ s a -> s{_aupflrAccountUserProFiles = a})+      . _Default+      . _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#accountUserProfilesListResponse\".+aupflrKind :: Lens' AccountUserProFilesListResponse Text+aupflrKind+  = lens _aupflrKind (\ s a -> s{_aupflrKind = a})++instance FromJSON AccountUserProFilesListResponse+         where+        parseJSON+          = withObject "AccountUserProFilesListResponse"+              (\ o ->+                 AccountUserProFilesListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "accountUserProfiles" .!= mempty)+                     <*>+                     (o .:? "kind" .!=+                        "dfareporting#accountUserProfilesListResponse"))++instance ToJSON AccountUserProFilesListResponse where+        toJSON AccountUserProFilesListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _aupflrNextPageToken,+                  ("accountUserProfiles" .=) <$>+                    _aupflrAccountUserProFiles,+                  Just ("kind" .= _aupflrKind)])++-- | Organizes placements according to the contents of their associated+-- webpages.+--+-- /See:/ 'contentCategory' smart constructor.+data ContentCategory = ContentCategory'+    { _conKind      :: !Text+    , _conAccountId :: !(Maybe (Textual Int64))+    , _conName      :: !(Maybe Text)+    , _conId        :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ContentCategory' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'conKind'+--+-- * 'conAccountId'+--+-- * 'conName'+--+-- * 'conId'+contentCategory+    :: ContentCategory+contentCategory =+    ContentCategory'+    { _conKind = "dfareporting#contentCategory"+    , _conAccountId = Nothing+    , _conName = Nothing+    , _conId = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#contentCategory\".+conKind :: Lens' ContentCategory Text+conKind = lens _conKind (\ s a -> s{_conKind = a})++-- | Account ID of this content category. This is a read-only field that can+-- be left blank.+conAccountId :: Lens' ContentCategory (Maybe Int64)+conAccountId+  = lens _conAccountId (\ s a -> s{_conAccountId = a})+      . mapping _Coerce++-- | Name of this content category. This is a required field and must be less+-- than 256 characters long and unique among content categories of the same+-- account.+conName :: Lens' ContentCategory (Maybe Text)+conName = lens _conName (\ s a -> s{_conName = a})++-- | ID of this content category. This is a read-only, auto-generated field.+conId :: Lens' ContentCategory (Maybe Int64)+conId+  = lens _conId (\ s a -> s{_conId = a}) .+      mapping _Coerce++instance FromJSON ContentCategory where+        parseJSON+          = withObject "ContentCategory"+              (\ o ->+                 ContentCategory' <$>+                   (o .:? "kind" .!= "dfareporting#contentCategory") <*>+                     (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "id"))++instance ToJSON ContentCategory where+        toJSON ContentCategory'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _conKind),+                  ("accountId" .=) <$> _conAccountId,+                  ("name" .=) <$> _conName, ("id" .=) <$> _conId])++-- | Represents fields that are compatible to be selected for a report of+-- type \"STANDARD\".+--+-- /See:/ 'reportCompatibleFields' smart constructor.+data ReportCompatibleFields = ReportCompatibleFields'+    { _rcfMetrics                :: !(Maybe [Metric])+    , _rcfKind                   :: !Text+    , _rcfDimensionFilters       :: !(Maybe [Dimension])+    , _rcfPivotedActivityMetrics :: !(Maybe [Metric])+    , _rcfDimensions             :: !(Maybe [Dimension])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ReportCompatibleFields' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rcfMetrics'+--+-- * 'rcfKind'+--+-- * 'rcfDimensionFilters'+--+-- * 'rcfPivotedActivityMetrics'+--+-- * 'rcfDimensions'+reportCompatibleFields+    :: ReportCompatibleFields+reportCompatibleFields =+    ReportCompatibleFields'+    { _rcfMetrics = Nothing+    , _rcfKind = "dfareporting#reportCompatibleFields"+    , _rcfDimensionFilters = Nothing+    , _rcfPivotedActivityMetrics = Nothing+    , _rcfDimensions = Nothing+    }++-- | Metrics which are compatible to be selected in the \"metricNames\"+-- section of the report.+rcfMetrics :: Lens' ReportCompatibleFields [Metric]+rcfMetrics+  = lens _rcfMetrics (\ s a -> s{_rcfMetrics = a}) .+      _Default+      . _Coerce++-- | The kind of resource this is, in this case+-- dfareporting#reportCompatibleFields.+rcfKind :: Lens' ReportCompatibleFields Text+rcfKind = lens _rcfKind (\ s a -> s{_rcfKind = a})++-- | Dimensions which are compatible to be selected in the+-- \"dimensionFilters\" section of the report.+rcfDimensionFilters :: Lens' ReportCompatibleFields [Dimension]+rcfDimensionFilters+  = lens _rcfDimensionFilters+      (\ s a -> s{_rcfDimensionFilters = a})+      . _Default+      . _Coerce++-- | Metrics which are compatible to be selected as activity metrics to pivot+-- on in the \"activities\" section of the report.+rcfPivotedActivityMetrics :: Lens' ReportCompatibleFields [Metric]+rcfPivotedActivityMetrics+  = lens _rcfPivotedActivityMetrics+      (\ s a -> s{_rcfPivotedActivityMetrics = a})+      . _Default+      . _Coerce++-- | Dimensions which are compatible to be selected in the \"dimensions\"+-- section of the report.+rcfDimensions :: Lens' ReportCompatibleFields [Dimension]+rcfDimensions+  = lens _rcfDimensions+      (\ s a -> s{_rcfDimensions = a})+      . _Default+      . _Coerce++instance FromJSON ReportCompatibleFields where+        parseJSON+          = withObject "ReportCompatibleFields"+              (\ o ->+                 ReportCompatibleFields' <$>+                   (o .:? "metrics" .!= mempty) <*>+                     (o .:? "kind" .!=+                        "dfareporting#reportCompatibleFields")+                     <*> (o .:? "dimensionFilters" .!= mempty)+                     <*> (o .:? "pivotedActivityMetrics" .!= mempty)+                     <*> (o .:? "dimensions" .!= mempty))++instance ToJSON ReportCompatibleFields where+        toJSON ReportCompatibleFields'{..}+          = object+              (catMaybes+                 [("metrics" .=) <$> _rcfMetrics,+                  Just ("kind" .= _rcfKind),+                  ("dimensionFilters" .=) <$> _rcfDimensionFilters,+                  ("pivotedActivityMetrics" .=) <$>+                    _rcfPivotedActivityMetrics,+                  ("dimensions" .=) <$> _rcfDimensions])++-- | Delivery Schedule.+--+-- /See:/ 'deliverySchedule' smart constructor.+data DeliverySchedule = DeliverySchedule'+    { _dsHardCutoff      :: !(Maybe Bool)+    , _dsPriority        :: !(Maybe DeliverySchedulePriority)+    , _dsImpressionRatio :: !(Maybe (Textual Int64))+    , _dsFrequencyCap    :: !(Maybe FrequencyCap)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DeliverySchedule' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dsHardCutoff'+--+-- * 'dsPriority'+--+-- * 'dsImpressionRatio'+--+-- * 'dsFrequencyCap'+deliverySchedule+    :: DeliverySchedule+deliverySchedule =+    DeliverySchedule'+    { _dsHardCutoff = Nothing+    , _dsPriority = Nothing+    , _dsImpressionRatio = Nothing+    , _dsFrequencyCap = Nothing+    }++-- | Whether or not hard cutoff is enabled. If true, the ad will not serve+-- after the end date and time. Otherwise the ad will continue to be served+-- until it has reached its delivery goals.+dsHardCutoff :: Lens' DeliverySchedule (Maybe Bool)+dsHardCutoff+  = lens _dsHardCutoff (\ s a -> s{_dsHardCutoff = a})++-- | Serving priority of an ad, with respect to other ads. The lower the+-- priority number, the greater the priority with which it is served.+dsPriority :: Lens' DeliverySchedule (Maybe DeliverySchedulePriority)+dsPriority+  = lens _dsPriority (\ s a -> s{_dsPriority = a})++-- | Impression ratio for this ad. This ratio determines how often each ad is+-- served relative to the others. For example, if ad A has an impression+-- ratio of 1 and ad B has an impression ratio of 3, then DCM will serve ad+-- B three times as often as ad A. Must be between 1 and 10.+dsImpressionRatio :: Lens' DeliverySchedule (Maybe Int64)+dsImpressionRatio+  = lens _dsImpressionRatio+      (\ s a -> s{_dsImpressionRatio = a})+      . mapping _Coerce++-- | Limit on the number of times an individual user can be served the ad+-- within a specified period of time.+dsFrequencyCap :: Lens' DeliverySchedule (Maybe FrequencyCap)+dsFrequencyCap+  = lens _dsFrequencyCap+      (\ s a -> s{_dsFrequencyCap = a})++instance FromJSON DeliverySchedule where+        parseJSON+          = withObject "DeliverySchedule"+              (\ o ->+                 DeliverySchedule' <$>+                   (o .:? "hardCutoff") <*> (o .:? "priority") <*>+                     (o .:? "impressionRatio")+                     <*> (o .:? "frequencyCap"))++instance ToJSON DeliverySchedule where+        toJSON DeliverySchedule'{..}+          = object+              (catMaybes+                 [("hardCutoff" .=) <$> _dsHardCutoff,+                  ("priority" .=) <$> _dsPriority,+                  ("impressionRatio" .=) <$> _dsImpressionRatio,+                  ("frequencyCap" .=) <$> _dsFrequencyCap])++-- | Contains properties of a remarketing list. Remarketing enables you to+-- create lists of users who have performed specific actions on a site,+-- then target ads to members of those lists. This resource can be used to+-- manage remarketing lists that are owned by your advertisers. To see all+-- remarketing lists that are visible to your advertisers, including those+-- that are shared to your advertiser or account, use the+-- TargetableRemarketingLists resource.+--+-- /See:/ 'remarketingList' smart constructor.+data RemarketingList = RemarketingList'+    { _rlListSize                   :: !(Maybe (Textual Int64))+    , _rlListPopulationRule         :: !(Maybe ListPopulationRule)+    , _rlLifeSpan                   :: !(Maybe (Textual Int64))+    , _rlKind                       :: !Text+    , _rlAdvertiserId               :: !(Maybe (Textual Int64))+    , _rlAdvertiserIdDimensionValue :: !(Maybe DimensionValue)+    , _rlActive                     :: !(Maybe Bool)+    , _rlAccountId                  :: !(Maybe (Textual Int64))+    , _rlName                       :: !(Maybe Text)+    , _rlListSource                 :: !(Maybe RemarketingListListSource)+    , _rlId                         :: !(Maybe (Textual Int64))+    , _rlSubAccountId               :: !(Maybe (Textual Int64))+    , _rlDescription                :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'RemarketingList' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rlListSize'+--+-- * 'rlListPopulationRule'+--+-- * 'rlLifeSpan'+--+-- * 'rlKind'+--+-- * 'rlAdvertiserId'+--+-- * 'rlAdvertiserIdDimensionValue'+--+-- * 'rlActive'+--+-- * 'rlAccountId'+--+-- * 'rlName'+--+-- * 'rlListSource'+--+-- * 'rlId'+--+-- * 'rlSubAccountId'+--+-- * 'rlDescription'+remarketingList+    :: RemarketingList+remarketingList =+    RemarketingList'+    { _rlListSize = Nothing+    , _rlListPopulationRule = Nothing+    , _rlLifeSpan = Nothing+    , _rlKind = "dfareporting#remarketingList"+    , _rlAdvertiserId = Nothing+    , _rlAdvertiserIdDimensionValue = Nothing+    , _rlActive = Nothing+    , _rlAccountId = Nothing+    , _rlName = Nothing+    , _rlListSource = Nothing+    , _rlId = Nothing+    , _rlSubAccountId = Nothing+    , _rlDescription = Nothing+    }++-- | Number of users currently in the list. This is a read-only field.+rlListSize :: Lens' RemarketingList (Maybe Int64)+rlListSize+  = lens _rlListSize (\ s a -> s{_rlListSize = a}) .+      mapping _Coerce++-- | Rule used to populate the remarketing list with users.+rlListPopulationRule :: Lens' RemarketingList (Maybe ListPopulationRule)+rlListPopulationRule+  = lens _rlListPopulationRule+      (\ s a -> s{_rlListPopulationRule = a})++-- | Number of days that a user should remain in the remarketing list without+-- an impression.+rlLifeSpan :: Lens' RemarketingList (Maybe Int64)+rlLifeSpan+  = lens _rlLifeSpan (\ s a -> s{_rlLifeSpan = a}) .+      mapping _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#remarketingList\".+rlKind :: Lens' RemarketingList Text+rlKind = lens _rlKind (\ s a -> s{_rlKind = a})++-- | Dimension value for the advertiser ID that owns this remarketing list.+-- This is a required field.+rlAdvertiserId :: Lens' RemarketingList (Maybe Int64)+rlAdvertiserId+  = lens _rlAdvertiserId+      (\ s a -> s{_rlAdvertiserId = a})+      . mapping _Coerce++-- | Dimension value for the ID of the advertiser. This is a read-only,+-- auto-generated field.+rlAdvertiserIdDimensionValue :: Lens' RemarketingList (Maybe DimensionValue)+rlAdvertiserIdDimensionValue+  = lens _rlAdvertiserIdDimensionValue+      (\ s a -> s{_rlAdvertiserIdDimensionValue = a})++-- | Whether this remarketing list is active.+rlActive :: Lens' RemarketingList (Maybe Bool)+rlActive = lens _rlActive (\ s a -> s{_rlActive = a})++-- | Account ID of this remarketing list. This is a read-only, auto-generated+-- field that is only returned in GET requests.+rlAccountId :: Lens' RemarketingList (Maybe Int64)+rlAccountId+  = lens _rlAccountId (\ s a -> s{_rlAccountId = a}) .+      mapping _Coerce++-- | Name of the remarketing list. This is a required field. Must be no+-- greater than 128 characters long.+rlName :: Lens' RemarketingList (Maybe Text)+rlName = lens _rlName (\ s a -> s{_rlName = a})++-- | Product from which this remarketing list was originated.+rlListSource :: Lens' RemarketingList (Maybe RemarketingListListSource)+rlListSource+  = lens _rlListSource (\ s a -> s{_rlListSource = a})++-- | Remarketing list ID. This is a read-only, auto-generated field.+rlId :: Lens' RemarketingList (Maybe Int64)+rlId+  = lens _rlId (\ s a -> s{_rlId = a}) .+      mapping _Coerce++-- | Subaccount ID of this remarketing list. This is a read-only,+-- auto-generated field that is only returned in GET requests.+rlSubAccountId :: Lens' RemarketingList (Maybe Int64)+rlSubAccountId+  = lens _rlSubAccountId+      (\ s a -> s{_rlSubAccountId = a})+      . mapping _Coerce++-- | Remarketing list description.+rlDescription :: Lens' RemarketingList (Maybe Text)+rlDescription+  = lens _rlDescription+      (\ s a -> s{_rlDescription = a})++instance FromJSON RemarketingList where+        parseJSON+          = withObject "RemarketingList"+              (\ o ->+                 RemarketingList' <$>+                   (o .:? "listSize") <*> (o .:? "listPopulationRule")+                     <*> (o .:? "lifeSpan")+                     <*> (o .:? "kind" .!= "dfareporting#remarketingList")+                     <*> (o .:? "advertiserId")+                     <*> (o .:? "advertiserIdDimensionValue")+                     <*> (o .:? "active")+                     <*> (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "listSource")+                     <*> (o .:? "id")+                     <*> (o .:? "subaccountId")+                     <*> (o .:? "description"))++instance ToJSON RemarketingList where+        toJSON RemarketingList'{..}+          = object+              (catMaybes+                 [("listSize" .=) <$> _rlListSize,+                  ("listPopulationRule" .=) <$> _rlListPopulationRule,+                  ("lifeSpan" .=) <$> _rlLifeSpan,+                  Just ("kind" .= _rlKind),+                  ("advertiserId" .=) <$> _rlAdvertiserId,+                  ("advertiserIdDimensionValue" .=) <$>+                    _rlAdvertiserIdDimensionValue,+                  ("active" .=) <$> _rlActive,+                  ("accountId" .=) <$> _rlAccountId,+                  ("name" .=) <$> _rlName,+                  ("listSource" .=) <$> _rlListSource,+                  ("id" .=) <$> _rlId,+                  ("subaccountId" .=) <$> _rlSubAccountId,+                  ("description" .=) <$> _rlDescription])++-- | Dynamic Targeting Key List Response+--+-- /See:/ 'dynamicTargetingKeysListResponse' smart constructor.+data DynamicTargetingKeysListResponse = DynamicTargetingKeysListResponse'+    { _dtklrKind                 :: !Text+    , _dtklrDynamicTargetingKeys :: !(Maybe [DynamicTargetingKey])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DynamicTargetingKeysListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dtklrKind'+--+-- * 'dtklrDynamicTargetingKeys'+dynamicTargetingKeysListResponse+    :: DynamicTargetingKeysListResponse+dynamicTargetingKeysListResponse =+    DynamicTargetingKeysListResponse'+    { _dtklrKind = "dfareporting#dynamicTargetingKeysListResponse"+    , _dtklrDynamicTargetingKeys = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#dynamicTargetingKeysListResponse\".+dtklrKind :: Lens' DynamicTargetingKeysListResponse Text+dtklrKind+  = lens _dtklrKind (\ s a -> s{_dtklrKind = a})++-- | Dynamic targeting key collection.+dtklrDynamicTargetingKeys :: Lens' DynamicTargetingKeysListResponse [DynamicTargetingKey]+dtklrDynamicTargetingKeys+  = lens _dtklrDynamicTargetingKeys+      (\ s a -> s{_dtklrDynamicTargetingKeys = a})+      . _Default+      . _Coerce++instance FromJSON DynamicTargetingKeysListResponse+         where+        parseJSON+          = withObject "DynamicTargetingKeysListResponse"+              (\ o ->+                 DynamicTargetingKeysListResponse' <$>+                   (o .:? "kind" .!=+                      "dfareporting#dynamicTargetingKeysListResponse")+                     <*> (o .:? "dynamicTargetingKeys" .!= mempty))++instance ToJSON DynamicTargetingKeysListResponse+         where+        toJSON DynamicTargetingKeysListResponse'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _dtklrKind),+                  ("dynamicTargetingKeys" .=) <$>+                    _dtklrDynamicTargetingKeys])++-- | Represents the list of DimensionValue resources.+--+-- /See:/ 'dimensionValueList' smart constructor.+data DimensionValueList = DimensionValueList'+    { _dvlEtag          :: !(Maybe Text)+    , _dvlNextPageToken :: !(Maybe Text)+    , _dvlKind          :: !Text+    , _dvlItems         :: !(Maybe [DimensionValue])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DimensionValueList' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dvlEtag'+--+-- * 'dvlNextPageToken'+--+-- * 'dvlKind'+--+-- * 'dvlItems'+dimensionValueList+    :: DimensionValueList+dimensionValueList =+    DimensionValueList'+    { _dvlEtag = Nothing+    , _dvlNextPageToken = Nothing+    , _dvlKind = "dfareporting#dimensionValueList"+    , _dvlItems = Nothing+    }++-- | The eTag of this response for caching purposes.+dvlEtag :: Lens' DimensionValueList (Maybe Text)+dvlEtag = lens _dvlEtag (\ s a -> s{_dvlEtag = a})++-- | Continuation token used to page through dimension values. To retrieve+-- the next page of results, set the next request\'s \"pageToken\" to the+-- value of this field. The page token is only valid for a limited amount+-- of time and should not be persisted.+dvlNextPageToken :: Lens' DimensionValueList (Maybe Text)+dvlNextPageToken+  = lens _dvlNextPageToken+      (\ s a -> s{_dvlNextPageToken = a})++-- | The kind of list this is, in this case dfareporting#dimensionValueList.+dvlKind :: Lens' DimensionValueList Text+dvlKind = lens _dvlKind (\ s a -> s{_dvlKind = a})++-- | The dimension values returned in this response.+dvlItems :: Lens' DimensionValueList [DimensionValue]+dvlItems+  = lens _dvlItems (\ s a -> s{_dvlItems = a}) .+      _Default+      . _Coerce++instance FromJSON DimensionValueList where+        parseJSON+          = withObject "DimensionValueList"+              (\ o ->+                 DimensionValueList' <$>+                   (o .:? "etag") <*> (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!= "dfareporting#dimensionValueList")+                     <*> (o .:? "items" .!= mempty))++instance ToJSON DimensionValueList where+        toJSON DimensionValueList'{..}+          = object+              (catMaybes+                 [("etag" .=) <$> _dvlEtag,+                  ("nextPageToken" .=) <$> _dvlNextPageToken,+                  Just ("kind" .= _dvlKind),+                  ("items" .=) <$> _dvlItems])++-- | Represents fields that are compatible to be selected for a report of+-- type \"FlOODLIGHT\".+--+-- /See:/ 'floodlightReportCompatibleFields' smart constructor.+data FloodlightReportCompatibleFields = FloodlightReportCompatibleFields'+    { _frcfMetrics          :: !(Maybe [Metric])+    , _frcfKind             :: !Text+    , _frcfDimensionFilters :: !(Maybe [Dimension])+    , _frcfDimensions       :: !(Maybe [Dimension])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'FloodlightReportCompatibleFields' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'frcfMetrics'+--+-- * 'frcfKind'+--+-- * 'frcfDimensionFilters'+--+-- * 'frcfDimensions'+floodlightReportCompatibleFields+    :: FloodlightReportCompatibleFields+floodlightReportCompatibleFields =+    FloodlightReportCompatibleFields'+    { _frcfMetrics = Nothing+    , _frcfKind = "dfareporting#floodlightReportCompatibleFields"+    , _frcfDimensionFilters = Nothing+    , _frcfDimensions = Nothing+    }++-- | Metrics which are compatible to be selected in the \"metricNames\"+-- section of the report.+frcfMetrics :: Lens' FloodlightReportCompatibleFields [Metric]+frcfMetrics+  = lens _frcfMetrics (\ s a -> s{_frcfMetrics = a}) .+      _Default+      . _Coerce++-- | The kind of resource this is, in this case+-- dfareporting#floodlightReportCompatibleFields.+frcfKind :: Lens' FloodlightReportCompatibleFields Text+frcfKind = lens _frcfKind (\ s a -> s{_frcfKind = a})++-- | Dimensions which are compatible to be selected in the+-- \"dimensionFilters\" section of the report.+frcfDimensionFilters :: Lens' FloodlightReportCompatibleFields [Dimension]+frcfDimensionFilters+  = lens _frcfDimensionFilters+      (\ s a -> s{_frcfDimensionFilters = a})+      . _Default+      . _Coerce++-- | Dimensions which are compatible to be selected in the \"dimensions\"+-- section of the report.+frcfDimensions :: Lens' FloodlightReportCompatibleFields [Dimension]+frcfDimensions+  = lens _frcfDimensions+      (\ s a -> s{_frcfDimensions = a})+      . _Default+      . _Coerce++instance FromJSON FloodlightReportCompatibleFields+         where+        parseJSON+          = withObject "FloodlightReportCompatibleFields"+              (\ o ->+                 FloodlightReportCompatibleFields' <$>+                   (o .:? "metrics" .!= mempty) <*>+                     (o .:? "kind" .!=+                        "dfareporting#floodlightReportCompatibleFields")+                     <*> (o .:? "dimensionFilters" .!= mempty)+                     <*> (o .:? "dimensions" .!= mempty))++instance ToJSON FloodlightReportCompatibleFields+         where+        toJSON FloodlightReportCompatibleFields'{..}+          = object+              (catMaybes+                 [("metrics" .=) <$> _frcfMetrics,+                  Just ("kind" .= _frcfKind),+                  ("dimensionFilters" .=) <$> _frcfDimensionFilters,+                  ("dimensions" .=) <$> _frcfDimensions])++-- | Represents a grouping of related user role permissions.+--+-- /See:/ 'userRolePermissionGroup' smart constructor.+data UserRolePermissionGroup = UserRolePermissionGroup'+    { _urpgKind :: !Text+    , _urpgName :: !(Maybe Text)+    , _urpgId   :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'UserRolePermissionGroup' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'urpgKind'+--+-- * 'urpgName'+--+-- * 'urpgId'+userRolePermissionGroup+    :: UserRolePermissionGroup+userRolePermissionGroup =+    UserRolePermissionGroup'+    { _urpgKind = "dfareporting#userRolePermissionGroup"+    , _urpgName = Nothing+    , _urpgId = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#userRolePermissionGroup\".+urpgKind :: Lens' UserRolePermissionGroup Text+urpgKind = lens _urpgKind (\ s a -> s{_urpgKind = a})++-- | Name of this user role permission group.+urpgName :: Lens' UserRolePermissionGroup (Maybe Text)+urpgName = lens _urpgName (\ s a -> s{_urpgName = a})++-- | ID of this user role permission.+urpgId :: Lens' UserRolePermissionGroup (Maybe Int64)+urpgId+  = lens _urpgId (\ s a -> s{_urpgId = a}) .+      mapping _Coerce++instance FromJSON UserRolePermissionGroup where+        parseJSON+          = withObject "UserRolePermissionGroup"+              (\ o ->+                 UserRolePermissionGroup' <$>+                   (o .:? "kind" .!=+                      "dfareporting#userRolePermissionGroup")+                     <*> (o .:? "name")+                     <*> (o .:? "id"))++instance ToJSON UserRolePermissionGroup where+        toJSON UserRolePermissionGroup'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _urpgKind),+                  ("name" .=) <$> _urpgName, ("id" .=) <$> _urpgId])++-- | Tag Settings+--+-- /See:/ 'tagSetting' smart constructor.+data TagSetting = TagSetting'+    { _tsKeywordOption           :: !(Maybe TagSettingKeywordOption)+    , _tsIncludeClickThroughURLs :: !(Maybe Bool)+    , _tsIncludeClickTracking    :: !(Maybe Bool)+    , _tsAdditionalKeyValues     :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'TagSetting' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'tsKeywordOption'+--+-- * 'tsIncludeClickThroughURLs'+--+-- * 'tsIncludeClickTracking'+--+-- * 'tsAdditionalKeyValues'+tagSetting+    :: TagSetting+tagSetting =+    TagSetting'+    { _tsKeywordOption = Nothing+    , _tsIncludeClickThroughURLs = Nothing+    , _tsIncludeClickTracking = Nothing+    , _tsAdditionalKeyValues = Nothing+    }++-- | Option specifying how keywords are embedded in ad tags. This setting can+-- be used to specify whether keyword placeholders are inserted in+-- placement tags for this site. Publishers can then add keywords to those+-- placeholders.+tsKeywordOption :: Lens' TagSetting (Maybe TagSettingKeywordOption)+tsKeywordOption+  = lens _tsKeywordOption+      (\ s a -> s{_tsKeywordOption = a})++-- | Whether static landing page URLs should be included in the tags. This+-- setting applies only to placements.+tsIncludeClickThroughURLs :: Lens' TagSetting (Maybe Bool)+tsIncludeClickThroughURLs+  = lens _tsIncludeClickThroughURLs+      (\ s a -> s{_tsIncludeClickThroughURLs = a})++-- | Whether click-tracking string should be included in the tags.+tsIncludeClickTracking :: Lens' TagSetting (Maybe Bool)+tsIncludeClickTracking+  = lens _tsIncludeClickTracking+      (\ s a -> s{_tsIncludeClickTracking = a})++-- | Additional key-values to be included in tags. Each key-value pair must+-- be of the form key=value, and pairs must be separated by a semicolon+-- (;). Keys and values must not contain commas. For example,+-- id=2;color=red is a valid value for this field.+tsAdditionalKeyValues :: Lens' TagSetting (Maybe Text)+tsAdditionalKeyValues+  = lens _tsAdditionalKeyValues+      (\ s a -> s{_tsAdditionalKeyValues = a})++instance FromJSON TagSetting where+        parseJSON+          = withObject "TagSetting"+              (\ o ->+                 TagSetting' <$>+                   (o .:? "keywordOption") <*>+                     (o .:? "includeClickThroughUrls")+                     <*> (o .:? "includeClickTracking")+                     <*> (o .:? "additionalKeyValues"))++instance ToJSON TagSetting where+        toJSON TagSetting'{..}+          = object+              (catMaybes+                 [("keywordOption" .=) <$> _tsKeywordOption,+                  ("includeClickThroughUrls" .=) <$>+                    _tsIncludeClickThroughURLs,+                  ("includeClickTracking" .=) <$>+                    _tsIncludeClickTracking,+                  ("additionalKeyValues" .=) <$>+                    _tsAdditionalKeyValues])++-- | The properties of the report.+--+-- /See:/ 'reportPathToConversionCriteriaReportProperties' smart constructor.+data ReportPathToConversionCriteriaReportProperties = ReportPathToConversionCriteriaReportProperties'+    { _rptccrpMaximumInteractionGap                :: !(Maybe (Textual Int32))+    , _rptccrpMaximumClickInteractions             :: !(Maybe (Textual Int32))+    , _rptccrpPivotOnInteractionPath               :: !(Maybe Bool)+    , _rptccrpMaximumImpressionInteractions        :: !(Maybe (Textual Int32))+    , _rptccrpIncludeUnattributedIPConversions     :: !(Maybe Bool)+    , _rptccrpImpressionsLookbackWindow            :: !(Maybe (Textual Int32))+    , _rptccrpClicksLookbackWindow                 :: !(Maybe (Textual Int32))+    , _rptccrpIncludeUnattributedCookieConversions :: !(Maybe Bool)+    , _rptccrpIncludeAttributedIPConversions       :: !(Maybe Bool)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ReportPathToConversionCriteriaReportProperties' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rptccrpMaximumInteractionGap'+--+-- * 'rptccrpMaximumClickInteractions'+--+-- * 'rptccrpPivotOnInteractionPath'+--+-- * 'rptccrpMaximumImpressionInteractions'+--+-- * 'rptccrpIncludeUnattributedIPConversions'+--+-- * 'rptccrpImpressionsLookbackWindow'+--+-- * 'rptccrpClicksLookbackWindow'+--+-- * 'rptccrpIncludeUnattributedCookieConversions'+--+-- * 'rptccrpIncludeAttributedIPConversions'+reportPathToConversionCriteriaReportProperties+    :: ReportPathToConversionCriteriaReportProperties+reportPathToConversionCriteriaReportProperties =+    ReportPathToConversionCriteriaReportProperties'+    { _rptccrpMaximumInteractionGap = Nothing+    , _rptccrpMaximumClickInteractions = Nothing+    , _rptccrpPivotOnInteractionPath = Nothing+    , _rptccrpMaximumImpressionInteractions = Nothing+    , _rptccrpIncludeUnattributedIPConversions = Nothing+    , _rptccrpImpressionsLookbackWindow = Nothing+    , _rptccrpClicksLookbackWindow = Nothing+    , _rptccrpIncludeUnattributedCookieConversions = Nothing+    , _rptccrpIncludeAttributedIPConversions = Nothing+    }++-- | The maximum amount of time that can take place between interactions+-- (clicks or impressions) by the same user. Valid values: 1-90.+rptccrpMaximumInteractionGap :: Lens' ReportPathToConversionCriteriaReportProperties (Maybe Int32)+rptccrpMaximumInteractionGap+  = lens _rptccrpMaximumInteractionGap+      (\ s a -> s{_rptccrpMaximumInteractionGap = a})+      . mapping _Coerce++-- | The maximum number of click interactions to include in the report.+-- Advertisers currently paying for E2C reports get up to 200 (100 clicks,+-- 100 impressions). If another advertiser in your network is paying for+-- E2C, you can have up to 5 total exposures per report.+rptccrpMaximumClickInteractions :: Lens' ReportPathToConversionCriteriaReportProperties (Maybe Int32)+rptccrpMaximumClickInteractions+  = lens _rptccrpMaximumClickInteractions+      (\ s a -> s{_rptccrpMaximumClickInteractions = a})+      . mapping _Coerce++-- | Enable pivoting on interaction path.+rptccrpPivotOnInteractionPath :: Lens' ReportPathToConversionCriteriaReportProperties (Maybe Bool)+rptccrpPivotOnInteractionPath+  = lens _rptccrpPivotOnInteractionPath+      (\ s a -> s{_rptccrpPivotOnInteractionPath = a})++-- | The maximum number of click interactions to include in the report.+-- Advertisers currently paying for E2C reports get up to 200 (100 clicks,+-- 100 impressions). If another advertiser in your network is paying for+-- E2C, you can have up to 5 total exposures per report.+rptccrpMaximumImpressionInteractions :: Lens' ReportPathToConversionCriteriaReportProperties (Maybe Int32)+rptccrpMaximumImpressionInteractions+  = lens _rptccrpMaximumImpressionInteractions+      (\ s a ->+         s{_rptccrpMaximumImpressionInteractions = a})+      . mapping _Coerce++-- | Include conversions that have no associated cookies and no exposures.+-- It’s therefore impossible to know how the user was exposed to your ads+-- during the lookback window prior to a conversion.+rptccrpIncludeUnattributedIPConversions :: Lens' ReportPathToConversionCriteriaReportProperties (Maybe Bool)+rptccrpIncludeUnattributedIPConversions+  = lens _rptccrpIncludeUnattributedIPConversions+      (\ s a ->+         s{_rptccrpIncludeUnattributedIPConversions = a})++-- | DFA checks to see if an impression interaction occurred within the+-- specified period of time before a conversion. By default the value is+-- pulled from Floodlight or you can manually enter a custom value. Valid+-- values: 1-90.+rptccrpImpressionsLookbackWindow :: Lens' ReportPathToConversionCriteriaReportProperties (Maybe Int32)+rptccrpImpressionsLookbackWindow+  = lens _rptccrpImpressionsLookbackWindow+      (\ s a -> s{_rptccrpImpressionsLookbackWindow = a})+      . mapping _Coerce++-- | DFA checks to see if a click interaction occurred within the specified+-- period of time before a conversion. By default the value is pulled from+-- Floodlight or you can manually enter a custom value. Valid values: 1-90.+rptccrpClicksLookbackWindow :: Lens' ReportPathToConversionCriteriaReportProperties (Maybe Int32)+rptccrpClicksLookbackWindow+  = lens _rptccrpClicksLookbackWindow+      (\ s a -> s{_rptccrpClicksLookbackWindow = a})+      . mapping _Coerce++-- | Include conversions of users with a DoubleClick cookie but without an+-- exposure. That means the user did not click or see an ad from the+-- advertiser within the Floodlight group, or that the interaction happened+-- outside the lookback window.+rptccrpIncludeUnattributedCookieConversions :: Lens' ReportPathToConversionCriteriaReportProperties (Maybe Bool)+rptccrpIncludeUnattributedCookieConversions+  = lens _rptccrpIncludeUnattributedCookieConversions+      (\ s a ->+         s{_rptccrpIncludeUnattributedCookieConversions = a})++-- | Deprecated: has no effect.+rptccrpIncludeAttributedIPConversions :: Lens' ReportPathToConversionCriteriaReportProperties (Maybe Bool)+rptccrpIncludeAttributedIPConversions+  = lens _rptccrpIncludeAttributedIPConversions+      (\ s a ->+         s{_rptccrpIncludeAttributedIPConversions = a})++instance FromJSON+         ReportPathToConversionCriteriaReportProperties where+        parseJSON+          = withObject+              "ReportPathToConversionCriteriaReportProperties"+              (\ o ->+                 ReportPathToConversionCriteriaReportProperties' <$>+                   (o .:? "maximumInteractionGap") <*>+                     (o .:? "maximumClickInteractions")+                     <*> (o .:? "pivotOnInteractionPath")+                     <*> (o .:? "maximumImpressionInteractions")+                     <*> (o .:? "includeUnattributedIPConversions")+                     <*> (o .:? "impressionsLookbackWindow")+                     <*> (o .:? "clicksLookbackWindow")+                     <*> (o .:? "includeUnattributedCookieConversions")+                     <*> (o .:? "includeAttributedIPConversions"))++instance ToJSON+         ReportPathToConversionCriteriaReportProperties where+        toJSON+          ReportPathToConversionCriteriaReportProperties'{..}+          = object+              (catMaybes+                 [("maximumInteractionGap" .=) <$>+                    _rptccrpMaximumInteractionGap,+                  ("maximumClickInteractions" .=) <$>+                    _rptccrpMaximumClickInteractions,+                  ("pivotOnInteractionPath" .=) <$>+                    _rptccrpPivotOnInteractionPath,+                  ("maximumImpressionInteractions" .=) <$>+                    _rptccrpMaximumImpressionInteractions,+                  ("includeUnattributedIPConversions" .=) <$>+                    _rptccrpIncludeUnattributedIPConversions,+                  ("impressionsLookbackWindow" .=) <$>+                    _rptccrpImpressionsLookbackWindow,+                  ("clicksLookbackWindow" .=) <$>+                    _rptccrpClicksLookbackWindow,+                  ("includeUnattributedCookieConversions" .=) <$>+                    _rptccrpIncludeUnattributedCookieConversions,+                  ("includeAttributedIPConversions" .=) <$>+                    _rptccrpIncludeAttributedIPConversions])++-- | User Role Permission List Response+--+-- /See:/ 'userRolePermissionsListResponse' smart constructor.+data UserRolePermissionsListResponse = UserRolePermissionsListResponse'+    { _urplrKind                :: !Text+    , _urplrUserRolePermissions :: !(Maybe [UserRolePermission])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'UserRolePermissionsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'urplrKind'+--+-- * 'urplrUserRolePermissions'+userRolePermissionsListResponse+    :: UserRolePermissionsListResponse+userRolePermissionsListResponse =+    UserRolePermissionsListResponse'+    { _urplrKind = "dfareporting#userRolePermissionsListResponse"+    , _urplrUserRolePermissions = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#userRolePermissionsListResponse\".+urplrKind :: Lens' UserRolePermissionsListResponse Text+urplrKind+  = lens _urplrKind (\ s a -> s{_urplrKind = a})++-- | User role permission collection.+urplrUserRolePermissions :: Lens' UserRolePermissionsListResponse [UserRolePermission]+urplrUserRolePermissions+  = lens _urplrUserRolePermissions+      (\ s a -> s{_urplrUserRolePermissions = a})+      . _Default+      . _Coerce++instance FromJSON UserRolePermissionsListResponse+         where+        parseJSON+          = withObject "UserRolePermissionsListResponse"+              (\ o ->+                 UserRolePermissionsListResponse' <$>+                   (o .:? "kind" .!=+                      "dfareporting#userRolePermissionsListResponse")+                     <*> (o .:? "userRolePermissions" .!= mempty))++instance ToJSON UserRolePermissionsListResponse where+        toJSON UserRolePermissionsListResponse'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _urplrKind),+                  ("userRolePermissions" .=) <$>+                    _urplrUserRolePermissions])++-- | Placement Group List Response+--+-- /See:/ 'placementGroupsListResponse' smart constructor.+data PlacementGroupsListResponse = PlacementGroupsListResponse'+    { _pglrNextPageToken   :: !(Maybe Text)+    , _pglrKind            :: !Text+    , _pglrPlacementGroups :: !(Maybe [PlacementGroup])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'PlacementGroupsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'pglrNextPageToken'+--+-- * 'pglrKind'+--+-- * 'pglrPlacementGroups'+placementGroupsListResponse+    :: PlacementGroupsListResponse+placementGroupsListResponse =+    PlacementGroupsListResponse'+    { _pglrNextPageToken = Nothing+    , _pglrKind = "dfareporting#placementGroupsListResponse"+    , _pglrPlacementGroups = Nothing+    }++-- | Pagination token to be used for the next list operation.+pglrNextPageToken :: Lens' PlacementGroupsListResponse (Maybe Text)+pglrNextPageToken+  = lens _pglrNextPageToken+      (\ s a -> s{_pglrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#placementGroupsListResponse\".+pglrKind :: Lens' PlacementGroupsListResponse Text+pglrKind = lens _pglrKind (\ s a -> s{_pglrKind = a})++-- | Placement group collection.+pglrPlacementGroups :: Lens' PlacementGroupsListResponse [PlacementGroup]+pglrPlacementGroups+  = lens _pglrPlacementGroups+      (\ s a -> s{_pglrPlacementGroups = a})+      . _Default+      . _Coerce++instance FromJSON PlacementGroupsListResponse where+        parseJSON+          = withObject "PlacementGroupsListResponse"+              (\ o ->+                 PlacementGroupsListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!=+                        "dfareporting#placementGroupsListResponse")+                     <*> (o .:? "placementGroups" .!= mempty))++instance ToJSON PlacementGroupsListResponse where+        toJSON PlacementGroupsListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _pglrNextPageToken,+                  Just ("kind" .= _pglrKind),+                  ("placementGroups" .=) <$> _pglrPlacementGroups])++-- | Contains information about a mobile carrier that can be targeted by ads.+--+-- /See:/ 'mobileCarrier' smart constructor.+data MobileCarrier = MobileCarrier'+    { _mcKind          :: !Text+    , _mcName          :: !(Maybe Text)+    , _mcCountryCode   :: !(Maybe Text)+    , _mcId            :: !(Maybe (Textual Int64))+    , _mcCountryDartId :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'MobileCarrier' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'mcKind'+--+-- * 'mcName'+--+-- * 'mcCountryCode'+--+-- * 'mcId'+--+-- * 'mcCountryDartId'+mobileCarrier+    :: MobileCarrier+mobileCarrier =+    MobileCarrier'+    { _mcKind = "dfareporting#mobileCarrier"+    , _mcName = Nothing+    , _mcCountryCode = Nothing+    , _mcId = Nothing+    , _mcCountryDartId = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#mobileCarrier\".+mcKind :: Lens' MobileCarrier Text+mcKind = lens _mcKind (\ s a -> s{_mcKind = a})++-- | Name of this mobile carrier.+mcName :: Lens' MobileCarrier (Maybe Text)+mcName = lens _mcName (\ s a -> s{_mcName = a})++-- | Country code of the country to which this mobile carrier belongs.+mcCountryCode :: Lens' MobileCarrier (Maybe Text)+mcCountryCode+  = lens _mcCountryCode+      (\ s a -> s{_mcCountryCode = a})++-- | ID of this mobile carrier.+mcId :: Lens' MobileCarrier (Maybe Int64)+mcId+  = lens _mcId (\ s a -> s{_mcId = a}) .+      mapping _Coerce++-- | DART ID of the country to which this mobile carrier belongs.+mcCountryDartId :: Lens' MobileCarrier (Maybe Int64)+mcCountryDartId+  = lens _mcCountryDartId+      (\ s a -> s{_mcCountryDartId = a})+      . mapping _Coerce++instance FromJSON MobileCarrier where+        parseJSON+          = withObject "MobileCarrier"+              (\ o ->+                 MobileCarrier' <$>+                   (o .:? "kind" .!= "dfareporting#mobileCarrier") <*>+                     (o .:? "name")+                     <*> (o .:? "countryCode")+                     <*> (o .:? "id")+                     <*> (o .:? "countryDartId"))++instance ToJSON MobileCarrier where+        toJSON MobileCarrier'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _mcKind), ("name" .=) <$> _mcName,+                  ("countryCode" .=) <$> _mcCountryCode,+                  ("id" .=) <$> _mcId,+                  ("countryDartId" .=) <$> _mcCountryDartId])++-- | Contains information about where a user\'s browser is taken after the+-- user clicks an ad.+--+-- /See:/ 'landingPage' smart constructor.+data LandingPage = LandingPage'+    { _lpKind    :: !Text+    , _lpDefault :: !(Maybe Bool)+    , _lpURL     :: !(Maybe Text)+    , _lpName    :: !(Maybe Text)+    , _lpId      :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'LandingPage' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'lpKind'+--+-- * 'lpDefault'+--+-- * 'lpURL'+--+-- * 'lpName'+--+-- * 'lpId'+landingPage+    :: LandingPage+landingPage =+    LandingPage'+    { _lpKind = "dfareporting#landingPage"+    , _lpDefault = Nothing+    , _lpURL = Nothing+    , _lpName = Nothing+    , _lpId = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#landingPage\".+lpKind :: Lens' LandingPage Text+lpKind = lens _lpKind (\ s a -> s{_lpKind = a})++-- | Whether or not this landing page will be assigned to any ads or+-- creatives that do not have a landing page assigned explicitly. Only one+-- default landing page is allowed per campaign.+lpDefault :: Lens' LandingPage (Maybe Bool)+lpDefault+  = lens _lpDefault (\ s a -> s{_lpDefault = a})++-- | URL of this landing page. This is a required field.+lpURL :: Lens' LandingPage (Maybe Text)+lpURL = lens _lpURL (\ s a -> s{_lpURL = a})++-- | Name of this landing page. This is a required field. It must be less+-- than 256 characters long, and must be unique among landing pages of the+-- same campaign.+lpName :: Lens' LandingPage (Maybe Text)+lpName = lens _lpName (\ s a -> s{_lpName = a})++-- | ID of this landing page. This is a read-only, auto-generated field.+lpId :: Lens' LandingPage (Maybe Int64)+lpId+  = lens _lpId (\ s a -> s{_lpId = a}) .+      mapping _Coerce++instance FromJSON LandingPage where+        parseJSON+          = withObject "LandingPage"+              (\ o ->+                 LandingPage' <$>+                   (o .:? "kind" .!= "dfareporting#landingPage") <*>+                     (o .:? "default")+                     <*> (o .:? "url")+                     <*> (o .:? "name")+                     <*> (o .:? "id"))++instance ToJSON LandingPage where+        toJSON LandingPage'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _lpKind),+                  ("default" .=) <$> _lpDefault, ("url" .=) <$> _lpURL,+                  ("name" .=) <$> _lpName, ("id" .=) <$> _lpId])++-- | Connection Type List Response+--+-- /See:/ 'connectionTypesListResponse' smart constructor.+data ConnectionTypesListResponse = ConnectionTypesListResponse'+    { _ctlrKind            :: !Text+    , _ctlrConnectionTypes :: !(Maybe [ConnectionType])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ConnectionTypesListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ctlrKind'+--+-- * 'ctlrConnectionTypes'+connectionTypesListResponse+    :: ConnectionTypesListResponse+connectionTypesListResponse =+    ConnectionTypesListResponse'+    { _ctlrKind = "dfareporting#connectionTypesListResponse"+    , _ctlrConnectionTypes = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#connectionTypesListResponse\".+ctlrKind :: Lens' ConnectionTypesListResponse Text+ctlrKind = lens _ctlrKind (\ s a -> s{_ctlrKind = a})++-- | Collection of connection types such as broadband and mobile.+ctlrConnectionTypes :: Lens' ConnectionTypesListResponse [ConnectionType]+ctlrConnectionTypes+  = lens _ctlrConnectionTypes+      (\ s a -> s{_ctlrConnectionTypes = a})+      . _Default+      . _Coerce++instance FromJSON ConnectionTypesListResponse where+        parseJSON+          = withObject "ConnectionTypesListResponse"+              (\ o ->+                 ConnectionTypesListResponse' <$>+                   (o .:? "kind" .!=+                      "dfareporting#connectionTypesListResponse")+                     <*> (o .:? "connectionTypes" .!= mempty))++instance ToJSON ConnectionTypesListResponse where+        toJSON ConnectionTypesListResponse'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _ctlrKind),+                  ("connectionTypes" .=) <$> _ctlrConnectionTypes])++-- | Order List Response+--+-- /See:/ 'ordersListResponse' smart constructor.+data OrdersListResponse = OrdersListResponse'+    { _olrNextPageToken :: !(Maybe Text)+    , _olrKind          :: !Text+    , _olrOrders        :: !(Maybe [Order])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'OrdersListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'olrNextPageToken'+--+-- * 'olrKind'+--+-- * 'olrOrders'+ordersListResponse+    :: OrdersListResponse+ordersListResponse =+    OrdersListResponse'+    { _olrNextPageToken = Nothing+    , _olrKind = "dfareporting#ordersListResponse"+    , _olrOrders = Nothing+    }++-- | Pagination token to be used for the next list operation.+olrNextPageToken :: Lens' OrdersListResponse (Maybe Text)+olrNextPageToken+  = lens _olrNextPageToken+      (\ s a -> s{_olrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#ordersListResponse\".+olrKind :: Lens' OrdersListResponse Text+olrKind = lens _olrKind (\ s a -> s{_olrKind = a})++-- | Order collection.+olrOrders :: Lens' OrdersListResponse [Order]+olrOrders+  = lens _olrOrders (\ s a -> s{_olrOrders = a}) .+      _Default+      . _Coerce++instance FromJSON OrdersListResponse where+        parseJSON+          = withObject "OrdersListResponse"+              (\ o ->+                 OrdersListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!= "dfareporting#ordersListResponse")+                     <*> (o .:? "orders" .!= mempty))++instance ToJSON OrdersListResponse where+        toJSON OrdersListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _olrNextPageToken,+                  Just ("kind" .= _olrKind),+                  ("orders" .=) <$> _olrOrders])++-- | Represents the list of reports.+--+-- /See:/ 'reportList' smart constructor.+data ReportList = ReportList'+    { _repEtag          :: !(Maybe Text)+    , _repNextPageToken :: !(Maybe Text)+    , _repKind          :: !Text+    , _repItems         :: !(Maybe [Report])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ReportList' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'repEtag'+--+-- * 'repNextPageToken'+--+-- * 'repKind'+--+-- * 'repItems'+reportList+    :: ReportList+reportList =+    ReportList'+    { _repEtag = Nothing+    , _repNextPageToken = Nothing+    , _repKind = "dfareporting#reportList"+    , _repItems = Nothing+    }++-- | The eTag of this response for caching purposes.+repEtag :: Lens' ReportList (Maybe Text)+repEtag = lens _repEtag (\ s a -> s{_repEtag = a})++-- | Continuation token used to page through reports. To retrieve the next+-- page of results, set the next request\'s \"pageToken\" to the value of+-- this field. The page token is only valid for a limited amount of time+-- and should not be persisted.+repNextPageToken :: Lens' ReportList (Maybe Text)+repNextPageToken+  = lens _repNextPageToken+      (\ s a -> s{_repNextPageToken = a})++-- | The kind of list this is, in this case dfareporting#reportList.+repKind :: Lens' ReportList Text+repKind = lens _repKind (\ s a -> s{_repKind = a})++-- | The reports returned in this response.+repItems :: Lens' ReportList [Report]+repItems+  = lens _repItems (\ s a -> s{_repItems = a}) .+      _Default+      . _Coerce++instance FromJSON ReportList where+        parseJSON+          = withObject "ReportList"+              (\ o ->+                 ReportList' <$>+                   (o .:? "etag") <*> (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!= "dfareporting#reportList")+                     <*> (o .:? "items" .!= mempty))++instance ToJSON ReportList where+        toJSON ReportList'{..}+          = object+              (catMaybes+                 [("etag" .=) <$> _repEtag,+                  ("nextPageToken" .=) <$> _repNextPageToken,+                  Just ("kind" .= _repKind),+                  ("items" .=) <$> _repItems])++-- | Contains properties of a creative group.+--+-- /See:/ 'creativeGroup' smart constructor.+data CreativeGroup = CreativeGroup'+    { _cgKind                       :: !Text+    , _cgAdvertiserId               :: !(Maybe (Textual Int64))+    , _cgAdvertiserIdDimensionValue :: !(Maybe DimensionValue)+    , _cgGroupNumber                :: !(Maybe (Textual Int32))+    , _cgAccountId                  :: !(Maybe (Textual Int64))+    , _cgName                       :: !(Maybe Text)+    , _cgId                         :: !(Maybe (Textual Int64))+    , _cgSubAccountId               :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CreativeGroup' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cgKind'+--+-- * 'cgAdvertiserId'+--+-- * 'cgAdvertiserIdDimensionValue'+--+-- * 'cgGroupNumber'+--+-- * 'cgAccountId'+--+-- * 'cgName'+--+-- * 'cgId'+--+-- * 'cgSubAccountId'+creativeGroup+    :: CreativeGroup+creativeGroup =+    CreativeGroup'+    { _cgKind = "dfareporting#creativeGroup"+    , _cgAdvertiserId = Nothing+    , _cgAdvertiserIdDimensionValue = Nothing+    , _cgGroupNumber = Nothing+    , _cgAccountId = Nothing+    , _cgName = Nothing+    , _cgId = Nothing+    , _cgSubAccountId = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#creativeGroup\".+cgKind :: Lens' CreativeGroup Text+cgKind = lens _cgKind (\ s a -> s{_cgKind = a})++-- | Advertiser ID of this creative group. This is a required field on+-- insertion.+cgAdvertiserId :: Lens' CreativeGroup (Maybe Int64)+cgAdvertiserId+  = lens _cgAdvertiserId+      (\ s a -> s{_cgAdvertiserId = a})+      . mapping _Coerce++-- | Dimension value for the ID of the advertiser. This is a read-only,+-- auto-generated field.+cgAdvertiserIdDimensionValue :: Lens' CreativeGroup (Maybe DimensionValue)+cgAdvertiserIdDimensionValue+  = lens _cgAdvertiserIdDimensionValue+      (\ s a -> s{_cgAdvertiserIdDimensionValue = a})++-- | Subgroup of the creative group. Assign your creative groups to one of+-- the following subgroups in order to filter or manage them more easily.+-- This field is required on insertion and is read-only after insertion.+-- Acceptable values are: - 1 - 2+cgGroupNumber :: Lens' CreativeGroup (Maybe Int32)+cgGroupNumber+  = lens _cgGroupNumber+      (\ s a -> s{_cgGroupNumber = a})+      . mapping _Coerce++-- | Account ID of this creative group. This is a read-only field that can be+-- left blank.+cgAccountId :: Lens' CreativeGroup (Maybe Int64)+cgAccountId+  = lens _cgAccountId (\ s a -> s{_cgAccountId = a}) .+      mapping _Coerce++-- | Name of this creative group. This is a required field and must be less+-- than 256 characters long and unique among creative groups of the same+-- advertiser.+cgName :: Lens' CreativeGroup (Maybe Text)+cgName = lens _cgName (\ s a -> s{_cgName = a})++-- | ID of this creative group. This is a read-only, auto-generated field.+cgId :: Lens' CreativeGroup (Maybe Int64)+cgId+  = lens _cgId (\ s a -> s{_cgId = a}) .+      mapping _Coerce++-- | Subaccount ID of this creative group. This is a read-only field that can+-- be left blank.+cgSubAccountId :: Lens' CreativeGroup (Maybe Int64)+cgSubAccountId+  = lens _cgSubAccountId+      (\ s a -> s{_cgSubAccountId = a})+      . mapping _Coerce++instance FromJSON CreativeGroup where+        parseJSON+          = withObject "CreativeGroup"+              (\ o ->+                 CreativeGroup' <$>+                   (o .:? "kind" .!= "dfareporting#creativeGroup") <*>+                     (o .:? "advertiserId")+                     <*> (o .:? "advertiserIdDimensionValue")+                     <*> (o .:? "groupNumber")+                     <*> (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "id")+                     <*> (o .:? "subaccountId"))++instance ToJSON CreativeGroup where+        toJSON CreativeGroup'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _cgKind),+                  ("advertiserId" .=) <$> _cgAdvertiserId,+                  ("advertiserIdDimensionValue" .=) <$>+                    _cgAdvertiserIdDimensionValue,+                  ("groupNumber" .=) <$> _cgGroupNumber,+                  ("accountId" .=) <$> _cgAccountId,+                  ("name" .=) <$> _cgName, ("id" .=) <$> _cgId,+                  ("subaccountId" .=) <$> _cgSubAccountId])++-- | Identifies a creative which has been associated with a given campaign.+--+-- /See:/ 'campaignCreativeAssociation' smart constructor.+data CampaignCreativeAssociation = CampaignCreativeAssociation'+    { _ccaKind       :: !Text+    , _ccaCreativeId :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CampaignCreativeAssociation' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ccaKind'+--+-- * 'ccaCreativeId'+campaignCreativeAssociation+    :: CampaignCreativeAssociation+campaignCreativeAssociation =+    CampaignCreativeAssociation'+    { _ccaKind = "dfareporting#campaignCreativeAssociation"+    , _ccaCreativeId = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#campaignCreativeAssociation\".+ccaKind :: Lens' CampaignCreativeAssociation Text+ccaKind = lens _ccaKind (\ s a -> s{_ccaKind = a})++-- | ID of the creative associated with the campaign. This is a required+-- field.+ccaCreativeId :: Lens' CampaignCreativeAssociation (Maybe Int64)+ccaCreativeId+  = lens _ccaCreativeId+      (\ s a -> s{_ccaCreativeId = a})+      . mapping _Coerce++instance FromJSON CampaignCreativeAssociation where+        parseJSON+          = withObject "CampaignCreativeAssociation"+              (\ o ->+                 CampaignCreativeAssociation' <$>+                   (o .:? "kind" .!=+                      "dfareporting#campaignCreativeAssociation")+                     <*> (o .:? "creativeId"))++instance ToJSON CampaignCreativeAssociation where+        toJSON CampaignCreativeAssociation'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _ccaKind),+                  ("creativeId" .=) <$> _ccaCreativeId])++-- | The original conversion that was inserted and whether there were any+-- errors.+--+-- /See:/ 'conversionStatus' smart constructor.+data ConversionStatus = ConversionStatus'+    { _csKind       :: !Text+    , _csConversion :: !(Maybe Conversion)+    , _csErrors     :: !(Maybe [ConversionError])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ConversionStatus' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'csKind'+--+-- * 'csConversion'+--+-- * 'csErrors'+conversionStatus+    :: ConversionStatus+conversionStatus =+    ConversionStatus'+    { _csKind = "dfareporting#conversionStatus"+    , _csConversion = Nothing+    , _csErrors = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#conversionStatus\".+csKind :: Lens' ConversionStatus Text+csKind = lens _csKind (\ s a -> s{_csKind = a})++-- | The original conversion that was inserted.+csConversion :: Lens' ConversionStatus (Maybe Conversion)+csConversion+  = lens _csConversion (\ s a -> s{_csConversion = a})++-- | A list of errors related to this conversion.+csErrors :: Lens' ConversionStatus [ConversionError]+csErrors+  = lens _csErrors (\ s a -> s{_csErrors = a}) .+      _Default+      . _Coerce++instance FromJSON ConversionStatus where+        parseJSON+          = withObject "ConversionStatus"+              (\ o ->+                 ConversionStatus' <$>+                   (o .:? "kind" .!= "dfareporting#conversionStatus")+                     <*> (o .:? "conversion")+                     <*> (o .:? "errors" .!= mempty))++instance ToJSON ConversionStatus where+        toJSON ConversionStatus'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _csKind),+                  ("conversion" .=) <$> _csConversion,+                  ("errors" .=) <$> _csErrors])++-- | Lookback configuration settings.+--+-- /See:/ 'lookbackConfiguration' smart constructor.+data LookbackConfiguration = LookbackConfiguration'+    { _lcClickDuration                    :: !(Maybe (Textual Int32))+    , _lcPostImpressionActivitiesDuration :: !(Maybe (Textual Int32))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'LookbackConfiguration' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'lcClickDuration'+--+-- * 'lcPostImpressionActivitiesDuration'+lookbackConfiguration+    :: LookbackConfiguration+lookbackConfiguration =+    LookbackConfiguration'+    { _lcClickDuration = Nothing+    , _lcPostImpressionActivitiesDuration = Nothing+    }++-- | Lookback window, in days, from the last time a given user clicked on one+-- of your ads. If you enter 0, clicks will not be considered as triggering+-- events for floodlight tracking. If you leave this field blank, the+-- default value for your account will be used.+lcClickDuration :: Lens' LookbackConfiguration (Maybe Int32)+lcClickDuration+  = lens _lcClickDuration+      (\ s a -> s{_lcClickDuration = a})+      . mapping _Coerce++-- | Lookback window, in days, from the last time a given user viewed one of+-- your ads. If you enter 0, impressions will not be considered as+-- triggering events for floodlight tracking. If you leave this field+-- blank, the default value for your account will be used.+lcPostImpressionActivitiesDuration :: Lens' LookbackConfiguration (Maybe Int32)+lcPostImpressionActivitiesDuration+  = lens _lcPostImpressionActivitiesDuration+      (\ s a -> s{_lcPostImpressionActivitiesDuration = a})+      . mapping _Coerce++instance FromJSON LookbackConfiguration where+        parseJSON+          = withObject "LookbackConfiguration"+              (\ o ->+                 LookbackConfiguration' <$>+                   (o .:? "clickDuration") <*>+                     (o .:? "postImpressionActivitiesDuration"))++instance ToJSON LookbackConfiguration where+        toJSON LookbackConfiguration'{..}+          = object+              (catMaybes+                 [("clickDuration" .=) <$> _lcClickDuration,+                  ("postImpressionActivitiesDuration" .=) <$>+                    _lcPostImpressionActivitiesDuration])++-- | Publisher Dynamic Tag+--+-- /See:/ 'floodlightActivityPublisherDynamicTag' smart constructor.+data FloodlightActivityPublisherDynamicTag = FloodlightActivityPublisherDynamicTag'+    { _fapdtClickThrough         :: !(Maybe Bool)+    , _fapdtSiteIdDimensionValue :: !(Maybe DimensionValue)+    , _fapdtDynamicTag           :: !(Maybe FloodlightActivityDynamicTag)+    , _fapdtDirectorySiteId      :: !(Maybe (Textual Int64))+    , _fapdtSiteId               :: !(Maybe (Textual Int64))+    , _fapdtViewThrough          :: !(Maybe Bool)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'FloodlightActivityPublisherDynamicTag' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'fapdtClickThrough'+--+-- * 'fapdtSiteIdDimensionValue'+--+-- * 'fapdtDynamicTag'+--+-- * 'fapdtDirectorySiteId'+--+-- * 'fapdtSiteId'+--+-- * 'fapdtViewThrough'+floodlightActivityPublisherDynamicTag+    :: FloodlightActivityPublisherDynamicTag+floodlightActivityPublisherDynamicTag =+    FloodlightActivityPublisherDynamicTag'+    { _fapdtClickThrough = Nothing+    , _fapdtSiteIdDimensionValue = Nothing+    , _fapdtDynamicTag = Nothing+    , _fapdtDirectorySiteId = Nothing+    , _fapdtSiteId = Nothing+    , _fapdtViewThrough = Nothing+    }++-- | Whether this tag is applicable only for click-throughs.+fapdtClickThrough :: Lens' FloodlightActivityPublisherDynamicTag (Maybe Bool)+fapdtClickThrough+  = lens _fapdtClickThrough+      (\ s a -> s{_fapdtClickThrough = a})++-- | Dimension value for the ID of the site. This is a read-only,+-- auto-generated field.+fapdtSiteIdDimensionValue :: Lens' FloodlightActivityPublisherDynamicTag (Maybe DimensionValue)+fapdtSiteIdDimensionValue+  = lens _fapdtSiteIdDimensionValue+      (\ s a -> s{_fapdtSiteIdDimensionValue = a})++-- | Dynamic floodlight tag.+fapdtDynamicTag :: Lens' FloodlightActivityPublisherDynamicTag (Maybe FloodlightActivityDynamicTag)+fapdtDynamicTag+  = lens _fapdtDynamicTag+      (\ s a -> s{_fapdtDynamicTag = a})++-- | Directory site ID of this dynamic tag. This is a write-only field that+-- can be used as an alternative to the siteId field. When this resource is+-- retrieved, only the siteId field will be populated.+fapdtDirectorySiteId :: Lens' FloodlightActivityPublisherDynamicTag (Maybe Int64)+fapdtDirectorySiteId+  = lens _fapdtDirectorySiteId+      (\ s a -> s{_fapdtDirectorySiteId = a})+      . mapping _Coerce++-- | Site ID of this dynamic tag.+fapdtSiteId :: Lens' FloodlightActivityPublisherDynamicTag (Maybe Int64)+fapdtSiteId+  = lens _fapdtSiteId (\ s a -> s{_fapdtSiteId = a}) .+      mapping _Coerce++-- | Whether this tag is applicable only for view-throughs.+fapdtViewThrough :: Lens' FloodlightActivityPublisherDynamicTag (Maybe Bool)+fapdtViewThrough+  = lens _fapdtViewThrough+      (\ s a -> s{_fapdtViewThrough = a})++instance FromJSON+         FloodlightActivityPublisherDynamicTag where+        parseJSON+          = withObject "FloodlightActivityPublisherDynamicTag"+              (\ o ->+                 FloodlightActivityPublisherDynamicTag' <$>+                   (o .:? "clickThrough") <*>+                     (o .:? "siteIdDimensionValue")+                     <*> (o .:? "dynamicTag")+                     <*> (o .:? "directorySiteId")+                     <*> (o .:? "siteId")+                     <*> (o .:? "viewThrough"))++instance ToJSON FloodlightActivityPublisherDynamicTag+         where+        toJSON FloodlightActivityPublisherDynamicTag'{..}+          = object+              (catMaybes+                 [("clickThrough" .=) <$> _fapdtClickThrough,+                  ("siteIdDimensionValue" .=) <$>+                    _fapdtSiteIdDimensionValue,+                  ("dynamicTag" .=) <$> _fapdtDynamicTag,+                  ("directorySiteId" .=) <$> _fapdtDirectorySiteId,+                  ("siteId" .=) <$> _fapdtSiteId,+                  ("viewThrough" .=) <$> _fapdtViewThrough])++-- | Gets a summary of active ads in an account.+--+-- /See:/ 'accountActiveAdSummary' smart constructor.+data AccountActiveAdSummary = AccountActiveAdSummary'+    { _aaasAvailableAds       :: !(Maybe (Textual Int64))+    , _aaasKind               :: !Text+    , _aaasAccountId          :: !(Maybe (Textual Int64))+    , _aaasActiveAds          :: !(Maybe (Textual Int64))+    , _aaasActiveAdsLimitTier :: !(Maybe AccountActiveAdSummaryActiveAdsLimitTier)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'AccountActiveAdSummary' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'aaasAvailableAds'+--+-- * 'aaasKind'+--+-- * 'aaasAccountId'+--+-- * 'aaasActiveAds'+--+-- * 'aaasActiveAdsLimitTier'+accountActiveAdSummary+    :: AccountActiveAdSummary+accountActiveAdSummary =+    AccountActiveAdSummary'+    { _aaasAvailableAds = Nothing+    , _aaasKind = "dfareporting#accountActiveAdSummary"+    , _aaasAccountId = Nothing+    , _aaasActiveAds = Nothing+    , _aaasActiveAdsLimitTier = Nothing+    }++-- | Ads that can be activated for the account.+aaasAvailableAds :: Lens' AccountActiveAdSummary (Maybe Int64)+aaasAvailableAds+  = lens _aaasAvailableAds+      (\ s a -> s{_aaasAvailableAds = a})+      . mapping _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#accountActiveAdSummary\".+aaasKind :: Lens' AccountActiveAdSummary Text+aaasKind = lens _aaasKind (\ s a -> s{_aaasKind = a})++-- | ID of the account.+aaasAccountId :: Lens' AccountActiveAdSummary (Maybe Int64)+aaasAccountId+  = lens _aaasAccountId+      (\ s a -> s{_aaasAccountId = a})+      . mapping _Coerce++-- | Ads that have been activated for the account+aaasActiveAds :: Lens' AccountActiveAdSummary (Maybe Int64)+aaasActiveAds+  = lens _aaasActiveAds+      (\ s a -> s{_aaasActiveAds = a})+      . mapping _Coerce++-- | Maximum number of active ads allowed for the account.+aaasActiveAdsLimitTier :: Lens' AccountActiveAdSummary (Maybe AccountActiveAdSummaryActiveAdsLimitTier)+aaasActiveAdsLimitTier+  = lens _aaasActiveAdsLimitTier+      (\ s a -> s{_aaasActiveAdsLimitTier = a})++instance FromJSON AccountActiveAdSummary where+        parseJSON+          = withObject "AccountActiveAdSummary"+              (\ o ->+                 AccountActiveAdSummary' <$>+                   (o .:? "availableAds") <*>+                     (o .:? "kind" .!=+                        "dfareporting#accountActiveAdSummary")+                     <*> (o .:? "accountId")+                     <*> (o .:? "activeAds")+                     <*> (o .:? "activeAdsLimitTier"))++instance ToJSON AccountActiveAdSummary where+        toJSON AccountActiveAdSummary'{..}+          = object+              (catMaybes+                 [("availableAds" .=) <$> _aaasAvailableAds,+                  Just ("kind" .= _aaasKind),+                  ("accountId" .=) <$> _aaasAccountId,+                  ("activeAds" .=) <$> _aaasActiveAds,+                  ("activeAdsLimitTier" .=) <$>+                    _aaasActiveAdsLimitTier])++-- | Offset Position.+--+-- /See:/ 'offSetPosition' smart constructor.+data OffSetPosition = OffSetPosition'+    { _ospLeft :: !(Maybe (Textual Int32))+    , _ospTop  :: !(Maybe (Textual Int32))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'OffSetPosition' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ospLeft'+--+-- * 'ospTop'+offSetPosition+    :: OffSetPosition+offSetPosition =+    OffSetPosition'+    { _ospLeft = Nothing+    , _ospTop = Nothing+    }++-- | Offset distance from left side of an asset or a window.+ospLeft :: Lens' OffSetPosition (Maybe Int32)+ospLeft+  = lens _ospLeft (\ s a -> s{_ospLeft = a}) .+      mapping _Coerce++-- | Offset distance from top side of an asset or a window.+ospTop :: Lens' OffSetPosition (Maybe Int32)+ospTop+  = lens _ospTop (\ s a -> s{_ospTop = a}) .+      mapping _Coerce++instance FromJSON OffSetPosition where+        parseJSON+          = withObject "OffSetPosition"+              (\ o ->+                 OffSetPosition' <$> (o .:? "left") <*> (o .:? "top"))++instance ToJSON OffSetPosition where+        toJSON OffSetPosition'{..}+          = object+              (catMaybes+                 [("left" .=) <$> _ospLeft, ("top" .=) <$> _ospTop])++-- | Represents a metric.+--+-- /See:/ 'metric' smart constructor.+data Metric = Metric'+    { _mKind :: !Text+    , _mName :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Metric' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'mKind'+--+-- * 'mName'+metric+    :: Metric+metric =+    Metric'+    { _mKind = "dfareporting#metric"+    , _mName = Nothing+    }++-- | The kind of resource this is, in this case dfareporting#metric.+mKind :: Lens' Metric Text+mKind = lens _mKind (\ s a -> s{_mKind = a})++-- | The metric name, e.g. dfa:impressions+mName :: Lens' Metric (Maybe Text)+mName = lens _mName (\ s a -> s{_mName = a})++instance FromJSON Metric where+        parseJSON+          = withObject "Metric"+              (\ o ->+                 Metric' <$>+                   (o .:? "kind" .!= "dfareporting#metric") <*>+                     (o .:? "name"))++instance ToJSON Metric where+        toJSON Metric'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _mKind), ("name" .=) <$> _mName])++-- | Contains properties of a remarketing list\'s sharing information.+-- Sharing allows other accounts or advertisers to target to your+-- remarketing lists. This resource can be used to manage remarketing list+-- sharing to other accounts and advertisers.+--+-- /See:/ 'remarketingListShare' smart constructor.+data RemarketingListShare = RemarketingListShare'+    { _rlsSharedAdvertiserIds :: !(Maybe [Textual Int64])+    , _rlsKind                :: !Text+    , _rlsRemarketingListId   :: !(Maybe (Textual Int64))+    , _rlsSharedAccountIds    :: !(Maybe [Textual Int64])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'RemarketingListShare' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rlsSharedAdvertiserIds'+--+-- * 'rlsKind'+--+-- * 'rlsRemarketingListId'+--+-- * 'rlsSharedAccountIds'+remarketingListShare+    :: RemarketingListShare+remarketingListShare =+    RemarketingListShare'+    { _rlsSharedAdvertiserIds = Nothing+    , _rlsKind = "dfareporting#remarketingListShare"+    , _rlsRemarketingListId = Nothing+    , _rlsSharedAccountIds = Nothing+    }++-- | Advertisers that the remarketing list is shared with.+rlsSharedAdvertiserIds :: Lens' RemarketingListShare [Int64]+rlsSharedAdvertiserIds+  = lens _rlsSharedAdvertiserIds+      (\ s a -> s{_rlsSharedAdvertiserIds = a})+      . _Default+      . _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#remarketingListShare\".+rlsKind :: Lens' RemarketingListShare Text+rlsKind = lens _rlsKind (\ s a -> s{_rlsKind = a})++-- | Remarketing list ID. This is a read-only, auto-generated field.+rlsRemarketingListId :: Lens' RemarketingListShare (Maybe Int64)+rlsRemarketingListId+  = lens _rlsRemarketingListId+      (\ s a -> s{_rlsRemarketingListId = a})+      . mapping _Coerce++-- | Accounts that the remarketing list is shared with.+rlsSharedAccountIds :: Lens' RemarketingListShare [Int64]+rlsSharedAccountIds+  = lens _rlsSharedAccountIds+      (\ s a -> s{_rlsSharedAccountIds = a})+      . _Default+      . _Coerce++instance FromJSON RemarketingListShare where+        parseJSON+          = withObject "RemarketingListShare"+              (\ o ->+                 RemarketingListShare' <$>+                   (o .:? "sharedAdvertiserIds" .!= mempty) <*>+                     (o .:? "kind" .!=+                        "dfareporting#remarketingListShare")+                     <*> (o .:? "remarketingListId")+                     <*> (o .:? "sharedAccountIds" .!= mempty))++instance ToJSON RemarketingListShare where+        toJSON RemarketingListShare'{..}+          = object+              (catMaybes+                 [("sharedAdvertiserIds" .=) <$>+                    _rlsSharedAdvertiserIds,+                  Just ("kind" .= _rlsKind),+                  ("remarketingListId" .=) <$> _rlsRemarketingListId,+                  ("sharedAccountIds" .=) <$> _rlsSharedAccountIds])++-- | Event Tag List Response+--+-- /See:/ 'eventTagsListResponse' smart constructor.+data EventTagsListResponse = EventTagsListResponse'+    { _etlrKind      :: !Text+    , _etlrEventTags :: !(Maybe [EventTag])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'EventTagsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'etlrKind'+--+-- * 'etlrEventTags'+eventTagsListResponse+    :: EventTagsListResponse+eventTagsListResponse =+    EventTagsListResponse'+    { _etlrKind = "dfareporting#eventTagsListResponse"+    , _etlrEventTags = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#eventTagsListResponse\".+etlrKind :: Lens' EventTagsListResponse Text+etlrKind = lens _etlrKind (\ s a -> s{_etlrKind = a})++-- | Event tag collection.+etlrEventTags :: Lens' EventTagsListResponse [EventTag]+etlrEventTags+  = lens _etlrEventTags+      (\ s a -> s{_etlrEventTags = a})+      . _Default+      . _Coerce++instance FromJSON EventTagsListResponse where+        parseJSON+          = withObject "EventTagsListResponse"+              (\ o ->+                 EventTagsListResponse' <$>+                   (o .:? "kind" .!=+                      "dfareporting#eventTagsListResponse")+                     <*> (o .:? "eventTags" .!= mempty))++instance ToJSON EventTagsListResponse where+        toJSON EventTagsListResponse'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _etlrKind),+                  ("eventTags" .=) <$> _etlrEventTags])++-- | User Role List Response+--+-- /See:/ 'userRolesListResponse' smart constructor.+data UserRolesListResponse = UserRolesListResponse'+    { _urlrNextPageToken :: !(Maybe Text)+    , _urlrKind          :: !Text+    , _urlrUserRoles     :: !(Maybe [UserRole])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'UserRolesListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'urlrNextPageToken'+--+-- * 'urlrKind'+--+-- * 'urlrUserRoles'+userRolesListResponse+    :: UserRolesListResponse+userRolesListResponse =+    UserRolesListResponse'+    { _urlrNextPageToken = Nothing+    , _urlrKind = "dfareporting#userRolesListResponse"+    , _urlrUserRoles = Nothing+    }++-- | Pagination token to be used for the next list operation.+urlrNextPageToken :: Lens' UserRolesListResponse (Maybe Text)+urlrNextPageToken+  = lens _urlrNextPageToken+      (\ s a -> s{_urlrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#userRolesListResponse\".+urlrKind :: Lens' UserRolesListResponse Text+urlrKind = lens _urlrKind (\ s a -> s{_urlrKind = a})++-- | User role collection.+urlrUserRoles :: Lens' UserRolesListResponse [UserRole]+urlrUserRoles+  = lens _urlrUserRoles+      (\ s a -> s{_urlrUserRoles = a})+      . _Default+      . _Coerce++instance FromJSON UserRolesListResponse where+        parseJSON+          = withObject "UserRolesListResponse"+              (\ o ->+                 UserRolesListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!=+                        "dfareporting#userRolesListResponse")+                     <*> (o .:? "userRoles" .!= mempty))++instance ToJSON UserRolesListResponse where+        toJSON UserRolesListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _urlrNextPageToken,+                  Just ("kind" .= _urlrKind),+                  ("userRoles" .=) <$> _urlrUserRoles])++-- | Represents a response to the queryCompatibleFields method.+--+-- /See:/ 'compatibleFields' smart constructor.+data CompatibleFields = CompatibleFields'+    { _cfReachReportCompatibleFields               :: !(Maybe ReachReportCompatibleFields)+    , _cfCrossDimensionReachReportCompatibleFields :: !(Maybe CrossDimensionReachReportCompatibleFields)+    , _cfKind                                      :: !Text+    , _cfFloodlightReportCompatibleFields          :: !(Maybe FloodlightReportCompatibleFields)+    , _cfReportCompatibleFields                    :: !(Maybe ReportCompatibleFields)+    , _cfPathToConversionReportCompatibleFields    :: !(Maybe PathToConversionReportCompatibleFields)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CompatibleFields' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cfReachReportCompatibleFields'+--+-- * 'cfCrossDimensionReachReportCompatibleFields'+--+-- * 'cfKind'+--+-- * 'cfFloodlightReportCompatibleFields'+--+-- * 'cfReportCompatibleFields'+--+-- * 'cfPathToConversionReportCompatibleFields'+compatibleFields+    :: CompatibleFields+compatibleFields =+    CompatibleFields'+    { _cfReachReportCompatibleFields = Nothing+    , _cfCrossDimensionReachReportCompatibleFields = Nothing+    , _cfKind = "dfareporting#compatibleFields"+    , _cfFloodlightReportCompatibleFields = Nothing+    , _cfReportCompatibleFields = Nothing+    , _cfPathToConversionReportCompatibleFields = Nothing+    }++-- | Contains items that are compatible to be selected for a report of type+-- \"REACH\".+cfReachReportCompatibleFields :: Lens' CompatibleFields (Maybe ReachReportCompatibleFields)+cfReachReportCompatibleFields+  = lens _cfReachReportCompatibleFields+      (\ s a -> s{_cfReachReportCompatibleFields = a})++-- | Contains items that are compatible to be selected for a report of type+-- \"CROSS_DIMENSION_REACH\".+cfCrossDimensionReachReportCompatibleFields :: Lens' CompatibleFields (Maybe CrossDimensionReachReportCompatibleFields)+cfCrossDimensionReachReportCompatibleFields+  = lens _cfCrossDimensionReachReportCompatibleFields+      (\ s a ->+         s{_cfCrossDimensionReachReportCompatibleFields = a})++-- | The kind of resource this is, in this case+-- dfareporting#compatibleFields.+cfKind :: Lens' CompatibleFields Text+cfKind = lens _cfKind (\ s a -> s{_cfKind = a})++-- | Contains items that are compatible to be selected for a report of type+-- \"FLOODLIGHT\".+cfFloodlightReportCompatibleFields :: Lens' CompatibleFields (Maybe FloodlightReportCompatibleFields)+cfFloodlightReportCompatibleFields+  = lens _cfFloodlightReportCompatibleFields+      (\ s a -> s{_cfFloodlightReportCompatibleFields = a})++-- | Contains items that are compatible to be selected for a report of type+-- \"STANDARD\".+cfReportCompatibleFields :: Lens' CompatibleFields (Maybe ReportCompatibleFields)+cfReportCompatibleFields+  = lens _cfReportCompatibleFields+      (\ s a -> s{_cfReportCompatibleFields = a})++-- | Contains items that are compatible to be selected for a report of type+-- \"PATH_TO_CONVERSION\".+cfPathToConversionReportCompatibleFields :: Lens' CompatibleFields (Maybe PathToConversionReportCompatibleFields)+cfPathToConversionReportCompatibleFields+  = lens _cfPathToConversionReportCompatibleFields+      (\ s a ->+         s{_cfPathToConversionReportCompatibleFields = a})++instance FromJSON CompatibleFields where+        parseJSON+          = withObject "CompatibleFields"+              (\ o ->+                 CompatibleFields' <$>+                   (o .:? "reachReportCompatibleFields") <*>+                     (o .:? "crossDimensionReachReportCompatibleFields")+                     <*>+                     (o .:? "kind" .!= "dfareporting#compatibleFields")+                     <*> (o .:? "floodlightReportCompatibleFields")+                     <*> (o .:? "reportCompatibleFields")+                     <*> (o .:? "pathToConversionReportCompatibleFields"))++instance ToJSON CompatibleFields where+        toJSON CompatibleFields'{..}+          = object+              (catMaybes+                 [("reachReportCompatibleFields" .=) <$>+                    _cfReachReportCompatibleFields,+                  ("crossDimensionReachReportCompatibleFields" .=) <$>+                    _cfCrossDimensionReachReportCompatibleFields,+                  Just ("kind" .= _cfKind),+                  ("floodlightReportCompatibleFields" .=) <$>+                    _cfFloodlightReportCompatibleFields,+                  ("reportCompatibleFields" .=) <$>+                    _cfReportCompatibleFields,+                  ("pathToConversionReportCompatibleFields" .=) <$>+                    _cfPathToConversionReportCompatibleFields])++-- | Audience Segment.+--+-- /See:/ 'audienceSegment' smart constructor.+data AudienceSegment = AudienceSegment'+    { _asName       :: !(Maybe Text)+    , _asId         :: !(Maybe (Textual Int64))+    , _asAllocation :: !(Maybe (Textual Int32))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'AudienceSegment' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'asName'+--+-- * 'asId'+--+-- * 'asAllocation'+audienceSegment+    :: AudienceSegment+audienceSegment =+    AudienceSegment'+    { _asName = Nothing+    , _asId = Nothing+    , _asAllocation = Nothing+    }++-- | Name of this audience segment. This is a required field and must be less+-- than 65 characters long.+asName :: Lens' AudienceSegment (Maybe Text)+asName = lens _asName (\ s a -> s{_asName = a})++-- | ID of this audience segment. This is a read-only, auto-generated field.+asId :: Lens' AudienceSegment (Maybe Int64)+asId+  = lens _asId (\ s a -> s{_asId = a}) .+      mapping _Coerce++-- | Weight allocated to this segment. Must be between 1 and 1000. The weight+-- assigned will be understood in proportion to the weights assigned to+-- other segments in the same segment group.+asAllocation :: Lens' AudienceSegment (Maybe Int32)+asAllocation+  = lens _asAllocation (\ s a -> s{_asAllocation = a})+      . mapping _Coerce++instance FromJSON AudienceSegment where+        parseJSON+          = withObject "AudienceSegment"+              (\ o ->+                 AudienceSegment' <$>+                   (o .:? "name") <*> (o .:? "id") <*>+                     (o .:? "allocation"))++instance ToJSON AudienceSegment where+        toJSON AudienceSegment'{..}+          = object+              (catMaybes+                 [("name" .=) <$> _asName, ("id" .=) <$> _asId,+                  ("allocation" .=) <$> _asAllocation])++-- | DFP Settings+--+-- /See:/ 'dfpSettings' smart constructor.+data DfpSettings = DfpSettings'+    { _dsPubPaidPlacementAccepted      :: !(Maybe Bool)+    , _dsDfpNetworkName                :: !(Maybe Text)+    , _dsPublisherPortalOnly           :: !(Maybe Bool)+    , _dsProgrammaticPlacementAccepted :: !(Maybe Bool)+    , _dsDfpNetworkCode                :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DfpSettings' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dsPubPaidPlacementAccepted'+--+-- * 'dsDfpNetworkName'+--+-- * 'dsPublisherPortalOnly'+--+-- * 'dsProgrammaticPlacementAccepted'+--+-- * 'dsDfpNetworkCode'+dfpSettings+    :: DfpSettings+dfpSettings =+    DfpSettings'+    { _dsPubPaidPlacementAccepted = Nothing+    , _dsDfpNetworkName = Nothing+    , _dsPublisherPortalOnly = Nothing+    , _dsProgrammaticPlacementAccepted = Nothing+    , _dsDfpNetworkCode = Nothing+    }++-- | Whether this directory site accepts publisher-paid tags.+dsPubPaidPlacementAccepted :: Lens' DfpSettings (Maybe Bool)+dsPubPaidPlacementAccepted+  = lens _dsPubPaidPlacementAccepted+      (\ s a -> s{_dsPubPaidPlacementAccepted = a})++-- | DFP network name for this directory site.+dsDfpNetworkName :: Lens' DfpSettings (Maybe Text)+dsDfpNetworkName+  = lens _dsDfpNetworkName+      (\ s a -> s{_dsDfpNetworkName = a})++-- | Whether this directory site is available only via DoubleClick Publisher+-- Portal.+dsPublisherPortalOnly :: Lens' DfpSettings (Maybe Bool)+dsPublisherPortalOnly+  = lens _dsPublisherPortalOnly+      (\ s a -> s{_dsPublisherPortalOnly = a})++-- | Whether this directory site accepts programmatic placements.+dsProgrammaticPlacementAccepted :: Lens' DfpSettings (Maybe Bool)+dsProgrammaticPlacementAccepted+  = lens _dsProgrammaticPlacementAccepted+      (\ s a -> s{_dsProgrammaticPlacementAccepted = a})++-- | DFP network code for this directory site.+dsDfpNetworkCode :: Lens' DfpSettings (Maybe Text)+dsDfpNetworkCode+  = lens _dsDfpNetworkCode+      (\ s a -> s{_dsDfpNetworkCode = a})++instance FromJSON DfpSettings where+        parseJSON+          = withObject "DfpSettings"+              (\ o ->+                 DfpSettings' <$>+                   (o .:? "pubPaidPlacementAccepted") <*>+                     (o .:? "dfp_network_name")+                     <*> (o .:? "publisherPortalOnly")+                     <*> (o .:? "programmaticPlacementAccepted")+                     <*> (o .:? "dfp_network_code"))++instance ToJSON DfpSettings where+        toJSON DfpSettings'{..}+          = object+              (catMaybes+                 [("pubPaidPlacementAccepted" .=) <$>+                    _dsPubPaidPlacementAccepted,+                  ("dfp_network_name" .=) <$> _dsDfpNetworkName,+                  ("publisherPortalOnly" .=) <$>+                    _dsPublisherPortalOnly,+                  ("programmaticPlacementAccepted" .=) <$>+                    _dsProgrammaticPlacementAccepted,+                  ("dfp_network_code" .=) <$> _dsDfpNetworkCode])++-- | Represents fields that are compatible to be selected for a report of+-- type \"PATH_TO_CONVERSION\".+--+-- /See:/ 'pathToConversionReportCompatibleFields' smart constructor.+data PathToConversionReportCompatibleFields = PathToConversionReportCompatibleFields'+    { _ptcrcfMetrics                   :: !(Maybe [Metric])+    , _ptcrcfKind                      :: !Text+    , _ptcrcfConversionDimensions      :: !(Maybe [Dimension])+    , _ptcrcfCustomFloodlightVariables :: !(Maybe [Dimension])+    , _ptcrcfPerInteractionDimensions  :: !(Maybe [Dimension])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'PathToConversionReportCompatibleFields' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ptcrcfMetrics'+--+-- * 'ptcrcfKind'+--+-- * 'ptcrcfConversionDimensions'+--+-- * 'ptcrcfCustomFloodlightVariables'+--+-- * 'ptcrcfPerInteractionDimensions'+pathToConversionReportCompatibleFields+    :: PathToConversionReportCompatibleFields+pathToConversionReportCompatibleFields =+    PathToConversionReportCompatibleFields'+    { _ptcrcfMetrics = Nothing+    , _ptcrcfKind = "dfareporting#pathToConversionReportCompatibleFields"+    , _ptcrcfConversionDimensions = Nothing+    , _ptcrcfCustomFloodlightVariables = Nothing+    , _ptcrcfPerInteractionDimensions = Nothing+    }++-- | Metrics which are compatible to be selected in the \"metricNames\"+-- section of the report.+ptcrcfMetrics :: Lens' PathToConversionReportCompatibleFields [Metric]+ptcrcfMetrics+  = lens _ptcrcfMetrics+      (\ s a -> s{_ptcrcfMetrics = a})+      . _Default+      . _Coerce++-- | The kind of resource this is, in this case+-- dfareporting#pathToConversionReportCompatibleFields.+ptcrcfKind :: Lens' PathToConversionReportCompatibleFields Text+ptcrcfKind+  = lens _ptcrcfKind (\ s a -> s{_ptcrcfKind = a})++-- | Conversion dimensions which are compatible to be selected in the+-- \"conversionDimensions\" section of the report.+ptcrcfConversionDimensions :: Lens' PathToConversionReportCompatibleFields [Dimension]+ptcrcfConversionDimensions+  = lens _ptcrcfConversionDimensions+      (\ s a -> s{_ptcrcfConversionDimensions = a})+      . _Default+      . _Coerce++-- | Custom floodlight variables which are compatible to be selected in the+-- \"customFloodlightVariables\" section of the report.+ptcrcfCustomFloodlightVariables :: Lens' PathToConversionReportCompatibleFields [Dimension]+ptcrcfCustomFloodlightVariables+  = lens _ptcrcfCustomFloodlightVariables+      (\ s a -> s{_ptcrcfCustomFloodlightVariables = a})+      . _Default+      . _Coerce++-- | Per-interaction dimensions which are compatible to be selected in the+-- \"perInteractionDimensions\" section of the report.+ptcrcfPerInteractionDimensions :: Lens' PathToConversionReportCompatibleFields [Dimension]+ptcrcfPerInteractionDimensions+  = lens _ptcrcfPerInteractionDimensions+      (\ s a -> s{_ptcrcfPerInteractionDimensions = a})+      . _Default+      . _Coerce++instance FromJSON+         PathToConversionReportCompatibleFields where+        parseJSON+          = withObject "PathToConversionReportCompatibleFields"+              (\ o ->+                 PathToConversionReportCompatibleFields' <$>+                   (o .:? "metrics" .!= mempty) <*>+                     (o .:? "kind" .!=+                        "dfareporting#pathToConversionReportCompatibleFields")+                     <*> (o .:? "conversionDimensions" .!= mempty)+                     <*> (o .:? "customFloodlightVariables" .!= mempty)+                     <*> (o .:? "perInteractionDimensions" .!= mempty))++instance ToJSON+         PathToConversionReportCompatibleFields where+        toJSON PathToConversionReportCompatibleFields'{..}+          = object+              (catMaybes+                 [("metrics" .=) <$> _ptcrcfMetrics,+                  Just ("kind" .= _ptcrcfKind),+                  ("conversionDimensions" .=) <$>+                    _ptcrcfConversionDimensions,+                  ("customFloodlightVariables" .=) <$>+                    _ptcrcfCustomFloodlightVariables,+                  ("perInteractionDimensions" .=) <$>+                    _ptcrcfPerInteractionDimensions])++-- | Contains information about a city that can be targeted by ads.+--+-- /See:/ 'city' smart constructor.+data City = City'+    { _ccMetroCode     :: !(Maybe Text)+    , _ccRegionCode    :: !(Maybe Text)+    , _ccKind          :: !Text+    , _ccRegionDartId  :: !(Maybe (Textual Int64))+    , _ccMetroDmaId    :: !(Maybe (Textual Int64))+    , _ccName          :: !(Maybe Text)+    , _ccCountryCode   :: !(Maybe Text)+    , _ccCountryDartId :: !(Maybe (Textual Int64))+    , _ccDartId        :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'City' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ccMetroCode'+--+-- * 'ccRegionCode'+--+-- * 'ccKind'+--+-- * 'ccRegionDartId'+--+-- * 'ccMetroDmaId'+--+-- * 'ccName'+--+-- * 'ccCountryCode'+--+-- * 'ccCountryDartId'+--+-- * 'ccDartId'+city+    :: City+city =+    City'+    { _ccMetroCode = Nothing+    , _ccRegionCode = Nothing+    , _ccKind = "dfareporting#city"+    , _ccRegionDartId = Nothing+    , _ccMetroDmaId = Nothing+    , _ccName = Nothing+    , _ccCountryCode = Nothing+    , _ccCountryDartId = Nothing+    , _ccDartId = Nothing+    }++-- | Metro region code of the metro region (DMA) to which this city belongs.+ccMetroCode :: Lens' City (Maybe Text)+ccMetroCode+  = lens _ccMetroCode (\ s a -> s{_ccMetroCode = a})++-- | Region code of the region to which this city belongs.+ccRegionCode :: Lens' City (Maybe Text)+ccRegionCode+  = lens _ccRegionCode (\ s a -> s{_ccRegionCode = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#city\".+ccKind :: Lens' City Text+ccKind = lens _ccKind (\ s a -> s{_ccKind = a})++-- | DART ID of the region to which this city belongs.+ccRegionDartId :: Lens' City (Maybe Int64)+ccRegionDartId+  = lens _ccRegionDartId+      (\ s a -> s{_ccRegionDartId = a})+      . mapping _Coerce++-- | ID of the metro region (DMA) to which this city belongs.+ccMetroDmaId :: Lens' City (Maybe Int64)+ccMetroDmaId+  = lens _ccMetroDmaId (\ s a -> s{_ccMetroDmaId = a})+      . mapping _Coerce++-- | Name of this city.+ccName :: Lens' City (Maybe Text)+ccName = lens _ccName (\ s a -> s{_ccName = a})++-- | Country code of the country to which this city belongs.+ccCountryCode :: Lens' City (Maybe Text)+ccCountryCode+  = lens _ccCountryCode+      (\ s a -> s{_ccCountryCode = a})++-- | DART ID of the country to which this city belongs.+ccCountryDartId :: Lens' City (Maybe Int64)+ccCountryDartId+  = lens _ccCountryDartId+      (\ s a -> s{_ccCountryDartId = a})+      . mapping _Coerce++-- | DART ID of this city. This is the ID used for targeting and generating+-- reports.+ccDartId :: Lens' City (Maybe Int64)+ccDartId+  = lens _ccDartId (\ s a -> s{_ccDartId = a}) .+      mapping _Coerce++instance FromJSON City where+        parseJSON+          = withObject "City"+              (\ o ->+                 City' <$>+                   (o .:? "metroCode") <*> (o .:? "regionCode") <*>+                     (o .:? "kind" .!= "dfareporting#city")+                     <*> (o .:? "regionDartId")+                     <*> (o .:? "metroDmaId")+                     <*> (o .:? "name")+                     <*> (o .:? "countryCode")+                     <*> (o .:? "countryDartId")+                     <*> (o .:? "dartId"))++instance ToJSON City where+        toJSON City'{..}+          = object+              (catMaybes+                 [("metroCode" .=) <$> _ccMetroCode,+                  ("regionCode" .=) <$> _ccRegionCode,+                  Just ("kind" .= _ccKind),+                  ("regionDartId" .=) <$> _ccRegionDartId,+                  ("metroDmaId" .=) <$> _ccMetroDmaId,+                  ("name" .=) <$> _ccName,+                  ("countryCode" .=) <$> _ccCountryCode,+                  ("countryDartId" .=) <$> _ccCountryDartId,+                  ("dartId" .=) <$> _ccDartId])++-- | Contains information about a platform type that can be targeted by ads.+--+-- /See:/ 'platformType' smart constructor.+data PlatformType = PlatformType'+    { _ptKind :: !Text+    , _ptName :: !(Maybe Text)+    , _ptId   :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'PlatformType' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ptKind'+--+-- * 'ptName'+--+-- * 'ptId'+platformType+    :: PlatformType+platformType =+    PlatformType'+    { _ptKind = "dfareporting#platformType"+    , _ptName = Nothing+    , _ptId = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#platformType\".+ptKind :: Lens' PlatformType Text+ptKind = lens _ptKind (\ s a -> s{_ptKind = a})++-- | Name of this platform type.+ptName :: Lens' PlatformType (Maybe Text)+ptName = lens _ptName (\ s a -> s{_ptName = a})++-- | ID of this platform type.+ptId :: Lens' PlatformType (Maybe Int64)+ptId+  = lens _ptId (\ s a -> s{_ptId = a}) .+      mapping _Coerce++instance FromJSON PlatformType where+        parseJSON+          = withObject "PlatformType"+              (\ o ->+                 PlatformType' <$>+                   (o .:? "kind" .!= "dfareporting#platformType") <*>+                     (o .:? "name")+                     <*> (o .:? "id"))++instance ToJSON PlatformType where+        toJSON PlatformType'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _ptKind), ("name" .=) <$> _ptName,+                  ("id" .=) <$> _ptId])++-- | Key Value Targeting Expression.+--+-- /See:/ 'keyValueTargetingExpression' smart constructor.+newtype KeyValueTargetingExpression = KeyValueTargetingExpression'+    { _kvteExpression :: Maybe Text+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'KeyValueTargetingExpression' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'kvteExpression'+keyValueTargetingExpression+    :: KeyValueTargetingExpression+keyValueTargetingExpression =+    KeyValueTargetingExpression'+    { _kvteExpression = Nothing+    }++-- | Keyword expression being targeted by the ad.+kvteExpression :: Lens' KeyValueTargetingExpression (Maybe Text)+kvteExpression+  = lens _kvteExpression+      (\ s a -> s{_kvteExpression = a})++instance FromJSON KeyValueTargetingExpression where+        parseJSON+          = withObject "KeyValueTargetingExpression"+              (\ o ->+                 KeyValueTargetingExpression' <$>+                   (o .:? "expression"))++instance ToJSON KeyValueTargetingExpression where+        toJSON KeyValueTargetingExpression'{..}+          = object+              (catMaybes [("expression" .=) <$> _kvteExpression])++-- | Companion Click-through override.+--+-- /See:/ 'companionClickThroughOverride' smart constructor.+data CompanionClickThroughOverride = CompanionClickThroughOverride'+    { _cctoCreativeId      :: !(Maybe (Textual Int64))+    , _cctoClickThroughURL :: !(Maybe ClickThroughURL)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CompanionClickThroughOverride' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cctoCreativeId'+--+-- * 'cctoClickThroughURL'+companionClickThroughOverride+    :: CompanionClickThroughOverride+companionClickThroughOverride =+    CompanionClickThroughOverride'+    { _cctoCreativeId = Nothing+    , _cctoClickThroughURL = Nothing+    }++-- | ID of the creative for this companion click-through override.+cctoCreativeId :: Lens' CompanionClickThroughOverride (Maybe Int64)+cctoCreativeId+  = lens _cctoCreativeId+      (\ s a -> s{_cctoCreativeId = a})+      . mapping _Coerce++-- | Click-through URL of this companion click-through override.+cctoClickThroughURL :: Lens' CompanionClickThroughOverride (Maybe ClickThroughURL)+cctoClickThroughURL+  = lens _cctoClickThroughURL+      (\ s a -> s{_cctoClickThroughURL = a})++instance FromJSON CompanionClickThroughOverride where+        parseJSON+          = withObject "CompanionClickThroughOverride"+              (\ o ->+                 CompanionClickThroughOverride' <$>+                   (o .:? "creativeId") <*> (o .:? "clickThroughUrl"))++instance ToJSON CompanionClickThroughOverride where+        toJSON CompanionClickThroughOverride'{..}+          = object+              (catMaybes+                 [("creativeId" .=) <$> _cctoCreativeId,+                  ("clickThroughUrl" .=) <$> _cctoClickThroughURL])++-- | Advertiser List Response+--+-- /See:/ 'advertisersListResponse' smart constructor.+data AdvertisersListResponse = AdvertisersListResponse'+    { _advNextPageToken :: !(Maybe Text)+    , _advKind          :: !Text+    , _advAdvertisers   :: !(Maybe [Advertiser])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'AdvertisersListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'advNextPageToken'+--+-- * 'advKind'+--+-- * 'advAdvertisers'+advertisersListResponse+    :: AdvertisersListResponse+advertisersListResponse =+    AdvertisersListResponse'+    { _advNextPageToken = Nothing+    , _advKind = "dfareporting#advertisersListResponse"+    , _advAdvertisers = Nothing+    }++-- | Pagination token to be used for the next list operation.+advNextPageToken :: Lens' AdvertisersListResponse (Maybe Text)+advNextPageToken+  = lens _advNextPageToken+      (\ s a -> s{_advNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#advertisersListResponse\".+advKind :: Lens' AdvertisersListResponse Text+advKind = lens _advKind (\ s a -> s{_advKind = a})++-- | Advertiser collection.+advAdvertisers :: Lens' AdvertisersListResponse [Advertiser]+advAdvertisers+  = lens _advAdvertisers+      (\ s a -> s{_advAdvertisers = a})+      . _Default+      . _Coerce++instance FromJSON AdvertisersListResponse where+        parseJSON+          = withObject "AdvertisersListResponse"+              (\ o ->+                 AdvertisersListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!=+                        "dfareporting#advertisersListResponse")+                     <*> (o .:? "advertisers" .!= mempty))++instance ToJSON AdvertisersListResponse where+        toJSON AdvertisersListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _advNextPageToken,+                  Just ("kind" .= _advKind),+                  ("advertisers" .=) <$> _advAdvertisers])++-- | Country List Response+--+-- /See:/ 'countriesListResponse' smart constructor.+data CountriesListResponse = CountriesListResponse'+    { _couKind      :: !Text+    , _couCountries :: !(Maybe [Country])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CountriesListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'couKind'+--+-- * 'couCountries'+countriesListResponse+    :: CountriesListResponse+countriesListResponse =+    CountriesListResponse'+    { _couKind = "dfareporting#countriesListResponse"+    , _couCountries = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#countriesListResponse\".+couKind :: Lens' CountriesListResponse Text+couKind = lens _couKind (\ s a -> s{_couKind = a})++-- | Country collection.+couCountries :: Lens' CountriesListResponse [Country]+couCountries+  = lens _couCountries (\ s a -> s{_couCountries = a})+      . _Default+      . _Coerce++instance FromJSON CountriesListResponse where+        parseJSON+          = withObject "CountriesListResponse"+              (\ o ->+                 CountriesListResponse' <$>+                   (o .:? "kind" .!=+                      "dfareporting#countriesListResponse")+                     <*> (o .:? "countries" .!= mempty))++instance ToJSON CountriesListResponse where+        toJSON CountriesListResponse'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _couKind),+                  ("countries" .=) <$> _couCountries])++-- | Account Permission Group List Response+--+-- /See:/ 'accountPermissionGroupsListResponse' smart constructor.+data AccountPermissionGroupsListResponse = AccountPermissionGroupsListResponse'+    { _apglrKind                    :: !Text+    , _apglrAccountPermissionGroups :: !(Maybe [AccountPermissionGroup])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'AccountPermissionGroupsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'apglrKind'+--+-- * 'apglrAccountPermissionGroups'+accountPermissionGroupsListResponse+    :: AccountPermissionGroupsListResponse+accountPermissionGroupsListResponse =+    AccountPermissionGroupsListResponse'+    { _apglrKind = "dfareporting#accountPermissionGroupsListResponse"+    , _apglrAccountPermissionGroups = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#accountPermissionGroupsListResponse\".+apglrKind :: Lens' AccountPermissionGroupsListResponse Text+apglrKind+  = lens _apglrKind (\ s a -> s{_apglrKind = a})++-- | Account permission group collection.+apglrAccountPermissionGroups :: Lens' AccountPermissionGroupsListResponse [AccountPermissionGroup]+apglrAccountPermissionGroups+  = lens _apglrAccountPermissionGroups+      (\ s a -> s{_apglrAccountPermissionGroups = a})+      . _Default+      . _Coerce++instance FromJSON AccountPermissionGroupsListResponse+         where+        parseJSON+          = withObject "AccountPermissionGroupsListResponse"+              (\ o ->+                 AccountPermissionGroupsListResponse' <$>+                   (o .:? "kind" .!=+                      "dfareporting#accountPermissionGroupsListResponse")+                     <*> (o .:? "accountPermissionGroups" .!= mempty))++instance ToJSON AccountPermissionGroupsListResponse+         where+        toJSON AccountPermissionGroupsListResponse'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _apglrKind),+                  ("accountPermissionGroups" .=) <$>+                    _apglrAccountPermissionGroups])++-- | Popup Window Properties.+--+-- /See:/ 'popupWindowProperties' smart constructor.+data PopupWindowProperties = PopupWindowProperties'+    { _pwpOffSet         :: !(Maybe OffSetPosition)+    , _pwpDimension      :: !(Maybe Size)+    , _pwpShowStatusBar  :: !(Maybe Bool)+    , _pwpShowMenuBar    :: !(Maybe Bool)+    , _pwpPositionType   :: !(Maybe PopupWindowPropertiesPositionType)+    , _pwpShowAddressBar :: !(Maybe Bool)+    , _pwpShowScrollBar  :: !(Maybe Bool)+    , _pwpShowToolBar    :: !(Maybe Bool)+    , _pwpTitle          :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'PopupWindowProperties' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'pwpOffSet'+--+-- * 'pwpDimension'+--+-- * 'pwpShowStatusBar'+--+-- * 'pwpShowMenuBar'+--+-- * 'pwpPositionType'+--+-- * 'pwpShowAddressBar'+--+-- * 'pwpShowScrollBar'+--+-- * 'pwpShowToolBar'+--+-- * 'pwpTitle'+popupWindowProperties+    :: PopupWindowProperties+popupWindowProperties =+    PopupWindowProperties'+    { _pwpOffSet = Nothing+    , _pwpDimension = Nothing+    , _pwpShowStatusBar = Nothing+    , _pwpShowMenuBar = Nothing+    , _pwpPositionType = Nothing+    , _pwpShowAddressBar = Nothing+    , _pwpShowScrollBar = Nothing+    , _pwpShowToolBar = Nothing+    , _pwpTitle = Nothing+    }++-- | Upper-left corner coordinates of the popup window. Applicable if+-- positionType is COORDINATES.+pwpOffSet :: Lens' PopupWindowProperties (Maybe OffSetPosition)+pwpOffSet+  = lens _pwpOffSet (\ s a -> s{_pwpOffSet = a})++-- | Popup dimension for a creative. This is a read-only field. Applicable to+-- the following creative types: all RICH_MEDIA and all VPAID+pwpDimension :: Lens' PopupWindowProperties (Maybe Size)+pwpDimension+  = lens _pwpDimension (\ s a -> s{_pwpDimension = a})++-- | Whether to display the browser status bar.+pwpShowStatusBar :: Lens' PopupWindowProperties (Maybe Bool)+pwpShowStatusBar+  = lens _pwpShowStatusBar+      (\ s a -> s{_pwpShowStatusBar = a})++-- | Whether to display the browser menu bar.+pwpShowMenuBar :: Lens' PopupWindowProperties (Maybe Bool)+pwpShowMenuBar+  = lens _pwpShowMenuBar+      (\ s a -> s{_pwpShowMenuBar = a})++-- | Popup window position either centered or at specific coordinate.+pwpPositionType :: Lens' PopupWindowProperties (Maybe PopupWindowPropertiesPositionType)+pwpPositionType+  = lens _pwpPositionType+      (\ s a -> s{_pwpPositionType = a})++-- | Whether to display the browser address bar.+pwpShowAddressBar :: Lens' PopupWindowProperties (Maybe Bool)+pwpShowAddressBar+  = lens _pwpShowAddressBar+      (\ s a -> s{_pwpShowAddressBar = a})++-- | Whether to display the browser scroll bar.+pwpShowScrollBar :: Lens' PopupWindowProperties (Maybe Bool)+pwpShowScrollBar+  = lens _pwpShowScrollBar+      (\ s a -> s{_pwpShowScrollBar = a})++-- | Whether to display the browser tool bar.+pwpShowToolBar :: Lens' PopupWindowProperties (Maybe Bool)+pwpShowToolBar+  = lens _pwpShowToolBar+      (\ s a -> s{_pwpShowToolBar = a})++-- | Title of popup window.+pwpTitle :: Lens' PopupWindowProperties (Maybe Text)+pwpTitle = lens _pwpTitle (\ s a -> s{_pwpTitle = a})++instance FromJSON PopupWindowProperties where+        parseJSON+          = withObject "PopupWindowProperties"+              (\ o ->+                 PopupWindowProperties' <$>+                   (o .:? "offset") <*> (o .:? "dimension") <*>+                     (o .:? "showStatusBar")+                     <*> (o .:? "showMenuBar")+                     <*> (o .:? "positionType")+                     <*> (o .:? "showAddressBar")+                     <*> (o .:? "showScrollBar")+                     <*> (o .:? "showToolBar")+                     <*> (o .:? "title"))++instance ToJSON PopupWindowProperties where+        toJSON PopupWindowProperties'{..}+          = object+              (catMaybes+                 [("offset" .=) <$> _pwpOffSet,+                  ("dimension" .=) <$> _pwpDimension,+                  ("showStatusBar" .=) <$> _pwpShowStatusBar,+                  ("showMenuBar" .=) <$> _pwpShowMenuBar,+                  ("positionType" .=) <$> _pwpPositionType,+                  ("showAddressBar" .=) <$> _pwpShowAddressBar,+                  ("showScrollBar" .=) <$> _pwpShowScrollBar,+                  ("showToolBar" .=) <$> _pwpShowToolBar,+                  ("title" .=) <$> _pwpTitle])++-- | Event tag override information.+--+-- /See:/ 'eventTagOverride' smart constructor.+data EventTagOverride = EventTagOverride'+    { _etoEnabled :: !(Maybe Bool)+    , _etoId      :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'EventTagOverride' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'etoEnabled'+--+-- * 'etoId'+eventTagOverride+    :: EventTagOverride+eventTagOverride =+    EventTagOverride'+    { _etoEnabled = Nothing+    , _etoId = Nothing+    }++-- | Whether this override is enabled.+etoEnabled :: Lens' EventTagOverride (Maybe Bool)+etoEnabled+  = lens _etoEnabled (\ s a -> s{_etoEnabled = a})++-- | ID of this event tag override. This is a read-only, auto-generated+-- field.+etoId :: Lens' EventTagOverride (Maybe Int64)+etoId+  = lens _etoId (\ s a -> s{_etoId = a}) .+      mapping _Coerce++instance FromJSON EventTagOverride where+        parseJSON+          = withObject "EventTagOverride"+              (\ o ->+                 EventTagOverride' <$>+                   (o .:? "enabled") <*> (o .:? "id"))++instance ToJSON EventTagOverride where+        toJSON EventTagOverride'{..}+          = object+              (catMaybes+                 [("enabled" .=) <$> _etoEnabled,+                  ("id" .=) <$> _etoId])++-- | Contains information about a particular version of an operating system+-- that can be targeted by ads.+--+-- /See:/ 'operatingSystemVersion' smart constructor.+data OperatingSystemVersion = OperatingSystemVersion'+    { _osvMinorVersion    :: !(Maybe Text)+    , _osvKind            :: !Text+    , _osvOperatingSystem :: !(Maybe OperatingSystem)+    , _osvMajorVersion    :: !(Maybe Text)+    , _osvName            :: !(Maybe Text)+    , _osvId              :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'OperatingSystemVersion' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'osvMinorVersion'+--+-- * 'osvKind'+--+-- * 'osvOperatingSystem'+--+-- * 'osvMajorVersion'+--+-- * 'osvName'+--+-- * 'osvId'+operatingSystemVersion+    :: OperatingSystemVersion+operatingSystemVersion =+    OperatingSystemVersion'+    { _osvMinorVersion = Nothing+    , _osvKind = "dfareporting#operatingSystemVersion"+    , _osvOperatingSystem = Nothing+    , _osvMajorVersion = Nothing+    , _osvName = Nothing+    , _osvId = Nothing+    }++-- | Minor version (number after the first dot) of this operating system+-- version.+osvMinorVersion :: Lens' OperatingSystemVersion (Maybe Text)+osvMinorVersion+  = lens _osvMinorVersion+      (\ s a -> s{_osvMinorVersion = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#operatingSystemVersion\".+osvKind :: Lens' OperatingSystemVersion Text+osvKind = lens _osvKind (\ s a -> s{_osvKind = a})++-- | Operating system of this operating system version.+osvOperatingSystem :: Lens' OperatingSystemVersion (Maybe OperatingSystem)+osvOperatingSystem+  = lens _osvOperatingSystem+      (\ s a -> s{_osvOperatingSystem = a})++-- | Major version (leftmost number) of this operating system version.+osvMajorVersion :: Lens' OperatingSystemVersion (Maybe Text)+osvMajorVersion+  = lens _osvMajorVersion+      (\ s a -> s{_osvMajorVersion = a})++-- | Name of this operating system version.+osvName :: Lens' OperatingSystemVersion (Maybe Text)+osvName = lens _osvName (\ s a -> s{_osvName = a})++-- | ID of this operating system version.+osvId :: Lens' OperatingSystemVersion (Maybe Int64)+osvId+  = lens _osvId (\ s a -> s{_osvId = a}) .+      mapping _Coerce++instance FromJSON OperatingSystemVersion where+        parseJSON+          = withObject "OperatingSystemVersion"+              (\ o ->+                 OperatingSystemVersion' <$>+                   (o .:? "minorVersion") <*>+                     (o .:? "kind" .!=+                        "dfareporting#operatingSystemVersion")+                     <*> (o .:? "operatingSystem")+                     <*> (o .:? "majorVersion")+                     <*> (o .:? "name")+                     <*> (o .:? "id"))++instance ToJSON OperatingSystemVersion where+        toJSON OperatingSystemVersion'{..}+          = object+              (catMaybes+                 [("minorVersion" .=) <$> _osvMinorVersion,+                  Just ("kind" .= _osvKind),+                  ("operatingSystem" .=) <$> _osvOperatingSystem,+                  ("majorVersion" .=) <$> _osvMajorVersion,+                  ("name" .=) <$> _osvName, ("id" .=) <$> _osvId])++-- | AccountPermissions contains information about a particular account+-- permission. Some features of DCM require an account permission to be+-- present in the account.+--+-- /See:/ 'accountPermission' smart constructor.+data AccountPermission = AccountPermission'+    { _acccKind              :: !Text+    , _acccAccountProFiles   :: !(Maybe [AccountPermissionAccountProFilesItem])+    , _acccName              :: !(Maybe Text)+    , _acccId                :: !(Maybe (Textual Int64))+    , _acccLevel             :: !(Maybe AccountPermissionLevel)+    , _acccPermissionGroupId :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'AccountPermission' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'acccKind'+--+-- * 'acccAccountProFiles'+--+-- * 'acccName'+--+-- * 'acccId'+--+-- * 'acccLevel'+--+-- * 'acccPermissionGroupId'+accountPermission+    :: AccountPermission+accountPermission =+    AccountPermission'+    { _acccKind = "dfareporting#accountPermission"+    , _acccAccountProFiles = Nothing+    , _acccName = Nothing+    , _acccId = Nothing+    , _acccLevel = Nothing+    , _acccPermissionGroupId = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#accountPermission\".+acccKind :: Lens' AccountPermission Text+acccKind = lens _acccKind (\ s a -> s{_acccKind = a})++-- | Account profiles associated with this account permission. Possible+-- values are: - \"ACCOUNT_PROFILE_BASIC\" - \"ACCOUNT_PROFILE_STANDARD\"+acccAccountProFiles :: Lens' AccountPermission [AccountPermissionAccountProFilesItem]+acccAccountProFiles+  = lens _acccAccountProFiles+      (\ s a -> s{_acccAccountProFiles = a})+      . _Default+      . _Coerce++-- | Name of this account permission.+acccName :: Lens' AccountPermission (Maybe Text)+acccName = lens _acccName (\ s a -> s{_acccName = a})++-- | ID of this account permission.+acccId :: Lens' AccountPermission (Maybe Int64)+acccId+  = lens _acccId (\ s a -> s{_acccId = a}) .+      mapping _Coerce++-- | Administrative level required to enable this account permission.+acccLevel :: Lens' AccountPermission (Maybe AccountPermissionLevel)+acccLevel+  = lens _acccLevel (\ s a -> s{_acccLevel = a})++-- | Permission group of this account permission.+acccPermissionGroupId :: Lens' AccountPermission (Maybe Int64)+acccPermissionGroupId+  = lens _acccPermissionGroupId+      (\ s a -> s{_acccPermissionGroupId = a})+      . mapping _Coerce++instance FromJSON AccountPermission where+        parseJSON+          = withObject "AccountPermission"+              (\ o ->+                 AccountPermission' <$>+                   (o .:? "kind" .!= "dfareporting#accountPermission")+                     <*> (o .:? "accountProfiles" .!= mempty)+                     <*> (o .:? "name")+                     <*> (o .:? "id")+                     <*> (o .:? "level")+                     <*> (o .:? "permissionGroupId"))++instance ToJSON AccountPermission where+        toJSON AccountPermission'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _acccKind),+                  ("accountProfiles" .=) <$> _acccAccountProFiles,+                  ("name" .=) <$> _acccName, ("id" .=) <$> _acccId,+                  ("level" .=) <$> _acccLevel,+                  ("permissionGroupId" .=) <$> _acccPermissionGroupId])++-- | Represents a UserProfile resource.+--+-- /See:/ 'userProFile' smart constructor.+data UserProFile = UserProFile'+    { _upfEtag           :: !(Maybe Text)+    , _upfKind           :: !Text+    , _upfAccountName    :: !(Maybe Text)+    , _upfProFileId      :: !(Maybe (Textual Int64))+    , _upfUserName       :: !(Maybe Text)+    , _upfAccountId      :: !(Maybe (Textual Int64))+    , _upfSubAccountName :: !(Maybe Text)+    , _upfSubAccountId   :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'UserProFile' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'upfEtag'+--+-- * 'upfKind'+--+-- * 'upfAccountName'+--+-- * 'upfProFileId'+--+-- * 'upfUserName'+--+-- * 'upfAccountId'+--+-- * 'upfSubAccountName'+--+-- * 'upfSubAccountId'+userProFile+    :: UserProFile+userProFile =+    UserProFile'+    { _upfEtag = Nothing+    , _upfKind = "dfareporting#userProfile"+    , _upfAccountName = Nothing+    , _upfProFileId = Nothing+    , _upfUserName = Nothing+    , _upfAccountId = Nothing+    , _upfSubAccountName = Nothing+    , _upfSubAccountId = Nothing+    }++-- | The eTag of this response for caching purposes.+upfEtag :: Lens' UserProFile (Maybe Text)+upfEtag = lens _upfEtag (\ s a -> s{_upfEtag = a})++-- | The kind of resource this is, in this case dfareporting#userProfile.+upfKind :: Lens' UserProFile Text+upfKind = lens _upfKind (\ s a -> s{_upfKind = a})++-- | The account name this profile belongs to.+upfAccountName :: Lens' UserProFile (Maybe Text)+upfAccountName+  = lens _upfAccountName+      (\ s a -> s{_upfAccountName = a})++-- | The unique ID of the user profile.+upfProFileId :: Lens' UserProFile (Maybe Int64)+upfProFileId+  = lens _upfProFileId (\ s a -> s{_upfProFileId = a})+      . mapping _Coerce++-- | The user name.+upfUserName :: Lens' UserProFile (Maybe Text)+upfUserName+  = lens _upfUserName (\ s a -> s{_upfUserName = a})++-- | The account ID to which this profile belongs.+upfAccountId :: Lens' UserProFile (Maybe Int64)+upfAccountId+  = lens _upfAccountId (\ s a -> s{_upfAccountId = a})+      . mapping _Coerce++-- | The sub account name this profile belongs to if applicable.+upfSubAccountName :: Lens' UserProFile (Maybe Text)+upfSubAccountName+  = lens _upfSubAccountName+      (\ s a -> s{_upfSubAccountName = a})++-- | The sub account ID this profile belongs to if applicable.+upfSubAccountId :: Lens' UserProFile (Maybe Int64)+upfSubAccountId+  = lens _upfSubAccountId+      (\ s a -> s{_upfSubAccountId = a})+      . mapping _Coerce++instance FromJSON UserProFile where+        parseJSON+          = withObject "UserProFile"+              (\ o ->+                 UserProFile' <$>+                   (o .:? "etag") <*>+                     (o .:? "kind" .!= "dfareporting#userProfile")+                     <*> (o .:? "accountName")+                     <*> (o .:? "profileId")+                     <*> (o .:? "userName")+                     <*> (o .:? "accountId")+                     <*> (o .:? "subAccountName")+                     <*> (o .:? "subAccountId"))++instance ToJSON UserProFile where+        toJSON UserProFile'{..}+          = object+              (catMaybes+                 [("etag" .=) <$> _upfEtag, Just ("kind" .= _upfKind),+                  ("accountName" .=) <$> _upfAccountName,+                  ("profileId" .=) <$> _upfProFileId,+                  ("userName" .=) <$> _upfUserName,+                  ("accountId" .=) <$> _upfAccountId,+                  ("subAccountName" .=) <$> _upfSubAccountName,+                  ("subAccountId" .=) <$> _upfSubAccountId])++-- | Operating System List Response+--+-- /See:/ 'operatingSystemsListResponse' smart constructor.+data OperatingSystemsListResponse = OperatingSystemsListResponse'+    { _oslrKind             :: !Text+    , _oslrOperatingSystems :: !(Maybe [OperatingSystem])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'OperatingSystemsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'oslrKind'+--+-- * 'oslrOperatingSystems'+operatingSystemsListResponse+    :: OperatingSystemsListResponse+operatingSystemsListResponse =+    OperatingSystemsListResponse'+    { _oslrKind = "dfareporting#operatingSystemsListResponse"+    , _oslrOperatingSystems = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#operatingSystemsListResponse\".+oslrKind :: Lens' OperatingSystemsListResponse Text+oslrKind = lens _oslrKind (\ s a -> s{_oslrKind = a})++-- | Operating system collection.+oslrOperatingSystems :: Lens' OperatingSystemsListResponse [OperatingSystem]+oslrOperatingSystems+  = lens _oslrOperatingSystems+      (\ s a -> s{_oslrOperatingSystems = a})+      . _Default+      . _Coerce++instance FromJSON OperatingSystemsListResponse where+        parseJSON+          = withObject "OperatingSystemsListResponse"+              (\ o ->+                 OperatingSystemsListResponse' <$>+                   (o .:? "kind" .!=+                      "dfareporting#operatingSystemsListResponse")+                     <*> (o .:? "operatingSystems" .!= mempty))++instance ToJSON OperatingSystemsListResponse where+        toJSON OperatingSystemsListResponse'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _oslrKind),+                  ("operatingSystems" .=) <$> _oslrOperatingSystems])++-- | The report\'s email delivery settings.+--+-- /See:/ 'reportDelivery' smart constructor.+data ReportDelivery = ReportDelivery'+    { _rdEmailOwner             :: !(Maybe Bool)+    , _rdRecipients             :: !(Maybe [Recipient])+    , _rdMessage                :: !(Maybe Text)+    , _rdEmailOwnerDeliveryType :: !(Maybe ReportDeliveryEmailOwnerDeliveryType)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ReportDelivery' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rdEmailOwner'+--+-- * 'rdRecipients'+--+-- * 'rdMessage'+--+-- * 'rdEmailOwnerDeliveryType'+reportDelivery+    :: ReportDelivery+reportDelivery =+    ReportDelivery'+    { _rdEmailOwner = Nothing+    , _rdRecipients = Nothing+    , _rdMessage = Nothing+    , _rdEmailOwnerDeliveryType = Nothing+    }++-- | Whether the report should be emailed to the report owner.+rdEmailOwner :: Lens' ReportDelivery (Maybe Bool)+rdEmailOwner+  = lens _rdEmailOwner (\ s a -> s{_rdEmailOwner = a})++-- | The list of recipients to which to email the report.+rdRecipients :: Lens' ReportDelivery [Recipient]+rdRecipients+  = lens _rdRecipients (\ s a -> s{_rdRecipients = a})+      . _Default+      . _Coerce++-- | The message to be sent with each email.+rdMessage :: Lens' ReportDelivery (Maybe Text)+rdMessage+  = lens _rdMessage (\ s a -> s{_rdMessage = a})++-- | The type of delivery for the owner to receive, if enabled.+rdEmailOwnerDeliveryType :: Lens' ReportDelivery (Maybe ReportDeliveryEmailOwnerDeliveryType)+rdEmailOwnerDeliveryType+  = lens _rdEmailOwnerDeliveryType+      (\ s a -> s{_rdEmailOwnerDeliveryType = a})++instance FromJSON ReportDelivery where+        parseJSON+          = withObject "ReportDelivery"+              (\ o ->+                 ReportDelivery' <$>+                   (o .:? "emailOwner") <*>+                     (o .:? "recipients" .!= mempty)+                     <*> (o .:? "message")+                     <*> (o .:? "emailOwnerDeliveryType"))++instance ToJSON ReportDelivery where+        toJSON ReportDelivery'{..}+          = object+              (catMaybes+                 [("emailOwner" .=) <$> _rdEmailOwner,+                  ("recipients" .=) <$> _rdRecipients,+                  ("message" .=) <$> _rdMessage,+                  ("emailOwnerDeliveryType" .=) <$>+                    _rdEmailOwnerDeliveryType])++-- | Contains properties of a targetable remarketing list. Remarketing+-- enables you to create lists of users who have performed specific actions+-- on a site, then target ads to members of those lists. This resource is a+-- read-only view of a remarketing list to be used to faciliate targeting+-- ads to specific lists. Remarketing lists that are owned by your+-- advertisers and those that are shared to your advertisers or account are+-- accessible via this resource. To manage remarketing lists that are owned+-- by your advertisers, use the RemarketingLists resource.+--+-- /See:/ 'targetableRemarketingList' smart constructor.+data TargetableRemarketingList = TargetableRemarketingList'+    { _trlListSize                   :: !(Maybe (Textual Int64))+    , _trlLifeSpan                   :: !(Maybe (Textual Int64))+    , _trlKind                       :: !Text+    , _trlAdvertiserId               :: !(Maybe (Textual Int64))+    , _trlAdvertiserIdDimensionValue :: !(Maybe DimensionValue)+    , _trlActive                     :: !(Maybe Bool)+    , _trlAccountId                  :: !(Maybe (Textual Int64))+    , _trlName                       :: !(Maybe Text)+    , _trlListSource                 :: !(Maybe TargetableRemarketingListListSource)+    , _trlId                         :: !(Maybe (Textual Int64))+    , _trlSubAccountId               :: !(Maybe (Textual Int64))+    , _trlDescription                :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'TargetableRemarketingList' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'trlListSize'+--+-- * 'trlLifeSpan'+--+-- * 'trlKind'+--+-- * 'trlAdvertiserId'+--+-- * 'trlAdvertiserIdDimensionValue'+--+-- * 'trlActive'+--+-- * 'trlAccountId'+--+-- * 'trlName'+--+-- * 'trlListSource'+--+-- * 'trlId'+--+-- * 'trlSubAccountId'+--+-- * 'trlDescription'+targetableRemarketingList+    :: TargetableRemarketingList+targetableRemarketingList =+    TargetableRemarketingList'+    { _trlListSize = Nothing+    , _trlLifeSpan = Nothing+    , _trlKind = "dfareporting#targetableRemarketingList"+    , _trlAdvertiserId = Nothing+    , _trlAdvertiserIdDimensionValue = Nothing+    , _trlActive = Nothing+    , _trlAccountId = Nothing+    , _trlName = Nothing+    , _trlListSource = Nothing+    , _trlId = Nothing+    , _trlSubAccountId = Nothing+    , _trlDescription = Nothing+    }++-- | Number of users currently in the list. This is a read-only field.+trlListSize :: Lens' TargetableRemarketingList (Maybe Int64)+trlListSize+  = lens _trlListSize (\ s a -> s{_trlListSize = a}) .+      mapping _Coerce++-- | Number of days that a user should remain in the targetable remarketing+-- list without an impression.+trlLifeSpan :: Lens' TargetableRemarketingList (Maybe Int64)+trlLifeSpan+  = lens _trlLifeSpan (\ s a -> s{_trlLifeSpan = a}) .+      mapping _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#targetableRemarketingList\".+trlKind :: Lens' TargetableRemarketingList Text+trlKind = lens _trlKind (\ s a -> s{_trlKind = a})++-- | Dimension value for the advertiser ID that owns this targetable+-- remarketing list.+trlAdvertiserId :: Lens' TargetableRemarketingList (Maybe Int64)+trlAdvertiserId+  = lens _trlAdvertiserId+      (\ s a -> s{_trlAdvertiserId = a})+      . mapping _Coerce++-- | Dimension value for the ID of the advertiser.+trlAdvertiserIdDimensionValue :: Lens' TargetableRemarketingList (Maybe DimensionValue)+trlAdvertiserIdDimensionValue+  = lens _trlAdvertiserIdDimensionValue+      (\ s a -> s{_trlAdvertiserIdDimensionValue = a})++-- | Whether this targetable remarketing list is active.+trlActive :: Lens' TargetableRemarketingList (Maybe Bool)+trlActive+  = lens _trlActive (\ s a -> s{_trlActive = a})++-- | Account ID of this remarketing list. This is a read-only, auto-generated+-- field that is only returned in GET requests.+trlAccountId :: Lens' TargetableRemarketingList (Maybe Int64)+trlAccountId+  = lens _trlAccountId (\ s a -> s{_trlAccountId = a})+      . mapping _Coerce++-- | Name of the targetable remarketing list. Is no greater than 128+-- characters long.+trlName :: Lens' TargetableRemarketingList (Maybe Text)+trlName = lens _trlName (\ s a -> s{_trlName = a})++-- | Product from which this targetable remarketing list was originated.+trlListSource :: Lens' TargetableRemarketingList (Maybe TargetableRemarketingListListSource)+trlListSource+  = lens _trlListSource+      (\ s a -> s{_trlListSource = a})++-- | Targetable remarketing list ID.+trlId :: Lens' TargetableRemarketingList (Maybe Int64)+trlId+  = lens _trlId (\ s a -> s{_trlId = a}) .+      mapping _Coerce++-- | Subaccount ID of this remarketing list. This is a read-only,+-- auto-generated field that is only returned in GET requests.+trlSubAccountId :: Lens' TargetableRemarketingList (Maybe Int64)+trlSubAccountId+  = lens _trlSubAccountId+      (\ s a -> s{_trlSubAccountId = a})+      . mapping _Coerce++-- | Targetable remarketing list description.+trlDescription :: Lens' TargetableRemarketingList (Maybe Text)+trlDescription+  = lens _trlDescription+      (\ s a -> s{_trlDescription = a})++instance FromJSON TargetableRemarketingList where+        parseJSON+          = withObject "TargetableRemarketingList"+              (\ o ->+                 TargetableRemarketingList' <$>+                   (o .:? "listSize") <*> (o .:? "lifeSpan") <*>+                     (o .:? "kind" .!=+                        "dfareporting#targetableRemarketingList")+                     <*> (o .:? "advertiserId")+                     <*> (o .:? "advertiserIdDimensionValue")+                     <*> (o .:? "active")+                     <*> (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "listSource")+                     <*> (o .:? "id")+                     <*> (o .:? "subaccountId")+                     <*> (o .:? "description"))++instance ToJSON TargetableRemarketingList where+        toJSON TargetableRemarketingList'{..}+          = object+              (catMaybes+                 [("listSize" .=) <$> _trlListSize,+                  ("lifeSpan" .=) <$> _trlLifeSpan,+                  Just ("kind" .= _trlKind),+                  ("advertiserId" .=) <$> _trlAdvertiserId,+                  ("advertiserIdDimensionValue" .=) <$>+                    _trlAdvertiserIdDimensionValue,+                  ("active" .=) <$> _trlActive,+                  ("accountId" .=) <$> _trlAccountId,+                  ("name" .=) <$> _trlName,+                  ("listSource" .=) <$> _trlListSource,+                  ("id" .=) <$> _trlId,+                  ("subaccountId" .=) <$> _trlSubAccountId,+                  ("description" .=) <$> _trlDescription])++-- | Postal Code List Response+--+-- /See:/ 'postalCodesListResponse' smart constructor.+data PostalCodesListResponse = PostalCodesListResponse'+    { _pclrKind        :: !Text+    , _pclrPostalCodes :: !(Maybe [PostalCode])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'PostalCodesListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'pclrKind'+--+-- * 'pclrPostalCodes'+postalCodesListResponse+    :: PostalCodesListResponse+postalCodesListResponse =+    PostalCodesListResponse'+    { _pclrKind = "dfareporting#postalCodesListResponse"+    , _pclrPostalCodes = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#postalCodesListResponse\".+pclrKind :: Lens' PostalCodesListResponse Text+pclrKind = lens _pclrKind (\ s a -> s{_pclrKind = a})++-- | Postal code collection.+pclrPostalCodes :: Lens' PostalCodesListResponse [PostalCode]+pclrPostalCodes+  = lens _pclrPostalCodes+      (\ s a -> s{_pclrPostalCodes = a})+      . _Default+      . _Coerce++instance FromJSON PostalCodesListResponse where+        parseJSON+          = withObject "PostalCodesListResponse"+              (\ o ->+                 PostalCodesListResponse' <$>+                   (o .:? "kind" .!=+                      "dfareporting#postalCodesListResponse")+                     <*> (o .:? "postalCodes" .!= mempty))++instance ToJSON PostalCodesListResponse where+        toJSON PostalCodesListResponse'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _pclrKind),+                  ("postalCodes" .=) <$> _pclrPostalCodes])++-- | Describes a change that a user has made to a resource.+--+-- /See:/ 'changeLog' smart constructor.+data ChangeLog = ChangeLog'+    { _chaUserProFileId   :: !(Maybe (Textual Int64))+    , _chaObjectType      :: !(Maybe Text)+    , _chaUserProFileName :: !(Maybe Text)+    , _chaKind            :: !Text+    , _chaObjectId        :: !(Maybe (Textual Int64))+    , _chaAction          :: !(Maybe Text)+    , _chaTransactionId   :: !(Maybe (Textual Int64))+    , _chaOldValue        :: !(Maybe Text)+    , _chaAccountId       :: !(Maybe (Textual Int64))+    , _chaNewValue        :: !(Maybe Text)+    , _chaFieldName       :: !(Maybe Text)+    , _chaId              :: !(Maybe (Textual Int64))+    , _chaSubAccountId    :: !(Maybe (Textual Int64))+    , _chaChangeTime      :: !(Maybe DateTime')+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ChangeLog' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'chaUserProFileId'+--+-- * 'chaObjectType'+--+-- * 'chaUserProFileName'+--+-- * 'chaKind'+--+-- * 'chaObjectId'+--+-- * 'chaAction'+--+-- * 'chaTransactionId'+--+-- * 'chaOldValue'+--+-- * 'chaAccountId'+--+-- * 'chaNewValue'+--+-- * 'chaFieldName'+--+-- * 'chaId'+--+-- * 'chaSubAccountId'+--+-- * 'chaChangeTime'+changeLog+    :: ChangeLog+changeLog =+    ChangeLog'+    { _chaUserProFileId = Nothing+    , _chaObjectType = Nothing+    , _chaUserProFileName = Nothing+    , _chaKind = "dfareporting#changeLog"+    , _chaObjectId = Nothing+    , _chaAction = Nothing+    , _chaTransactionId = Nothing+    , _chaOldValue = Nothing+    , _chaAccountId = Nothing+    , _chaNewValue = Nothing+    , _chaFieldName = Nothing+    , _chaId = Nothing+    , _chaSubAccountId = Nothing+    , _chaChangeTime = Nothing+    }++-- | ID of the user who modified the object.+chaUserProFileId :: Lens' ChangeLog (Maybe Int64)+chaUserProFileId+  = lens _chaUserProFileId+      (\ s a -> s{_chaUserProFileId = a})+      . mapping _Coerce++-- | Object type of the change log.+chaObjectType :: Lens' ChangeLog (Maybe Text)+chaObjectType+  = lens _chaObjectType+      (\ s a -> s{_chaObjectType = a})++-- | User profile name of the user who modified the object.+chaUserProFileName :: Lens' ChangeLog (Maybe Text)+chaUserProFileName+  = lens _chaUserProFileName+      (\ s a -> s{_chaUserProFileName = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#changeLog\".+chaKind :: Lens' ChangeLog Text+chaKind = lens _chaKind (\ s a -> s{_chaKind = a})++-- | ID of the object of this change log. The object could be a campaign,+-- placement, ad, or other type.+chaObjectId :: Lens' ChangeLog (Maybe Int64)+chaObjectId+  = lens _chaObjectId (\ s a -> s{_chaObjectId = a}) .+      mapping _Coerce++-- | Action which caused the change.+chaAction :: Lens' ChangeLog (Maybe Text)+chaAction+  = lens _chaAction (\ s a -> s{_chaAction = a})++-- | Transaction ID of this change log. When a single API call results in+-- many changes, each change will have a separate ID in the change log but+-- will share the same transactionId.+chaTransactionId :: Lens' ChangeLog (Maybe Int64)+chaTransactionId+  = lens _chaTransactionId+      (\ s a -> s{_chaTransactionId = a})+      . mapping _Coerce++-- | Old value of the object field.+chaOldValue :: Lens' ChangeLog (Maybe Text)+chaOldValue+  = lens _chaOldValue (\ s a -> s{_chaOldValue = a})++-- | Account ID of the modified object.+chaAccountId :: Lens' ChangeLog (Maybe Int64)+chaAccountId+  = lens _chaAccountId (\ s a -> s{_chaAccountId = a})+      . mapping _Coerce++-- | New value of the object field.+chaNewValue :: Lens' ChangeLog (Maybe Text)+chaNewValue+  = lens _chaNewValue (\ s a -> s{_chaNewValue = a})++-- | Field name of the object which changed.+chaFieldName :: Lens' ChangeLog (Maybe Text)+chaFieldName+  = lens _chaFieldName (\ s a -> s{_chaFieldName = a})++-- | ID of this change log.+chaId :: Lens' ChangeLog (Maybe Int64)+chaId+  = lens _chaId (\ s a -> s{_chaId = a}) .+      mapping _Coerce++-- | Subaccount ID of the modified object.+chaSubAccountId :: Lens' ChangeLog (Maybe Int64)+chaSubAccountId+  = lens _chaSubAccountId+      (\ s a -> s{_chaSubAccountId = a})+      . mapping _Coerce++-- | Time when the object was modified.+chaChangeTime :: Lens' ChangeLog (Maybe UTCTime)+chaChangeTime+  = lens _chaChangeTime+      (\ s a -> s{_chaChangeTime = a})+      . mapping _DateTime++instance FromJSON ChangeLog where+        parseJSON+          = withObject "ChangeLog"+              (\ o ->+                 ChangeLog' <$>+                   (o .:? "userProfileId") <*> (o .:? "objectType") <*>+                     (o .:? "userProfileName")+                     <*> (o .:? "kind" .!= "dfareporting#changeLog")+                     <*> (o .:? "objectId")+                     <*> (o .:? "action")+                     <*> (o .:? "transactionId")+                     <*> (o .:? "oldValue")+                     <*> (o .:? "accountId")+                     <*> (o .:? "newValue")+                     <*> (o .:? "fieldName")+                     <*> (o .:? "id")+                     <*> (o .:? "subaccountId")+                     <*> (o .:? "changeTime"))++instance ToJSON ChangeLog where+        toJSON ChangeLog'{..}+          = object+              (catMaybes+                 [("userProfileId" .=) <$> _chaUserProFileId,+                  ("objectType" .=) <$> _chaObjectType,+                  ("userProfileName" .=) <$> _chaUserProFileName,+                  Just ("kind" .= _chaKind),+                  ("objectId" .=) <$> _chaObjectId,+                  ("action" .=) <$> _chaAction,+                  ("transactionId" .=) <$> _chaTransactionId,+                  ("oldValue" .=) <$> _chaOldValue,+                  ("accountId" .=) <$> _chaAccountId,+                  ("newValue" .=) <$> _chaNewValue,+                  ("fieldName" .=) <$> _chaFieldName,+                  ("id" .=) <$> _chaId,+                  ("subaccountId" .=) <$> _chaSubAccountId,+                  ("changeTime" .=) <$> _chaChangeTime])++-- | Contains properties of a placement strategy.+--+-- /See:/ 'placementStrategy' smart constructor.+data PlacementStrategy = PlacementStrategy'+    { _psKind      :: !Text+    , _psAccountId :: !(Maybe (Textual Int64))+    , _psName      :: !(Maybe Text)+    , _psId        :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'PlacementStrategy' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'psKind'+--+-- * 'psAccountId'+--+-- * 'psName'+--+-- * 'psId'+placementStrategy+    :: PlacementStrategy+placementStrategy =+    PlacementStrategy'+    { _psKind = "dfareporting#placementStrategy"+    , _psAccountId = Nothing+    , _psName = Nothing+    , _psId = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#placementStrategy\".+psKind :: Lens' PlacementStrategy Text+psKind = lens _psKind (\ s a -> s{_psKind = a})++-- | Account ID of this placement strategy.This is a read-only field that can+-- be left blank.+psAccountId :: Lens' PlacementStrategy (Maybe Int64)+psAccountId+  = lens _psAccountId (\ s a -> s{_psAccountId = a}) .+      mapping _Coerce++-- | Name of this placement strategy. This is a required field. It must be+-- less than 256 characters long and unique among placement strategies of+-- the same account.+psName :: Lens' PlacementStrategy (Maybe Text)+psName = lens _psName (\ s a -> s{_psName = a})++-- | ID of this placement strategy. This is a read-only, auto-generated+-- field.+psId :: Lens' PlacementStrategy (Maybe Int64)+psId+  = lens _psId (\ s a -> s{_psId = a}) .+      mapping _Coerce++instance FromJSON PlacementStrategy where+        parseJSON+          = withObject "PlacementStrategy"+              (\ o ->+                 PlacementStrategy' <$>+                   (o .:? "kind" .!= "dfareporting#placementStrategy")+                     <*> (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "id"))++instance ToJSON PlacementStrategy where+        toJSON PlacementStrategy'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _psKind),+                  ("accountId" .=) <$> _psAccountId,+                  ("name" .=) <$> _psName, ("id" .=) <$> _psId])++-- | Contains properties of a Floodlight activity.+--+-- /See:/ 'floodlightActivity' smart constructor.+data FloodlightActivity = FloodlightActivity'+    { _faCountingMethod                          :: !(Maybe FloodlightActivityCountingMethod)+    , _faTagString                               :: !(Maybe Text)+    , _faSecure                                  :: !(Maybe Bool)+    , _faExpectedURL                             :: !(Maybe Text)+    , _faFloodlightActivityGroupTagString        :: !(Maybe Text)+    , _faFloodlightConfigurationId               :: !(Maybe (Textual Int64))+    , _faKind                                    :: !Text+    , _faImageTagEnabled                         :: !(Maybe Bool)+    , _faAdvertiserId                            :: !(Maybe (Textual Int64))+    , _faAdvertiserIdDimensionValue              :: !(Maybe DimensionValue)+    , _faSSLCompliant                            :: !(Maybe Bool)+    , _faIdDimensionValue                        :: !(Maybe DimensionValue)+    , _faTagFormat                               :: !(Maybe FloodlightActivityTagFormat)+    , _faCacheBustingType                        :: !(Maybe FloodlightActivityCacheBustingType)+    , _faAccountId                               :: !(Maybe (Textual Int64))+    , _faName                                    :: !(Maybe Text)+    , _faPublisherTags                           :: !(Maybe [FloodlightActivityPublisherDynamicTag])+    , _faFloodlightActivityGroupId               :: !(Maybe (Textual Int64))+    , _faHidden                                  :: !(Maybe Bool)+    , _faFloodlightActivityGroupType             :: !(Maybe FloodlightActivityFloodlightActivityGroupType)+    , _faDefaultTags                             :: !(Maybe [FloodlightActivityDynamicTag])+    , _faFloodlightActivityGroupName             :: !(Maybe Text)+    , _faId                                      :: !(Maybe (Textual Int64))+    , _faSSLRequired                             :: !(Maybe Bool)+    , _faUserDefinedVariableTypes                :: !(Maybe [FloodlightActivityUserDefinedVariableTypesItem])+    , _faSubAccountId                            :: !(Maybe (Textual Int64))+    , _faNotes                                   :: !(Maybe Text)+    , _faFloodlightConfigurationIdDimensionValue :: !(Maybe DimensionValue)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'FloodlightActivity' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'faCountingMethod'+--+-- * 'faTagString'+--+-- * 'faSecure'+--+-- * 'faExpectedURL'+--+-- * 'faFloodlightActivityGroupTagString'+--+-- * 'faFloodlightConfigurationId'+--+-- * 'faKind'+--+-- * 'faImageTagEnabled'+--+-- * 'faAdvertiserId'+--+-- * 'faAdvertiserIdDimensionValue'+--+-- * 'faSSLCompliant'+--+-- * 'faIdDimensionValue'+--+-- * 'faTagFormat'+--+-- * 'faCacheBustingType'+--+-- * 'faAccountId'+--+-- * 'faName'+--+-- * 'faPublisherTags'+--+-- * 'faFloodlightActivityGroupId'+--+-- * 'faHidden'+--+-- * 'faFloodlightActivityGroupType'+--+-- * 'faDefaultTags'+--+-- * 'faFloodlightActivityGroupName'+--+-- * 'faId'+--+-- * 'faSSLRequired'+--+-- * 'faUserDefinedVariableTypes'+--+-- * 'faSubAccountId'+--+-- * 'faNotes'+--+-- * 'faFloodlightConfigurationIdDimensionValue'+floodlightActivity+    :: FloodlightActivity+floodlightActivity =+    FloodlightActivity'+    { _faCountingMethod = Nothing+    , _faTagString = Nothing+    , _faSecure = Nothing+    , _faExpectedURL = Nothing+    , _faFloodlightActivityGroupTagString = Nothing+    , _faFloodlightConfigurationId = Nothing+    , _faKind = "dfareporting#floodlightActivity"+    , _faImageTagEnabled = Nothing+    , _faAdvertiserId = Nothing+    , _faAdvertiserIdDimensionValue = Nothing+    , _faSSLCompliant = Nothing+    , _faIdDimensionValue = Nothing+    , _faTagFormat = Nothing+    , _faCacheBustingType = Nothing+    , _faAccountId = Nothing+    , _faName = Nothing+    , _faPublisherTags = Nothing+    , _faFloodlightActivityGroupId = Nothing+    , _faHidden = Nothing+    , _faFloodlightActivityGroupType = Nothing+    , _faDefaultTags = Nothing+    , _faFloodlightActivityGroupName = Nothing+    , _faId = Nothing+    , _faSSLRequired = Nothing+    , _faUserDefinedVariableTypes = Nothing+    , _faSubAccountId = Nothing+    , _faNotes = Nothing+    , _faFloodlightConfigurationIdDimensionValue = Nothing+    }++-- | Counting method for conversions for this floodlight activity. This is a+-- required field.+faCountingMethod :: Lens' FloodlightActivity (Maybe FloodlightActivityCountingMethod)+faCountingMethod+  = lens _faCountingMethod+      (\ s a -> s{_faCountingMethod = a})++-- | Value of the cat= paramter in the floodlight tag, which the ad servers+-- use to identify the activity. This is optional: if empty, a new tag+-- string will be generated for you. This string must be 1 to 8 characters+-- long, with valid characters being [a-z][A-Z][0-9][-][ _ ]. This tag+-- string must also be unique among activities of the same activity group.+-- This field is read-only after insertion.+faTagString :: Lens' FloodlightActivity (Maybe Text)+faTagString+  = lens _faTagString (\ s a -> s{_faTagString = a})++-- | Whether this tag should use SSL.+faSecure :: Lens' FloodlightActivity (Maybe Bool)+faSecure = lens _faSecure (\ s a -> s{_faSecure = a})++-- | URL where this tag will be deployed. If specified, must be less than 256+-- characters long.+faExpectedURL :: Lens' FloodlightActivity (Maybe Text)+faExpectedURL+  = lens _faExpectedURL+      (\ s a -> s{_faExpectedURL = a})++-- | Tag string of the associated floodlight activity group. This is a+-- read-only field.+faFloodlightActivityGroupTagString :: Lens' FloodlightActivity (Maybe Text)+faFloodlightActivityGroupTagString+  = lens _faFloodlightActivityGroupTagString+      (\ s a -> s{_faFloodlightActivityGroupTagString = a})++-- | Floodlight configuration ID of this floodlight activity. If this field+-- is left blank, the value will be copied over either from the activity+-- group\'s floodlight configuration or from the existing activity\'s+-- floodlight configuration.+faFloodlightConfigurationId :: Lens' FloodlightActivity (Maybe Int64)+faFloodlightConfigurationId+  = lens _faFloodlightConfigurationId+      (\ s a -> s{_faFloodlightConfigurationId = a})+      . mapping _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#floodlightActivity\".+faKind :: Lens' FloodlightActivity Text+faKind = lens _faKind (\ s a -> s{_faKind = a})++-- | Whether the image tag is enabled for this activity.+faImageTagEnabled :: Lens' FloodlightActivity (Maybe Bool)+faImageTagEnabled+  = lens _faImageTagEnabled+      (\ s a -> s{_faImageTagEnabled = a})++-- | Advertiser ID of this floodlight activity. If this field is left blank,+-- the value will be copied over either from the activity group\'s+-- advertiser or the existing activity\'s advertiser.+faAdvertiserId :: Lens' FloodlightActivity (Maybe Int64)+faAdvertiserId+  = lens _faAdvertiserId+      (\ s a -> s{_faAdvertiserId = a})+      . mapping _Coerce++-- | Dimension value for the ID of the advertiser. This is a read-only,+-- auto-generated field.+faAdvertiserIdDimensionValue :: Lens' FloodlightActivity (Maybe DimensionValue)+faAdvertiserIdDimensionValue+  = lens _faAdvertiserIdDimensionValue+      (\ s a -> s{_faAdvertiserIdDimensionValue = a})++-- | Whether the floodlight activity is SSL-compliant. This is a read-only+-- field, its value detected by the system from the floodlight tags.+faSSLCompliant :: Lens' FloodlightActivity (Maybe Bool)+faSSLCompliant+  = lens _faSSLCompliant+      (\ s a -> s{_faSSLCompliant = a})++-- | Dimension value for the ID of this floodlight activity. This is a+-- read-only, auto-generated field.+faIdDimensionValue :: Lens' FloodlightActivity (Maybe DimensionValue)+faIdDimensionValue+  = lens _faIdDimensionValue+      (\ s a -> s{_faIdDimensionValue = a})++-- | Tag format type for the floodlight activity. If left blank, the tag+-- format will default to HTML.+faTagFormat :: Lens' FloodlightActivity (Maybe FloodlightActivityTagFormat)+faTagFormat+  = lens _faTagFormat (\ s a -> s{_faTagFormat = a})++-- | Code type used for cache busting in the generated tag.+faCacheBustingType :: Lens' FloodlightActivity (Maybe FloodlightActivityCacheBustingType)+faCacheBustingType+  = lens _faCacheBustingType+      (\ s a -> s{_faCacheBustingType = a})++-- | Account ID of this floodlight activity. This is a read-only field that+-- can be left blank.+faAccountId :: Lens' FloodlightActivity (Maybe Int64)+faAccountId+  = lens _faAccountId (\ s a -> s{_faAccountId = a}) .+      mapping _Coerce++-- | Name of this floodlight activity. This is a required field. Must be less+-- than 129 characters long and cannot contain quotes.+faName :: Lens' FloodlightActivity (Maybe Text)+faName = lens _faName (\ s a -> s{_faName = a})++-- | Publisher dynamic floodlight tags.+faPublisherTags :: Lens' FloodlightActivity [FloodlightActivityPublisherDynamicTag]+faPublisherTags+  = lens _faPublisherTags+      (\ s a -> s{_faPublisherTags = a})+      . _Default+      . _Coerce++-- | Floodlight activity group ID of this floodlight activity. This is a+-- required field.+faFloodlightActivityGroupId :: Lens' FloodlightActivity (Maybe Int64)+faFloodlightActivityGroupId+  = lens _faFloodlightActivityGroupId+      (\ s a -> s{_faFloodlightActivityGroupId = a})+      . mapping _Coerce++-- | Whether this activity is archived.+faHidden :: Lens' FloodlightActivity (Maybe Bool)+faHidden = lens _faHidden (\ s a -> s{_faHidden = a})++-- | Type of the associated floodlight activity group. This is a read-only+-- field.+faFloodlightActivityGroupType :: Lens' FloodlightActivity (Maybe FloodlightActivityFloodlightActivityGroupType)+faFloodlightActivityGroupType+  = lens _faFloodlightActivityGroupType+      (\ s a -> s{_faFloodlightActivityGroupType = a})++-- | Dynamic floodlight tags.+faDefaultTags :: Lens' FloodlightActivity [FloodlightActivityDynamicTag]+faDefaultTags+  = lens _faDefaultTags+      (\ s a -> s{_faDefaultTags = a})+      . _Default+      . _Coerce++-- | Name of the associated floodlight activity group. This is a read-only+-- field.+faFloodlightActivityGroupName :: Lens' FloodlightActivity (Maybe Text)+faFloodlightActivityGroupName+  = lens _faFloodlightActivityGroupName+      (\ s a -> s{_faFloodlightActivityGroupName = a})++-- | ID of this floodlight activity. This is a read-only, auto-generated+-- field.+faId :: Lens' FloodlightActivity (Maybe Int64)+faId+  = lens _faId (\ s a -> s{_faId = a}) .+      mapping _Coerce++-- | Whether this floodlight activity must be SSL-compliant.+faSSLRequired :: Lens' FloodlightActivity (Maybe Bool)+faSSLRequired+  = lens _faSSLRequired+      (\ s a -> s{_faSSLRequired = a})++-- | List of the user-defined variables used by this conversion tag. These+-- map to the \"u[1-20]=\" in the tags. Each of these can have a user+-- defined type. Acceptable values are: - \"U1\" - \"U2\" - \"U3\" - \"U4\"+-- - \"U5\" - \"U6\" - \"U7\" - \"U8\" - \"U9\" - \"U10\" - \"U11\" -+-- \"U12\" - \"U13\" - \"U14\" - \"U15\" - \"U16\" - \"U17\" - \"U18\" -+-- \"U19\" - \"U20\"+faUserDefinedVariableTypes :: Lens' FloodlightActivity [FloodlightActivityUserDefinedVariableTypesItem]+faUserDefinedVariableTypes+  = lens _faUserDefinedVariableTypes+      (\ s a -> s{_faUserDefinedVariableTypes = a})+      . _Default+      . _Coerce++-- | Subaccount ID of this floodlight activity. This is a read-only field+-- that can be left blank.+faSubAccountId :: Lens' FloodlightActivity (Maybe Int64)+faSubAccountId+  = lens _faSubAccountId+      (\ s a -> s{_faSubAccountId = a})+      . mapping _Coerce++-- | General notes or implementation instructions for the tag.+faNotes :: Lens' FloodlightActivity (Maybe Text)+faNotes = lens _faNotes (\ s a -> s{_faNotes = a})++-- | Dimension value for the ID of the floodlight configuration. This is a+-- read-only, auto-generated field.+faFloodlightConfigurationIdDimensionValue :: Lens' FloodlightActivity (Maybe DimensionValue)+faFloodlightConfigurationIdDimensionValue+  = lens _faFloodlightConfigurationIdDimensionValue+      (\ s a ->+         s{_faFloodlightConfigurationIdDimensionValue = a})++instance FromJSON FloodlightActivity where+        parseJSON+          = withObject "FloodlightActivity"+              (\ o ->+                 FloodlightActivity' <$>+                   (o .:? "countingMethod") <*> (o .:? "tagString") <*>+                     (o .:? "secure")+                     <*> (o .:? "expectedUrl")+                     <*> (o .:? "floodlightActivityGroupTagString")+                     <*> (o .:? "floodlightConfigurationId")+                     <*>+                     (o .:? "kind" .!= "dfareporting#floodlightActivity")+                     <*> (o .:? "imageTagEnabled")+                     <*> (o .:? "advertiserId")+                     <*> (o .:? "advertiserIdDimensionValue")+                     <*> (o .:? "sslCompliant")+                     <*> (o .:? "idDimensionValue")+                     <*> (o .:? "tagFormat")+                     <*> (o .:? "cacheBustingType")+                     <*> (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "publisherTags" .!= mempty)+                     <*> (o .:? "floodlightActivityGroupId")+                     <*> (o .:? "hidden")+                     <*> (o .:? "floodlightActivityGroupType")+                     <*> (o .:? "defaultTags" .!= mempty)+                     <*> (o .:? "floodlightActivityGroupName")+                     <*> (o .:? "id")+                     <*> (o .:? "sslRequired")+                     <*> (o .:? "userDefinedVariableTypes" .!= mempty)+                     <*> (o .:? "subaccountId")+                     <*> (o .:? "notes")+                     <*>+                     (o .:? "floodlightConfigurationIdDimensionValue"))++instance ToJSON FloodlightActivity where+        toJSON FloodlightActivity'{..}+          = object+              (catMaybes+                 [("countingMethod" .=) <$> _faCountingMethod,+                  ("tagString" .=) <$> _faTagString,+                  ("secure" .=) <$> _faSecure,+                  ("expectedUrl" .=) <$> _faExpectedURL,+                  ("floodlightActivityGroupTagString" .=) <$>+                    _faFloodlightActivityGroupTagString,+                  ("floodlightConfigurationId" .=) <$>+                    _faFloodlightConfigurationId,+                  Just ("kind" .= _faKind),+                  ("imageTagEnabled" .=) <$> _faImageTagEnabled,+                  ("advertiserId" .=) <$> _faAdvertiserId,+                  ("advertiserIdDimensionValue" .=) <$>+                    _faAdvertiserIdDimensionValue,+                  ("sslCompliant" .=) <$> _faSSLCompliant,+                  ("idDimensionValue" .=) <$> _faIdDimensionValue,+                  ("tagFormat" .=) <$> _faTagFormat,+                  ("cacheBustingType" .=) <$> _faCacheBustingType,+                  ("accountId" .=) <$> _faAccountId,+                  ("name" .=) <$> _faName,+                  ("publisherTags" .=) <$> _faPublisherTags,+                  ("floodlightActivityGroupId" .=) <$>+                    _faFloodlightActivityGroupId,+                  ("hidden" .=) <$> _faHidden,+                  ("floodlightActivityGroupType" .=) <$>+                    _faFloodlightActivityGroupType,+                  ("defaultTags" .=) <$> _faDefaultTags,+                  ("floodlightActivityGroupName" .=) <$>+                    _faFloodlightActivityGroupName,+                  ("id" .=) <$> _faId,+                  ("sslRequired" .=) <$> _faSSLRequired,+                  ("userDefinedVariableTypes" .=) <$>+                    _faUserDefinedVariableTypes,+                  ("subaccountId" .=) <$> _faSubAccountId,+                  ("notes" .=) <$> _faNotes,+                  ("floodlightConfigurationIdDimensionValue" .=) <$>+                    _faFloodlightConfigurationIdDimensionValue])++-- | A custom floodlight variable.+--+-- /See:/ 'customFloodlightVariable' smart constructor.+data CustomFloodlightVariable = CustomFloodlightVariable'+    { _cusKind  :: !Text+    , _cusValue :: !(Maybe Text)+    , _cusType  :: !(Maybe CustomFloodlightVariableType)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CustomFloodlightVariable' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cusKind'+--+-- * 'cusValue'+--+-- * 'cusType'+customFloodlightVariable+    :: CustomFloodlightVariable+customFloodlightVariable =+    CustomFloodlightVariable'+    { _cusKind = "dfareporting#customFloodlightVariable"+    , _cusValue = Nothing+    , _cusType = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#customFloodlightVariable\".+cusKind :: Lens' CustomFloodlightVariable Text+cusKind = lens _cusKind (\ s a -> s{_cusKind = a})++-- | The value of the custom floodlight variable. The length of string must+-- not exceed 50 characters.+cusValue :: Lens' CustomFloodlightVariable (Maybe Text)+cusValue = lens _cusValue (\ s a -> s{_cusValue = a})++-- | The type of custom floodlight variable to supply a value for. These map+-- to the \"u[1-20]=\" in the tags.+cusType :: Lens' CustomFloodlightVariable (Maybe CustomFloodlightVariableType)+cusType = lens _cusType (\ s a -> s{_cusType = a})++instance FromJSON CustomFloodlightVariable where+        parseJSON+          = withObject "CustomFloodlightVariable"+              (\ o ->+                 CustomFloodlightVariable' <$>+                   (o .:? "kind" .!=+                      "dfareporting#customFloodlightVariable")+                     <*> (o .:? "value")+                     <*> (o .:? "type"))++instance ToJSON CustomFloodlightVariable where+        toJSON CustomFloodlightVariable'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _cusKind),+                  ("value" .=) <$> _cusValue,+                  ("type" .=) <$> _cusType])++-- | Platform Type List Response+--+-- /See:/ 'platformTypesListResponse' smart constructor.+data PlatformTypesListResponse = PlatformTypesListResponse'+    { _ptlrKind          :: !Text+    , _ptlrPlatformTypes :: !(Maybe [PlatformType])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'PlatformTypesListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ptlrKind'+--+-- * 'ptlrPlatformTypes'+platformTypesListResponse+    :: PlatformTypesListResponse+platformTypesListResponse =+    PlatformTypesListResponse'+    { _ptlrKind = "dfareporting#platformTypesListResponse"+    , _ptlrPlatformTypes = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#platformTypesListResponse\".+ptlrKind :: Lens' PlatformTypesListResponse Text+ptlrKind = lens _ptlrKind (\ s a -> s{_ptlrKind = a})++-- | Platform type collection.+ptlrPlatformTypes :: Lens' PlatformTypesListResponse [PlatformType]+ptlrPlatformTypes+  = lens _ptlrPlatformTypes+      (\ s a -> s{_ptlrPlatformTypes = a})+      . _Default+      . _Coerce++instance FromJSON PlatformTypesListResponse where+        parseJSON+          = withObject "PlatformTypesListResponse"+              (\ o ->+                 PlatformTypesListResponse' <$>+                   (o .:? "kind" .!=+                      "dfareporting#platformTypesListResponse")+                     <*> (o .:? "platformTypes" .!= mempty))++instance ToJSON PlatformTypesListResponse where+        toJSON PlatformTypesListResponse'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _ptlrKind),+                  ("platformTypes" .=) <$> _ptlrPlatformTypes])++-- | Modification timestamp.+--+-- /See:/ 'lastModifiedInfo' smart constructor.+newtype LastModifiedInfo = LastModifiedInfo'+    { _lmiTime :: Maybe (Textual Int64)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'LastModifiedInfo' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'lmiTime'+lastModifiedInfo+    :: LastModifiedInfo+lastModifiedInfo =+    LastModifiedInfo'+    { _lmiTime = Nothing+    }++-- | Timestamp of the last change in milliseconds since epoch.+lmiTime :: Lens' LastModifiedInfo (Maybe Int64)+lmiTime+  = lens _lmiTime (\ s a -> s{_lmiTime = a}) .+      mapping _Coerce++instance FromJSON LastModifiedInfo where+        parseJSON+          = withObject "LastModifiedInfo"+              (\ o -> LastModifiedInfo' <$> (o .:? "time"))++instance ToJSON LastModifiedInfo where+        toJSON LastModifiedInfo'{..}+          = object (catMaybes [("time" .=) <$> _lmiTime])++-- | Target Window.+--+-- /See:/ 'targetWindow' smart constructor.+data TargetWindow = TargetWindow'+    { _twCustomHTML         :: !(Maybe Text)+    , _twTargetWindowOption :: !(Maybe TargetWindowTargetWindowOption)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'TargetWindow' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'twCustomHTML'+--+-- * 'twTargetWindowOption'+targetWindow+    :: TargetWindow+targetWindow =+    TargetWindow'+    { _twCustomHTML = Nothing+    , _twTargetWindowOption = Nothing+    }++-- | User-entered value.+twCustomHTML :: Lens' TargetWindow (Maybe Text)+twCustomHTML+  = lens _twCustomHTML (\ s a -> s{_twCustomHTML = a})++-- | Type of browser window for which the backup image of the flash creative+-- can be displayed.+twTargetWindowOption :: Lens' TargetWindow (Maybe TargetWindowTargetWindowOption)+twTargetWindowOption+  = lens _twTargetWindowOption+      (\ s a -> s{_twTargetWindowOption = a})++instance FromJSON TargetWindow where+        parseJSON+          = withObject "TargetWindow"+              (\ o ->+                 TargetWindow' <$>+                   (o .:? "customHtml") <*>+                     (o .:? "targetWindowOption"))++instance ToJSON TargetWindow where+        toJSON TargetWindow'{..}+          = object+              (catMaybes+                 [("customHtml" .=) <$> _twCustomHTML,+                  ("targetWindowOption" .=) <$> _twTargetWindowOption])++-- | AccountPermissionGroups contains a mapping of permission group IDs to+-- names. A permission group is a grouping of account permissions.+--+-- /See:/ 'accountPermissionGroup' smart constructor.+data AccountPermissionGroup = AccountPermissionGroup'+    { _apgpKind :: !Text+    , _apgpName :: !(Maybe Text)+    , _apgpId   :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'AccountPermissionGroup' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'apgpKind'+--+-- * 'apgpName'+--+-- * 'apgpId'+accountPermissionGroup+    :: AccountPermissionGroup+accountPermissionGroup =+    AccountPermissionGroup'+    { _apgpKind = "dfareporting#accountPermissionGroup"+    , _apgpName = Nothing+    , _apgpId = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#accountPermissionGroup\".+apgpKind :: Lens' AccountPermissionGroup Text+apgpKind = lens _apgpKind (\ s a -> s{_apgpKind = a})++-- | Name of this account permission group.+apgpName :: Lens' AccountPermissionGroup (Maybe Text)+apgpName = lens _apgpName (\ s a -> s{_apgpName = a})++-- | ID of this account permission group.+apgpId :: Lens' AccountPermissionGroup (Maybe Int64)+apgpId+  = lens _apgpId (\ s a -> s{_apgpId = a}) .+      mapping _Coerce++instance FromJSON AccountPermissionGroup where+        parseJSON+          = withObject "AccountPermissionGroup"+              (\ o ->+                 AccountPermissionGroup' <$>+                   (o .:? "kind" .!=+                      "dfareporting#accountPermissionGroup")+                     <*> (o .:? "name")+                     <*> (o .:? "id"))++instance ToJSON AccountPermissionGroup where+        toJSON AccountPermissionGroup'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _apgpKind),+                  ("name" .=) <$> _apgpName, ("id" .=) <$> _apgpId])++-- | Contains properties of a DCM advertiser.+--+-- /See:/ 'advertiser' smart constructor.+data Advertiser = Advertiser'+    { _advdOriginalFloodlightConfigurationId       :: !(Maybe (Textual Int64))+    , _advdStatus                                  :: !(Maybe AdvertiserStatus)+    , _advdFloodlightConfigurationId               :: !(Maybe (Textual Int64))+    , _advdKind                                    :: !Text+    , _advdSuspended                               :: !(Maybe Bool)+    , _advdIdDimensionValue                        :: !(Maybe DimensionValue)+    , _advdAccountId                               :: !(Maybe (Textual Int64))+    , _advdDefaultEmail                            :: !(Maybe Text)+    , _advdName                                    :: !(Maybe Text)+    , _advdAdvertiserGroupId                       :: !(Maybe (Textual Int64))+    , _advdDefaultClickThroughEventTagId           :: !(Maybe (Textual Int64))+    , _advdId                                      :: !(Maybe (Textual Int64))+    , _advdSubAccountId                            :: !(Maybe (Textual Int64))+    , _advdFloodlightConfigurationIdDimensionValue :: !(Maybe DimensionValue)+    , _advdClickThroughURLSuffix                   :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Advertiser' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'advdOriginalFloodlightConfigurationId'+--+-- * 'advdStatus'+--+-- * 'advdFloodlightConfigurationId'+--+-- * 'advdKind'+--+-- * 'advdSuspended'+--+-- * 'advdIdDimensionValue'+--+-- * 'advdAccountId'+--+-- * 'advdDefaultEmail'+--+-- * 'advdName'+--+-- * 'advdAdvertiserGroupId'+--+-- * 'advdDefaultClickThroughEventTagId'+--+-- * 'advdId'+--+-- * 'advdSubAccountId'+--+-- * 'advdFloodlightConfigurationIdDimensionValue'+--+-- * 'advdClickThroughURLSuffix'+advertiser+    :: Advertiser+advertiser =+    Advertiser'+    { _advdOriginalFloodlightConfigurationId = Nothing+    , _advdStatus = Nothing+    , _advdFloodlightConfigurationId = Nothing+    , _advdKind = "dfareporting#advertiser"+    , _advdSuspended = Nothing+    , _advdIdDimensionValue = Nothing+    , _advdAccountId = Nothing+    , _advdDefaultEmail = Nothing+    , _advdName = Nothing+    , _advdAdvertiserGroupId = Nothing+    , _advdDefaultClickThroughEventTagId = Nothing+    , _advdId = Nothing+    , _advdSubAccountId = Nothing+    , _advdFloodlightConfigurationIdDimensionValue = Nothing+    , _advdClickThroughURLSuffix = Nothing+    }++-- | Original floodlight configuration before any sharing occurred. Set the+-- floodlightConfigurationId of this advertiser to+-- originalFloodlightConfigurationId to unshare the advertiser\'s current+-- floodlight configuration. You cannot unshare an advertiser\'s floodlight+-- configuration if the shared configuration has activities associated with+-- any campaign or placement.+advdOriginalFloodlightConfigurationId :: Lens' Advertiser (Maybe Int64)+advdOriginalFloodlightConfigurationId+  = lens _advdOriginalFloodlightConfigurationId+      (\ s a ->+         s{_advdOriginalFloodlightConfigurationId = a})+      . mapping _Coerce++-- | Status of this advertiser.+advdStatus :: Lens' Advertiser (Maybe AdvertiserStatus)+advdStatus+  = lens _advdStatus (\ s a -> s{_advdStatus = a})++-- | Floodlight configuration ID of this advertiser. The floodlight+-- configuration ID will be created automatically, so on insert this field+-- should be left blank. This field can be set to another advertiser\'s+-- floodlight configuration ID in order to share that advertiser\'s+-- floodlight configuration with this advertiser, so long as: - This+-- advertiser\'s original floodlight configuration is not already+-- associated with floodlight activities or floodlight activity groups. -+-- This advertiser\'s original floodlight configuration is not already+-- shared with another advertiser.+advdFloodlightConfigurationId :: Lens' Advertiser (Maybe Int64)+advdFloodlightConfigurationId+  = lens _advdFloodlightConfigurationId+      (\ s a -> s{_advdFloodlightConfigurationId = a})+      . mapping _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#advertiser\".+advdKind :: Lens' Advertiser Text+advdKind = lens _advdKind (\ s a -> s{_advdKind = a})++-- | Suspension status of this advertiser.+advdSuspended :: Lens' Advertiser (Maybe Bool)+advdSuspended+  = lens _advdSuspended+      (\ s a -> s{_advdSuspended = a})++-- | Dimension value for the ID of this advertiser. This is a read-only,+-- auto-generated field.+advdIdDimensionValue :: Lens' Advertiser (Maybe DimensionValue)+advdIdDimensionValue+  = lens _advdIdDimensionValue+      (\ s a -> s{_advdIdDimensionValue = a})++-- | Account ID of this advertiser.This is a read-only field that can be left+-- blank.+advdAccountId :: Lens' Advertiser (Maybe Int64)+advdAccountId+  = lens _advdAccountId+      (\ s a -> s{_advdAccountId = a})+      . mapping _Coerce++-- | Default email address used in sender field for tag emails.+advdDefaultEmail :: Lens' Advertiser (Maybe Text)+advdDefaultEmail+  = lens _advdDefaultEmail+      (\ s a -> s{_advdDefaultEmail = a})++-- | Name of this advertiser. This is a required field and must be less than+-- 256 characters long and unique among advertisers of the same account.+advdName :: Lens' Advertiser (Maybe Text)+advdName = lens _advdName (\ s a -> s{_advdName = a})++-- | ID of the advertiser group this advertiser belongs to. You can group+-- advertisers for reporting purposes, allowing you to see aggregated+-- information for all advertisers in each group.+advdAdvertiserGroupId :: Lens' Advertiser (Maybe Int64)+advdAdvertiserGroupId+  = lens _advdAdvertiserGroupId+      (\ s a -> s{_advdAdvertiserGroupId = a})+      . mapping _Coerce++-- | ID of the click-through event tag to apply by default to the landing+-- pages of this advertiser\'s campaigns.+advdDefaultClickThroughEventTagId :: Lens' Advertiser (Maybe Int64)+advdDefaultClickThroughEventTagId+  = lens _advdDefaultClickThroughEventTagId+      (\ s a -> s{_advdDefaultClickThroughEventTagId = a})+      . mapping _Coerce++-- | ID of this advertiser. This is a read-only, auto-generated field.+advdId :: Lens' Advertiser (Maybe Int64)+advdId+  = lens _advdId (\ s a -> s{_advdId = a}) .+      mapping _Coerce++-- | Subaccount ID of this advertiser.This is a read-only field that can be+-- left blank.+advdSubAccountId :: Lens' Advertiser (Maybe Int64)+advdSubAccountId+  = lens _advdSubAccountId+      (\ s a -> s{_advdSubAccountId = a})+      . mapping _Coerce++-- | Dimension value for the ID of the floodlight configuration. This is a+-- read-only, auto-generated field.+advdFloodlightConfigurationIdDimensionValue :: Lens' Advertiser (Maybe DimensionValue)+advdFloodlightConfigurationIdDimensionValue+  = lens _advdFloodlightConfigurationIdDimensionValue+      (\ s a ->+         s{_advdFloodlightConfigurationIdDimensionValue = a})++-- | Suffix added to click-through URL of ad creative associations under this+-- advertiser. Must be less than 129 characters long.+advdClickThroughURLSuffix :: Lens' Advertiser (Maybe Text)+advdClickThroughURLSuffix+  = lens _advdClickThroughURLSuffix+      (\ s a -> s{_advdClickThroughURLSuffix = a})++instance FromJSON Advertiser where+        parseJSON+          = withObject "Advertiser"+              (\ o ->+                 Advertiser' <$>+                   (o .:? "originalFloodlightConfigurationId") <*>+                     (o .:? "status")+                     <*> (o .:? "floodlightConfigurationId")+                     <*> (o .:? "kind" .!= "dfareporting#advertiser")+                     <*> (o .:? "suspended")+                     <*> (o .:? "idDimensionValue")+                     <*> (o .:? "accountId")+                     <*> (o .:? "defaultEmail")+                     <*> (o .:? "name")+                     <*> (o .:? "advertiserGroupId")+                     <*> (o .:? "defaultClickThroughEventTagId")+                     <*> (o .:? "id")+                     <*> (o .:? "subaccountId")+                     <*> (o .:? "floodlightConfigurationIdDimensionValue")+                     <*> (o .:? "clickThroughUrlSuffix"))++instance ToJSON Advertiser where+        toJSON Advertiser'{..}+          = object+              (catMaybes+                 [("originalFloodlightConfigurationId" .=) <$>+                    _advdOriginalFloodlightConfigurationId,+                  ("status" .=) <$> _advdStatus,+                  ("floodlightConfigurationId" .=) <$>+                    _advdFloodlightConfigurationId,+                  Just ("kind" .= _advdKind),+                  ("suspended" .=) <$> _advdSuspended,+                  ("idDimensionValue" .=) <$> _advdIdDimensionValue,+                  ("accountId" .=) <$> _advdAccountId,+                  ("defaultEmail" .=) <$> _advdDefaultEmail,+                  ("name" .=) <$> _advdName,+                  ("advertiserGroupId" .=) <$> _advdAdvertiserGroupId,+                  ("defaultClickThroughEventTagId" .=) <$>+                    _advdDefaultClickThroughEventTagId,+                  ("id" .=) <$> _advdId,+                  ("subaccountId" .=) <$> _advdSubAccountId,+                  ("floodlightConfigurationIdDimensionValue" .=) <$>+                    _advdFloodlightConfigurationIdDimensionValue,+                  ("clickThroughUrlSuffix" .=) <$>+                    _advdClickThroughURLSuffix])++-- | Contains properties of auser role, which is used to manage user access.+--+-- /See:/ 'userRole' smart constructor.+data UserRole = UserRole'+    { _urParentUserRoleId :: !(Maybe (Textual Int64))+    , _urKind             :: !Text+    , _urDefaultUserRole  :: !(Maybe Bool)+    , _urAccountId        :: !(Maybe (Textual Int64))+    , _urName             :: !(Maybe Text)+    , _urId               :: !(Maybe (Textual Int64))+    , _urPermissions      :: !(Maybe [UserRolePermission])+    , _urSubAccountId     :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'UserRole' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'urParentUserRoleId'+--+-- * 'urKind'+--+-- * 'urDefaultUserRole'+--+-- * 'urAccountId'+--+-- * 'urName'+--+-- * 'urId'+--+-- * 'urPermissions'+--+-- * 'urSubAccountId'+userRole+    :: UserRole+userRole =+    UserRole'+    { _urParentUserRoleId = Nothing+    , _urKind = "dfareporting#userRole"+    , _urDefaultUserRole = Nothing+    , _urAccountId = Nothing+    , _urName = Nothing+    , _urId = Nothing+    , _urPermissions = Nothing+    , _urSubAccountId = Nothing+    }++-- | ID of the user role that this user role is based on or copied from. This+-- is a required field.+urParentUserRoleId :: Lens' UserRole (Maybe Int64)+urParentUserRoleId+  = lens _urParentUserRoleId+      (\ s a -> s{_urParentUserRoleId = a})+      . mapping _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#userRole\".+urKind :: Lens' UserRole Text+urKind = lens _urKind (\ s a -> s{_urKind = a})++-- | Whether this is a default user role. Default user roles are created by+-- the system for the account\/subaccount and cannot be modified or+-- deleted. Each default user role comes with a basic set of preassigned+-- permissions.+urDefaultUserRole :: Lens' UserRole (Maybe Bool)+urDefaultUserRole+  = lens _urDefaultUserRole+      (\ s a -> s{_urDefaultUserRole = a})++-- | Account ID of this user role. This is a read-only field that can be left+-- blank.+urAccountId :: Lens' UserRole (Maybe Int64)+urAccountId+  = lens _urAccountId (\ s a -> s{_urAccountId = a}) .+      mapping _Coerce++-- | Name of this user role. This is a required field. Must be less than 256+-- characters long. If this user role is under a subaccount, the name must+-- be unique among sites of the same subaccount. Otherwise, this user role+-- is a top-level user role, and the name must be unique among top-level+-- user roles of the same account.+urName :: Lens' UserRole (Maybe Text)+urName = lens _urName (\ s a -> s{_urName = a})++-- | ID of this user role. This is a read-only, auto-generated field.+urId :: Lens' UserRole (Maybe Int64)+urId+  = lens _urId (\ s a -> s{_urId = a}) .+      mapping _Coerce++-- | List of permissions associated with this user role.+urPermissions :: Lens' UserRole [UserRolePermission]+urPermissions+  = lens _urPermissions+      (\ s a -> s{_urPermissions = a})+      . _Default+      . _Coerce++-- | Subaccount ID of this user role. This is a read-only field that can be+-- left blank.+urSubAccountId :: Lens' UserRole (Maybe Int64)+urSubAccountId+  = lens _urSubAccountId+      (\ s a -> s{_urSubAccountId = a})+      . mapping _Coerce++instance FromJSON UserRole where+        parseJSON+          = withObject "UserRole"+              (\ o ->+                 UserRole' <$>+                   (o .:? "parentUserRoleId") <*>+                     (o .:? "kind" .!= "dfareporting#userRole")+                     <*> (o .:? "defaultUserRole")+                     <*> (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "id")+                     <*> (o .:? "permissions" .!= mempty)+                     <*> (o .:? "subaccountId"))++instance ToJSON UserRole where+        toJSON UserRole'{..}+          = object+              (catMaybes+                 [("parentUserRoleId" .=) <$> _urParentUserRoleId,+                  Just ("kind" .= _urKind),+                  ("defaultUserRole" .=) <$> _urDefaultUserRole,+                  ("accountId" .=) <$> _urAccountId,+                  ("name" .=) <$> _urName, ("id" .=) <$> _urId,+                  ("permissions" .=) <$> _urPermissions,+                  ("subaccountId" .=) <$> _urSubAccountId])++-- | Directory Site List Response+--+-- /See:/ 'directorySitesListResponse' smart constructor.+data DirectorySitesListResponse = DirectorySitesListResponse'+    { _dslrNextPageToken  :: !(Maybe Text)+    , _dslrKind           :: !Text+    , _dslrDirectorySites :: !(Maybe [DirectorySite])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DirectorySitesListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dslrNextPageToken'+--+-- * 'dslrKind'+--+-- * 'dslrDirectorySites'+directorySitesListResponse+    :: DirectorySitesListResponse+directorySitesListResponse =+    DirectorySitesListResponse'+    { _dslrNextPageToken = Nothing+    , _dslrKind = "dfareporting#directorySitesListResponse"+    , _dslrDirectorySites = Nothing+    }++-- | Pagination token to be used for the next list operation.+dslrNextPageToken :: Lens' DirectorySitesListResponse (Maybe Text)+dslrNextPageToken+  = lens _dslrNextPageToken+      (\ s a -> s{_dslrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#directorySitesListResponse\".+dslrKind :: Lens' DirectorySitesListResponse Text+dslrKind = lens _dslrKind (\ s a -> s{_dslrKind = a})++-- | Directory site collection.+dslrDirectorySites :: Lens' DirectorySitesListResponse [DirectorySite]+dslrDirectorySites+  = lens _dslrDirectorySites+      (\ s a -> s{_dslrDirectorySites = a})+      . _Default+      . _Coerce++instance FromJSON DirectorySitesListResponse where+        parseJSON+          = withObject "DirectorySitesListResponse"+              (\ o ->+                 DirectorySitesListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!=+                        "dfareporting#directorySitesListResponse")+                     <*> (o .:? "directorySites" .!= mempty))++instance ToJSON DirectorySitesListResponse where+        toJSON DirectorySitesListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _dslrNextPageToken,+                  Just ("kind" .= _dslrKind),+                  ("directorySites" .=) <$> _dslrDirectorySites])++-- | The error code and description for a conversion that failed to insert.+--+-- /See:/ 'conversionError' smart constructor.+data ConversionError = ConversionError'+    { _ceKind    :: !Text+    , _ceCode    :: !(Maybe ConversionErrorCode)+    , _ceMessage :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ConversionError' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ceKind'+--+-- * 'ceCode'+--+-- * 'ceMessage'+conversionError+    :: ConversionError+conversionError =+    ConversionError'+    { _ceKind = "dfareporting#conversionError"+    , _ceCode = Nothing+    , _ceMessage = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#conversionError\".+ceKind :: Lens' ConversionError Text+ceKind = lens _ceKind (\ s a -> s{_ceKind = a})++-- | The error code.+ceCode :: Lens' ConversionError (Maybe ConversionErrorCode)+ceCode = lens _ceCode (\ s a -> s{_ceCode = a})++-- | A description of the error.+ceMessage :: Lens' ConversionError (Maybe Text)+ceMessage+  = lens _ceMessage (\ s a -> s{_ceMessage = a})++instance FromJSON ConversionError where+        parseJSON+          = withObject "ConversionError"+              (\ o ->+                 ConversionError' <$>+                   (o .:? "kind" .!= "dfareporting#conversionError") <*>+                     (o .:? "code")+                     <*> (o .:? "message"))++instance ToJSON ConversionError where+        toJSON ConversionError'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _ceKind), ("code" .=) <$> _ceCode,+                  ("message" .=) <$> _ceMessage])++-- | Pricing Period+--+-- /See:/ 'pricingSchedulePricingPeriod' smart constructor.+data PricingSchedulePricingPeriod = PricingSchedulePricingPeriod'+    { _psppEndDate         :: !(Maybe Date')+    , _psppRateOrCostNanos :: !(Maybe (Textual Int64))+    , _psppStartDate       :: !(Maybe Date')+    , _psppUnits           :: !(Maybe (Textual Int64))+    , _psppPricingComment  :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'PricingSchedulePricingPeriod' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'psppEndDate'+--+-- * 'psppRateOrCostNanos'+--+-- * 'psppStartDate'+--+-- * 'psppUnits'+--+-- * 'psppPricingComment'+pricingSchedulePricingPeriod+    :: PricingSchedulePricingPeriod+pricingSchedulePricingPeriod =+    PricingSchedulePricingPeriod'+    { _psppEndDate = Nothing+    , _psppRateOrCostNanos = Nothing+    , _psppStartDate = Nothing+    , _psppUnits = Nothing+    , _psppPricingComment = Nothing+    }++-- | Pricing period end date. This date must be later than, or the same day+-- as, the pricing period start date, but not later than the placement end+-- date. The period end date can be the same date as the period start date.+-- If, for example, you set 6\/25\/2015 as both the start and end dates,+-- the effective pricing period date is just that day only, 6\/25\/2015.+-- The hours, minutes, and seconds of the end date should not be set, as+-- doing so will result in an error.+psppEndDate :: Lens' PricingSchedulePricingPeriod (Maybe Day)+psppEndDate+  = lens _psppEndDate (\ s a -> s{_psppEndDate = a}) .+      mapping _Date++-- | Rate or cost of this pricing period.+psppRateOrCostNanos :: Lens' PricingSchedulePricingPeriod (Maybe Int64)+psppRateOrCostNanos+  = lens _psppRateOrCostNanos+      (\ s a -> s{_psppRateOrCostNanos = a})+      . mapping _Coerce++-- | Pricing period start date. This date must be later than, or the same day+-- as, the placement start date. The hours, minutes, and seconds of the+-- start date should not be set, as doing so will result in an error.+psppStartDate :: Lens' PricingSchedulePricingPeriod (Maybe Day)+psppStartDate+  = lens _psppStartDate+      (\ s a -> s{_psppStartDate = a})+      . mapping _Date++-- | Units of this pricing period.+psppUnits :: Lens' PricingSchedulePricingPeriod (Maybe Int64)+psppUnits+  = lens _psppUnits (\ s a -> s{_psppUnits = a}) .+      mapping _Coerce++-- | Comments for this pricing period.+psppPricingComment :: Lens' PricingSchedulePricingPeriod (Maybe Text)+psppPricingComment+  = lens _psppPricingComment+      (\ s a -> s{_psppPricingComment = a})++instance FromJSON PricingSchedulePricingPeriod where+        parseJSON+          = withObject "PricingSchedulePricingPeriod"+              (\ o ->+                 PricingSchedulePricingPeriod' <$>+                   (o .:? "endDate") <*> (o .:? "rateOrCostNanos") <*>+                     (o .:? "startDate")+                     <*> (o .:? "units")+                     <*> (o .:? "pricingComment"))++instance ToJSON PricingSchedulePricingPeriod where+        toJSON PricingSchedulePricingPeriod'{..}+          = object+              (catMaybes+                 [("endDate" .=) <$> _psppEndDate,+                  ("rateOrCostNanos" .=) <$> _psppRateOrCostNanos,+                  ("startDate" .=) <$> _psppStartDate,+                  ("units" .=) <$> _psppUnits,+                  ("pricingComment" .=) <$> _psppPricingComment])++-- | Directory Site Contact List Response+--+-- /See:/ 'directorySiteContactsListResponse' smart constructor.+data DirectorySiteContactsListResponse = DirectorySiteContactsListResponse'+    { _dsclrNextPageToken         :: !(Maybe Text)+    , _dsclrKind                  :: !Text+    , _dsclrDirectorySiteContacts :: !(Maybe [DirectorySiteContact])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DirectorySiteContactsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dsclrNextPageToken'+--+-- * 'dsclrKind'+--+-- * 'dsclrDirectorySiteContacts'+directorySiteContactsListResponse+    :: DirectorySiteContactsListResponse+directorySiteContactsListResponse =+    DirectorySiteContactsListResponse'+    { _dsclrNextPageToken = Nothing+    , _dsclrKind = "dfareporting#directorySiteContactsListResponse"+    , _dsclrDirectorySiteContacts = Nothing+    }++-- | Pagination token to be used for the next list operation.+dsclrNextPageToken :: Lens' DirectorySiteContactsListResponse (Maybe Text)+dsclrNextPageToken+  = lens _dsclrNextPageToken+      (\ s a -> s{_dsclrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#directorySiteContactsListResponse\".+dsclrKind :: Lens' DirectorySiteContactsListResponse Text+dsclrKind+  = lens _dsclrKind (\ s a -> s{_dsclrKind = a})++-- | Directory site contact collection+dsclrDirectorySiteContacts :: Lens' DirectorySiteContactsListResponse [DirectorySiteContact]+dsclrDirectorySiteContacts+  = lens _dsclrDirectorySiteContacts+      (\ s a -> s{_dsclrDirectorySiteContacts = a})+      . _Default+      . _Coerce++instance FromJSON DirectorySiteContactsListResponse+         where+        parseJSON+          = withObject "DirectorySiteContactsListResponse"+              (\ o ->+                 DirectorySiteContactsListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!=+                        "dfareporting#directorySiteContactsListResponse")+                     <*> (o .:? "directorySiteContacts" .!= mempty))++instance ToJSON DirectorySiteContactsListResponse+         where+        toJSON DirectorySiteContactsListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _dsclrNextPageToken,+                  Just ("kind" .= _dsclrKind),+                  ("directorySiteContacts" .=) <$>+                    _dsclrDirectorySiteContacts])++-- | Contains information about a region that can be targeted by ads.+--+-- /See:/ 'region' smart constructor.+data Region = Region'+    { _regRegionCode    :: !(Maybe Text)+    , _regKind          :: !Text+    , _regName          :: !(Maybe Text)+    , _regCountryCode   :: !(Maybe Text)+    , _regCountryDartId :: !(Maybe (Textual Int64))+    , _regDartId        :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Region' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'regRegionCode'+--+-- * 'regKind'+--+-- * 'regName'+--+-- * 'regCountryCode'+--+-- * 'regCountryDartId'+--+-- * 'regDartId'+region+    :: Region+region =+    Region'+    { _regRegionCode = Nothing+    , _regKind = "dfareporting#region"+    , _regName = Nothing+    , _regCountryCode = Nothing+    , _regCountryDartId = Nothing+    , _regDartId = Nothing+    }++-- | Region code.+regRegionCode :: Lens' Region (Maybe Text)+regRegionCode+  = lens _regRegionCode+      (\ s a -> s{_regRegionCode = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#region\".+regKind :: Lens' Region Text+regKind = lens _regKind (\ s a -> s{_regKind = a})++-- | Name of this region.+regName :: Lens' Region (Maybe Text)+regName = lens _regName (\ s a -> s{_regName = a})++-- | Country code of the country to which this region belongs.+regCountryCode :: Lens' Region (Maybe Text)+regCountryCode+  = lens _regCountryCode+      (\ s a -> s{_regCountryCode = a})++-- | DART ID of the country to which this region belongs.+regCountryDartId :: Lens' Region (Maybe Int64)+regCountryDartId+  = lens _regCountryDartId+      (\ s a -> s{_regCountryDartId = a})+      . mapping _Coerce++-- | DART ID of this region.+regDartId :: Lens' Region (Maybe Int64)+regDartId+  = lens _regDartId (\ s a -> s{_regDartId = a}) .+      mapping _Coerce++instance FromJSON Region where+        parseJSON+          = withObject "Region"+              (\ o ->+                 Region' <$>+                   (o .:? "regionCode") <*>+                     (o .:? "kind" .!= "dfareporting#region")+                     <*> (o .:? "name")+                     <*> (o .:? "countryCode")+                     <*> (o .:? "countryDartId")+                     <*> (o .:? "dartId"))++instance ToJSON Region where+        toJSON Region'{..}+          = object+              (catMaybes+                 [("regionCode" .=) <$> _regRegionCode,+                  Just ("kind" .= _regKind), ("name" .=) <$> _regName,+                  ("countryCode" .=) <$> _regCountryCode,+                  ("countryDartId" .=) <$> _regCountryDartId,+                  ("dartId" .=) <$> _regDartId])++-- | Advertiser Group List Response+--+-- /See:/ 'advertiserGroupsListResponse' smart constructor.+data AdvertiserGroupsListResponse = AdvertiserGroupsListResponse'+    { _aglrNextPageToken    :: !(Maybe Text)+    , _aglrKind             :: !Text+    , _aglrAdvertiserGroups :: !(Maybe [AdvertiserGroup])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'AdvertiserGroupsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'aglrNextPageToken'+--+-- * 'aglrKind'+--+-- * 'aglrAdvertiserGroups'+advertiserGroupsListResponse+    :: AdvertiserGroupsListResponse+advertiserGroupsListResponse =+    AdvertiserGroupsListResponse'+    { _aglrNextPageToken = Nothing+    , _aglrKind = "dfareporting#advertiserGroupsListResponse"+    , _aglrAdvertiserGroups = Nothing+    }++-- | Pagination token to be used for the next list operation.+aglrNextPageToken :: Lens' AdvertiserGroupsListResponse (Maybe Text)+aglrNextPageToken+  = lens _aglrNextPageToken+      (\ s a -> s{_aglrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#advertiserGroupsListResponse\".+aglrKind :: Lens' AdvertiserGroupsListResponse Text+aglrKind = lens _aglrKind (\ s a -> s{_aglrKind = a})++-- | Advertiser group collection.+aglrAdvertiserGroups :: Lens' AdvertiserGroupsListResponse [AdvertiserGroup]+aglrAdvertiserGroups+  = lens _aglrAdvertiserGroups+      (\ s a -> s{_aglrAdvertiserGroups = a})+      . _Default+      . _Coerce++instance FromJSON AdvertiserGroupsListResponse where+        parseJSON+          = withObject "AdvertiserGroupsListResponse"+              (\ o ->+                 AdvertiserGroupsListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!=+                        "dfareporting#advertiserGroupsListResponse")+                     <*> (o .:? "advertiserGroups" .!= mempty))++instance ToJSON AdvertiserGroupsListResponse where+        toJSON AdvertiserGroupsListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _aglrNextPageToken,+                  Just ("kind" .= _aglrKind),+                  ("advertiserGroups" .=) <$> _aglrAdvertiserGroups])++-- | Creative Assignment.+--+-- /See:/ 'creativeAssignment' smart constructor.+data CreativeAssignment = CreativeAssignment'+    { _caCreativeGroupAssignments   :: !(Maybe [CreativeGroupAssignment])+    , _caStartTime                  :: !(Maybe DateTime')+    , _caWeight                     :: !(Maybe (Textual Int32))+    , _caRichMediaExitOverrides     :: !(Maybe [RichMediaExitOverride])+    , _caSSLCompliant               :: !(Maybe Bool)+    , _caCreativeId                 :: !(Maybe (Textual Int64))+    , _caClickThroughURL            :: !(Maybe ClickThroughURL)+    , _caApplyEventTags             :: !(Maybe Bool)+    , _caActive                     :: !(Maybe Bool)+    , _caSequence                   :: !(Maybe (Textual Int32))+    , _caEndTime                    :: !(Maybe DateTime')+    , _caCompanionCreativeOverrides :: !(Maybe [CompanionClickThroughOverride])+    , _caCreativeIdDimensionValue   :: !(Maybe DimensionValue)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CreativeAssignment' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'caCreativeGroupAssignments'+--+-- * 'caStartTime'+--+-- * 'caWeight'+--+-- * 'caRichMediaExitOverrides'+--+-- * 'caSSLCompliant'+--+-- * 'caCreativeId'+--+-- * 'caClickThroughURL'+--+-- * 'caApplyEventTags'+--+-- * 'caActive'+--+-- * 'caSequence'+--+-- * 'caEndTime'+--+-- * 'caCompanionCreativeOverrides'+--+-- * 'caCreativeIdDimensionValue'+creativeAssignment+    :: CreativeAssignment+creativeAssignment =+    CreativeAssignment'+    { _caCreativeGroupAssignments = Nothing+    , _caStartTime = Nothing+    , _caWeight = Nothing+    , _caRichMediaExitOverrides = Nothing+    , _caSSLCompliant = Nothing+    , _caCreativeId = Nothing+    , _caClickThroughURL = Nothing+    , _caApplyEventTags = Nothing+    , _caActive = Nothing+    , _caSequence = Nothing+    , _caEndTime = Nothing+    , _caCompanionCreativeOverrides = Nothing+    , _caCreativeIdDimensionValue = Nothing+    }++-- | Creative group assignments for this creative assignment. Only one+-- assignment per creative group number is allowed for a maximum of two+-- assignments.+caCreativeGroupAssignments :: Lens' CreativeAssignment [CreativeGroupAssignment]+caCreativeGroupAssignments+  = lens _caCreativeGroupAssignments+      (\ s a -> s{_caCreativeGroupAssignments = a})+      . _Default+      . _Coerce++-- | Date and time that the assigned creative should start serving.+caStartTime :: Lens' CreativeAssignment (Maybe UTCTime)+caStartTime+  = lens _caStartTime (\ s a -> s{_caStartTime = a}) .+      mapping _DateTime++-- | Weight of the creative assignment, applicable when the rotation type is+-- CREATIVE_ROTATION_TYPE_RANDOM.+caWeight :: Lens' CreativeAssignment (Maybe Int32)+caWeight+  = lens _caWeight (\ s a -> s{_caWeight = a}) .+      mapping _Coerce++-- | Rich media exit overrides for this creative assignment. Applicable when+-- the creative type is any of the following: - RICH_MEDIA_INPAGE -+-- RICH_MEDIA_INPAGE_FLOATING - RICH_MEDIA_IM_EXPAND - RICH_MEDIA_EXPANDING+-- - RICH_MEDIA_INTERSTITIAL_FLOAT - RICH_MEDIA_MOBILE_IN_APP -+-- RICH_MEDIA_MULTI_FLOATING - RICH_MEDIA_PEEL_DOWN - ADVANCED_BANNER -+-- VPAID_LINEAR - VPAID_NON_LINEAR+caRichMediaExitOverrides :: Lens' CreativeAssignment [RichMediaExitOverride]+caRichMediaExitOverrides+  = lens _caRichMediaExitOverrides+      (\ s a -> s{_caRichMediaExitOverrides = a})+      . _Default+      . _Coerce++-- | Whether the creative to be assigned is SSL-compliant. This is a+-- read-only field that is auto-generated when the ad is inserted or+-- updated.+caSSLCompliant :: Lens' CreativeAssignment (Maybe Bool)+caSSLCompliant+  = lens _caSSLCompliant+      (\ s a -> s{_caSSLCompliant = a})++-- | ID of the creative to be assigned. This is a required field.+caCreativeId :: Lens' CreativeAssignment (Maybe Int64)+caCreativeId+  = lens _caCreativeId (\ s a -> s{_caCreativeId = a})+      . mapping _Coerce++-- | Click-through URL of the creative assignment.+caClickThroughURL :: Lens' CreativeAssignment (Maybe ClickThroughURL)+caClickThroughURL+  = lens _caClickThroughURL+      (\ s a -> s{_caClickThroughURL = a})++-- | Whether applicable event tags should fire when this creative assignment+-- is rendered. If this value is unset when the ad is inserted or updated,+-- it will default to true for all creative types EXCEPT for+-- INTERNAL_REDIRECT, INTERSTITIAL_INTERNAL_REDIRECT, and INSTREAM_VIDEO.+caApplyEventTags :: Lens' CreativeAssignment (Maybe Bool)+caApplyEventTags+  = lens _caApplyEventTags+      (\ s a -> s{_caApplyEventTags = a})++-- | Whether this creative assignment is active. When true, the creative will+-- be included in the ad\'s rotation.+caActive :: Lens' CreativeAssignment (Maybe Bool)+caActive = lens _caActive (\ s a -> s{_caActive = a})++-- | Sequence number of the creative assignment, applicable when the rotation+-- type is CREATIVE_ROTATION_TYPE_SEQUENTIAL.+caSequence :: Lens' CreativeAssignment (Maybe Int32)+caSequence+  = lens _caSequence (\ s a -> s{_caSequence = a}) .+      mapping _Coerce++-- | Date and time that the assigned creative should stop serving. Must be+-- later than the start time.+caEndTime :: Lens' CreativeAssignment (Maybe UTCTime)+caEndTime+  = lens _caEndTime (\ s a -> s{_caEndTime = a}) .+      mapping _DateTime++-- | Companion creative overrides for this creative assignment. Applicable to+-- video ads.+caCompanionCreativeOverrides :: Lens' CreativeAssignment [CompanionClickThroughOverride]+caCompanionCreativeOverrides+  = lens _caCompanionCreativeOverrides+      (\ s a -> s{_caCompanionCreativeOverrides = a})+      . _Default+      . _Coerce++-- | Dimension value for the ID of the creative. This is a read-only,+-- auto-generated field.+caCreativeIdDimensionValue :: Lens' CreativeAssignment (Maybe DimensionValue)+caCreativeIdDimensionValue+  = lens _caCreativeIdDimensionValue+      (\ s a -> s{_caCreativeIdDimensionValue = a})++instance FromJSON CreativeAssignment where+        parseJSON+          = withObject "CreativeAssignment"+              (\ o ->+                 CreativeAssignment' <$>+                   (o .:? "creativeGroupAssignments" .!= mempty) <*>+                     (o .:? "startTime")+                     <*> (o .:? "weight")+                     <*> (o .:? "richMediaExitOverrides" .!= mempty)+                     <*> (o .:? "sslCompliant")+                     <*> (o .:? "creativeId")+                     <*> (o .:? "clickThroughUrl")+                     <*> (o .:? "applyEventTags")+                     <*> (o .:? "active")+                     <*> (o .:? "sequence")+                     <*> (o .:? "endTime")+                     <*> (o .:? "companionCreativeOverrides" .!= mempty)+                     <*> (o .:? "creativeIdDimensionValue"))++instance ToJSON CreativeAssignment where+        toJSON CreativeAssignment'{..}+          = object+              (catMaybes+                 [("creativeGroupAssignments" .=) <$>+                    _caCreativeGroupAssignments,+                  ("startTime" .=) <$> _caStartTime,+                  ("weight" .=) <$> _caWeight,+                  ("richMediaExitOverrides" .=) <$>+                    _caRichMediaExitOverrides,+                  ("sslCompliant" .=) <$> _caSSLCompliant,+                  ("creativeId" .=) <$> _caCreativeId,+                  ("clickThroughUrl" .=) <$> _caClickThroughURL,+                  ("applyEventTags" .=) <$> _caApplyEventTags,+                  ("active" .=) <$> _caActive,+                  ("sequence" .=) <$> _caSequence,+                  ("endTime" .=) <$> _caEndTime,+                  ("companionCreativeOverrides" .=) <$>+                    _caCompanionCreativeOverrides,+                  ("creativeIdDimensionValue" .=) <$>+                    _caCreativeIdDimensionValue])++-- | Represents a dimension filter.+--+-- /See:/ 'dimensionFilter' smart constructor.+data DimensionFilter = DimensionFilter'+    { _dfKind          :: !Text+    , _dfValue         :: !(Maybe Text)+    , _dfDimensionName :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DimensionFilter' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dfKind'+--+-- * 'dfValue'+--+-- * 'dfDimensionName'+dimensionFilter+    :: DimensionFilter+dimensionFilter =+    DimensionFilter'+    { _dfKind = "dfareporting#dimensionFilter"+    , _dfValue = Nothing+    , _dfDimensionName = Nothing+    }++-- | The kind of resource this is, in this case dfareporting#dimensionFilter.+dfKind :: Lens' DimensionFilter Text+dfKind = lens _dfKind (\ s a -> s{_dfKind = a})++-- | The value of the dimension to filter.+dfValue :: Lens' DimensionFilter (Maybe Text)+dfValue = lens _dfValue (\ s a -> s{_dfValue = a})++-- | The name of the dimension to filter.+dfDimensionName :: Lens' DimensionFilter (Maybe Text)+dfDimensionName+  = lens _dfDimensionName+      (\ s a -> s{_dfDimensionName = a})++instance FromJSON DimensionFilter where+        parseJSON+          = withObject "DimensionFilter"+              (\ o ->+                 DimensionFilter' <$>+                   (o .:? "kind" .!= "dfareporting#dimensionFilter") <*>+                     (o .:? "value")+                     <*> (o .:? "dimensionName"))++instance ToJSON DimensionFilter where+        toJSON DimensionFilter'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _dfKind), ("value" .=) <$> _dfValue,+                  ("dimensionName" .=) <$> _dfDimensionName])++-- | Represents the list of user profiles.+--+-- /See:/ 'userProFileList' smart constructor.+data UserProFileList = UserProFileList'+    { _upflEtag  :: !(Maybe Text)+    , _upflKind  :: !Text+    , _upflItems :: !(Maybe [UserProFile])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'UserProFileList' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'upflEtag'+--+-- * 'upflKind'+--+-- * 'upflItems'+userProFileList+    :: UserProFileList+userProFileList =+    UserProFileList'+    { _upflEtag = Nothing+    , _upflKind = "dfareporting#userProfileList"+    , _upflItems = Nothing+    }++-- | The eTag of this response for caching purposes.+upflEtag :: Lens' UserProFileList (Maybe Text)+upflEtag = lens _upflEtag (\ s a -> s{_upflEtag = a})++-- | The kind of list this is, in this case dfareporting#userProfileList.+upflKind :: Lens' UserProFileList Text+upflKind = lens _upflKind (\ s a -> s{_upflKind = a})++-- | The user profiles returned in this response.+upflItems :: Lens' UserProFileList [UserProFile]+upflItems+  = lens _upflItems (\ s a -> s{_upflItems = a}) .+      _Default+      . _Coerce++instance FromJSON UserProFileList where+        parseJSON+          = withObject "UserProFileList"+              (\ o ->+                 UserProFileList' <$>+                   (o .:? "etag") <*>+                     (o .:? "kind" .!= "dfareporting#userProfileList")+                     <*> (o .:? "items" .!= mempty))++instance ToJSON UserProFileList where+        toJSON UserProFileList'{..}+          = object+              (catMaybes+                 [("etag" .=) <$> _upflEtag,+                  Just ("kind" .= _upflKind),+                  ("items" .=) <$> _upflItems])++-- | Contains properties of a Floodlight configuration.+--+-- /See:/ 'floodlightConfiguration' smart constructor.+data FloodlightConfiguration = FloodlightConfiguration'+    { _fcTagSettings                              :: !(Maybe TagSettings)+    , _fcExposureToConversionEnabled              :: !(Maybe Bool)+    , _fcInAppAttributionTrackingEnabled          :: !(Maybe Bool)+    , _fcThirdPartyAuthenticationTokens           :: !(Maybe [ThirdPartyAuthenticationToken])+    , _fcKind                                     :: !Text+    , _fcAdvertiserId                             :: !(Maybe (Textual Int64))+    , _fcAnalyticsDataSharingEnabled              :: !(Maybe Bool)+    , _fcAdvertiserIdDimensionValue               :: !(Maybe DimensionValue)+    , _fcIdDimensionValue                         :: !(Maybe DimensionValue)+    , _fcLookbackConfiguration                    :: !(Maybe LookbackConfiguration)+    , _fcAccountId                                :: !(Maybe (Textual Int64))+    , _fcId                                       :: !(Maybe (Textual Int64))+    , _fcNATuralSearchConversionAttributionOption :: !(Maybe FloodlightConfigurationNATuralSearchConversionAttributionOption)+    , _fcUserDefinedVariableConfigurations        :: !(Maybe [UserDefinedVariableConfiguration])+    , _fcSubAccountId                             :: !(Maybe (Textual Int64))+    , _fcFirstDayOfWeek                           :: !(Maybe FloodlightConfigurationFirstDayOfWeek)+    , _fcOmnitureSettings                         :: !(Maybe OmnitureSettings)+    , _fcStandardVariableTypes                    :: !(Maybe [FloodlightConfigurationStandardVariableTypesItem])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'FloodlightConfiguration' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'fcTagSettings'+--+-- * 'fcExposureToConversionEnabled'+--+-- * 'fcInAppAttributionTrackingEnabled'+--+-- * 'fcThirdPartyAuthenticationTokens'+--+-- * 'fcKind'+--+-- * 'fcAdvertiserId'+--+-- * 'fcAnalyticsDataSharingEnabled'+--+-- * 'fcAdvertiserIdDimensionValue'+--+-- * 'fcIdDimensionValue'+--+-- * 'fcLookbackConfiguration'+--+-- * 'fcAccountId'+--+-- * 'fcId'+--+-- * 'fcNATuralSearchConversionAttributionOption'+--+-- * 'fcUserDefinedVariableConfigurations'+--+-- * 'fcSubAccountId'+--+-- * 'fcFirstDayOfWeek'+--+-- * 'fcOmnitureSettings'+--+-- * 'fcStandardVariableTypes'+floodlightConfiguration+    :: FloodlightConfiguration+floodlightConfiguration =+    FloodlightConfiguration'+    { _fcTagSettings = Nothing+    , _fcExposureToConversionEnabled = Nothing+    , _fcInAppAttributionTrackingEnabled = Nothing+    , _fcThirdPartyAuthenticationTokens = Nothing+    , _fcKind = "dfareporting#floodlightConfiguration"+    , _fcAdvertiserId = Nothing+    , _fcAnalyticsDataSharingEnabled = Nothing+    , _fcAdvertiserIdDimensionValue = Nothing+    , _fcIdDimensionValue = Nothing+    , _fcLookbackConfiguration = Nothing+    , _fcAccountId = Nothing+    , _fcId = Nothing+    , _fcNATuralSearchConversionAttributionOption = Nothing+    , _fcUserDefinedVariableConfigurations = Nothing+    , _fcSubAccountId = Nothing+    , _fcFirstDayOfWeek = Nothing+    , _fcOmnitureSettings = Nothing+    , _fcStandardVariableTypes = Nothing+    }++-- | Configuration settings for dynamic and image floodlight tags.+fcTagSettings :: Lens' FloodlightConfiguration (Maybe TagSettings)+fcTagSettings+  = lens _fcTagSettings+      (\ s a -> s{_fcTagSettings = a})++-- | Whether the exposure-to-conversion report is enabled. This report shows+-- detailed pathway information on up to 10 of the most recent ad exposures+-- seen by a user before converting.+fcExposureToConversionEnabled :: Lens' FloodlightConfiguration (Maybe Bool)+fcExposureToConversionEnabled+  = lens _fcExposureToConversionEnabled+      (\ s a -> s{_fcExposureToConversionEnabled = a})++-- | Whether in-app attribution tracking is enabled.+fcInAppAttributionTrackingEnabled :: Lens' FloodlightConfiguration (Maybe Bool)+fcInAppAttributionTrackingEnabled+  = lens _fcInAppAttributionTrackingEnabled+      (\ s a -> s{_fcInAppAttributionTrackingEnabled = a})++-- | List of third-party authentication tokens enabled for this+-- configuration.+fcThirdPartyAuthenticationTokens :: Lens' FloodlightConfiguration [ThirdPartyAuthenticationToken]+fcThirdPartyAuthenticationTokens+  = lens _fcThirdPartyAuthenticationTokens+      (\ s a -> s{_fcThirdPartyAuthenticationTokens = a})+      . _Default+      . _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#floodlightConfiguration\".+fcKind :: Lens' FloodlightConfiguration Text+fcKind = lens _fcKind (\ s a -> s{_fcKind = a})++-- | Advertiser ID of the parent advertiser of this floodlight configuration.+fcAdvertiserId :: Lens' FloodlightConfiguration (Maybe Int64)+fcAdvertiserId+  = lens _fcAdvertiserId+      (\ s a -> s{_fcAdvertiserId = a})+      . mapping _Coerce++-- | Whether advertiser data is shared with Google Analytics.+fcAnalyticsDataSharingEnabled :: Lens' FloodlightConfiguration (Maybe Bool)+fcAnalyticsDataSharingEnabled+  = lens _fcAnalyticsDataSharingEnabled+      (\ s a -> s{_fcAnalyticsDataSharingEnabled = a})++-- | Dimension value for the ID of the advertiser. This is a read-only,+-- auto-generated field.+fcAdvertiserIdDimensionValue :: Lens' FloodlightConfiguration (Maybe DimensionValue)+fcAdvertiserIdDimensionValue+  = lens _fcAdvertiserIdDimensionValue+      (\ s a -> s{_fcAdvertiserIdDimensionValue = a})++-- | Dimension value for the ID of this floodlight configuration. This is a+-- read-only, auto-generated field.+fcIdDimensionValue :: Lens' FloodlightConfiguration (Maybe DimensionValue)+fcIdDimensionValue+  = lens _fcIdDimensionValue+      (\ s a -> s{_fcIdDimensionValue = a})++-- | Lookback window settings for this floodlight configuration.+fcLookbackConfiguration :: Lens' FloodlightConfiguration (Maybe LookbackConfiguration)+fcLookbackConfiguration+  = lens _fcLookbackConfiguration+      (\ s a -> s{_fcLookbackConfiguration = a})++-- | Account ID of this floodlight configuration. This is a read-only field+-- that can be left blank.+fcAccountId :: Lens' FloodlightConfiguration (Maybe Int64)+fcAccountId+  = lens _fcAccountId (\ s a -> s{_fcAccountId = a}) .+      mapping _Coerce++-- | ID of this floodlight configuration. This is a read-only, auto-generated+-- field.+fcId :: Lens' FloodlightConfiguration (Maybe Int64)+fcId+  = lens _fcId (\ s a -> s{_fcId = a}) .+      mapping _Coerce++-- | Types of attribution options for natural search conversions.+fcNATuralSearchConversionAttributionOption :: Lens' FloodlightConfiguration (Maybe FloodlightConfigurationNATuralSearchConversionAttributionOption)+fcNATuralSearchConversionAttributionOption+  = lens _fcNATuralSearchConversionAttributionOption+      (\ s a ->+         s{_fcNATuralSearchConversionAttributionOption = a})++-- | List of user defined variables enabled for this configuration.+fcUserDefinedVariableConfigurations :: Lens' FloodlightConfiguration [UserDefinedVariableConfiguration]+fcUserDefinedVariableConfigurations+  = lens _fcUserDefinedVariableConfigurations+      (\ s a ->+         s{_fcUserDefinedVariableConfigurations = a})+      . _Default+      . _Coerce++-- | Subaccount ID of this floodlight configuration. This is a read-only+-- field that can be left blank.+fcSubAccountId :: Lens' FloodlightConfiguration (Maybe Int64)+fcSubAccountId+  = lens _fcSubAccountId+      (\ s a -> s{_fcSubAccountId = a})+      . mapping _Coerce++-- | Day that will be counted as the first day of the week in reports. This+-- is a required field.+fcFirstDayOfWeek :: Lens' FloodlightConfiguration (Maybe FloodlightConfigurationFirstDayOfWeek)+fcFirstDayOfWeek+  = lens _fcFirstDayOfWeek+      (\ s a -> s{_fcFirstDayOfWeek = a})++-- | Settings for DCM Omniture integration.+fcOmnitureSettings :: Lens' FloodlightConfiguration (Maybe OmnitureSettings)+fcOmnitureSettings+  = lens _fcOmnitureSettings+      (\ s a -> s{_fcOmnitureSettings = a})++-- | List of standard variables enabled for this configuration. Acceptable+-- values are: - \"ORD\" - \"NUM\"+fcStandardVariableTypes :: Lens' FloodlightConfiguration [FloodlightConfigurationStandardVariableTypesItem]+fcStandardVariableTypes+  = lens _fcStandardVariableTypes+      (\ s a -> s{_fcStandardVariableTypes = a})+      . _Default+      . _Coerce++instance FromJSON FloodlightConfiguration where+        parseJSON+          = withObject "FloodlightConfiguration"+              (\ o ->+                 FloodlightConfiguration' <$>+                   (o .:? "tagSettings") <*>+                     (o .:? "exposureToConversionEnabled")+                     <*> (o .:? "inAppAttributionTrackingEnabled")+                     <*>+                     (o .:? "thirdPartyAuthenticationTokens" .!= mempty)+                     <*>+                     (o .:? "kind" .!=+                        "dfareporting#floodlightConfiguration")+                     <*> (o .:? "advertiserId")+                     <*> (o .:? "analyticsDataSharingEnabled")+                     <*> (o .:? "advertiserIdDimensionValue")+                     <*> (o .:? "idDimensionValue")+                     <*> (o .:? "lookbackConfiguration")+                     <*> (o .:? "accountId")+                     <*> (o .:? "id")+                     <*>+                     (o .:? "naturalSearchConversionAttributionOption")+                     <*>+                     (o .:? "userDefinedVariableConfigurations" .!=+                        mempty)+                     <*> (o .:? "subaccountId")+                     <*> (o .:? "firstDayOfWeek")+                     <*> (o .:? "omnitureSettings")+                     <*> (o .:? "standardVariableTypes" .!= mempty))++instance ToJSON FloodlightConfiguration where+        toJSON FloodlightConfiguration'{..}+          = object+              (catMaybes+                 [("tagSettings" .=) <$> _fcTagSettings,+                  ("exposureToConversionEnabled" .=) <$>+                    _fcExposureToConversionEnabled,+                  ("inAppAttributionTrackingEnabled" .=) <$>+                    _fcInAppAttributionTrackingEnabled,+                  ("thirdPartyAuthenticationTokens" .=) <$>+                    _fcThirdPartyAuthenticationTokens,+                  Just ("kind" .= _fcKind),+                  ("advertiserId" .=) <$> _fcAdvertiserId,+                  ("analyticsDataSharingEnabled" .=) <$>+                    _fcAnalyticsDataSharingEnabled,+                  ("advertiserIdDimensionValue" .=) <$>+                    _fcAdvertiserIdDimensionValue,+                  ("idDimensionValue" .=) <$> _fcIdDimensionValue,+                  ("lookbackConfiguration" .=) <$>+                    _fcLookbackConfiguration,+                  ("accountId" .=) <$> _fcAccountId,+                  ("id" .=) <$> _fcId,+                  ("naturalSearchConversionAttributionOption" .=) <$>+                    _fcNATuralSearchConversionAttributionOption,+                  ("userDefinedVariableConfigurations" .=) <$>+                    _fcUserDefinedVariableConfigurations,+                  ("subaccountId" .=) <$> _fcSubAccountId,+                  ("firstDayOfWeek" .=) <$> _fcFirstDayOfWeek,+                  ("omnitureSettings" .=) <$> _fcOmnitureSettings,+                  ("standardVariableTypes" .=) <$>+                    _fcStandardVariableTypes])++-- | Floodlight Activity Group List Response+--+-- /See:/ 'floodlightActivityGroupsListResponse' smart constructor.+data FloodlightActivityGroupsListResponse = FloodlightActivityGroupsListResponse'+    { _faglrNextPageToken            :: !(Maybe Text)+    , _faglrKind                     :: !Text+    , _faglrFloodlightActivityGroups :: !(Maybe [FloodlightActivityGroup])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'FloodlightActivityGroupsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'faglrNextPageToken'+--+-- * 'faglrKind'+--+-- * 'faglrFloodlightActivityGroups'+floodlightActivityGroupsListResponse+    :: FloodlightActivityGroupsListResponse+floodlightActivityGroupsListResponse =+    FloodlightActivityGroupsListResponse'+    { _faglrNextPageToken = Nothing+    , _faglrKind = "dfareporting#floodlightActivityGroupsListResponse"+    , _faglrFloodlightActivityGroups = Nothing+    }++-- | Pagination token to be used for the next list operation.+faglrNextPageToken :: Lens' FloodlightActivityGroupsListResponse (Maybe Text)+faglrNextPageToken+  = lens _faglrNextPageToken+      (\ s a -> s{_faglrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#floodlightActivityGroupsListResponse\".+faglrKind :: Lens' FloodlightActivityGroupsListResponse Text+faglrKind+  = lens _faglrKind (\ s a -> s{_faglrKind = a})++-- | Floodlight activity group collection.+faglrFloodlightActivityGroups :: Lens' FloodlightActivityGroupsListResponse [FloodlightActivityGroup]+faglrFloodlightActivityGroups+  = lens _faglrFloodlightActivityGroups+      (\ s a -> s{_faglrFloodlightActivityGroups = a})+      . _Default+      . _Coerce++instance FromJSON+         FloodlightActivityGroupsListResponse where+        parseJSON+          = withObject "FloodlightActivityGroupsListResponse"+              (\ o ->+                 FloodlightActivityGroupsListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!=+                        "dfareporting#floodlightActivityGroupsListResponse")+                     <*> (o .:? "floodlightActivityGroups" .!= mempty))++instance ToJSON FloodlightActivityGroupsListResponse+         where+        toJSON FloodlightActivityGroupsListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _faglrNextPageToken,+                  Just ("kind" .= _faglrKind),+                  ("floodlightActivityGroups" .=) <$>+                    _faglrFloodlightActivityGroups])++-- | A Conversion represents when a user successfully performs a desired+-- action after seeing an ad.+--+-- /See:/ 'conversion' smart constructor.+data Conversion = Conversion'+    { _conoTimestampMicros           :: !(Maybe (Textual Int64))+    , _conoLimitAdTracking           :: !(Maybe Bool)+    , _conoEncryptedUserId           :: !(Maybe Text)+    , _conoMobileDeviceId            :: !(Maybe Text)+    , _conoFloodlightConfigurationId :: !(Maybe (Textual Int64))+    , _conoKind                      :: !Text+    , _conoFloodlightActivityId      :: !(Maybe (Textual Int64))+    , _conoQuantity                  :: !(Maybe (Textual Int64))+    , _conoValue                     :: !(Maybe (Textual Double))+    , _conoCustomVariables           :: !(Maybe [CustomFloodlightVariable])+    , _conoChildDirectedTreatment    :: !(Maybe Bool)+    , _conoOrdinal                   :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Conversion' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'conoTimestampMicros'+--+-- * 'conoLimitAdTracking'+--+-- * 'conoEncryptedUserId'+--+-- * 'conoMobileDeviceId'+--+-- * 'conoFloodlightConfigurationId'+--+-- * 'conoKind'+--+-- * 'conoFloodlightActivityId'+--+-- * 'conoQuantity'+--+-- * 'conoValue'+--+-- * 'conoCustomVariables'+--+-- * 'conoChildDirectedTreatment'+--+-- * 'conoOrdinal'+conversion+    :: Conversion+conversion =+    Conversion'+    { _conoTimestampMicros = Nothing+    , _conoLimitAdTracking = Nothing+    , _conoEncryptedUserId = Nothing+    , _conoMobileDeviceId = Nothing+    , _conoFloodlightConfigurationId = Nothing+    , _conoKind = "dfareporting#conversion"+    , _conoFloodlightActivityId = Nothing+    , _conoQuantity = Nothing+    , _conoValue = Nothing+    , _conoCustomVariables = Nothing+    , _conoChildDirectedTreatment = Nothing+    , _conoOrdinal = Nothing+    }++-- | The timestamp of conversion, in Unix epoch micros. This is a required+-- field.+conoTimestampMicros :: Lens' Conversion (Maybe Int64)+conoTimestampMicros+  = lens _conoTimestampMicros+      (\ s a -> s{_conoTimestampMicros = a})+      . mapping _Coerce++-- | Whether the user has Limit Ad Tracking set.+conoLimitAdTracking :: Lens' Conversion (Maybe Bool)+conoLimitAdTracking+  = lens _conoLimitAdTracking+      (\ s a -> s{_conoLimitAdTracking = a})++-- | The alphanumeric encrypted user ID. When set, encryptionInfo should also+-- be specified. This field is mutually exclusive with mobileDeviceId. This+-- or mobileDeviceId is a required field.+conoEncryptedUserId :: Lens' Conversion (Maybe Text)+conoEncryptedUserId+  = lens _conoEncryptedUserId+      (\ s a -> s{_conoEncryptedUserId = a})++-- | The mobile device ID. This field is mutually exclusive with+-- encryptedUserId. This or encryptedUserId is a required field.+conoMobileDeviceId :: Lens' Conversion (Maybe Text)+conoMobileDeviceId+  = lens _conoMobileDeviceId+      (\ s a -> s{_conoMobileDeviceId = a})++-- | Floodlight Configuration ID of this conversion. This is a required+-- field.+conoFloodlightConfigurationId :: Lens' Conversion (Maybe Int64)+conoFloodlightConfigurationId+  = lens _conoFloodlightConfigurationId+      (\ s a -> s{_conoFloodlightConfigurationId = a})+      . mapping _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#conversion\".+conoKind :: Lens' Conversion Text+conoKind = lens _conoKind (\ s a -> s{_conoKind = a})++-- | Floodlight Activity ID of this conversion. This is a required field.+conoFloodlightActivityId :: Lens' Conversion (Maybe Int64)+conoFloodlightActivityId+  = lens _conoFloodlightActivityId+      (\ s a -> s{_conoFloodlightActivityId = a})+      . mapping _Coerce++-- | The quantity of the conversion.+conoQuantity :: Lens' Conversion (Maybe Int64)+conoQuantity+  = lens _conoQuantity (\ s a -> s{_conoQuantity = a})+      . mapping _Coerce++-- | The value of the conversion.+conoValue :: Lens' Conversion (Maybe Double)+conoValue+  = lens _conoValue (\ s a -> s{_conoValue = a}) .+      mapping _Coerce++-- | Custom floodlight variables.+conoCustomVariables :: Lens' Conversion [CustomFloodlightVariable]+conoCustomVariables+  = lens _conoCustomVariables+      (\ s a -> s{_conoCustomVariables = a})+      . _Default+      . _Coerce++-- | Whether the conversion was directed toward children.+conoChildDirectedTreatment :: Lens' Conversion (Maybe Bool)+conoChildDirectedTreatment+  = lens _conoChildDirectedTreatment+      (\ s a -> s{_conoChildDirectedTreatment = a})++-- | The ordinal of the conversion. Use this field to control how conversions+-- of the same user and day are de-duplicated. This is a required field.+conoOrdinal :: Lens' Conversion (Maybe Text)+conoOrdinal+  = lens _conoOrdinal (\ s a -> s{_conoOrdinal = a})++instance FromJSON Conversion where+        parseJSON+          = withObject "Conversion"+              (\ o ->+                 Conversion' <$>+                   (o .:? "timestampMicros") <*>+                     (o .:? "limitAdTracking")+                     <*> (o .:? "encryptedUserId")+                     <*> (o .:? "mobileDeviceId")+                     <*> (o .:? "floodlightConfigurationId")+                     <*> (o .:? "kind" .!= "dfareporting#conversion")+                     <*> (o .:? "floodlightActivityId")+                     <*> (o .:? "quantity")+                     <*> (o .:? "value")+                     <*> (o .:? "customVariables" .!= mempty)+                     <*> (o .:? "childDirectedTreatment")+                     <*> (o .:? "ordinal"))++instance ToJSON Conversion where+        toJSON Conversion'{..}+          = object+              (catMaybes+                 [("timestampMicros" .=) <$> _conoTimestampMicros,+                  ("limitAdTracking" .=) <$> _conoLimitAdTracking,+                  ("encryptedUserId" .=) <$> _conoEncryptedUserId,+                  ("mobileDeviceId" .=) <$> _conoMobileDeviceId,+                  ("floodlightConfigurationId" .=) <$>+                    _conoFloodlightConfigurationId,+                  Just ("kind" .= _conoKind),+                  ("floodlightActivityId" .=) <$>+                    _conoFloodlightActivityId,+                  ("quantity" .=) <$> _conoQuantity,+                  ("value" .=) <$> _conoValue,+                  ("customVariables" .=) <$> _conoCustomVariables,+                  ("childDirectedTreatment" .=) <$>+                    _conoChildDirectedTreatment,+                  ("ordinal" .=) <$> _conoOrdinal])++-- | Creative Field Value List Response+--+-- /See:/ 'creativeFieldValuesListResponse' smart constructor.+data CreativeFieldValuesListResponse = CreativeFieldValuesListResponse'+    { _cfvlrNextPageToken       :: !(Maybe Text)+    , _cfvlrKind                :: !Text+    , _cfvlrCreativeFieldValues :: !(Maybe [CreativeFieldValue])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CreativeFieldValuesListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cfvlrNextPageToken'+--+-- * 'cfvlrKind'+--+-- * 'cfvlrCreativeFieldValues'+creativeFieldValuesListResponse+    :: CreativeFieldValuesListResponse+creativeFieldValuesListResponse =+    CreativeFieldValuesListResponse'+    { _cfvlrNextPageToken = Nothing+    , _cfvlrKind = "dfareporting#creativeFieldValuesListResponse"+    , _cfvlrCreativeFieldValues = Nothing+    }++-- | Pagination token to be used for the next list operation.+cfvlrNextPageToken :: Lens' CreativeFieldValuesListResponse (Maybe Text)+cfvlrNextPageToken+  = lens _cfvlrNextPageToken+      (\ s a -> s{_cfvlrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#creativeFieldValuesListResponse\".+cfvlrKind :: Lens' CreativeFieldValuesListResponse Text+cfvlrKind+  = lens _cfvlrKind (\ s a -> s{_cfvlrKind = a})++-- | Creative field value collection.+cfvlrCreativeFieldValues :: Lens' CreativeFieldValuesListResponse [CreativeFieldValue]+cfvlrCreativeFieldValues+  = lens _cfvlrCreativeFieldValues+      (\ s a -> s{_cfvlrCreativeFieldValues = a})+      . _Default+      . _Coerce++instance FromJSON CreativeFieldValuesListResponse+         where+        parseJSON+          = withObject "CreativeFieldValuesListResponse"+              (\ o ->+                 CreativeFieldValuesListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!=+                        "dfareporting#creativeFieldValuesListResponse")+                     <*> (o .:? "creativeFieldValues" .!= mempty))++instance ToJSON CreativeFieldValuesListResponse where+        toJSON CreativeFieldValuesListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _cfvlrNextPageToken,+                  Just ("kind" .= _cfvlrKind),+                  ("creativeFieldValues" .=) <$>+                    _cfvlrCreativeFieldValues])++-- | Rich Media Exit Override.+--+-- /See:/ 'richMediaExitOverride' smart constructor.+data RichMediaExitOverride = RichMediaExitOverride'+    { _rmeoUseCustomExitURL :: !(Maybe Bool)+    , _rmeoExitId           :: !(Maybe (Textual Int64))+    , _rmeoCustomExitURL    :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'RichMediaExitOverride' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rmeoUseCustomExitURL'+--+-- * 'rmeoExitId'+--+-- * 'rmeoCustomExitURL'+richMediaExitOverride+    :: RichMediaExitOverride+richMediaExitOverride =+    RichMediaExitOverride'+    { _rmeoUseCustomExitURL = Nothing+    , _rmeoExitId = Nothing+    , _rmeoCustomExitURL = Nothing+    }++-- | Whether to use the custom exit URL.+rmeoUseCustomExitURL :: Lens' RichMediaExitOverride (Maybe Bool)+rmeoUseCustomExitURL+  = lens _rmeoUseCustomExitURL+      (\ s a -> s{_rmeoUseCustomExitURL = a})++-- | ID for the override to refer to a specific exit in the creative.+rmeoExitId :: Lens' RichMediaExitOverride (Maybe Int64)+rmeoExitId+  = lens _rmeoExitId (\ s a -> s{_rmeoExitId = a}) .+      mapping _Coerce++-- | Click-through URL to override the default exit URL. Applicable if the+-- useCustomExitUrl field is set to true.+rmeoCustomExitURL :: Lens' RichMediaExitOverride (Maybe Text)+rmeoCustomExitURL+  = lens _rmeoCustomExitURL+      (\ s a -> s{_rmeoCustomExitURL = a})++instance FromJSON RichMediaExitOverride where+        parseJSON+          = withObject "RichMediaExitOverride"+              (\ o ->+                 RichMediaExitOverride' <$>+                   (o .:? "useCustomExitUrl") <*> (o .:? "exitId") <*>+                     (o .:? "customExitUrl"))++instance ToJSON RichMediaExitOverride where+        toJSON RichMediaExitOverride'{..}+          = object+              (catMaybes+                 [("useCustomExitUrl" .=) <$> _rmeoUseCustomExitURL,+                  ("exitId" .=) <$> _rmeoExitId,+                  ("customExitUrl" .=) <$> _rmeoCustomExitURL])++-- | Represents a sorted dimension.+--+-- /See:/ 'sortedDimension' smart constructor.+data SortedDimension = SortedDimension'+    { _sdKind      :: !Text+    , _sdSortOrder :: !(Maybe SortedDimensionSortOrder)+    , _sdName      :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'SortedDimension' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'sdKind'+--+-- * 'sdSortOrder'+--+-- * 'sdName'+sortedDimension+    :: SortedDimension+sortedDimension =+    SortedDimension'+    { _sdKind = "dfareporting#sortedDimension"+    , _sdSortOrder = Nothing+    , _sdName = Nothing+    }++-- | The kind of resource this is, in this case dfareporting#sortedDimension.+sdKind :: Lens' SortedDimension Text+sdKind = lens _sdKind (\ s a -> s{_sdKind = a})++-- | An optional sort order for the dimension column.+sdSortOrder :: Lens' SortedDimension (Maybe SortedDimensionSortOrder)+sdSortOrder+  = lens _sdSortOrder (\ s a -> s{_sdSortOrder = a})++-- | The name of the dimension.+sdName :: Lens' SortedDimension (Maybe Text)+sdName = lens _sdName (\ s a -> s{_sdName = a})++instance FromJSON SortedDimension where+        parseJSON+          = withObject "SortedDimension"+              (\ o ->+                 SortedDimension' <$>+                   (o .:? "kind" .!= "dfareporting#sortedDimension") <*>+                     (o .:? "sortOrder")+                     <*> (o .:? "name"))++instance ToJSON SortedDimension where+        toJSON SortedDimension'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _sdKind),+                  ("sortOrder" .=) <$> _sdSortOrder,+                  ("name" .=) <$> _sdName])++-- | Creative Field List Response+--+-- /See:/ 'creativeFieldsListResponse' smart constructor.+data CreativeFieldsListResponse = CreativeFieldsListResponse'+    { _cflrNextPageToken  :: !(Maybe Text)+    , _cflrKind           :: !Text+    , _cflrCreativeFields :: !(Maybe [CreativeField])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CreativeFieldsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cflrNextPageToken'+--+-- * 'cflrKind'+--+-- * 'cflrCreativeFields'+creativeFieldsListResponse+    :: CreativeFieldsListResponse+creativeFieldsListResponse =+    CreativeFieldsListResponse'+    { _cflrNextPageToken = Nothing+    , _cflrKind = "dfareporting#creativeFieldsListResponse"+    , _cflrCreativeFields = Nothing+    }++-- | Pagination token to be used for the next list operation.+cflrNextPageToken :: Lens' CreativeFieldsListResponse (Maybe Text)+cflrNextPageToken+  = lens _cflrNextPageToken+      (\ s a -> s{_cflrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#creativeFieldsListResponse\".+cflrKind :: Lens' CreativeFieldsListResponse Text+cflrKind = lens _cflrKind (\ s a -> s{_cflrKind = a})++-- | Creative field collection.+cflrCreativeFields :: Lens' CreativeFieldsListResponse [CreativeField]+cflrCreativeFields+  = lens _cflrCreativeFields+      (\ s a -> s{_cflrCreativeFields = a})+      . _Default+      . _Coerce++instance FromJSON CreativeFieldsListResponse where+        parseJSON+          = withObject "CreativeFieldsListResponse"+              (\ o ->+                 CreativeFieldsListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!=+                        "dfareporting#creativeFieldsListResponse")+                     <*> (o .:? "creativeFields" .!= mempty))++instance ToJSON CreativeFieldsListResponse where+        toJSON CreativeFieldsListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _cflrNextPageToken,+                  Just ("kind" .= _cflrKind),+                  ("creativeFields" .=) <$> _cflrCreativeFields])++-- | Placement GenerateTags Response+--+-- /See:/ 'placementsGenerateTagsResponse' smart constructor.+data PlacementsGenerateTagsResponse = PlacementsGenerateTagsResponse'+    { _pgtrKind          :: !Text+    , _pgtrPlacementTags :: !(Maybe [PlacementTag])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'PlacementsGenerateTagsResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'pgtrKind'+--+-- * 'pgtrPlacementTags'+placementsGenerateTagsResponse+    :: PlacementsGenerateTagsResponse+placementsGenerateTagsResponse =+    PlacementsGenerateTagsResponse'+    { _pgtrKind = "dfareporting#placementsGenerateTagsResponse"+    , _pgtrPlacementTags = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#placementsGenerateTagsResponse\".+pgtrKind :: Lens' PlacementsGenerateTagsResponse Text+pgtrKind = lens _pgtrKind (\ s a -> s{_pgtrKind = a})++-- | Set of generated tags for the specified placements.+pgtrPlacementTags :: Lens' PlacementsGenerateTagsResponse [PlacementTag]+pgtrPlacementTags+  = lens _pgtrPlacementTags+      (\ s a -> s{_pgtrPlacementTags = a})+      . _Default+      . _Coerce++instance FromJSON PlacementsGenerateTagsResponse+         where+        parseJSON+          = withObject "PlacementsGenerateTagsResponse"+              (\ o ->+                 PlacementsGenerateTagsResponse' <$>+                   (o .:? "kind" .!=+                      "dfareporting#placementsGenerateTagsResponse")+                     <*> (o .:? "placementTags" .!= mempty))++instance ToJSON PlacementsGenerateTagsResponse where+        toJSON PlacementsGenerateTagsResponse'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _pgtrKind),+                  ("placementTags" .=) <$> _pgtrPlacementTags])++-- | Creative Asset.+--+-- /See:/ 'creativeAsset' smart constructor.+data CreativeAsset = CreativeAsset'+    { _caaZIndex                :: !(Maybe (Textual Int32))+    , _caaPushdown              :: !(Maybe Bool)+    , _caaVideoDuration         :: !(Maybe (Textual Double))+    , _caaOriginalBackup        :: !(Maybe Bool)+    , _caaWindowMode            :: !(Maybe CreativeAssetWindowMode)+    , _caaFlashVersion          :: !(Maybe (Textual Int32))+    , _caaPushdownDuration      :: !(Maybe (Textual Double))+    , _caaSize                  :: !(Maybe Size)+    , _caaVerticallyLocked      :: !(Maybe Bool)+    , _caaOffSet                :: !(Maybe OffSetPosition)+    , _caaStreamingServingURL   :: !(Maybe Text)+    , _caaZipFilesize           :: !(Maybe Text)+    , _caaTransparency          :: !(Maybe Bool)+    , _caaHideSelectionBoxes    :: !(Maybe Bool)+    , _caaSSLCompliant          :: !(Maybe Bool)+    , _caaFileSize              :: !(Maybe (Textual Int64))+    , _caaAssetIdentifier       :: !(Maybe CreativeAssetId)+    , _caaDurationType          :: !(Maybe CreativeAssetDurationType)+    , _caaProgressiveServingURL :: !(Maybe Text)+    , _caaActive                :: !(Maybe Bool)+    , _caaRole                  :: !(Maybe CreativeAssetRole)+    , _caaMimeType              :: !(Maybe Text)+    , _caaPositionTopUnit       :: !(Maybe CreativeAssetPositionTopUnit)+    , _caaPositionLeftUnit      :: !(Maybe CreativeAssetPositionLeftUnit)+    , _caaAlignment             :: !(Maybe CreativeAssetAlignment)+    , _caaExpandedDimension     :: !(Maybe Size)+    , _caaZipFilename           :: !(Maybe Text)+    , _caaActionScript3         :: !(Maybe Bool)+    , _caaDisplayType           :: !(Maybe CreativeAssetDisplayType)+    , _caaChildAssetType        :: !(Maybe CreativeAssetChildAssetType)+    , _caaCollapsedSize         :: !(Maybe Size)+    , _caaId                    :: !(Maybe (Textual Int64))+    , _caaBitRate               :: !(Maybe (Textual Int32))+    , _caaCustomStartTimeValue  :: !(Maybe (Textual Int32))+    , _caaStartTimeType         :: !(Maybe CreativeAssetStartTimeType)+    , _caaDuration              :: !(Maybe (Textual Int32))+    , _caaArtworkType           :: !(Maybe CreativeAssetArtworkType)+    , _caaHideFlashObjects      :: !(Maybe Bool)+    , _caaDetectedFeatures      :: !(Maybe [CreativeAssetDetectedFeaturesItem])+    , _caaBackupImageExit       :: !(Maybe CreativeCustomEvent)+    , _caaPosition              :: !(Maybe OffSetPosition)+    , _caaHorizontallyLocked    :: !(Maybe Bool)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CreativeAsset' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'caaZIndex'+--+-- * 'caaPushdown'+--+-- * 'caaVideoDuration'+--+-- * 'caaOriginalBackup'+--+-- * 'caaWindowMode'+--+-- * 'caaFlashVersion'+--+-- * 'caaPushdownDuration'+--+-- * 'caaSize'+--+-- * 'caaVerticallyLocked'+--+-- * 'caaOffSet'+--+-- * 'caaStreamingServingURL'+--+-- * 'caaZipFilesize'+--+-- * 'caaTransparency'+--+-- * 'caaHideSelectionBoxes'+--+-- * 'caaSSLCompliant'+--+-- * 'caaFileSize'+--+-- * 'caaAssetIdentifier'+--+-- * 'caaDurationType'+--+-- * 'caaProgressiveServingURL'+--+-- * 'caaActive'+--+-- * 'caaRole'+--+-- * 'caaMimeType'+--+-- * 'caaPositionTopUnit'+--+-- * 'caaPositionLeftUnit'+--+-- * 'caaAlignment'+--+-- * 'caaExpandedDimension'+--+-- * 'caaZipFilename'+--+-- * 'caaActionScript3'+--+-- * 'caaDisplayType'+--+-- * 'caaChildAssetType'+--+-- * 'caaCollapsedSize'+--+-- * 'caaId'+--+-- * 'caaBitRate'+--+-- * 'caaCustomStartTimeValue'+--+-- * 'caaStartTimeType'+--+-- * 'caaDuration'+--+-- * 'caaArtworkType'+--+-- * 'caaHideFlashObjects'+--+-- * 'caaDetectedFeatures'+--+-- * 'caaBackupImageExit'+--+-- * 'caaPosition'+--+-- * 'caaHorizontallyLocked'+creativeAsset+    :: CreativeAsset+creativeAsset =+    CreativeAsset'+    { _caaZIndex = Nothing+    , _caaPushdown = Nothing+    , _caaVideoDuration = Nothing+    , _caaOriginalBackup = Nothing+    , _caaWindowMode = Nothing+    , _caaFlashVersion = Nothing+    , _caaPushdownDuration = Nothing+    , _caaSize = Nothing+    , _caaVerticallyLocked = Nothing+    , _caaOffSet = Nothing+    , _caaStreamingServingURL = Nothing+    , _caaZipFilesize = Nothing+    , _caaTransparency = Nothing+    , _caaHideSelectionBoxes = Nothing+    , _caaSSLCompliant = Nothing+    , _caaFileSize = Nothing+    , _caaAssetIdentifier = Nothing+    , _caaDurationType = Nothing+    , _caaProgressiveServingURL = Nothing+    , _caaActive = Nothing+    , _caaRole = Nothing+    , _caaMimeType = Nothing+    , _caaPositionTopUnit = Nothing+    , _caaPositionLeftUnit = Nothing+    , _caaAlignment = Nothing+    , _caaExpandedDimension = Nothing+    , _caaZipFilename = Nothing+    , _caaActionScript3 = Nothing+    , _caaDisplayType = Nothing+    , _caaChildAssetType = Nothing+    , _caaCollapsedSize = Nothing+    , _caaId = Nothing+    , _caaBitRate = Nothing+    , _caaCustomStartTimeValue = Nothing+    , _caaStartTimeType = Nothing+    , _caaDuration = Nothing+    , _caaArtworkType = Nothing+    , _caaHideFlashObjects = Nothing+    , _caaDetectedFeatures = Nothing+    , _caaBackupImageExit = Nothing+    , _caaPosition = Nothing+    , _caaHorizontallyLocked = Nothing+    }++-- | zIndex value of an asset. This is a read-only field. Applicable to the+-- following creative types: all RICH_MEDIA.Additionally, only applicable+-- to assets whose displayType is NOT one of the following types:+-- ASSET_DISPLAY_TYPE_INPAGE or ASSET_DISPLAY_TYPE_OVERLAY.+caaZIndex :: Lens' CreativeAsset (Maybe Int32)+caaZIndex+  = lens _caaZIndex (\ s a -> s{_caaZIndex = a}) .+      mapping _Coerce++-- | Whether the asset pushes down other content. Applicable to the following+-- creative types: all RICH_MEDIA. Additionally, only applicable when the+-- asset offsets are 0, the collapsedSize.width matches size.width, and the+-- collapsedSize.height is less than size.height.+caaPushdown :: Lens' CreativeAsset (Maybe Bool)+caaPushdown+  = lens _caaPushdown (\ s a -> s{_caaPushdown = a})++-- | Detected video duration for video asset. This is a read-only field.+-- Applicable to the following creative types: INSTREAM_VIDEO and all+-- VPAID.+caaVideoDuration :: Lens' CreativeAsset (Maybe Double)+caaVideoDuration+  = lens _caaVideoDuration+      (\ s a -> s{_caaVideoDuration = a})+      . mapping _Coerce++-- | Whether the backup asset is original or changed by the user in DCM.+-- Applicable to the following creative types: all RICH_MEDIA.+caaOriginalBackup :: Lens' CreativeAsset (Maybe Bool)+caaOriginalBackup+  = lens _caaOriginalBackup+      (\ s a -> s{_caaOriginalBackup = a})++-- | Window mode options for flash assets. Applicable to the following+-- creative types: FLASH_INPAGE, RICH_MEDIA_DISPLAY_EXPANDING,+-- RICH_MEDIA_IM_EXPAND, RICH_MEDIA_DISPLAY_BANNER, and+-- RICH_MEDIA_INPAGE_FLOATING.+caaWindowMode :: Lens' CreativeAsset (Maybe CreativeAssetWindowMode)+caaWindowMode+  = lens _caaWindowMode+      (\ s a -> s{_caaWindowMode = a})++-- | Flash version of the asset. This is a read-only field. Applicable to the+-- following creative types: FLASH_INPAGE, all RICH_MEDIA, and all VPAID.+-- Applicable to DISPLAY when the primary asset type is not HTML_IMAGE.+caaFlashVersion :: Lens' CreativeAsset (Maybe Int32)+caaFlashVersion+  = lens _caaFlashVersion+      (\ s a -> s{_caaFlashVersion = a})+      . mapping _Coerce++-- | Pushdown duration in seconds for an asset. Must be between 0 and 9.99.+-- Applicable to the following creative types: all RICH_MEDIA.Additionally,+-- only applicable when the asset pushdown field is true, the offsets are+-- 0, the collapsedSize.width matches size.width, and the+-- collapsedSize.height is less than size.height.+caaPushdownDuration :: Lens' CreativeAsset (Maybe Double)+caaPushdownDuration+  = lens _caaPushdownDuration+      (\ s a -> s{_caaPushdownDuration = a})+      . mapping _Coerce++-- | Size associated with this creative asset. This is a required field when+-- applicable; however for IMAGE and FLASH_INPAGE, creatives if left blank,+-- this field will be automatically set using the actual size of the+-- associated image asset. Applicable to the following creative types:+-- DISPLAY_IMAGE_GALLERY, FLASH_INPAGE, HTML5_BANNER, IMAGE, and all+-- RICH_MEDIA. Applicable to DISPLAY when the primary asset type is not+-- HTML_IMAGE.+caaSize :: Lens' CreativeAsset (Maybe Size)+caaSize = lens _caaSize (\ s a -> s{_caaSize = a})++-- | Whether the asset is vertically locked. This is a read-only field.+-- Applicable to the following creative types: all RICH_MEDIA.+caaVerticallyLocked :: Lens' CreativeAsset (Maybe Bool)+caaVerticallyLocked+  = lens _caaVerticallyLocked+      (\ s a -> s{_caaVerticallyLocked = a})++-- | Offset position for an asset in collapsed mode. This is a read-only+-- field. Applicable to the following creative types: all RICH_MEDIA and+-- all VPAID. Additionally, only applicable to assets whose displayType is+-- ASSET_DISPLAY_TYPE_EXPANDING or ASSET_DISPLAY_TYPE_PEEL_DOWN.+caaOffSet :: Lens' CreativeAsset (Maybe OffSetPosition)+caaOffSet+  = lens _caaOffSet (\ s a -> s{_caaOffSet = a})++-- | Streaming URL for video asset. This is a read-only field. Applicable to+-- the following creative types: INSTREAM_VIDEO and all VPAID.+caaStreamingServingURL :: Lens' CreativeAsset (Maybe Text)+caaStreamingServingURL+  = lens _caaStreamingServingURL+      (\ s a -> s{_caaStreamingServingURL = a})++-- | Size of zip file. This is a read-only field. Applicable to the following+-- creative types: HTML5_BANNER.+caaZipFilesize :: Lens' CreativeAsset (Maybe Text)+caaZipFilesize+  = lens _caaZipFilesize+      (\ s a -> s{_caaZipFilesize = a})++-- | Whether the asset is transparent. Applicable to the following creative+-- types: all RICH_MEDIA. Additionally, only applicable to HTML5 assets.+caaTransparency :: Lens' CreativeAsset (Maybe Bool)+caaTransparency+  = lens _caaTransparency+      (\ s a -> s{_caaTransparency = a})++-- | Whether to hide selection boxes flag for an asset. Applicable to the+-- following creative types: all RICH_MEDIA.+caaHideSelectionBoxes :: Lens' CreativeAsset (Maybe Bool)+caaHideSelectionBoxes+  = lens _caaHideSelectionBoxes+      (\ s a -> s{_caaHideSelectionBoxes = a})++-- | Whether the asset is SSL-compliant. This is a read-only field.+-- Applicable to all but the following creative types: all REDIRECT and+-- TRACKING_TEXT.+caaSSLCompliant :: Lens' CreativeAsset (Maybe Bool)+caaSSLCompliant+  = lens _caaSSLCompliant+      (\ s a -> s{_caaSSLCompliant = a})++-- | File size associated with this creative asset. This is a read-only+-- field. Applicable to all but the following creative types: all REDIRECT+-- and TRACKING_TEXT.+caaFileSize :: Lens' CreativeAsset (Maybe Int64)+caaFileSize+  = lens _caaFileSize (\ s a -> s{_caaFileSize = a}) .+      mapping _Coerce++-- | Identifier of this asset. This is the same identifier returned during+-- creative asset insert operation. This is a required field. Applicable to+-- all but the following creative types: all REDIRECT and TRACKING_TEXT.+caaAssetIdentifier :: Lens' CreativeAsset (Maybe CreativeAssetId)+caaAssetIdentifier+  = lens _caaAssetIdentifier+      (\ s a -> s{_caaAssetIdentifier = a})++-- | Duration type for which an asset will be displayed. Applicable to the+-- following creative types: all RICH_MEDIA.+caaDurationType :: Lens' CreativeAsset (Maybe CreativeAssetDurationType)+caaDurationType+  = lens _caaDurationType+      (\ s a -> s{_caaDurationType = a})++-- | Progressive URL for video asset. This is a read-only field. Applicable+-- to the following creative types: INSTREAM_VIDEO and all VPAID.+caaProgressiveServingURL :: Lens' CreativeAsset (Maybe Text)+caaProgressiveServingURL+  = lens _caaProgressiveServingURL+      (\ s a -> s{_caaProgressiveServingURL = a})++-- | Whether the video asset is active. This is a read-only field for+-- VPAID_NON_LINEAR_VIDEO assets. Applicable to the following creative+-- types: INSTREAM_VIDEO and all VPAID.+caaActive :: Lens' CreativeAsset (Maybe Bool)+caaActive+  = lens _caaActive (\ s a -> s{_caaActive = a})++-- | Role of the asset in relation to creative. Applicable to all but the+-- following creative types: all REDIRECT and TRACKING_TEXT. This is a+-- required field. PRIMARY applies to DISPLAY, FLASH_INPAGE, HTML5_BANNER,+-- IMAGE, DISPLAY_IMAGE_GALLERY, all RICH_MEDIA (which may contain multiple+-- primary assets), and all VPAID creatives. BACKUP_IMAGE applies to+-- FLASH_INPAGE, HTML5_BANNER, all RICH_MEDIA, and all VPAID creatives.+-- Applicable to DISPLAY when the primary asset type is not HTML_IMAGE.+-- ADDITIONAL_IMAGE and ADDITIONAL_FLASH apply to FLASH_INPAGE creatives.+-- OTHER refers to assets from sources other than DCM, such as Studio+-- uploaded assets, applicable to all RICH_MEDIA and all VPAID creatives.+-- PARENT_VIDEO refers to videos uploaded by the user in DCM and is+-- applicable to INSTREAM_VIDEO and VPAID_LINEAR_VIDEO creatives.+-- TRANSCODED_VIDEO refers to videos transcoded by DCM from PARENT_VIDEO+-- assets and is applicable to INSTREAM_VIDEO and VPAID_LINEAR_VIDEO+-- creatives. ALTERNATE_VIDEO refers to the DCM representation of child+-- asset videos from Studio, and is applicable to VPAID_LINEAR_VIDEO+-- creatives. These cannot be added or removed within DCM. For+-- VPAID_LINEAR_VIDEO creatives, PARENT_VIDEO, TRANSCODED_VIDEO and+-- ALTERNATE_VIDEO assets that are marked active serve as backup in case+-- the VPAID creative cannot be served. Only PARENT_VIDEO assets can be+-- added or removed for an INSTREAM_VIDEO or VPAID_LINEAR_VIDEO creative.+caaRole :: Lens' CreativeAsset (Maybe CreativeAssetRole)+caaRole = lens _caaRole (\ s a -> s{_caaRole = a})++-- | Detected MIME type for video asset. This is a read-only field.+-- Applicable to the following creative types: INSTREAM_VIDEO and all+-- VPAID.+caaMimeType :: Lens' CreativeAsset (Maybe Text)+caaMimeType+  = lens _caaMimeType (\ s a -> s{_caaMimeType = a})++-- | Offset top unit for an asset. This is a read-only field if the asset+-- displayType is ASSET_DISPLAY_TYPE_OVERLAY. Applicable to the following+-- creative types: all RICH_MEDIA.+caaPositionTopUnit :: Lens' CreativeAsset (Maybe CreativeAssetPositionTopUnit)+caaPositionTopUnit+  = lens _caaPositionTopUnit+      (\ s a -> s{_caaPositionTopUnit = a})++-- | Offset left unit for an asset. This is a read-only field. Applicable to+-- the following creative types: all RICH_MEDIA.+caaPositionLeftUnit :: Lens' CreativeAsset (Maybe CreativeAssetPositionLeftUnit)+caaPositionLeftUnit+  = lens _caaPositionLeftUnit+      (\ s a -> s{_caaPositionLeftUnit = a})++-- | Possible alignments for an asset. This is a read-only field. Applicable+-- to the following creative types:+-- RICH_MEDIA_DISPLAY_MULTI_FLOATING_INTERSTITIAL.+caaAlignment :: Lens' CreativeAsset (Maybe CreativeAssetAlignment)+caaAlignment+  = lens _caaAlignment (\ s a -> s{_caaAlignment = a})++-- | Detected expanded dimension for video asset. This is a read-only field.+-- Applicable to the following creative types: INSTREAM_VIDEO and all+-- VPAID.+caaExpandedDimension :: Lens' CreativeAsset (Maybe Size)+caaExpandedDimension+  = lens _caaExpandedDimension+      (\ s a -> s{_caaExpandedDimension = a})++-- | File name of zip file. This is a read-only field. Applicable to the+-- following creative types: HTML5_BANNER.+caaZipFilename :: Lens' CreativeAsset (Maybe Text)+caaZipFilename+  = lens _caaZipFilename+      (\ s a -> s{_caaZipFilename = a})++-- | Whether ActionScript3 is enabled for the flash asset. This is a+-- read-only field. Applicable to the following creative type:+-- FLASH_INPAGE. Applicable to DISPLAY when the primary asset type is not+-- HTML_IMAGE.+caaActionScript3 :: Lens' CreativeAsset (Maybe Bool)+caaActionScript3+  = lens _caaActionScript3+      (\ s a -> s{_caaActionScript3 = a})++-- | Type of rich media asset. This is a read-only field. Applicable to the+-- following creative types: all RICH_MEDIA.+caaDisplayType :: Lens' CreativeAsset (Maybe CreativeAssetDisplayType)+caaDisplayType+  = lens _caaDisplayType+      (\ s a -> s{_caaDisplayType = a})++-- | Rich media child asset type. This is a read-only field. Applicable to+-- the following creative types: all VPAID.+caaChildAssetType :: Lens' CreativeAsset (Maybe CreativeAssetChildAssetType)+caaChildAssetType+  = lens _caaChildAssetType+      (\ s a -> s{_caaChildAssetType = a})++-- | Size of an asset when collapsed. This is a read-only field. Applicable+-- to the following creative types: all RICH_MEDIA and all VPAID.+-- Additionally, applicable to assets whose displayType is+-- ASSET_DISPLAY_TYPE_EXPANDING or ASSET_DISPLAY_TYPE_PEEL_DOWN.+caaCollapsedSize :: Lens' CreativeAsset (Maybe Size)+caaCollapsedSize+  = lens _caaCollapsedSize+      (\ s a -> s{_caaCollapsedSize = a})++-- | Numeric ID of this creative asset. This is a required field and should+-- not be modified. Applicable to all but the following creative types: all+-- REDIRECT and TRACKING_TEXT.+caaId :: Lens' CreativeAsset (Maybe Int64)+caaId+  = lens _caaId (\ s a -> s{_caaId = a}) .+      mapping _Coerce++-- | Detected bit-rate for video asset. This is a read-only field. Applicable+-- to the following creative types: INSTREAM_VIDEO and all VPAID.+caaBitRate :: Lens' CreativeAsset (Maybe Int32)+caaBitRate+  = lens _caaBitRate (\ s a -> s{_caaBitRate = a}) .+      mapping _Coerce++-- | Custom start time in seconds for making the asset visible. Applicable to+-- the following creative types: all RICH_MEDIA.+caaCustomStartTimeValue :: Lens' CreativeAsset (Maybe Int32)+caaCustomStartTimeValue+  = lens _caaCustomStartTimeValue+      (\ s a -> s{_caaCustomStartTimeValue = a})+      . mapping _Coerce++-- | Initial wait time type before making the asset visible. Applicable to+-- the following creative types: all RICH_MEDIA.+caaStartTimeType :: Lens' CreativeAsset (Maybe CreativeAssetStartTimeType)+caaStartTimeType+  = lens _caaStartTimeType+      (\ s a -> s{_caaStartTimeType = a})++-- | Duration in seconds for which an asset will be displayed. Applicable to+-- the following creative types: INSTREAM_VIDEO and VPAID_LINEAR_VIDEO.+caaDuration :: Lens' CreativeAsset (Maybe Int32)+caaDuration+  = lens _caaDuration (\ s a -> s{_caaDuration = a}) .+      mapping _Coerce++-- | Artwork type of rich media creative. This is a read-only field.+-- Applicable to the following creative types: all RICH_MEDIA.+caaArtworkType :: Lens' CreativeAsset (Maybe CreativeAssetArtworkType)+caaArtworkType+  = lens _caaArtworkType+      (\ s a -> s{_caaArtworkType = a})++-- | Whether to hide Flash objects flag for an asset. Applicable to the+-- following creative types: all RICH_MEDIA.+caaHideFlashObjects :: Lens' CreativeAsset (Maybe Bool)+caaHideFlashObjects+  = lens _caaHideFlashObjects+      (\ s a -> s{_caaHideFlashObjects = a})++-- | List of feature dependencies for the creative asset that are detected by+-- DCM. Feature dependencies are features that a browser must be able to+-- support in order to render your HTML5 creative correctly. This is a+-- read-only, auto-generated field. Applicable to the following creative+-- types: HTML5_BANNER. Applicable to DISPLAY when the primary asset type+-- is not HTML_IMAGE.+caaDetectedFeatures :: Lens' CreativeAsset [CreativeAssetDetectedFeaturesItem]+caaDetectedFeatures+  = lens _caaDetectedFeatures+      (\ s a -> s{_caaDetectedFeatures = a})+      . _Default+      . _Coerce++-- | Exit event configured for the backup image. Applicable to the following+-- creative types: all RICH_MEDIA.+caaBackupImageExit :: Lens' CreativeAsset (Maybe CreativeCustomEvent)+caaBackupImageExit+  = lens _caaBackupImageExit+      (\ s a -> s{_caaBackupImageExit = a})++-- | Offset position for an asset. Applicable to the following creative+-- types: all RICH_MEDIA.+caaPosition :: Lens' CreativeAsset (Maybe OffSetPosition)+caaPosition+  = lens _caaPosition (\ s a -> s{_caaPosition = a})++-- | Whether the asset is horizontally locked. This is a read-only field.+-- Applicable to the following creative types: all RICH_MEDIA.+caaHorizontallyLocked :: Lens' CreativeAsset (Maybe Bool)+caaHorizontallyLocked+  = lens _caaHorizontallyLocked+      (\ s a -> s{_caaHorizontallyLocked = a})++instance FromJSON CreativeAsset where+        parseJSON+          = withObject "CreativeAsset"+              (\ o ->+                 CreativeAsset' <$>+                   (o .:? "zIndex") <*> (o .:? "pushdown") <*>+                     (o .:? "videoDuration")+                     <*> (o .:? "originalBackup")+                     <*> (o .:? "windowMode")+                     <*> (o .:? "flashVersion")+                     <*> (o .:? "pushdownDuration")+                     <*> (o .:? "size")+                     <*> (o .:? "verticallyLocked")+                     <*> (o .:? "offset")+                     <*> (o .:? "streamingServingUrl")+                     <*> (o .:? "zipFilesize")+                     <*> (o .:? "transparency")+                     <*> (o .:? "hideSelectionBoxes")+                     <*> (o .:? "sslCompliant")+                     <*> (o .:? "fileSize")+                     <*> (o .:? "assetIdentifier")+                     <*> (o .:? "durationType")+                     <*> (o .:? "progressiveServingUrl")+                     <*> (o .:? "active")+                     <*> (o .:? "role")+                     <*> (o .:? "mimeType")+                     <*> (o .:? "positionTopUnit")+                     <*> (o .:? "positionLeftUnit")+                     <*> (o .:? "alignment")+                     <*> (o .:? "expandedDimension")+                     <*> (o .:? "zipFilename")+                     <*> (o .:? "actionScript3")+                     <*> (o .:? "displayType")+                     <*> (o .:? "childAssetType")+                     <*> (o .:? "collapsedSize")+                     <*> (o .:? "id")+                     <*> (o .:? "bitRate")+                     <*> (o .:? "customStartTimeValue")+                     <*> (o .:? "startTimeType")+                     <*> (o .:? "duration")+                     <*> (o .:? "artworkType")+                     <*> (o .:? "hideFlashObjects")+                     <*> (o .:? "detectedFeatures" .!= mempty)+                     <*> (o .:? "backupImageExit")+                     <*> (o .:? "position")+                     <*> (o .:? "horizontallyLocked"))++instance ToJSON CreativeAsset where+        toJSON CreativeAsset'{..}+          = object+              (catMaybes+                 [("zIndex" .=) <$> _caaZIndex,+                  ("pushdown" .=) <$> _caaPushdown,+                  ("videoDuration" .=) <$> _caaVideoDuration,+                  ("originalBackup" .=) <$> _caaOriginalBackup,+                  ("windowMode" .=) <$> _caaWindowMode,+                  ("flashVersion" .=) <$> _caaFlashVersion,+                  ("pushdownDuration" .=) <$> _caaPushdownDuration,+                  ("size" .=) <$> _caaSize,+                  ("verticallyLocked" .=) <$> _caaVerticallyLocked,+                  ("offset" .=) <$> _caaOffSet,+                  ("streamingServingUrl" .=) <$>+                    _caaStreamingServingURL,+                  ("zipFilesize" .=) <$> _caaZipFilesize,+                  ("transparency" .=) <$> _caaTransparency,+                  ("hideSelectionBoxes" .=) <$> _caaHideSelectionBoxes,+                  ("sslCompliant" .=) <$> _caaSSLCompliant,+                  ("fileSize" .=) <$> _caaFileSize,+                  ("assetIdentifier" .=) <$> _caaAssetIdentifier,+                  ("durationType" .=) <$> _caaDurationType,+                  ("progressiveServingUrl" .=) <$>+                    _caaProgressiveServingURL,+                  ("active" .=) <$> _caaActive,+                  ("role" .=) <$> _caaRole,+                  ("mimeType" .=) <$> _caaMimeType,+                  ("positionTopUnit" .=) <$> _caaPositionTopUnit,+                  ("positionLeftUnit" .=) <$> _caaPositionLeftUnit,+                  ("alignment" .=) <$> _caaAlignment,+                  ("expandedDimension" .=) <$> _caaExpandedDimension,+                  ("zipFilename" .=) <$> _caaZipFilename,+                  ("actionScript3" .=) <$> _caaActionScript3,+                  ("displayType" .=) <$> _caaDisplayType,+                  ("childAssetType" .=) <$> _caaChildAssetType,+                  ("collapsedSize" .=) <$> _caaCollapsedSize,+                  ("id" .=) <$> _caaId, ("bitRate" .=) <$> _caaBitRate,+                  ("customStartTimeValue" .=) <$>+                    _caaCustomStartTimeValue,+                  ("startTimeType" .=) <$> _caaStartTimeType,+                  ("duration" .=) <$> _caaDuration,+                  ("artworkType" .=) <$> _caaArtworkType,+                  ("hideFlashObjects" .=) <$> _caaHideFlashObjects,+                  ("detectedFeatures" .=) <$> _caaDetectedFeatures,+                  ("backupImageExit" .=) <$> _caaBackupImageExit,+                  ("position" .=) <$> _caaPosition,+                  ("horizontallyLocked" .=) <$>+                    _caaHorizontallyLocked])++-- | Placement List Response+--+-- /See:/ 'placementsListResponse' smart constructor.+data PlacementsListResponse = PlacementsListResponse'+    { _plaNextPageToken :: !(Maybe Text)+    , _plaKind          :: !Text+    , _plaPlacements    :: !(Maybe [Placement])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'PlacementsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'plaNextPageToken'+--+-- * 'plaKind'+--+-- * 'plaPlacements'+placementsListResponse+    :: PlacementsListResponse+placementsListResponse =+    PlacementsListResponse'+    { _plaNextPageToken = Nothing+    , _plaKind = "dfareporting#placementsListResponse"+    , _plaPlacements = Nothing+    }++-- | Pagination token to be used for the next list operation.+plaNextPageToken :: Lens' PlacementsListResponse (Maybe Text)+plaNextPageToken+  = lens _plaNextPageToken+      (\ s a -> s{_plaNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#placementsListResponse\".+plaKind :: Lens' PlacementsListResponse Text+plaKind = lens _plaKind (\ s a -> s{_plaKind = a})++-- | Placement collection.+plaPlacements :: Lens' PlacementsListResponse [Placement]+plaPlacements+  = lens _plaPlacements+      (\ s a -> s{_plaPlacements = a})+      . _Default+      . _Coerce++instance FromJSON PlacementsListResponse where+        parseJSON+          = withObject "PlacementsListResponse"+              (\ o ->+                 PlacementsListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!=+                        "dfareporting#placementsListResponse")+                     <*> (o .:? "placements" .!= mempty))++instance ToJSON PlacementsListResponse where+        toJSON PlacementsListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _plaNextPageToken,+                  Just ("kind" .= _plaKind),+                  ("placements" .=) <$> _plaPlacements])++-- | The report\'s schedule. Can only be set if the report\'s \'dateRange\'+-- is a relative date range and the relative date range is not \"TODAY\".+--+-- /See:/ 'reportSchedule' smart constructor.+data ReportSchedule = ReportSchedule'+    { _rsEvery             :: !(Maybe (Textual Int32))+    , _rsActive            :: !(Maybe Bool)+    , _rsRepeats           :: !(Maybe Text)+    , _rsStartDate         :: !(Maybe Date')+    , _rsExpirationDate    :: !(Maybe Date')+    , _rsRunsOnDayOfMonth  :: !(Maybe ReportScheduleRunsOnDayOfMonth)+    , _rsRepeatsOnWeekDays :: !(Maybe [ReportScheduleRepeatsOnWeekDaysItem])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ReportSchedule' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rsEvery'+--+-- * 'rsActive'+--+-- * 'rsRepeats'+--+-- * 'rsStartDate'+--+-- * 'rsExpirationDate'+--+-- * 'rsRunsOnDayOfMonth'+--+-- * 'rsRepeatsOnWeekDays'+reportSchedule+    :: ReportSchedule+reportSchedule =+    ReportSchedule'+    { _rsEvery = Nothing+    , _rsActive = Nothing+    , _rsRepeats = Nothing+    , _rsStartDate = Nothing+    , _rsExpirationDate = Nothing+    , _rsRunsOnDayOfMonth = Nothing+    , _rsRepeatsOnWeekDays = Nothing+    }++-- | Defines every how many days, weeks or months the report should be run.+-- Needs to be set when \"repeats\" is either \"DAILY\", \"WEEKLY\" or+-- \"MONTHLY\".+rsEvery :: Lens' ReportSchedule (Maybe Int32)+rsEvery+  = lens _rsEvery (\ s a -> s{_rsEvery = a}) .+      mapping _Coerce++-- | Whether the schedule is active or not. Must be set to either true or+-- false.+rsActive :: Lens' ReportSchedule (Maybe Bool)+rsActive = lens _rsActive (\ s a -> s{_rsActive = a})++-- | The interval for which the report is repeated. Note: - \"DAILY\" also+-- requires field \"every\" to be set. - \"WEEKLY\" also requires fields+-- \"every\" and \"repeatsOnWeekDays\" to be set. - \"MONTHLY\" also+-- requires fields \"every\" and \"runsOnDayOfMonth\" to be set.+rsRepeats :: Lens' ReportSchedule (Maybe Text)+rsRepeats+  = lens _rsRepeats (\ s a -> s{_rsRepeats = a})++-- | Start date of date range for which scheduled reports should be run.+rsStartDate :: Lens' ReportSchedule (Maybe Day)+rsStartDate+  = lens _rsStartDate (\ s a -> s{_rsStartDate = a}) .+      mapping _Date++-- | The expiration date when the scheduled report stops running.+rsExpirationDate :: Lens' ReportSchedule (Maybe Day)+rsExpirationDate+  = lens _rsExpirationDate+      (\ s a -> s{_rsExpirationDate = a})+      . mapping _Date++-- | Enum to define for \"MONTHLY\" scheduled reports whether reports should+-- be repeated on the same day of the month as \"startDate\" or the same+-- day of the week of the month. Example: If \'startDate\' is Monday, April+-- 2nd 2012 (2012-04-02), \"DAY_OF_MONTH\" would run subsequent reports on+-- the 2nd of every Month, and \"WEEK_OF_MONTH\" would run subsequent+-- reports on the first Monday of the month.+rsRunsOnDayOfMonth :: Lens' ReportSchedule (Maybe ReportScheduleRunsOnDayOfMonth)+rsRunsOnDayOfMonth+  = lens _rsRunsOnDayOfMonth+      (\ s a -> s{_rsRunsOnDayOfMonth = a})++-- | List of week days \"WEEKLY\" on which scheduled reports should run.+rsRepeatsOnWeekDays :: Lens' ReportSchedule [ReportScheduleRepeatsOnWeekDaysItem]+rsRepeatsOnWeekDays+  = lens _rsRepeatsOnWeekDays+      (\ s a -> s{_rsRepeatsOnWeekDays = a})+      . _Default+      . _Coerce++instance FromJSON ReportSchedule where+        parseJSON+          = withObject "ReportSchedule"+              (\ o ->+                 ReportSchedule' <$>+                   (o .:? "every") <*> (o .:? "active") <*>+                     (o .:? "repeats")+                     <*> (o .:? "startDate")+                     <*> (o .:? "expirationDate")+                     <*> (o .:? "runsOnDayOfMonth")+                     <*> (o .:? "repeatsOnWeekDays" .!= mempty))++instance ToJSON ReportSchedule where+        toJSON ReportSchedule'{..}+          = object+              (catMaybes+                 [("every" .=) <$> _rsEvery,+                  ("active" .=) <$> _rsActive,+                  ("repeats" .=) <$> _rsRepeats,+                  ("startDate" .=) <$> _rsStartDate,+                  ("expirationDate" .=) <$> _rsExpirationDate,+                  ("runsOnDayOfMonth" .=) <$> _rsRunsOnDayOfMonth,+                  ("repeatsOnWeekDays" .=) <$> _rsRepeatsOnWeekDays])++-- | The report criteria for a report of type \"PATH_TO_CONVERSION\".+--+-- /See:/ 'reportPathToConversionCriteria' smart constructor.+data ReportPathToConversionCriteria = ReportPathToConversionCriteria'+    { _rptccReportProperties          :: !(Maybe ReportPathToConversionCriteriaReportProperties)+    , _rptccMetricNames               :: !(Maybe [Text])+    , _rptccCustomRichMediaEvents     :: !(Maybe [DimensionValue])+    , _rptccDateRange                 :: !(Maybe DateRange)+    , _rptccConversionDimensions      :: !(Maybe [SortedDimension])+    , _rptccCustomFloodlightVariables :: !(Maybe [SortedDimension])+    , _rptccFloodlightConfigId        :: !(Maybe DimensionValue)+    , _rptccActivityFilters           :: !(Maybe [DimensionValue])+    , _rptccPerInteractionDimensions  :: !(Maybe [SortedDimension])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ReportPathToConversionCriteria' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rptccReportProperties'+--+-- * 'rptccMetricNames'+--+-- * 'rptccCustomRichMediaEvents'+--+-- * 'rptccDateRange'+--+-- * 'rptccConversionDimensions'+--+-- * 'rptccCustomFloodlightVariables'+--+-- * 'rptccFloodlightConfigId'+--+-- * 'rptccActivityFilters'+--+-- * 'rptccPerInteractionDimensions'+reportPathToConversionCriteria+    :: ReportPathToConversionCriteria+reportPathToConversionCriteria =+    ReportPathToConversionCriteria'+    { _rptccReportProperties = Nothing+    , _rptccMetricNames = Nothing+    , _rptccCustomRichMediaEvents = Nothing+    , _rptccDateRange = Nothing+    , _rptccConversionDimensions = Nothing+    , _rptccCustomFloodlightVariables = Nothing+    , _rptccFloodlightConfigId = Nothing+    , _rptccActivityFilters = Nothing+    , _rptccPerInteractionDimensions = Nothing+    }++-- | The properties of the report.+rptccReportProperties :: Lens' ReportPathToConversionCriteria (Maybe ReportPathToConversionCriteriaReportProperties)+rptccReportProperties+  = lens _rptccReportProperties+      (\ s a -> s{_rptccReportProperties = a})++-- | The list of names of metrics the report should include.+rptccMetricNames :: Lens' ReportPathToConversionCriteria [Text]+rptccMetricNames+  = lens _rptccMetricNames+      (\ s a -> s{_rptccMetricNames = a})+      . _Default+      . _Coerce++-- | The list of custom rich media events to include.+rptccCustomRichMediaEvents :: Lens' ReportPathToConversionCriteria [DimensionValue]+rptccCustomRichMediaEvents+  = lens _rptccCustomRichMediaEvents+      (\ s a -> s{_rptccCustomRichMediaEvents = a})+      . _Default+      . _Coerce++-- | The date range this report should be run for.+rptccDateRange :: Lens' ReportPathToConversionCriteria (Maybe DateRange)+rptccDateRange+  = lens _rptccDateRange+      (\ s a -> s{_rptccDateRange = a})++-- | The list of conversion dimensions the report should include.+rptccConversionDimensions :: Lens' ReportPathToConversionCriteria [SortedDimension]+rptccConversionDimensions+  = lens _rptccConversionDimensions+      (\ s a -> s{_rptccConversionDimensions = a})+      . _Default+      . _Coerce++-- | The list of custom floodlight variables the report should include.+rptccCustomFloodlightVariables :: Lens' ReportPathToConversionCriteria [SortedDimension]+rptccCustomFloodlightVariables+  = lens _rptccCustomFloodlightVariables+      (\ s a -> s{_rptccCustomFloodlightVariables = a})+      . _Default+      . _Coerce++-- | The floodlight ID for which to show data in this report. All advertisers+-- associated with that ID will automatically be added. The dimension of+-- the value needs to be \'dfa:floodlightConfigId\'.+rptccFloodlightConfigId :: Lens' ReportPathToConversionCriteria (Maybe DimensionValue)+rptccFloodlightConfigId+  = lens _rptccFloodlightConfigId+      (\ s a -> s{_rptccFloodlightConfigId = a})++-- | The list of \'dfa:activity\' values to filter on.+rptccActivityFilters :: Lens' ReportPathToConversionCriteria [DimensionValue]+rptccActivityFilters+  = lens _rptccActivityFilters+      (\ s a -> s{_rptccActivityFilters = a})+      . _Default+      . _Coerce++-- | The list of per interaction dimensions the report should include.+rptccPerInteractionDimensions :: Lens' ReportPathToConversionCriteria [SortedDimension]+rptccPerInteractionDimensions+  = lens _rptccPerInteractionDimensions+      (\ s a -> s{_rptccPerInteractionDimensions = a})+      . _Default+      . _Coerce++instance FromJSON ReportPathToConversionCriteria+         where+        parseJSON+          = withObject "ReportPathToConversionCriteria"+              (\ o ->+                 ReportPathToConversionCriteria' <$>+                   (o .:? "reportProperties") <*>+                     (o .:? "metricNames" .!= mempty)+                     <*> (o .:? "customRichMediaEvents" .!= mempty)+                     <*> (o .:? "dateRange")+                     <*> (o .:? "conversionDimensions" .!= mempty)+                     <*> (o .:? "customFloodlightVariables" .!= mempty)+                     <*> (o .:? "floodlightConfigId")+                     <*> (o .:? "activityFilters" .!= mempty)+                     <*> (o .:? "perInteractionDimensions" .!= mempty))++instance ToJSON ReportPathToConversionCriteria where+        toJSON ReportPathToConversionCriteria'{..}+          = object+              (catMaybes+                 [("reportProperties" .=) <$> _rptccReportProperties,+                  ("metricNames" .=) <$> _rptccMetricNames,+                  ("customRichMediaEvents" .=) <$>+                    _rptccCustomRichMediaEvents,+                  ("dateRange" .=) <$> _rptccDateRange,+                  ("conversionDimensions" .=) <$>+                    _rptccConversionDimensions,+                  ("customFloodlightVariables" .=) <$>+                    _rptccCustomFloodlightVariables,+                  ("floodlightConfigId" .=) <$>+                    _rptccFloodlightConfigId,+                  ("activityFilters" .=) <$> _rptccActivityFilters,+                  ("perInteractionDimensions" .=) <$>+                    _rptccPerInteractionDimensions])++-- | Metro List Response+--+-- /See:/ 'metrosListResponse' smart constructor.+data MetrosListResponse = MetrosListResponse'+    { _mlrKind   :: !Text+    , _mlrMetros :: !(Maybe [Metro])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'MetrosListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'mlrKind'+--+-- * 'mlrMetros'+metrosListResponse+    :: MetrosListResponse+metrosListResponse =+    MetrosListResponse'+    { _mlrKind = "dfareporting#metrosListResponse"+    , _mlrMetros = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#metrosListResponse\".+mlrKind :: Lens' MetrosListResponse Text+mlrKind = lens _mlrKind (\ s a -> s{_mlrKind = a})++-- | Metro collection.+mlrMetros :: Lens' MetrosListResponse [Metro]+mlrMetros+  = lens _mlrMetros (\ s a -> s{_mlrMetros = a}) .+      _Default+      . _Coerce++instance FromJSON MetrosListResponse where+        parseJSON+          = withObject "MetrosListResponse"+              (\ o ->+                 MetrosListResponse' <$>+                   (o .:? "kind" .!= "dfareporting#metrosListResponse")+                     <*> (o .:? "metros" .!= mempty))++instance ToJSON MetrosListResponse where+        toJSON MetrosListResponse'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _mlrKind),+                  ("metros" .=) <$> _mlrMetros])++-- | Insert Conversions Response.+--+-- /See:/ 'conversionsBatchInsertResponse' smart constructor.+data ConversionsBatchInsertResponse = ConversionsBatchInsertResponse'+    { _cbirbStatus      :: !(Maybe [ConversionStatus])+    , _cbirbKind        :: !Text+    , _cbirbHasFailures :: !(Maybe Bool)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ConversionsBatchInsertResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cbirbStatus'+--+-- * 'cbirbKind'+--+-- * 'cbirbHasFailures'+conversionsBatchInsertResponse+    :: ConversionsBatchInsertResponse+conversionsBatchInsertResponse =+    ConversionsBatchInsertResponse'+    { _cbirbStatus = Nothing+    , _cbirbKind = "dfareporting#conversionsBatchInsertResponse"+    , _cbirbHasFailures = Nothing+    }++-- | The status of each conversion\'s insertion status. The status is+-- returned in the same order that conversions are inserted.+cbirbStatus :: Lens' ConversionsBatchInsertResponse [ConversionStatus]+cbirbStatus+  = lens _cbirbStatus (\ s a -> s{_cbirbStatus = a}) .+      _Default+      . _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#conversionsBatchInsertResponse\".+cbirbKind :: Lens' ConversionsBatchInsertResponse Text+cbirbKind+  = lens _cbirbKind (\ s a -> s{_cbirbKind = a})++-- | Indicates that some or all conversions failed to insert.+cbirbHasFailures :: Lens' ConversionsBatchInsertResponse (Maybe Bool)+cbirbHasFailures+  = lens _cbirbHasFailures+      (\ s a -> s{_cbirbHasFailures = a})++instance FromJSON ConversionsBatchInsertResponse+         where+        parseJSON+          = withObject "ConversionsBatchInsertResponse"+              (\ o ->+                 ConversionsBatchInsertResponse' <$>+                   (o .:? "status" .!= mempty) <*>+                     (o .:? "kind" .!=+                        "dfareporting#conversionsBatchInsertResponse")+                     <*> (o .:? "hasFailures"))++instance ToJSON ConversionsBatchInsertResponse where+        toJSON ConversionsBatchInsertResponse'{..}+          = object+              (catMaybes+                 [("status" .=) <$> _cbirbStatus,+                  Just ("kind" .= _cbirbKind),+                  ("hasFailures" .=) <$> _cbirbHasFailures])++-- | Order document List Response+--+-- /See:/ 'orderDocumentsListResponse' smart constructor.+data OrderDocumentsListResponse = OrderDocumentsListResponse'+    { _odlrNextPageToken  :: !(Maybe Text)+    , _odlrKind           :: !Text+    , _odlrOrderDocuments :: !(Maybe [OrderDocument])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'OrderDocumentsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'odlrNextPageToken'+--+-- * 'odlrKind'+--+-- * 'odlrOrderDocuments'+orderDocumentsListResponse+    :: OrderDocumentsListResponse+orderDocumentsListResponse =+    OrderDocumentsListResponse'+    { _odlrNextPageToken = Nothing+    , _odlrKind = "dfareporting#orderDocumentsListResponse"+    , _odlrOrderDocuments = Nothing+    }++-- | Pagination token to be used for the next list operation.+odlrNextPageToken :: Lens' OrderDocumentsListResponse (Maybe Text)+odlrNextPageToken+  = lens _odlrNextPageToken+      (\ s a -> s{_odlrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#orderDocumentsListResponse\".+odlrKind :: Lens' OrderDocumentsListResponse Text+odlrKind = lens _odlrKind (\ s a -> s{_odlrKind = a})++-- | Order document collection+odlrOrderDocuments :: Lens' OrderDocumentsListResponse [OrderDocument]+odlrOrderDocuments+  = lens _odlrOrderDocuments+      (\ s a -> s{_odlrOrderDocuments = a})+      . _Default+      . _Coerce++instance FromJSON OrderDocumentsListResponse where+        parseJSON+          = withObject "OrderDocumentsListResponse"+              (\ o ->+                 OrderDocumentsListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!=+                        "dfareporting#orderDocumentsListResponse")+                     <*> (o .:? "orderDocuments" .!= mempty))++instance ToJSON OrderDocumentsListResponse where+        toJSON OrderDocumentsListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _odlrNextPageToken,+                  Just ("kind" .= _odlrKind),+                  ("orderDocuments" .=) <$> _odlrOrderDocuments])++-- | Represents a recipient.+--+-- /See:/ 'recipient' smart constructor.+data Recipient = Recipient'+    { _recEmail        :: !(Maybe Text)+    , _recKind         :: !Text+    , _recDeliveryType :: !(Maybe RecipientDeliveryType)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Recipient' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'recEmail'+--+-- * 'recKind'+--+-- * 'recDeliveryType'+recipient+    :: Recipient+recipient =+    Recipient'+    { _recEmail = Nothing+    , _recKind = "dfareporting#recipient"+    , _recDeliveryType = Nothing+    }++-- | The email address of the recipient.+recEmail :: Lens' Recipient (Maybe Text)+recEmail = lens _recEmail (\ s a -> s{_recEmail = a})++-- | The kind of resource this is, in this case dfareporting#recipient.+recKind :: Lens' Recipient Text+recKind = lens _recKind (\ s a -> s{_recKind = a})++-- | The delivery type for the recipient.+recDeliveryType :: Lens' Recipient (Maybe RecipientDeliveryType)+recDeliveryType+  = lens _recDeliveryType+      (\ s a -> s{_recDeliveryType = a})++instance FromJSON Recipient where+        parseJSON+          = withObject "Recipient"+              (\ o ->+                 Recipient' <$>+                   (o .:? "email") <*>+                     (o .:? "kind" .!= "dfareporting#recipient")+                     <*> (o .:? "deliveryType"))++instance ToJSON Recipient where+        toJSON Recipient'{..}+          = object+              (catMaybes+                 [("email" .=) <$> _recEmail,+                  Just ("kind" .= _recKind),+                  ("deliveryType" .=) <$> _recDeliveryType])++-- | Contains properties of a site.+--+-- /See:/ 'site' smart constructor.+data Site = Site'+    { _ssKind                          :: !Text+    , _ssKeyName                       :: !(Maybe Text)+    , _ssSiteContacts                  :: !(Maybe [SiteContact])+    , _ssSiteSettings                  :: !(Maybe SiteSettings)+    , _ssIdDimensionValue              :: !(Maybe DimensionValue)+    , _ssDirectorySiteIdDimensionValue :: !(Maybe DimensionValue)+    , _ssAccountId                     :: !(Maybe (Textual Int64))+    , _ssName                          :: !(Maybe Text)+    , _ssDirectorySiteId               :: !(Maybe (Textual Int64))+    , _ssId                            :: !(Maybe (Textual Int64))+    , _ssSubAccountId                  :: !(Maybe (Textual Int64))+    , _ssApproved                      :: !(Maybe Bool)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Site' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ssKind'+--+-- * 'ssKeyName'+--+-- * 'ssSiteContacts'+--+-- * 'ssSiteSettings'+--+-- * 'ssIdDimensionValue'+--+-- * 'ssDirectorySiteIdDimensionValue'+--+-- * 'ssAccountId'+--+-- * 'ssName'+--+-- * 'ssDirectorySiteId'+--+-- * 'ssId'+--+-- * 'ssSubAccountId'+--+-- * 'ssApproved'+site+    :: Site+site =+    Site'+    { _ssKind = "dfareporting#site"+    , _ssKeyName = Nothing+    , _ssSiteContacts = Nothing+    , _ssSiteSettings = Nothing+    , _ssIdDimensionValue = Nothing+    , _ssDirectorySiteIdDimensionValue = Nothing+    , _ssAccountId = Nothing+    , _ssName = Nothing+    , _ssDirectorySiteId = Nothing+    , _ssId = Nothing+    , _ssSubAccountId = Nothing+    , _ssApproved = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#site\".+ssKind :: Lens' Site Text+ssKind = lens _ssKind (\ s a -> s{_ssKind = a})++-- | Key name of this site. This is a read-only, auto-generated field.+ssKeyName :: Lens' Site (Maybe Text)+ssKeyName+  = lens _ssKeyName (\ s a -> s{_ssKeyName = a})++-- | Site contacts.+ssSiteContacts :: Lens' Site [SiteContact]+ssSiteContacts+  = lens _ssSiteContacts+      (\ s a -> s{_ssSiteContacts = a})+      . _Default+      . _Coerce++-- | Site-wide settings.+ssSiteSettings :: Lens' Site (Maybe SiteSettings)+ssSiteSettings+  = lens _ssSiteSettings+      (\ s a -> s{_ssSiteSettings = a})++-- | Dimension value for the ID of this site. This is a read-only,+-- auto-generated field.+ssIdDimensionValue :: Lens' Site (Maybe DimensionValue)+ssIdDimensionValue+  = lens _ssIdDimensionValue+      (\ s a -> s{_ssIdDimensionValue = a})++-- | Dimension value for the ID of the directory site. This is a read-only,+-- auto-generated field.+ssDirectorySiteIdDimensionValue :: Lens' Site (Maybe DimensionValue)+ssDirectorySiteIdDimensionValue+  = lens _ssDirectorySiteIdDimensionValue+      (\ s a -> s{_ssDirectorySiteIdDimensionValue = a})++-- | Account ID of this site. This is a read-only field that can be left+-- blank.+ssAccountId :: Lens' Site (Maybe Int64)+ssAccountId+  = lens _ssAccountId (\ s a -> s{_ssAccountId = a}) .+      mapping _Coerce++-- | Name of this site.This is a required field. Must be less than 128+-- characters long. If this site is under a subaccount, the name must be+-- unique among sites of the same subaccount. Otherwise, this site is a+-- top-level site, and the name must be unique among top-level sites of the+-- same account.+ssName :: Lens' Site (Maybe Text)+ssName = lens _ssName (\ s a -> s{_ssName = a})++-- | Directory site associated with this site. This is a required field that+-- is read-only after insertion.+ssDirectorySiteId :: Lens' Site (Maybe Int64)+ssDirectorySiteId+  = lens _ssDirectorySiteId+      (\ s a -> s{_ssDirectorySiteId = a})+      . mapping _Coerce++-- | ID of this site. This is a read-only, auto-generated field.+ssId :: Lens' Site (Maybe Int64)+ssId+  = lens _ssId (\ s a -> s{_ssId = a}) .+      mapping _Coerce++-- | Subaccount ID of this site. This is a read-only field that can be left+-- blank.+ssSubAccountId :: Lens' Site (Maybe Int64)+ssSubAccountId+  = lens _ssSubAccountId+      (\ s a -> s{_ssSubAccountId = a})+      . mapping _Coerce++-- | Whether this site is approved.+ssApproved :: Lens' Site (Maybe Bool)+ssApproved+  = lens _ssApproved (\ s a -> s{_ssApproved = a})++instance FromJSON Site where+        parseJSON+          = withObject "Site"+              (\ o ->+                 Site' <$>+                   (o .:? "kind" .!= "dfareporting#site") <*>+                     (o .:? "keyName")+                     <*> (o .:? "siteContacts" .!= mempty)+                     <*> (o .:? "siteSettings")+                     <*> (o .:? "idDimensionValue")+                     <*> (o .:? "directorySiteIdDimensionValue")+                     <*> (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "directorySiteId")+                     <*> (o .:? "id")+                     <*> (o .:? "subaccountId")+                     <*> (o .:? "approved"))++instance ToJSON Site where+        toJSON Site'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _ssKind),+                  ("keyName" .=) <$> _ssKeyName,+                  ("siteContacts" .=) <$> _ssSiteContacts,+                  ("siteSettings" .=) <$> _ssSiteSettings,+                  ("idDimensionValue" .=) <$> _ssIdDimensionValue,+                  ("directorySiteIdDimensionValue" .=) <$>+                    _ssDirectorySiteIdDimensionValue,+                  ("accountId" .=) <$> _ssAccountId,+                  ("name" .=) <$> _ssName,+                  ("directorySiteId" .=) <$> _ssDirectorySiteId,+                  ("id" .=) <$> _ssId,+                  ("subaccountId" .=) <$> _ssSubAccountId,+                  ("approved" .=) <$> _ssApproved])++-- | User Defined Variable configuration.+--+-- /See:/ 'userDefinedVariableConfiguration' smart constructor.+data UserDefinedVariableConfiguration = UserDefinedVariableConfiguration'+    { _udvcReportName   :: !(Maybe Text)+    , _udvcDataType     :: !(Maybe UserDefinedVariableConfigurationDataType)+    , _udvcVariableType :: !(Maybe UserDefinedVariableConfigurationVariableType)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'UserDefinedVariableConfiguration' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'udvcReportName'+--+-- * 'udvcDataType'+--+-- * 'udvcVariableType'+userDefinedVariableConfiguration+    :: UserDefinedVariableConfiguration+userDefinedVariableConfiguration =+    UserDefinedVariableConfiguration'+    { _udvcReportName = Nothing+    , _udvcDataType = Nothing+    , _udvcVariableType = Nothing+    }++-- | User-friendly name for the variable which will appear in reports. This+-- is a required field, must be less than 64 characters long, and cannot+-- contain the following characters: \"\"\<>\".+udvcReportName :: Lens' UserDefinedVariableConfiguration (Maybe Text)+udvcReportName+  = lens _udvcReportName+      (\ s a -> s{_udvcReportName = a})++-- | Data type for the variable. This is a required field.+udvcDataType :: Lens' UserDefinedVariableConfiguration (Maybe UserDefinedVariableConfigurationDataType)+udvcDataType+  = lens _udvcDataType (\ s a -> s{_udvcDataType = a})++-- | Variable name in the tag. This is a required field.+udvcVariableType :: Lens' UserDefinedVariableConfiguration (Maybe UserDefinedVariableConfigurationVariableType)+udvcVariableType+  = lens _udvcVariableType+      (\ s a -> s{_udvcVariableType = a})++instance FromJSON UserDefinedVariableConfiguration+         where+        parseJSON+          = withObject "UserDefinedVariableConfiguration"+              (\ o ->+                 UserDefinedVariableConfiguration' <$>+                   (o .:? "reportName") <*> (o .:? "dataType") <*>+                     (o .:? "variableType"))++instance ToJSON UserDefinedVariableConfiguration+         where+        toJSON UserDefinedVariableConfiguration'{..}+          = object+              (catMaybes+                 [("reportName" .=) <$> _udvcReportName,+                  ("dataType" .=) <$> _udvcDataType,+                  ("variableType" .=) <$> _udvcVariableType])++-- | The report criteria for a report of type \"CROSS_DIMENSION_REACH\".+--+-- /See:/ 'reportCrossDimensionReachCriteria' smart constructor.+data ReportCrossDimensionReachCriteria = ReportCrossDimensionReachCriteria'+    { _rcdrcPivoted            :: !(Maybe Bool)+    , _rcdrcBreakdown          :: !(Maybe [SortedDimension])+    , _rcdrcDimension          :: !(Maybe ReportCrossDimensionReachCriteriaDimension)+    , _rcdrcMetricNames        :: !(Maybe [Text])+    , _rcdrcDimensionFilters   :: !(Maybe [DimensionValue])+    , _rcdrcDateRange          :: !(Maybe DateRange)+    , _rcdrcOverlapMetricNames :: !(Maybe [Text])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ReportCrossDimensionReachCriteria' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rcdrcPivoted'+--+-- * 'rcdrcBreakdown'+--+-- * 'rcdrcDimension'+--+-- * 'rcdrcMetricNames'+--+-- * 'rcdrcDimensionFilters'+--+-- * 'rcdrcDateRange'+--+-- * 'rcdrcOverlapMetricNames'+reportCrossDimensionReachCriteria+    :: ReportCrossDimensionReachCriteria+reportCrossDimensionReachCriteria =+    ReportCrossDimensionReachCriteria'+    { _rcdrcPivoted = Nothing+    , _rcdrcBreakdown = Nothing+    , _rcdrcDimension = Nothing+    , _rcdrcMetricNames = Nothing+    , _rcdrcDimensionFilters = Nothing+    , _rcdrcDateRange = Nothing+    , _rcdrcOverlapMetricNames = Nothing+    }++-- | Whether the report is pivoted or not. Defaults to true.+rcdrcPivoted :: Lens' ReportCrossDimensionReachCriteria (Maybe Bool)+rcdrcPivoted+  = lens _rcdrcPivoted (\ s a -> s{_rcdrcPivoted = a})++-- | The list of dimensions the report should include.+rcdrcBreakdown :: Lens' ReportCrossDimensionReachCriteria [SortedDimension]+rcdrcBreakdown+  = lens _rcdrcBreakdown+      (\ s a -> s{_rcdrcBreakdown = a})+      . _Default+      . _Coerce++-- | The dimension option.+rcdrcDimension :: Lens' ReportCrossDimensionReachCriteria (Maybe ReportCrossDimensionReachCriteriaDimension)+rcdrcDimension+  = lens _rcdrcDimension+      (\ s a -> s{_rcdrcDimension = a})++-- | The list of names of metrics the report should include.+rcdrcMetricNames :: Lens' ReportCrossDimensionReachCriteria [Text]+rcdrcMetricNames+  = lens _rcdrcMetricNames+      (\ s a -> s{_rcdrcMetricNames = a})+      . _Default+      . _Coerce++-- | The list of filters on which dimensions are filtered.+rcdrcDimensionFilters :: Lens' ReportCrossDimensionReachCriteria [DimensionValue]+rcdrcDimensionFilters+  = lens _rcdrcDimensionFilters+      (\ s a -> s{_rcdrcDimensionFilters = a})+      . _Default+      . _Coerce++-- | The date range this report should be run for.+rcdrcDateRange :: Lens' ReportCrossDimensionReachCriteria (Maybe DateRange)+rcdrcDateRange+  = lens _rcdrcDateRange+      (\ s a -> s{_rcdrcDateRange = a})++-- | The list of names of overlap metrics the report should include.+rcdrcOverlapMetricNames :: Lens' ReportCrossDimensionReachCriteria [Text]+rcdrcOverlapMetricNames+  = lens _rcdrcOverlapMetricNames+      (\ s a -> s{_rcdrcOverlapMetricNames = a})+      . _Default+      . _Coerce++instance FromJSON ReportCrossDimensionReachCriteria+         where+        parseJSON+          = withObject "ReportCrossDimensionReachCriteria"+              (\ o ->+                 ReportCrossDimensionReachCriteria' <$>+                   (o .:? "pivoted") <*> (o .:? "breakdown" .!= mempty)+                     <*> (o .:? "dimension")+                     <*> (o .:? "metricNames" .!= mempty)+                     <*> (o .:? "dimensionFilters" .!= mempty)+                     <*> (o .:? "dateRange")+                     <*> (o .:? "overlapMetricNames" .!= mempty))++instance ToJSON ReportCrossDimensionReachCriteria+         where+        toJSON ReportCrossDimensionReachCriteria'{..}+          = object+              (catMaybes+                 [("pivoted" .=) <$> _rcdrcPivoted,+                  ("breakdown" .=) <$> _rcdrcBreakdown,+                  ("dimension" .=) <$> _rcdrcDimension,+                  ("metricNames" .=) <$> _rcdrcMetricNames,+                  ("dimensionFilters" .=) <$> _rcdrcDimensionFilters,+                  ("dateRange" .=) <$> _rcdrcDateRange,+                  ("overlapMetricNames" .=) <$>+                    _rcdrcOverlapMetricNames])++-- | The URLs where the completed report file can be downloaded.+--+-- /See:/ 'fileURLs' smart constructor.+data FileURLs = FileURLs'+    { _fuBrowserURL :: !(Maybe Text)+    , _fuAPIURL     :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'FileURLs' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'fuBrowserURL'+--+-- * 'fuAPIURL'+fileURLs+    :: FileURLs+fileURLs =+    FileURLs'+    { _fuBrowserURL = Nothing+    , _fuAPIURL = Nothing+    }++-- | The URL for downloading the report data through a browser.+fuBrowserURL :: Lens' FileURLs (Maybe Text)+fuBrowserURL+  = lens _fuBrowserURL (\ s a -> s{_fuBrowserURL = a})++-- | The URL for downloading the report data through the API.+fuAPIURL :: Lens' FileURLs (Maybe Text)+fuAPIURL = lens _fuAPIURL (\ s a -> s{_fuAPIURL = a})++instance FromJSON FileURLs where+        parseJSON+          = withObject "FileURLs"+              (\ o ->+                 FileURLs' <$>+                   (o .:? "browserUrl") <*> (o .:? "apiUrl"))++instance ToJSON FileURLs where+        toJSON FileURLs'{..}+          = object+              (catMaybes+                 [("browserUrl" .=) <$> _fuBrowserURL,+                  ("apiUrl" .=) <$> _fuAPIURL])++-- | Campaign Creative Association List Response+--+-- /See:/ 'campaignCreativeAssociationsListResponse' smart constructor.+data CampaignCreativeAssociationsListResponse = CampaignCreativeAssociationsListResponse'+    { _ccalrCampaignCreativeAssociations :: !(Maybe [CampaignCreativeAssociation])+    , _ccalrNextPageToken                :: !(Maybe Text)+    , _ccalrKind                         :: !Text+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CampaignCreativeAssociationsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ccalrCampaignCreativeAssociations'+--+-- * 'ccalrNextPageToken'+--+-- * 'ccalrKind'+campaignCreativeAssociationsListResponse+    :: CampaignCreativeAssociationsListResponse+campaignCreativeAssociationsListResponse =+    CampaignCreativeAssociationsListResponse'+    { _ccalrCampaignCreativeAssociations = Nothing+    , _ccalrNextPageToken = Nothing+    , _ccalrKind = "dfareporting#campaignCreativeAssociationsListResponse"+    }++-- | Campaign creative association collection+ccalrCampaignCreativeAssociations :: Lens' CampaignCreativeAssociationsListResponse [CampaignCreativeAssociation]+ccalrCampaignCreativeAssociations+  = lens _ccalrCampaignCreativeAssociations+      (\ s a -> s{_ccalrCampaignCreativeAssociations = a})+      . _Default+      . _Coerce++-- | Pagination token to be used for the next list operation.+ccalrNextPageToken :: Lens' CampaignCreativeAssociationsListResponse (Maybe Text)+ccalrNextPageToken+  = lens _ccalrNextPageToken+      (\ s a -> s{_ccalrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#campaignCreativeAssociationsListResponse\".+ccalrKind :: Lens' CampaignCreativeAssociationsListResponse Text+ccalrKind+  = lens _ccalrKind (\ s a -> s{_ccalrKind = a})++instance FromJSON+         CampaignCreativeAssociationsListResponse where+        parseJSON+          = withObject+              "CampaignCreativeAssociationsListResponse"+              (\ o ->+                 CampaignCreativeAssociationsListResponse' <$>+                   (o .:? "campaignCreativeAssociations" .!= mempty) <*>+                     (o .:? "nextPageToken")+                     <*>+                     (o .:? "kind" .!=+                        "dfareporting#campaignCreativeAssociationsListResponse"))++instance ToJSON+         CampaignCreativeAssociationsListResponse where+        toJSON CampaignCreativeAssociationsListResponse'{..}+          = object+              (catMaybes+                 [("campaignCreativeAssociations" .=) <$>+                    _ccalrCampaignCreativeAssociations,+                  ("nextPageToken" .=) <$> _ccalrNextPageToken,+                  Just ("kind" .= _ccalrKind)])++-- | Describes properties of a DoubleClick Planning order.+--+-- /See:/ 'order' smart constructor.+data Order = Order'+    { _oSellerOrderId          :: !(Maybe Text)+    , _oSellerOrganizationName :: !(Maybe Text)+    , _oKind                   :: !Text+    , _oAdvertiserId           :: !(Maybe (Textual Int64))+    , _oPlanningTermId         :: !(Maybe (Textual Int64))+    , _oAccountId              :: !(Maybe (Textual Int64))+    , _oName                   :: !(Maybe Text)+    , _oSiteNames              :: !(Maybe [Text])+    , _oLastModifiedInfo       :: !(Maybe LastModifiedInfo)+    , _oBuyerOrganizationName  :: !(Maybe Text)+    , _oId                     :: !(Maybe (Textual Int64))+    , _oBuyerInvoiceId         :: !(Maybe Text)+    , _oComments               :: !(Maybe Text)+    , _oProjectId              :: !(Maybe (Textual Int64))+    , _oSubAccountId           :: !(Maybe (Textual Int64))+    , _oNotes                  :: !(Maybe Text)+    , _oContacts               :: !(Maybe [OrderContact])+    , _oSiteId                 :: !(Maybe [Textual Int64])+    , _oTermsAndConditions     :: !(Maybe Text)+    , _oApproverUserProFileIds :: !(Maybe [Textual Int64])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Order' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'oSellerOrderId'+--+-- * 'oSellerOrganizationName'+--+-- * 'oKind'+--+-- * 'oAdvertiserId'+--+-- * 'oPlanningTermId'+--+-- * 'oAccountId'+--+-- * 'oName'+--+-- * 'oSiteNames'+--+-- * 'oLastModifiedInfo'+--+-- * 'oBuyerOrganizationName'+--+-- * 'oId'+--+-- * 'oBuyerInvoiceId'+--+-- * 'oComments'+--+-- * 'oProjectId'+--+-- * 'oSubAccountId'+--+-- * 'oNotes'+--+-- * 'oContacts'+--+-- * 'oSiteId'+--+-- * 'oTermsAndConditions'+--+-- * 'oApproverUserProFileIds'+order+    :: Order+order =+    Order'+    { _oSellerOrderId = Nothing+    , _oSellerOrganizationName = Nothing+    , _oKind = "dfareporting#order"+    , _oAdvertiserId = Nothing+    , _oPlanningTermId = Nothing+    , _oAccountId = Nothing+    , _oName = Nothing+    , _oSiteNames = Nothing+    , _oLastModifiedInfo = Nothing+    , _oBuyerOrganizationName = Nothing+    , _oId = Nothing+    , _oBuyerInvoiceId = Nothing+    , _oComments = Nothing+    , _oProjectId = Nothing+    , _oSubAccountId = Nothing+    , _oNotes = Nothing+    , _oContacts = Nothing+    , _oSiteId = Nothing+    , _oTermsAndConditions = Nothing+    , _oApproverUserProFileIds = Nothing+    }++-- | Seller order ID associated with this order.+oSellerOrderId :: Lens' Order (Maybe Text)+oSellerOrderId+  = lens _oSellerOrderId+      (\ s a -> s{_oSellerOrderId = a})++-- | Name of the seller organization.+oSellerOrganizationName :: Lens' Order (Maybe Text)+oSellerOrganizationName+  = lens _oSellerOrganizationName+      (\ s a -> s{_oSellerOrganizationName = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#order\".+oKind :: Lens' Order Text+oKind = lens _oKind (\ s a -> s{_oKind = a})++-- | Advertiser ID of this order.+oAdvertiserId :: Lens' Order (Maybe Int64)+oAdvertiserId+  = lens _oAdvertiserId+      (\ s a -> s{_oAdvertiserId = a})+      . mapping _Coerce++-- | ID of the terms and conditions template used in this order.+oPlanningTermId :: Lens' Order (Maybe Int64)+oPlanningTermId+  = lens _oPlanningTermId+      (\ s a -> s{_oPlanningTermId = a})+      . mapping _Coerce++-- | Account ID of this order.+oAccountId :: Lens' Order (Maybe Int64)+oAccountId+  = lens _oAccountId (\ s a -> s{_oAccountId = a}) .+      mapping _Coerce++-- | Name of this order.+oName :: Lens' Order (Maybe Text)+oName = lens _oName (\ s a -> s{_oName = a})++-- | Free-form site names this order is associated with.+oSiteNames :: Lens' Order [Text]+oSiteNames+  = lens _oSiteNames (\ s a -> s{_oSiteNames = a}) .+      _Default+      . _Coerce++-- | Information about the most recent modification of this order.+oLastModifiedInfo :: Lens' Order (Maybe LastModifiedInfo)+oLastModifiedInfo+  = lens _oLastModifiedInfo+      (\ s a -> s{_oLastModifiedInfo = a})++-- | Name of the buyer organization.+oBuyerOrganizationName :: Lens' Order (Maybe Text)+oBuyerOrganizationName+  = lens _oBuyerOrganizationName+      (\ s a -> s{_oBuyerOrganizationName = a})++-- | ID of this order. This is a read-only, auto-generated field.+oId :: Lens' Order (Maybe Int64)+oId+  = lens _oId (\ s a -> s{_oId = a}) . mapping _Coerce++-- | Buyer invoice ID associated with this order.+oBuyerInvoiceId :: Lens' Order (Maybe Text)+oBuyerInvoiceId+  = lens _oBuyerInvoiceId+      (\ s a -> s{_oBuyerInvoiceId = a})++-- | Comments in this order.+oComments :: Lens' Order (Maybe Text)+oComments+  = lens _oComments (\ s a -> s{_oComments = a})++-- | Project ID of this order.+oProjectId :: Lens' Order (Maybe Int64)+oProjectId+  = lens _oProjectId (\ s a -> s{_oProjectId = a}) .+      mapping _Coerce++-- | Subaccount ID of this order.+oSubAccountId :: Lens' Order (Maybe Int64)+oSubAccountId+  = lens _oSubAccountId+      (\ s a -> s{_oSubAccountId = a})+      . mapping _Coerce++-- | Notes of this order.+oNotes :: Lens' Order (Maybe Text)+oNotes = lens _oNotes (\ s a -> s{_oNotes = a})++-- | Contacts for this order.+oContacts :: Lens' Order [OrderContact]+oContacts+  = lens _oContacts (\ s a -> s{_oContacts = a}) .+      _Default+      . _Coerce++-- | Site IDs this order is associated with.+oSiteId :: Lens' Order [Int64]+oSiteId+  = lens _oSiteId (\ s a -> s{_oSiteId = a}) . _Default+      . _Coerce++-- | Terms and conditions of this order.+oTermsAndConditions :: Lens' Order (Maybe Text)+oTermsAndConditions+  = lens _oTermsAndConditions+      (\ s a -> s{_oTermsAndConditions = a})++-- | IDs for users that have to approve documents created for this order.+oApproverUserProFileIds :: Lens' Order [Int64]+oApproverUserProFileIds+  = lens _oApproverUserProFileIds+      (\ s a -> s{_oApproverUserProFileIds = a})+      . _Default+      . _Coerce++instance FromJSON Order where+        parseJSON+          = withObject "Order"+              (\ o ->+                 Order' <$>+                   (o .:? "sellerOrderId") <*>+                     (o .:? "sellerOrganizationName")+                     <*> (o .:? "kind" .!= "dfareporting#order")+                     <*> (o .:? "advertiserId")+                     <*> (o .:? "planningTermId")+                     <*> (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "siteNames" .!= mempty)+                     <*> (o .:? "lastModifiedInfo")+                     <*> (o .:? "buyerOrganizationName")+                     <*> (o .:? "id")+                     <*> (o .:? "buyerInvoiceId")+                     <*> (o .:? "comments")+                     <*> (o .:? "projectId")+                     <*> (o .:? "subaccountId")+                     <*> (o .:? "notes")+                     <*> (o .:? "contacts" .!= mempty)+                     <*> (o .:? "siteId" .!= mempty)+                     <*> (o .:? "termsAndConditions")+                     <*> (o .:? "approverUserProfileIds" .!= mempty))++instance ToJSON Order where+        toJSON Order'{..}+          = object+              (catMaybes+                 [("sellerOrderId" .=) <$> _oSellerOrderId,+                  ("sellerOrganizationName" .=) <$>+                    _oSellerOrganizationName,+                  Just ("kind" .= _oKind),+                  ("advertiserId" .=) <$> _oAdvertiserId,+                  ("planningTermId" .=) <$> _oPlanningTermId,+                  ("accountId" .=) <$> _oAccountId,+                  ("name" .=) <$> _oName,+                  ("siteNames" .=) <$> _oSiteNames,+                  ("lastModifiedInfo" .=) <$> _oLastModifiedInfo,+                  ("buyerOrganizationName" .=) <$>+                    _oBuyerOrganizationName,+                  ("id" .=) <$> _oId,+                  ("buyerInvoiceId" .=) <$> _oBuyerInvoiceId,+                  ("comments" .=) <$> _oComments,+                  ("projectId" .=) <$> _oProjectId,+                  ("subaccountId" .=) <$> _oSubAccountId,+                  ("notes" .=) <$> _oNotes,+                  ("contacts" .=) <$> _oContacts,+                  ("siteId" .=) <$> _oSiteId,+                  ("termsAndConditions" .=) <$> _oTermsAndConditions,+                  ("approverUserProfileIds" .=) <$>+                    _oApproverUserProFileIds])++-- | Creative Asset ID.+--+-- /See:/ 'creativeAssetId' smart constructor.+data CreativeAssetId = CreativeAssetId'+    { _caiName :: !(Maybe Text)+    , _caiType :: !(Maybe CreativeAssetIdType)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CreativeAssetId' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'caiName'+--+-- * 'caiType'+creativeAssetId+    :: CreativeAssetId+creativeAssetId =+    CreativeAssetId'+    { _caiName = Nothing+    , _caiType = Nothing+    }++-- | Name of the creative asset. This is a required field while inserting an+-- asset. After insertion, this assetIdentifier is used to identify the+-- uploaded asset. Characters in the name must be alphanumeric or one of+-- the following: \".-_ \". Spaces are allowed.+caiName :: Lens' CreativeAssetId (Maybe Text)+caiName = lens _caiName (\ s a -> s{_caiName = a})++-- | Type of asset to upload. This is a required field. IMAGE is solely used+-- for IMAGE creatives. Other image assets should use HTML_IMAGE.+caiType :: Lens' CreativeAssetId (Maybe CreativeAssetIdType)+caiType = lens _caiType (\ s a -> s{_caiType = a})++instance FromJSON CreativeAssetId where+        parseJSON+          = withObject "CreativeAssetId"+              (\ o ->+                 CreativeAssetId' <$>+                   (o .:? "name") <*> (o .:? "type"))++instance ToJSON CreativeAssetId where+        toJSON CreativeAssetId'{..}+          = object+              (catMaybes+                 [("name" .=) <$> _caiName, ("type" .=) <$> _caiType])++-- | Frequency Cap.+--+-- /See:/ 'frequencyCap' smart constructor.+data FrequencyCap = FrequencyCap'+    { _fcImpressions :: !(Maybe (Textual Int64))+    , _fcDuration    :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'FrequencyCap' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'fcImpressions'+--+-- * 'fcDuration'+frequencyCap+    :: FrequencyCap+frequencyCap =+    FrequencyCap'+    { _fcImpressions = Nothing+    , _fcDuration = Nothing+    }++-- | Number of times an individual user can be served the ad within the+-- specified duration. The maximum allowed is 15.+fcImpressions :: Lens' FrequencyCap (Maybe Int64)+fcImpressions+  = lens _fcImpressions+      (\ s a -> s{_fcImpressions = a})+      . mapping _Coerce++-- | Duration of time, in seconds, for this frequency cap. The maximum+-- duration is 90 days in seconds, or 7,776,000.+fcDuration :: Lens' FrequencyCap (Maybe Int64)+fcDuration+  = lens _fcDuration (\ s a -> s{_fcDuration = a}) .+      mapping _Coerce++instance FromJSON FrequencyCap where+        parseJSON+          = withObject "FrequencyCap"+              (\ o ->+                 FrequencyCap' <$>+                   (o .:? "impressions") <*> (o .:? "duration"))++instance ToJSON FrequencyCap where+        toJSON FrequencyCap'{..}+          = object+              (catMaybes+                 [("impressions" .=) <$> _fcImpressions,+                  ("duration" .=) <$> _fcDuration])++-- | Represents a File resource. A file contains the metadata for a report+-- run. It shows the status of the run and holds the URLs to the generated+-- report data if the run is finished and the status is+-- \"REPORT_AVAILABLE\".+--+-- /See:/ 'file' smart constructor.+data File = File'+    { _filStatus           :: !(Maybe FileStatus)+    , _filEtag             :: !(Maybe Text)+    , _filKind             :: !Text+    , _filURLs             :: !(Maybe FileURLs)+    , _filReportId         :: !(Maybe (Textual Int64))+    , _filDateRange        :: !(Maybe DateRange)+    , _filFormat           :: !(Maybe FileFormat)+    , _filLastModifiedTime :: !(Maybe (Textual Int64))+    , _filId               :: !(Maybe (Textual Int64))+    , _filFileName         :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'File' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'filStatus'+--+-- * 'filEtag'+--+-- * 'filKind'+--+-- * 'filURLs'+--+-- * 'filReportId'+--+-- * 'filDateRange'+--+-- * 'filFormat'+--+-- * 'filLastModifiedTime'+--+-- * 'filId'+--+-- * 'filFileName'+file+    :: File+file =+    File'+    { _filStatus = Nothing+    , _filEtag = Nothing+    , _filKind = "dfareporting#file"+    , _filURLs = Nothing+    , _filReportId = Nothing+    , _filDateRange = Nothing+    , _filFormat = Nothing+    , _filLastModifiedTime = Nothing+    , _filId = Nothing+    , _filFileName = Nothing+    }++-- | The status of the report file.+filStatus :: Lens' File (Maybe FileStatus)+filStatus+  = lens _filStatus (\ s a -> s{_filStatus = a})++-- | The eTag of this response for caching purposes.+filEtag :: Lens' File (Maybe Text)+filEtag = lens _filEtag (\ s a -> s{_filEtag = a})++-- | The kind of resource this is, in this case dfareporting#file.+filKind :: Lens' File Text+filKind = lens _filKind (\ s a -> s{_filKind = a})++-- | The URLs where the completed report file can be downloaded.+filURLs :: Lens' File (Maybe FileURLs)+filURLs = lens _filURLs (\ s a -> s{_filURLs = a})++-- | The ID of the report this file was generated from.+filReportId :: Lens' File (Maybe Int64)+filReportId+  = lens _filReportId (\ s a -> s{_filReportId = a}) .+      mapping _Coerce++-- | The date range for which the file has report data. The date range will+-- always be the absolute date range for which the report is run.+filDateRange :: Lens' File (Maybe DateRange)+filDateRange+  = lens _filDateRange (\ s a -> s{_filDateRange = a})++-- | The output format of the report. Only available once the file is+-- available.+filFormat :: Lens' File (Maybe FileFormat)+filFormat+  = lens _filFormat (\ s a -> s{_filFormat = a})++-- | The timestamp in milliseconds since epoch when this file was last+-- modified.+filLastModifiedTime :: Lens' File (Maybe Int64)+filLastModifiedTime+  = lens _filLastModifiedTime+      (\ s a -> s{_filLastModifiedTime = a})+      . mapping _Coerce++-- | The unique ID of this report file.+filId :: Lens' File (Maybe Int64)+filId+  = lens _filId (\ s a -> s{_filId = a}) .+      mapping _Coerce++-- | The filename of the file.+filFileName :: Lens' File (Maybe Text)+filFileName+  = lens _filFileName (\ s a -> s{_filFileName = a})++instance FromJSON File where+        parseJSON+          = withObject "File"+              (\ o ->+                 File' <$>+                   (o .:? "status") <*> (o .:? "etag") <*>+                     (o .:? "kind" .!= "dfareporting#file")+                     <*> (o .:? "urls")+                     <*> (o .:? "reportId")+                     <*> (o .:? "dateRange")+                     <*> (o .:? "format")+                     <*> (o .:? "lastModifiedTime")+                     <*> (o .:? "id")+                     <*> (o .:? "fileName"))++instance ToJSON File where+        toJSON File'{..}+          = object+              (catMaybes+                 [("status" .=) <$> _filStatus,+                  ("etag" .=) <$> _filEtag, Just ("kind" .= _filKind),+                  ("urls" .=) <$> _filURLs,+                  ("reportId" .=) <$> _filReportId,+                  ("dateRange" .=) <$> _filDateRange,+                  ("format" .=) <$> _filFormat,+                  ("lastModifiedTime" .=) <$> _filLastModifiedTime,+                  ("id" .=) <$> _filId,+                  ("fileName" .=) <$> _filFileName])++-- | Creative Settings+--+-- /See:/ 'creativeSettings' smart constructor.+data CreativeSettings = CreativeSettings'+    { _csIFrameHeader :: !(Maybe Text)+    , _csIFrameFooter :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CreativeSettings' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'csIFrameHeader'+--+-- * 'csIFrameFooter'+creativeSettings+    :: CreativeSettings+creativeSettings =+    CreativeSettings'+    { _csIFrameHeader = Nothing+    , _csIFrameFooter = Nothing+    }++-- | Header text for iFrames for this site. Must be less than or equal to+-- 2000 characters long.+csIFrameHeader :: Lens' CreativeSettings (Maybe Text)+csIFrameHeader+  = lens _csIFrameHeader+      (\ s a -> s{_csIFrameHeader = a})++-- | Header text for iFrames for this site. Must be less than or equal to+-- 2000 characters long.+csIFrameFooter :: Lens' CreativeSettings (Maybe Text)+csIFrameFooter+  = lens _csIFrameFooter+      (\ s a -> s{_csIFrameFooter = a})++instance FromJSON CreativeSettings where+        parseJSON+          = withObject "CreativeSettings"+              (\ o ->+                 CreativeSettings' <$>+                   (o .:? "iFrameHeader") <*> (o .:? "iFrameFooter"))++instance ToJSON CreativeSettings where+        toJSON CreativeSettings'{..}+          = object+              (catMaybes+                 [("iFrameHeader" .=) <$> _csIFrameHeader,+                  ("iFrameFooter" .=) <$> _csIFrameFooter])++-- | Creative Group List Response+--+-- /See:/ 'creativeGroupsListResponse' smart constructor.+data CreativeGroupsListResponse = CreativeGroupsListResponse'+    { _cglrCreativeGroups :: !(Maybe [CreativeGroup])+    , _cglrNextPageToken  :: !(Maybe Text)+    , _cglrKind           :: !Text+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CreativeGroupsListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cglrCreativeGroups'+--+-- * 'cglrNextPageToken'+--+-- * 'cglrKind'+creativeGroupsListResponse+    :: CreativeGroupsListResponse+creativeGroupsListResponse =+    CreativeGroupsListResponse'+    { _cglrCreativeGroups = Nothing+    , _cglrNextPageToken = Nothing+    , _cglrKind = "dfareporting#creativeGroupsListResponse"+    }++-- | Creative group collection.+cglrCreativeGroups :: Lens' CreativeGroupsListResponse [CreativeGroup]+cglrCreativeGroups+  = lens _cglrCreativeGroups+      (\ s a -> s{_cglrCreativeGroups = a})+      . _Default+      . _Coerce++-- | Pagination token to be used for the next list operation.+cglrNextPageToken :: Lens' CreativeGroupsListResponse (Maybe Text)+cglrNextPageToken+  = lens _cglrNextPageToken+      (\ s a -> s{_cglrNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#creativeGroupsListResponse\".+cglrKind :: Lens' CreativeGroupsListResponse Text+cglrKind = lens _cglrKind (\ s a -> s{_cglrKind = a})++instance FromJSON CreativeGroupsListResponse where+        parseJSON+          = withObject "CreativeGroupsListResponse"+              (\ o ->+                 CreativeGroupsListResponse' <$>+                   (o .:? "creativeGroups" .!= mempty) <*>+                     (o .:? "nextPageToken")+                     <*>+                     (o .:? "kind" .!=+                        "dfareporting#creativeGroupsListResponse"))++instance ToJSON CreativeGroupsListResponse where+        toJSON CreativeGroupsListResponse'{..}+          = object+              (catMaybes+                 [("creativeGroups" .=) <$> _cglrCreativeGroups,+                  ("nextPageToken" .=) <$> _cglrNextPageToken,+                  Just ("kind" .= _cglrKind)])++-- | Mobile Carrier List Response+--+-- /See:/ 'mobileCarriersListResponse' smart constructor.+data MobileCarriersListResponse = MobileCarriersListResponse'+    { _mclrMobileCarriers :: !(Maybe [MobileCarrier])+    , _mclrKind           :: !Text+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'MobileCarriersListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'mclrMobileCarriers'+--+-- * 'mclrKind'+mobileCarriersListResponse+    :: MobileCarriersListResponse+mobileCarriersListResponse =+    MobileCarriersListResponse'+    { _mclrMobileCarriers = Nothing+    , _mclrKind = "dfareporting#mobileCarriersListResponse"+    }++-- | Mobile carrier collection.+mclrMobileCarriers :: Lens' MobileCarriersListResponse [MobileCarrier]+mclrMobileCarriers+  = lens _mclrMobileCarriers+      (\ s a -> s{_mclrMobileCarriers = a})+      . _Default+      . _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#mobileCarriersListResponse\".+mclrKind :: Lens' MobileCarriersListResponse Text+mclrKind = lens _mclrKind (\ s a -> s{_mclrKind = a})++instance FromJSON MobileCarriersListResponse where+        parseJSON+          = withObject "MobileCarriersListResponse"+              (\ o ->+                 MobileCarriersListResponse' <$>+                   (o .:? "mobileCarriers" .!= mempty) <*>+                     (o .:? "kind" .!=+                        "dfareporting#mobileCarriersListResponse"))++instance ToJSON MobileCarriersListResponse where+        toJSON MobileCarriersListResponse'{..}+          = object+              (catMaybes+                 [("mobileCarriers" .=) <$> _mclrMobileCarriers,+                  Just ("kind" .= _mclrKind)])++-- | Landing Page List Response+--+-- /See:/ 'landingPagesListResponse' smart constructor.+data LandingPagesListResponse = LandingPagesListResponse'+    { _lplrLandingPages :: !(Maybe [LandingPage])+    , _lplrKind         :: !Text+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'LandingPagesListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'lplrLandingPages'+--+-- * 'lplrKind'+landingPagesListResponse+    :: LandingPagesListResponse+landingPagesListResponse =+    LandingPagesListResponse'+    { _lplrLandingPages = Nothing+    , _lplrKind = "dfareporting#landingPagesListResponse"+    }++-- | Landing page collection+lplrLandingPages :: Lens' LandingPagesListResponse [LandingPage]+lplrLandingPages+  = lens _lplrLandingPages+      (\ s a -> s{_lplrLandingPages = a})+      . _Default+      . _Coerce++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#landingPagesListResponse\".+lplrKind :: Lens' LandingPagesListResponse Text+lplrKind = lens _lplrKind (\ s a -> s{_lplrKind = a})++instance FromJSON LandingPagesListResponse where+        parseJSON+          = withObject "LandingPagesListResponse"+              (\ o ->+                 LandingPagesListResponse' <$>+                   (o .:? "landingPages" .!= mempty) <*>+                     (o .:? "kind" .!=+                        "dfareporting#landingPagesListResponse"))++instance ToJSON LandingPagesListResponse where+        toJSON LandingPagesListResponse'{..}+          = object+              (catMaybes+                 [("landingPages" .=) <$> _lplrLandingPages,+                  Just ("kind" .= _lplrKind)])++-- | CreativeAssets contains properties of a creative asset file which will+-- be uploaded or has already been uploaded. Refer to the creative sample+-- code for how to upload assets and insert a creative.+--+-- /See:/ 'creativeAssetMetadata' smart constructor.+data CreativeAssetMetadata = CreativeAssetMetadata'+    { _camaKind                  :: !Text+    , _camaAssetIdentifier       :: !(Maybe CreativeAssetId)+    , _camaClickTags             :: !(Maybe [ClickTag])+    , _camaWarnedValidationRules :: !(Maybe [CreativeAssetMetadataWarnedValidationRulesItem])+    , _camaDetectedFeatures      :: !(Maybe [CreativeAssetMetadataDetectedFeaturesItem])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CreativeAssetMetadata' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'camaKind'+--+-- * 'camaAssetIdentifier'+--+-- * 'camaClickTags'+--+-- * 'camaWarnedValidationRules'+--+-- * 'camaDetectedFeatures'+creativeAssetMetadata+    :: CreativeAssetMetadata+creativeAssetMetadata =+    CreativeAssetMetadata'+    { _camaKind = "dfareporting#creativeAssetMetadata"+    , _camaAssetIdentifier = Nothing+    , _camaClickTags = Nothing+    , _camaWarnedValidationRules = Nothing+    , _camaDetectedFeatures = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#creativeAssetMetadata\".+camaKind :: Lens' CreativeAssetMetadata Text+camaKind = lens _camaKind (\ s a -> s{_camaKind = a})++-- | ID of the creative asset. This is a required field.+camaAssetIdentifier :: Lens' CreativeAssetMetadata (Maybe CreativeAssetId)+camaAssetIdentifier+  = lens _camaAssetIdentifier+      (\ s a -> s{_camaAssetIdentifier = a})++-- | List of detected click tags for assets. This is a read-only+-- auto-generated field.+camaClickTags :: Lens' CreativeAssetMetadata [ClickTag]+camaClickTags+  = lens _camaClickTags+      (\ s a -> s{_camaClickTags = a})+      . _Default+      . _Coerce++-- | Rules validated during code generation that generated a warning. This is+-- a read-only, auto-generated field. Possible values are: -+-- \"ADMOB_REFERENCED\" - \"ASSET_FORMAT_UNSUPPORTED_DCM\" -+-- \"ASSET_INVALID\" - \"CLICK_TAG_HARD_CODED\" - \"CLICK_TAG_INVALID\" -+-- \"CLICK_TAG_IN_GWD\" - \"CLICK_TAG_MISSING\" -+-- \"CLICK_TAG_MORE_THAN_ONE\" - \"CLICK_TAG_NON_TOP_LEVEL\" -+-- \"COMPONENT_UNSUPPORTED_DCM\" - \"ENABLER_UNSUPPORTED_METHOD_DCM\" -+-- \"EXTERNAL_FILE_REFERENCED\" - \"FILE_DETAIL_EMPTY\" -+-- \"FILE_TYPE_INVALID\" - \"GWD_PROPERTIES_INVALID\" -+-- \"HTML5_FEATURE_UNSUPPORTED\" - \"LINKED_FILE_NOT_FOUND\" -+-- \"MAX_FLASH_VERSION_11\" - \"MRAID_REFERENCED\" - \"NOT_SSL_COMPLIANT\"+-- - \"ORPHANED_ASSET\" - \"PRIMARY_HTML_MISSING\" - \"SVG_INVALID\" -+-- \"ZIP_INVALID\"+camaWarnedValidationRules :: Lens' CreativeAssetMetadata [CreativeAssetMetadataWarnedValidationRulesItem]+camaWarnedValidationRules+  = lens _camaWarnedValidationRules+      (\ s a -> s{_camaWarnedValidationRules = a})+      . _Default+      . _Coerce++-- | List of feature dependencies for the creative asset that are detected by+-- DCM. Feature dependencies are features that a browser must be able to+-- support in order to render your HTML5 creative correctly. This is a+-- read-only, auto-generated field.+camaDetectedFeatures :: Lens' CreativeAssetMetadata [CreativeAssetMetadataDetectedFeaturesItem]+camaDetectedFeatures+  = lens _camaDetectedFeatures+      (\ s a -> s{_camaDetectedFeatures = a})+      . _Default+      . _Coerce++instance FromJSON CreativeAssetMetadata where+        parseJSON+          = withObject "CreativeAssetMetadata"+              (\ o ->+                 CreativeAssetMetadata' <$>+                   (o .:? "kind" .!=+                      "dfareporting#creativeAssetMetadata")+                     <*> (o .:? "assetIdentifier")+                     <*> (o .:? "clickTags" .!= mempty)+                     <*> (o .:? "warnedValidationRules" .!= mempty)+                     <*> (o .:? "detectedFeatures" .!= mempty))++instance ToJSON CreativeAssetMetadata where+        toJSON CreativeAssetMetadata'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _camaKind),+                  ("assetIdentifier" .=) <$> _camaAssetIdentifier,+                  ("clickTags" .=) <$> _camaClickTags,+                  ("warnedValidationRules" .=) <$>+                    _camaWarnedValidationRules,+                  ("detectedFeatures" .=) <$> _camaDetectedFeatures])++-- | Omniture Integration Settings.+--+-- /See:/ 'omnitureSettings' smart constructor.+data OmnitureSettings = OmnitureSettings'+    { _osOmnitureCostDataEnabled    :: !(Maybe Bool)+    , _osOmnitureIntegrationEnabled :: !(Maybe Bool)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'OmnitureSettings' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'osOmnitureCostDataEnabled'+--+-- * 'osOmnitureIntegrationEnabled'+omnitureSettings+    :: OmnitureSettings+omnitureSettings =+    OmnitureSettings'+    { _osOmnitureCostDataEnabled = Nothing+    , _osOmnitureIntegrationEnabled = Nothing+    }++-- | Whether placement cost data will be sent to Omniture. This property can+-- be enabled only if omnitureIntegrationEnabled is true.+osOmnitureCostDataEnabled :: Lens' OmnitureSettings (Maybe Bool)+osOmnitureCostDataEnabled+  = lens _osOmnitureCostDataEnabled+      (\ s a -> s{_osOmnitureCostDataEnabled = a})++-- | Whether Omniture integration is enabled. This property can be enabled+-- only when the \"Advanced Ad Serving\" account setting is enabled.+osOmnitureIntegrationEnabled :: Lens' OmnitureSettings (Maybe Bool)+osOmnitureIntegrationEnabled+  = lens _osOmnitureIntegrationEnabled+      (\ s a -> s{_osOmnitureIntegrationEnabled = a})++instance FromJSON OmnitureSettings where+        parseJSON+          = withObject "OmnitureSettings"+              (\ o ->+                 OmnitureSettings' <$>+                   (o .:? "omnitureCostDataEnabled") <*>+                     (o .:? "omnitureIntegrationEnabled"))++instance ToJSON OmnitureSettings where+        toJSON OmnitureSettings'{..}+          = object+              (catMaybes+                 [("omnitureCostDataEnabled" .=) <$>+                    _osOmnitureCostDataEnabled,+                  ("omnitureIntegrationEnabled" .=) <$>+                    _osOmnitureIntegrationEnabled])++-- | Contains information about an internet connection type that can be+-- targeted by ads. Clients can use the connection type to target mobile+-- vs. broadband users.+--+-- /See:/ 'connectionType' smart constructor.+data ConnectionType = ConnectionType'+    { _cttKind :: !Text+    , _cttName :: !(Maybe Text)+    , _cttId   :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ConnectionType' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cttKind'+--+-- * 'cttName'+--+-- * 'cttId'+connectionType+    :: ConnectionType+connectionType =+    ConnectionType'+    { _cttKind = "dfareporting#connectionType"+    , _cttName = Nothing+    , _cttId = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#connectionType\".+cttKind :: Lens' ConnectionType Text+cttKind = lens _cttKind (\ s a -> s{_cttKind = a})++-- | Name of this connection type.+cttName :: Lens' ConnectionType (Maybe Text)+cttName = lens _cttName (\ s a -> s{_cttName = a})++-- | ID of this connection type.+cttId :: Lens' ConnectionType (Maybe Int64)+cttId+  = lens _cttId (\ s a -> s{_cttId = a}) .+      mapping _Coerce++instance FromJSON ConnectionType where+        parseJSON+          = withObject "ConnectionType"+              (\ o ->+                 ConnectionType' <$>+                   (o .:? "kind" .!= "dfareporting#connectionType") <*>+                     (o .:? "name")+                     <*> (o .:? "id"))++instance ToJSON ConnectionType where+        toJSON ConnectionType'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _cttKind), ("name" .=) <$> _cttName,+                  ("id" .=) <$> _cttId])++-- | Contains properties of a package or roadblock.+--+-- /See:/ 'placementGroup' smart constructor.+data PlacementGroup = PlacementGroup'+    { _plalPlacementStrategyId              :: !(Maybe (Textual Int64))+    , _plalSiteIdDimensionValue             :: !(Maybe DimensionValue)+    , _plalPricingSchedule                  :: !(Maybe PricingSchedule)+    , _plalKind                             :: !Text+    , _plalCampaignIdDimensionValue         :: !(Maybe DimensionValue)+    , _plalAdvertiserId                     :: !(Maybe (Textual Int64))+    , _plalAdvertiserIdDimensionValue       :: !(Maybe DimensionValue)+    , _plalCampaignId                       :: !(Maybe (Textual Int64))+    , _plalIdDimensionValue                 :: !(Maybe DimensionValue)+    , _plalPlacementGroupType               :: !(Maybe PlacementGroupPlacementGroupType)+    , _plalContentCategoryId                :: !(Maybe (Textual Int64))+    , _plalDirectorySiteIdDimensionValue    :: !(Maybe DimensionValue)+    , _plalAccountId                        :: !(Maybe (Textual Int64))+    , _plalName                             :: !(Maybe Text)+    , _plalDirectorySiteId                  :: !(Maybe (Textual Int64))+    , _plalCreateInfo                       :: !(Maybe LastModifiedInfo)+    , _plalChildPlacementIds                :: !(Maybe [Textual Int64])+    , _plalLastModifiedInfo                 :: !(Maybe LastModifiedInfo)+    , _plalId                               :: !(Maybe (Textual Int64))+    , _plalPrimaryPlacementId               :: !(Maybe (Textual Int64))+    , _plalSubAccountId                     :: !(Maybe (Textual Int64))+    , _plalExternalId                       :: !(Maybe Text)+    , _plalComment                          :: !(Maybe Text)+    , _plalPrimaryPlacementIdDimensionValue :: !(Maybe DimensionValue)+    , _plalSiteId                           :: !(Maybe (Textual Int64))+    , _plalArchived                         :: !(Maybe Bool)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'PlacementGroup' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'plalPlacementStrategyId'+--+-- * 'plalSiteIdDimensionValue'+--+-- * 'plalPricingSchedule'+--+-- * 'plalKind'+--+-- * 'plalCampaignIdDimensionValue'+--+-- * 'plalAdvertiserId'+--+-- * 'plalAdvertiserIdDimensionValue'+--+-- * 'plalCampaignId'+--+-- * 'plalIdDimensionValue'+--+-- * 'plalPlacementGroupType'+--+-- * 'plalContentCategoryId'+--+-- * 'plalDirectorySiteIdDimensionValue'+--+-- * 'plalAccountId'+--+-- * 'plalName'+--+-- * 'plalDirectorySiteId'+--+-- * 'plalCreateInfo'+--+-- * 'plalChildPlacementIds'+--+-- * 'plalLastModifiedInfo'+--+-- * 'plalId'+--+-- * 'plalPrimaryPlacementId'+--+-- * 'plalSubAccountId'+--+-- * 'plalExternalId'+--+-- * 'plalComment'+--+-- * 'plalPrimaryPlacementIdDimensionValue'+--+-- * 'plalSiteId'+--+-- * 'plalArchived'+placementGroup+    :: PlacementGroup+placementGroup =+    PlacementGroup'+    { _plalPlacementStrategyId = Nothing+    , _plalSiteIdDimensionValue = Nothing+    , _plalPricingSchedule = Nothing+    , _plalKind = "dfareporting#placementGroup"+    , _plalCampaignIdDimensionValue = Nothing+    , _plalAdvertiserId = Nothing+    , _plalAdvertiserIdDimensionValue = Nothing+    , _plalCampaignId = Nothing+    , _plalIdDimensionValue = Nothing+    , _plalPlacementGroupType = Nothing+    , _plalContentCategoryId = Nothing+    , _plalDirectorySiteIdDimensionValue = Nothing+    , _plalAccountId = Nothing+    , _plalName = Nothing+    , _plalDirectorySiteId = Nothing+    , _plalCreateInfo = Nothing+    , _plalChildPlacementIds = Nothing+    , _plalLastModifiedInfo = Nothing+    , _plalId = Nothing+    , _plalPrimaryPlacementId = Nothing+    , _plalSubAccountId = Nothing+    , _plalExternalId = Nothing+    , _plalComment = Nothing+    , _plalPrimaryPlacementIdDimensionValue = Nothing+    , _plalSiteId = Nothing+    , _plalArchived = Nothing+    }++-- | ID of the placement strategy assigned to this placement group.+plalPlacementStrategyId :: Lens' PlacementGroup (Maybe Int64)+plalPlacementStrategyId+  = lens _plalPlacementStrategyId+      (\ s a -> s{_plalPlacementStrategyId = a})+      . mapping _Coerce++-- | Dimension value for the ID of the site. This is a read-only,+-- auto-generated field.+plalSiteIdDimensionValue :: Lens' PlacementGroup (Maybe DimensionValue)+plalSiteIdDimensionValue+  = lens _plalSiteIdDimensionValue+      (\ s a -> s{_plalSiteIdDimensionValue = a})++-- | Pricing schedule of this placement group. This field is required on+-- insertion.+plalPricingSchedule :: Lens' PlacementGroup (Maybe PricingSchedule)+plalPricingSchedule+  = lens _plalPricingSchedule+      (\ s a -> s{_plalPricingSchedule = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#placementGroup\".+plalKind :: Lens' PlacementGroup Text+plalKind = lens _plalKind (\ s a -> s{_plalKind = a})++-- | Dimension value for the ID of the campaign. This is a read-only,+-- auto-generated field.+plalCampaignIdDimensionValue :: Lens' PlacementGroup (Maybe DimensionValue)+plalCampaignIdDimensionValue+  = lens _plalCampaignIdDimensionValue+      (\ s a -> s{_plalCampaignIdDimensionValue = a})++-- | Advertiser ID of this placement group. This is a required field on+-- insertion.+plalAdvertiserId :: Lens' PlacementGroup (Maybe Int64)+plalAdvertiserId+  = lens _plalAdvertiserId+      (\ s a -> s{_plalAdvertiserId = a})+      . mapping _Coerce++-- | Dimension value for the ID of the advertiser. This is a read-only,+-- auto-generated field.+plalAdvertiserIdDimensionValue :: Lens' PlacementGroup (Maybe DimensionValue)+plalAdvertiserIdDimensionValue+  = lens _plalAdvertiserIdDimensionValue+      (\ s a -> s{_plalAdvertiserIdDimensionValue = a})++-- | Campaign ID of this placement group. This field is required on+-- insertion.+plalCampaignId :: Lens' PlacementGroup (Maybe Int64)+plalCampaignId+  = lens _plalCampaignId+      (\ s a -> s{_plalCampaignId = a})+      . mapping _Coerce++-- | Dimension value for the ID of this placement group. This is a read-only,+-- auto-generated field.+plalIdDimensionValue :: Lens' PlacementGroup (Maybe DimensionValue)+plalIdDimensionValue+  = lens _plalIdDimensionValue+      (\ s a -> s{_plalIdDimensionValue = a})++-- | Type of this placement group. A package is a simple group of placements+-- that acts as a single pricing point for a group of tags. A roadblock is+-- a group of placements that not only acts as a single pricing point, but+-- also assumes that all the tags in it will be served at the same time. A+-- roadblock requires one of its assigned placements to be marked as+-- primary for reporting. This field is required on insertion.+plalPlacementGroupType :: Lens' PlacementGroup (Maybe PlacementGroupPlacementGroupType)+plalPlacementGroupType+  = lens _plalPlacementGroupType+      (\ s a -> s{_plalPlacementGroupType = a})++-- | ID of the content category assigned to this placement group.+plalContentCategoryId :: Lens' PlacementGroup (Maybe Int64)+plalContentCategoryId+  = lens _plalContentCategoryId+      (\ s a -> s{_plalContentCategoryId = a})+      . mapping _Coerce++-- | Dimension value for the ID of the directory site. This is a read-only,+-- auto-generated field.+plalDirectorySiteIdDimensionValue :: Lens' PlacementGroup (Maybe DimensionValue)+plalDirectorySiteIdDimensionValue+  = lens _plalDirectorySiteIdDimensionValue+      (\ s a -> s{_plalDirectorySiteIdDimensionValue = a})++-- | Account ID of this placement group. This is a read-only field that can+-- be left blank.+plalAccountId :: Lens' PlacementGroup (Maybe Int64)+plalAccountId+  = lens _plalAccountId+      (\ s a -> s{_plalAccountId = a})+      . mapping _Coerce++-- | Name of this placement group. This is a required field and must be less+-- than 256 characters long.+plalName :: Lens' PlacementGroup (Maybe Text)+plalName = lens _plalName (\ s a -> s{_plalName = a})++-- | Directory site ID associated with this placement group. On insert, you+-- must set either this field or the site_id field to specify the site+-- associated with this placement group. This is a required field that is+-- read-only after insertion.+plalDirectorySiteId :: Lens' PlacementGroup (Maybe Int64)+plalDirectorySiteId+  = lens _plalDirectorySiteId+      (\ s a -> s{_plalDirectorySiteId = a})+      . mapping _Coerce++-- | Information about the creation of this placement group. This is a+-- read-only field.+plalCreateInfo :: Lens' PlacementGroup (Maybe LastModifiedInfo)+plalCreateInfo+  = lens _plalCreateInfo+      (\ s a -> s{_plalCreateInfo = a})++-- | IDs of placements which are assigned to this placement group. This is a+-- read-only, auto-generated field.+plalChildPlacementIds :: Lens' PlacementGroup [Int64]+plalChildPlacementIds+  = lens _plalChildPlacementIds+      (\ s a -> s{_plalChildPlacementIds = a})+      . _Default+      . _Coerce++-- | Information about the most recent modification of this placement group.+-- This is a read-only field.+plalLastModifiedInfo :: Lens' PlacementGroup (Maybe LastModifiedInfo)+plalLastModifiedInfo+  = lens _plalLastModifiedInfo+      (\ s a -> s{_plalLastModifiedInfo = a})++-- | ID of this placement group. This is a read-only, auto-generated field.+plalId :: Lens' PlacementGroup (Maybe Int64)+plalId+  = lens _plalId (\ s a -> s{_plalId = a}) .+      mapping _Coerce++-- | ID of the primary placement, used to calculate the media cost of a+-- roadblock (placement group). Modifying this field will automatically+-- modify the primary field on all affected roadblock child placements.+plalPrimaryPlacementId :: Lens' PlacementGroup (Maybe Int64)+plalPrimaryPlacementId+  = lens _plalPrimaryPlacementId+      (\ s a -> s{_plalPrimaryPlacementId = a})+      . mapping _Coerce++-- | Subaccount ID of this placement group. This is a read-only field that+-- can be left blank.+plalSubAccountId :: Lens' PlacementGroup (Maybe Int64)+plalSubAccountId+  = lens _plalSubAccountId+      (\ s a -> s{_plalSubAccountId = a})+      . mapping _Coerce++-- | External ID for this placement.+plalExternalId :: Lens' PlacementGroup (Maybe Text)+plalExternalId+  = lens _plalExternalId+      (\ s a -> s{_plalExternalId = a})++-- | Comments for this placement group.+plalComment :: Lens' PlacementGroup (Maybe Text)+plalComment+  = lens _plalComment (\ s a -> s{_plalComment = a})++-- | Dimension value for the ID of the primary placement. This is a+-- read-only, auto-generated field.+plalPrimaryPlacementIdDimensionValue :: Lens' PlacementGroup (Maybe DimensionValue)+plalPrimaryPlacementIdDimensionValue+  = lens _plalPrimaryPlacementIdDimensionValue+      (\ s a ->+         s{_plalPrimaryPlacementIdDimensionValue = a})++-- | Site ID associated with this placement group. On insert, you must set+-- either this field or the directorySiteId field to specify the site+-- associated with this placement group. This is a required field that is+-- read-only after insertion.+plalSiteId :: Lens' PlacementGroup (Maybe Int64)+plalSiteId+  = lens _plalSiteId (\ s a -> s{_plalSiteId = a}) .+      mapping _Coerce++-- | Whether this placement group is archived.+plalArchived :: Lens' PlacementGroup (Maybe Bool)+plalArchived+  = lens _plalArchived (\ s a -> s{_plalArchived = a})++instance FromJSON PlacementGroup where+        parseJSON+          = withObject "PlacementGroup"+              (\ o ->+                 PlacementGroup' <$>+                   (o .:? "placementStrategyId") <*>+                     (o .:? "siteIdDimensionValue")+                     <*> (o .:? "pricingSchedule")+                     <*> (o .:? "kind" .!= "dfareporting#placementGroup")+                     <*> (o .:? "campaignIdDimensionValue")+                     <*> (o .:? "advertiserId")+                     <*> (o .:? "advertiserIdDimensionValue")+                     <*> (o .:? "campaignId")+                     <*> (o .:? "idDimensionValue")+                     <*> (o .:? "placementGroupType")+                     <*> (o .:? "contentCategoryId")+                     <*> (o .:? "directorySiteIdDimensionValue")+                     <*> (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "directorySiteId")+                     <*> (o .:? "createInfo")+                     <*> (o .:? "childPlacementIds" .!= mempty)+                     <*> (o .:? "lastModifiedInfo")+                     <*> (o .:? "id")+                     <*> (o .:? "primaryPlacementId")+                     <*> (o .:? "subaccountId")+                     <*> (o .:? "externalId")+                     <*> (o .:? "comment")+                     <*> (o .:? "primaryPlacementIdDimensionValue")+                     <*> (o .:? "siteId")+                     <*> (o .:? "archived"))++instance ToJSON PlacementGroup where+        toJSON PlacementGroup'{..}+          = object+              (catMaybes+                 [("placementStrategyId" .=) <$>+                    _plalPlacementStrategyId,+                  ("siteIdDimensionValue" .=) <$>+                    _plalSiteIdDimensionValue,+                  ("pricingSchedule" .=) <$> _plalPricingSchedule,+                  Just ("kind" .= _plalKind),+                  ("campaignIdDimensionValue" .=) <$>+                    _plalCampaignIdDimensionValue,+                  ("advertiserId" .=) <$> _plalAdvertiserId,+                  ("advertiserIdDimensionValue" .=) <$>+                    _plalAdvertiserIdDimensionValue,+                  ("campaignId" .=) <$> _plalCampaignId,+                  ("idDimensionValue" .=) <$> _plalIdDimensionValue,+                  ("placementGroupType" .=) <$>+                    _plalPlacementGroupType,+                  ("contentCategoryId" .=) <$> _plalContentCategoryId,+                  ("directorySiteIdDimensionValue" .=) <$>+                    _plalDirectorySiteIdDimensionValue,+                  ("accountId" .=) <$> _plalAccountId,+                  ("name" .=) <$> _plalName,+                  ("directorySiteId" .=) <$> _plalDirectorySiteId,+                  ("createInfo" .=) <$> _plalCreateInfo,+                  ("childPlacementIds" .=) <$> _plalChildPlacementIds,+                  ("lastModifiedInfo" .=) <$> _plalLastModifiedInfo,+                  ("id" .=) <$> _plalId,+                  ("primaryPlacementId" .=) <$>+                    _plalPrimaryPlacementId,+                  ("subaccountId" .=) <$> _plalSubAccountId,+                  ("externalId" .=) <$> _plalExternalId,+                  ("comment" .=) <$> _plalComment,+                  ("primaryPlacementIdDimensionValue" .=) <$>+                    _plalPrimaryPlacementIdDimensionValue,+                  ("siteId" .=) <$> _plalSiteId,+                  ("archived" .=) <$> _plalArchived])++-- | Contains properties of an event tag.+--+-- /See:/ 'eventTag' smart constructor.+data EventTag = EventTag'+    { _etStatus                     :: !(Maybe EventTagStatus)+    , _etExcludeFromAdxRequests     :: !(Maybe Bool)+    , _etEnabledByDefault           :: !(Maybe Bool)+    , _etKind                       :: !Text+    , _etCampaignIdDimensionValue   :: !(Maybe DimensionValue)+    , _etAdvertiserId               :: !(Maybe (Textual Int64))+    , _etURL                        :: !(Maybe Text)+    , _etAdvertiserIdDimensionValue :: !(Maybe DimensionValue)+    , _etSSLCompliant               :: !(Maybe Bool)+    , _etCampaignId                 :: !(Maybe (Textual Int64))+    , _etAccountId                  :: !(Maybe (Textual Int64))+    , _etName                       :: !(Maybe Text)+    , _etURLEscapeLevels            :: !(Maybe (Textual Int32))+    , _etSiteIds                    :: !(Maybe [Textual Int64])+    , _etId                         :: !(Maybe (Textual Int64))+    , _etSubAccountId               :: !(Maybe (Textual Int64))+    , _etType                       :: !(Maybe EventTagType)+    , _etSiteFilterType             :: !(Maybe EventTagSiteFilterType)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'EventTag' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'etStatus'+--+-- * 'etExcludeFromAdxRequests'+--+-- * 'etEnabledByDefault'+--+-- * 'etKind'+--+-- * 'etCampaignIdDimensionValue'+--+-- * 'etAdvertiserId'+--+-- * 'etURL'+--+-- * 'etAdvertiserIdDimensionValue'+--+-- * 'etSSLCompliant'+--+-- * 'etCampaignId'+--+-- * 'etAccountId'+--+-- * 'etName'+--+-- * 'etURLEscapeLevels'+--+-- * 'etSiteIds'+--+-- * 'etId'+--+-- * 'etSubAccountId'+--+-- * 'etType'+--+-- * 'etSiteFilterType'+eventTag+    :: EventTag+eventTag =+    EventTag'+    { _etStatus = Nothing+    , _etExcludeFromAdxRequests = Nothing+    , _etEnabledByDefault = Nothing+    , _etKind = "dfareporting#eventTag"+    , _etCampaignIdDimensionValue = Nothing+    , _etAdvertiserId = Nothing+    , _etURL = Nothing+    , _etAdvertiserIdDimensionValue = Nothing+    , _etSSLCompliant = Nothing+    , _etCampaignId = Nothing+    , _etAccountId = Nothing+    , _etName = Nothing+    , _etURLEscapeLevels = Nothing+    , _etSiteIds = Nothing+    , _etId = Nothing+    , _etSubAccountId = Nothing+    , _etType = Nothing+    , _etSiteFilterType = Nothing+    }++-- | Status of this event tag. Must be ENABLED for this event tag to fire.+-- This is a required field.+etStatus :: Lens' EventTag (Maybe EventTagStatus)+etStatus = lens _etStatus (\ s a -> s{_etStatus = a})++-- | Whether to remove this event tag from ads that are trafficked through+-- DoubleClick Bid Manager to Ad Exchange. This may be useful if the event+-- tag uses a pixel that is unapproved for Ad Exchange bids on one or more+-- networks, such as the Google Display Network.+etExcludeFromAdxRequests :: Lens' EventTag (Maybe Bool)+etExcludeFromAdxRequests+  = lens _etExcludeFromAdxRequests+      (\ s a -> s{_etExcludeFromAdxRequests = a})++-- | Whether this event tag should be automatically enabled for all of the+-- advertiser\'s campaigns and ads.+etEnabledByDefault :: Lens' EventTag (Maybe Bool)+etEnabledByDefault+  = lens _etEnabledByDefault+      (\ s a -> s{_etEnabledByDefault = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#eventTag\".+etKind :: Lens' EventTag Text+etKind = lens _etKind (\ s a -> s{_etKind = a})++-- | Dimension value for the ID of the campaign. This is a read-only,+-- auto-generated field.+etCampaignIdDimensionValue :: Lens' EventTag (Maybe DimensionValue)+etCampaignIdDimensionValue+  = lens _etCampaignIdDimensionValue+      (\ s a -> s{_etCampaignIdDimensionValue = a})++-- | Advertiser ID of this event tag. This field or the campaignId field is+-- required on insertion.+etAdvertiserId :: Lens' EventTag (Maybe Int64)+etAdvertiserId+  = lens _etAdvertiserId+      (\ s a -> s{_etAdvertiserId = a})+      . mapping _Coerce++-- | Payload URL for this event tag. The URL on a click-through event tag+-- should have a landing page URL appended to the end of it. This field is+-- required on insertion.+etURL :: Lens' EventTag (Maybe Text)+etURL = lens _etURL (\ s a -> s{_etURL = a})++-- | Dimension value for the ID of the advertiser. This is a read-only,+-- auto-generated field.+etAdvertiserIdDimensionValue :: Lens' EventTag (Maybe DimensionValue)+etAdvertiserIdDimensionValue+  = lens _etAdvertiserIdDimensionValue+      (\ s a -> s{_etAdvertiserIdDimensionValue = a})++-- | Whether this tag is SSL-compliant or not. This is a read-only field.+etSSLCompliant :: Lens' EventTag (Maybe Bool)+etSSLCompliant+  = lens _etSSLCompliant+      (\ s a -> s{_etSSLCompliant = a})++-- | Campaign ID of this event tag. This field or the advertiserId field is+-- required on insertion.+etCampaignId :: Lens' EventTag (Maybe Int64)+etCampaignId+  = lens _etCampaignId (\ s a -> s{_etCampaignId = a})+      . mapping _Coerce++-- | Account ID of this event tag. This is a read-only field that can be left+-- blank.+etAccountId :: Lens' EventTag (Maybe Int64)+etAccountId+  = lens _etAccountId (\ s a -> s{_etAccountId = a}) .+      mapping _Coerce++-- | Name of this event tag. This is a required field and must be less than+-- 256 characters long.+etName :: Lens' EventTag (Maybe Text)+etName = lens _etName (\ s a -> s{_etName = a})++-- | Number of times the landing page URL should be URL-escaped before being+-- appended to the click-through event tag URL. Only applies to+-- click-through event tags as specified by the event tag type.+etURLEscapeLevels :: Lens' EventTag (Maybe Int32)+etURLEscapeLevels+  = lens _etURLEscapeLevels+      (\ s a -> s{_etURLEscapeLevels = a})+      . mapping _Coerce++-- | Filter list of site IDs associated with this event tag. The+-- siteFilterType determines whether this is a whitelist or blacklist+-- filter.+etSiteIds :: Lens' EventTag [Int64]+etSiteIds+  = lens _etSiteIds (\ s a -> s{_etSiteIds = a}) .+      _Default+      . _Coerce++-- | ID of this event tag. This is a read-only, auto-generated field.+etId :: Lens' EventTag (Maybe Int64)+etId+  = lens _etId (\ s a -> s{_etId = a}) .+      mapping _Coerce++-- | Subaccount ID of this event tag. This is a read-only field that can be+-- left blank.+etSubAccountId :: Lens' EventTag (Maybe Int64)+etSubAccountId+  = lens _etSubAccountId+      (\ s a -> s{_etSubAccountId = a})+      . mapping _Coerce++-- | Event tag type. Can be used to specify whether to use a third-party+-- pixel, a third-party JavaScript URL, or a third-party click-through URL+-- for either impression or click tracking. This is a required field.+etType :: Lens' EventTag (Maybe EventTagType)+etType = lens _etType (\ s a -> s{_etType = a})++-- | Site filter type for this event tag. If no type is specified then the+-- event tag will be applied to all sites.+etSiteFilterType :: Lens' EventTag (Maybe EventTagSiteFilterType)+etSiteFilterType+  = lens _etSiteFilterType+      (\ s a -> s{_etSiteFilterType = a})++instance FromJSON EventTag where+        parseJSON+          = withObject "EventTag"+              (\ o ->+                 EventTag' <$>+                   (o .:? "status") <*> (o .:? "excludeFromAdxRequests")+                     <*> (o .:? "enabledByDefault")+                     <*> (o .:? "kind" .!= "dfareporting#eventTag")+                     <*> (o .:? "campaignIdDimensionValue")+                     <*> (o .:? "advertiserId")+                     <*> (o .:? "url")+                     <*> (o .:? "advertiserIdDimensionValue")+                     <*> (o .:? "sslCompliant")+                     <*> (o .:? "campaignId")+                     <*> (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "urlEscapeLevels")+                     <*> (o .:? "siteIds" .!= mempty)+                     <*> (o .:? "id")+                     <*> (o .:? "subaccountId")+                     <*> (o .:? "type")+                     <*> (o .:? "siteFilterType"))++instance ToJSON EventTag where+        toJSON EventTag'{..}+          = object+              (catMaybes+                 [("status" .=) <$> _etStatus,+                  ("excludeFromAdxRequests" .=) <$>+                    _etExcludeFromAdxRequests,+                  ("enabledByDefault" .=) <$> _etEnabledByDefault,+                  Just ("kind" .= _etKind),+                  ("campaignIdDimensionValue" .=) <$>+                    _etCampaignIdDimensionValue,+                  ("advertiserId" .=) <$> _etAdvertiserId,+                  ("url" .=) <$> _etURL,+                  ("advertiserIdDimensionValue" .=) <$>+                    _etAdvertiserIdDimensionValue,+                  ("sslCompliant" .=) <$> _etSSLCompliant,+                  ("campaignId" .=) <$> _etCampaignId,+                  ("accountId" .=) <$> _etAccountId,+                  ("name" .=) <$> _etName,+                  ("urlEscapeLevels" .=) <$> _etURLEscapeLevels,+                  ("siteIds" .=) <$> _etSiteIds, ("id" .=) <$> _etId,+                  ("subaccountId" .=) <$> _etSubAccountId,+                  ("type" .=) <$> _etType,+                  ("siteFilterType" .=) <$> _etSiteFilterType])++-- | Contains properties of a user role permission.+--+-- /See:/ 'userRolePermission' smart constructor.+data UserRolePermission = UserRolePermission'+    { _useKind              :: !Text+    , _useAvailability      :: !(Maybe UserRolePermissionAvailability)+    , _useName              :: !(Maybe Text)+    , _useId                :: !(Maybe (Textual Int64))+    , _usePermissionGroupId :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'UserRolePermission' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'useKind'+--+-- * 'useAvailability'+--+-- * 'useName'+--+-- * 'useId'+--+-- * 'usePermissionGroupId'+userRolePermission+    :: UserRolePermission+userRolePermission =+    UserRolePermission'+    { _useKind = "dfareporting#userRolePermission"+    , _useAvailability = Nothing+    , _useName = Nothing+    , _useId = Nothing+    , _usePermissionGroupId = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#userRolePermission\".+useKind :: Lens' UserRolePermission Text+useKind = lens _useKind (\ s a -> s{_useKind = a})++-- | Levels of availability for a user role permission.+useAvailability :: Lens' UserRolePermission (Maybe UserRolePermissionAvailability)+useAvailability+  = lens _useAvailability+      (\ s a -> s{_useAvailability = a})++-- | Name of this user role permission.+useName :: Lens' UserRolePermission (Maybe Text)+useName = lens _useName (\ s a -> s{_useName = a})++-- | ID of this user role permission.+useId :: Lens' UserRolePermission (Maybe Int64)+useId+  = lens _useId (\ s a -> s{_useId = a}) .+      mapping _Coerce++-- | ID of the permission group that this user role permission belongs to.+usePermissionGroupId :: Lens' UserRolePermission (Maybe Int64)+usePermissionGroupId+  = lens _usePermissionGroupId+      (\ s a -> s{_usePermissionGroupId = a})+      . mapping _Coerce++instance FromJSON UserRolePermission where+        parseJSON+          = withObject "UserRolePermission"+              (\ o ->+                 UserRolePermission' <$>+                   (o .:? "kind" .!= "dfareporting#userRolePermission")+                     <*> (o .:? "availability")+                     <*> (o .:? "name")+                     <*> (o .:? "id")+                     <*> (o .:? "permissionGroupId"))++instance ToJSON UserRolePermission where+        toJSON UserRolePermission'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _useKind),+                  ("availability" .=) <$> _useAvailability,+                  ("name" .=) <$> _useName, ("id" .=) <$> _useId,+                  ("permissionGroupId" .=) <$> _usePermissionGroupId])++-- | Contact of an order.+--+-- /See:/ 'orderContact' smart constructor.+data OrderContact = OrderContact'+    { _ocSignatureUserProFileId :: !(Maybe (Textual Int64))+    , _ocContactName            :: !(Maybe Text)+    , _ocContactTitle           :: !(Maybe Text)+    , _ocContactType            :: !(Maybe OrderContactContactType)+    , _ocContactInfo            :: !(Maybe Text)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'OrderContact' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ocSignatureUserProFileId'+--+-- * 'ocContactName'+--+-- * 'ocContactTitle'+--+-- * 'ocContactType'+--+-- * 'ocContactInfo'+orderContact+    :: OrderContact+orderContact =+    OrderContact'+    { _ocSignatureUserProFileId = Nothing+    , _ocContactName = Nothing+    , _ocContactTitle = Nothing+    , _ocContactType = Nothing+    , _ocContactInfo = Nothing+    }++-- | ID of the user profile containing the signature that will be embedded+-- into order documents.+ocSignatureUserProFileId :: Lens' OrderContact (Maybe Int64)+ocSignatureUserProFileId+  = lens _ocSignatureUserProFileId+      (\ s a -> s{_ocSignatureUserProFileId = a})+      . mapping _Coerce++-- | Name of this contact.+ocContactName :: Lens' OrderContact (Maybe Text)+ocContactName+  = lens _ocContactName+      (\ s a -> s{_ocContactName = a})++-- | Title of this contact.+ocContactTitle :: Lens' OrderContact (Maybe Text)+ocContactTitle+  = lens _ocContactTitle+      (\ s a -> s{_ocContactTitle = a})++-- | Type of this contact.+ocContactType :: Lens' OrderContact (Maybe OrderContactContactType)+ocContactType+  = lens _ocContactType+      (\ s a -> s{_ocContactType = a})++-- | Free-form information about this contact. It could be any information+-- related to this contact in addition to type, title, name, and signature+-- user profile ID.+ocContactInfo :: Lens' OrderContact (Maybe Text)+ocContactInfo+  = lens _ocContactInfo+      (\ s a -> s{_ocContactInfo = a})++instance FromJSON OrderContact where+        parseJSON+          = withObject "OrderContact"+              (\ o ->+                 OrderContact' <$>+                   (o .:? "signatureUserProfileId") <*>+                     (o .:? "contactName")+                     <*> (o .:? "contactTitle")+                     <*> (o .:? "contactType")+                     <*> (o .:? "contactInfo"))++instance ToJSON OrderContact where+        toJSON OrderContact'{..}+          = object+              (catMaybes+                 [("signatureUserProfileId" .=) <$>+                    _ocSignatureUserProFileId,+                  ("contactName" .=) <$> _ocContactName,+                  ("contactTitle" .=) <$> _ocContactTitle,+                  ("contactType" .=) <$> _ocContactType,+                  ("contactInfo" .=) <$> _ocContactInfo])++-- | Floodlight Activity GenerateTag Response+--+-- /See:/ 'floodlightActivitiesGenerateTagResponse' smart constructor.+data FloodlightActivitiesGenerateTagResponse = FloodlightActivitiesGenerateTagResponse'+    { _fagtrFloodlightActivityTag :: !(Maybe Text)+    , _fagtrKind                  :: !Text+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'FloodlightActivitiesGenerateTagResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'fagtrFloodlightActivityTag'+--+-- * 'fagtrKind'+floodlightActivitiesGenerateTagResponse+    :: FloodlightActivitiesGenerateTagResponse+floodlightActivitiesGenerateTagResponse =+    FloodlightActivitiesGenerateTagResponse'+    { _fagtrFloodlightActivityTag = Nothing+    , _fagtrKind = "dfareporting#floodlightActivitiesGenerateTagResponse"+    }++-- | Generated tag for this floodlight activity.+fagtrFloodlightActivityTag :: Lens' FloodlightActivitiesGenerateTagResponse (Maybe Text)+fagtrFloodlightActivityTag+  = lens _fagtrFloodlightActivityTag+      (\ s a -> s{_fagtrFloodlightActivityTag = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#floodlightActivitiesGenerateTagResponse\".+fagtrKind :: Lens' FloodlightActivitiesGenerateTagResponse Text+fagtrKind+  = lens _fagtrKind (\ s a -> s{_fagtrKind = a})++instance FromJSON+         FloodlightActivitiesGenerateTagResponse where+        parseJSON+          = withObject+              "FloodlightActivitiesGenerateTagResponse"+              (\ o ->+                 FloodlightActivitiesGenerateTagResponse' <$>+                   (o .:? "floodlightActivityTag") <*>+                     (o .:? "kind" .!=+                        "dfareporting#floodlightActivitiesGenerateTagResponse"))++instance ToJSON+         FloodlightActivitiesGenerateTagResponse where+        toJSON FloodlightActivitiesGenerateTagResponse'{..}+          = object+              (catMaybes+                 [("floodlightActivityTag" .=) <$>+                    _fagtrFloodlightActivityTag,+                  Just ("kind" .= _fagtrKind)])++-- | Directory Site Contact Assignment+--+-- /See:/ 'directorySiteContactAssignment' smart constructor.+data DirectorySiteContactAssignment = DirectorySiteContactAssignment'+    { _dscaVisibility :: !(Maybe DirectorySiteContactAssignmentVisibility)+    , _dscaContactId  :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DirectorySiteContactAssignment' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dscaVisibility'+--+-- * 'dscaContactId'+directorySiteContactAssignment+    :: DirectorySiteContactAssignment+directorySiteContactAssignment =+    DirectorySiteContactAssignment'+    { _dscaVisibility = Nothing+    , _dscaContactId = Nothing+    }++-- | Visibility of this directory site contact assignment. When set to PUBLIC+-- this contact assignment is visible to all account and agency users; when+-- set to PRIVATE it is visible only to the site.+dscaVisibility :: Lens' DirectorySiteContactAssignment (Maybe DirectorySiteContactAssignmentVisibility)+dscaVisibility+  = lens _dscaVisibility+      (\ s a -> s{_dscaVisibility = a})++-- | ID of this directory site contact. This is a read-only, auto-generated+-- field.+dscaContactId :: Lens' DirectorySiteContactAssignment (Maybe Int64)+dscaContactId+  = lens _dscaContactId+      (\ s a -> s{_dscaContactId = a})+      . mapping _Coerce++instance FromJSON DirectorySiteContactAssignment+         where+        parseJSON+          = withObject "DirectorySiteContactAssignment"+              (\ o ->+                 DirectorySiteContactAssignment' <$>+                   (o .:? "visibility") <*> (o .:? "contactId"))++instance ToJSON DirectorySiteContactAssignment where+        toJSON DirectorySiteContactAssignment'{..}+          = object+              (catMaybes+                 [("visibility" .=) <$> _dscaVisibility,+                  ("contactId" .=) <$> _dscaContactId])++-- | Ad Slot+--+-- /See:/ 'adSlot' smart constructor.+data AdSlot = AdSlot'+    { _assHeight            :: !(Maybe (Textual Int64))+    , _assPaymentSourceType :: !(Maybe AdSlotPaymentSourceType)+    , _assLinkedPlacementId :: !(Maybe (Textual Int64))+    , _assWidth             :: !(Maybe (Textual Int64))+    , _assPrimary           :: !(Maybe Bool)+    , _assName              :: !(Maybe Text)+    , _assComment           :: !(Maybe Text)+    , _assCompatibility     :: !(Maybe AdSlotCompatibility)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'AdSlot' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'assHeight'+--+-- * 'assPaymentSourceType'+--+-- * 'assLinkedPlacementId'+--+-- * 'assWidth'+--+-- * 'assPrimary'+--+-- * 'assName'+--+-- * 'assComment'+--+-- * 'assCompatibility'+adSlot+    :: AdSlot+adSlot =+    AdSlot'+    { _assHeight = Nothing+    , _assPaymentSourceType = Nothing+    , _assLinkedPlacementId = Nothing+    , _assWidth = Nothing+    , _assPrimary = Nothing+    , _assName = Nothing+    , _assComment = Nothing+    , _assCompatibility = Nothing+    }++-- | Height of this ad slot.+assHeight :: Lens' AdSlot (Maybe Int64)+assHeight+  = lens _assHeight (\ s a -> s{_assHeight = a}) .+      mapping _Coerce++-- | Payment source type of this ad slot.+assPaymentSourceType :: Lens' AdSlot (Maybe AdSlotPaymentSourceType)+assPaymentSourceType+  = lens _assPaymentSourceType+      (\ s a -> s{_assPaymentSourceType = a})++-- | ID of the placement from an external platform that is linked to this ad+-- slot.+assLinkedPlacementId :: Lens' AdSlot (Maybe Int64)+assLinkedPlacementId+  = lens _assLinkedPlacementId+      (\ s a -> s{_assLinkedPlacementId = a})+      . mapping _Coerce++-- | Width of this ad slot.+assWidth :: Lens' AdSlot (Maybe Int64)+assWidth+  = lens _assWidth (\ s a -> s{_assWidth = a}) .+      mapping _Coerce++-- | Primary ad slot of a roadblock inventory item.+assPrimary :: Lens' AdSlot (Maybe Bool)+assPrimary+  = lens _assPrimary (\ s a -> s{_assPrimary = a})++-- | Name of this ad slot.+assName :: Lens' AdSlot (Maybe Text)+assName = lens _assName (\ s a -> s{_assName = a})++-- | Comment for this ad slot.+assComment :: Lens' AdSlot (Maybe Text)+assComment+  = lens _assComment (\ s a -> s{_assComment = a})++-- | Ad slot compatibility. DISPLAY and DISPLAY_INTERSTITIAL refer to+-- rendering either on desktop, mobile devices or in mobile apps for+-- regular or interstitial ads respectively. APP and APP_INTERSTITIAL are+-- for rendering in mobile apps. IN_STREAM_VIDEO refers to rendering in+-- in-stream video ads developed with the VAST standard.+assCompatibility :: Lens' AdSlot (Maybe AdSlotCompatibility)+assCompatibility+  = lens _assCompatibility+      (\ s a -> s{_assCompatibility = a})++instance FromJSON AdSlot where+        parseJSON+          = withObject "AdSlot"+              (\ o ->+                 AdSlot' <$>+                   (o .:? "height") <*> (o .:? "paymentSourceType") <*>+                     (o .:? "linkedPlacementId")+                     <*> (o .:? "width")+                     <*> (o .:? "primary")+                     <*> (o .:? "name")+                     <*> (o .:? "comment")+                     <*> (o .:? "compatibility"))++instance ToJSON AdSlot where+        toJSON AdSlot'{..}+          = object+              (catMaybes+                 [("height" .=) <$> _assHeight,+                  ("paymentSourceType" .=) <$> _assPaymentSourceType,+                  ("linkedPlacementId" .=) <$> _assLinkedPlacementId,+                  ("width" .=) <$> _assWidth,+                  ("primary" .=) <$> _assPrimary,+                  ("name" .=) <$> _assName,+                  ("comment" .=) <$> _assComment,+                  ("compatibility" .=) <$> _assCompatibility])++-- | Third-party Tracking URL.+--+-- /See:/ 'thirdPartyTrackingURL' smart constructor.+data ThirdPartyTrackingURL = ThirdPartyTrackingURL'+    { _tptuURL               :: !(Maybe Text)+    , _tptuThirdPartyURLType :: !(Maybe ThirdPartyTrackingURLThirdPartyURLType)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ThirdPartyTrackingURL' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'tptuURL'+--+-- * 'tptuThirdPartyURLType'+thirdPartyTrackingURL+    :: ThirdPartyTrackingURL+thirdPartyTrackingURL =+    ThirdPartyTrackingURL'+    { _tptuURL = Nothing+    , _tptuThirdPartyURLType = Nothing+    }++-- | URL for the specified third-party URL type.+tptuURL :: Lens' ThirdPartyTrackingURL (Maybe Text)+tptuURL = lens _tptuURL (\ s a -> s{_tptuURL = a})++-- | Third-party URL type for in-stream video creatives.+tptuThirdPartyURLType :: Lens' ThirdPartyTrackingURL (Maybe ThirdPartyTrackingURLThirdPartyURLType)+tptuThirdPartyURLType+  = lens _tptuThirdPartyURLType+      (\ s a -> s{_tptuThirdPartyURLType = a})++instance FromJSON ThirdPartyTrackingURL where+        parseJSON+          = withObject "ThirdPartyTrackingURL"+              (\ o ->+                 ThirdPartyTrackingURL' <$>+                   (o .:? "url") <*> (o .:? "thirdPartyUrlType"))++instance ToJSON ThirdPartyTrackingURL where+        toJSON ThirdPartyTrackingURL'{..}+          = object+              (catMaybes+                 [("url" .=) <$> _tptuURL,+                  ("thirdPartyUrlType" .=) <$> _tptuThirdPartyURLType])++-- | Contains properties of a DoubleClick Planning order document.+--+-- /See:/ 'orderDocument' smart constructor.+data OrderDocument = OrderDocument'+    { _odSigned                   :: !(Maybe Bool)+    , _odKind                     :: !Text+    , _odAdvertiserId             :: !(Maybe (Textual Int64))+    , _odLastSentTime             :: !(Maybe DateTime')+    , _odAmendedOrderDocumentId   :: !(Maybe (Textual Int64))+    , _odLastSentRecipients       :: !(Maybe [Text])+    , _odEffectiveDate            :: !(Maybe Date')+    , _odApprovedByUserProFileIds :: !(Maybe [Textual Int64])+    , _odAccountId                :: !(Maybe (Textual Int64))+    , _odId                       :: !(Maybe (Textual Int64))+    , _odProjectId                :: !(Maybe (Textual Int64))+    , _odTitle                    :: !(Maybe Text)+    , _odSubAccountId             :: !(Maybe (Textual Int64))+    , _odType                     :: !(Maybe OrderDocumentType)+    , _odOrderId                  :: !(Maybe (Textual Int64))+    , _odCancelled                :: !(Maybe Bool)+    , _odCreatedInfo              :: !(Maybe LastModifiedInfo)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'OrderDocument' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'odSigned'+--+-- * 'odKind'+--+-- * 'odAdvertiserId'+--+-- * 'odLastSentTime'+--+-- * 'odAmendedOrderDocumentId'+--+-- * 'odLastSentRecipients'+--+-- * 'odEffectiveDate'+--+-- * 'odApprovedByUserProFileIds'+--+-- * 'odAccountId'+--+-- * 'odId'+--+-- * 'odProjectId'+--+-- * 'odTitle'+--+-- * 'odSubAccountId'+--+-- * 'odType'+--+-- * 'odOrderId'+--+-- * 'odCancelled'+--+-- * 'odCreatedInfo'+orderDocument+    :: OrderDocument+orderDocument =+    OrderDocument'+    { _odSigned = Nothing+    , _odKind = "dfareporting#orderDocument"+    , _odAdvertiserId = Nothing+    , _odLastSentTime = Nothing+    , _odAmendedOrderDocumentId = Nothing+    , _odLastSentRecipients = Nothing+    , _odEffectiveDate = Nothing+    , _odApprovedByUserProFileIds = Nothing+    , _odAccountId = Nothing+    , _odId = Nothing+    , _odProjectId = Nothing+    , _odTitle = Nothing+    , _odSubAccountId = Nothing+    , _odType = Nothing+    , _odOrderId = Nothing+    , _odCancelled = Nothing+    , _odCreatedInfo = Nothing+    }++-- | Whether this order document has been signed.+odSigned :: Lens' OrderDocument (Maybe Bool)+odSigned = lens _odSigned (\ s a -> s{_odSigned = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#orderDocument\".+odKind :: Lens' OrderDocument Text+odKind = lens _odKind (\ s a -> s{_odKind = a})++-- | Advertiser ID of this order document.+odAdvertiserId :: Lens' OrderDocument (Maybe Int64)+odAdvertiserId+  = lens _odAdvertiserId+      (\ s a -> s{_odAdvertiserId = a})+      . mapping _Coerce++-- | Timestamp of the last email sent with this order document.+odLastSentTime :: Lens' OrderDocument (Maybe UTCTime)+odLastSentTime+  = lens _odLastSentTime+      (\ s a -> s{_odLastSentTime = a})+      . mapping _DateTime++-- | The amended order document ID of this order document. An order document+-- can be created by optionally amending another order document so that the+-- change history can be preserved.+odAmendedOrderDocumentId :: Lens' OrderDocument (Maybe Int64)+odAmendedOrderDocumentId+  = lens _odAmendedOrderDocumentId+      (\ s a -> s{_odAmendedOrderDocumentId = a})+      . mapping _Coerce++-- | List of email addresses that received the last sent document.+odLastSentRecipients :: Lens' OrderDocument [Text]+odLastSentRecipients+  = lens _odLastSentRecipients+      (\ s a -> s{_odLastSentRecipients = a})+      . _Default+      . _Coerce++-- | Effective date of this order document.+odEffectiveDate :: Lens' OrderDocument (Maybe Day)+odEffectiveDate+  = lens _odEffectiveDate+      (\ s a -> s{_odEffectiveDate = a})+      . mapping _Date++-- | IDs of users who have approved this order document.+odApprovedByUserProFileIds :: Lens' OrderDocument [Int64]+odApprovedByUserProFileIds+  = lens _odApprovedByUserProFileIds+      (\ s a -> s{_odApprovedByUserProFileIds = a})+      . _Default+      . _Coerce++-- | Account ID of this order document.+odAccountId :: Lens' OrderDocument (Maybe Int64)+odAccountId+  = lens _odAccountId (\ s a -> s{_odAccountId = a}) .+      mapping _Coerce++-- | ID of this order document.+odId :: Lens' OrderDocument (Maybe Int64)+odId+  = lens _odId (\ s a -> s{_odId = a}) .+      mapping _Coerce++-- | Project ID of this order document.+odProjectId :: Lens' OrderDocument (Maybe Int64)+odProjectId+  = lens _odProjectId (\ s a -> s{_odProjectId = a}) .+      mapping _Coerce++-- | Title of this order document.+odTitle :: Lens' OrderDocument (Maybe Text)+odTitle = lens _odTitle (\ s a -> s{_odTitle = a})++-- | Subaccount ID of this order document.+odSubAccountId :: Lens' OrderDocument (Maybe Int64)+odSubAccountId+  = lens _odSubAccountId+      (\ s a -> s{_odSubAccountId = a})+      . mapping _Coerce++-- | Type of this order document+odType :: Lens' OrderDocument (Maybe OrderDocumentType)+odType = lens _odType (\ s a -> s{_odType = a})++-- | ID of the order from which this order document is created.+odOrderId :: Lens' OrderDocument (Maybe Int64)+odOrderId+  = lens _odOrderId (\ s a -> s{_odOrderId = a}) .+      mapping _Coerce++-- | Whether this order document is cancelled.+odCancelled :: Lens' OrderDocument (Maybe Bool)+odCancelled+  = lens _odCancelled (\ s a -> s{_odCancelled = a})++-- | Information about the creation of this order document.+odCreatedInfo :: Lens' OrderDocument (Maybe LastModifiedInfo)+odCreatedInfo+  = lens _odCreatedInfo+      (\ s a -> s{_odCreatedInfo = a})++instance FromJSON OrderDocument where+        parseJSON+          = withObject "OrderDocument"+              (\ o ->+                 OrderDocument' <$>+                   (o .:? "signed") <*>+                     (o .:? "kind" .!= "dfareporting#orderDocument")+                     <*> (o .:? "advertiserId")+                     <*> (o .:? "lastSentTime")+                     <*> (o .:? "amendedOrderDocumentId")+                     <*> (o .:? "lastSentRecipients" .!= mempty)+                     <*> (o .:? "effectiveDate")+                     <*> (o .:? "approvedByUserProfileIds" .!= mempty)+                     <*> (o .:? "accountId")+                     <*> (o .:? "id")+                     <*> (o .:? "projectId")+                     <*> (o .:? "title")+                     <*> (o .:? "subaccountId")+                     <*> (o .:? "type")+                     <*> (o .:? "orderId")+                     <*> (o .:? "cancelled")+                     <*> (o .:? "createdInfo"))++instance ToJSON OrderDocument where+        toJSON OrderDocument'{..}+          = object+              (catMaybes+                 [("signed" .=) <$> _odSigned,+                  Just ("kind" .= _odKind),+                  ("advertiserId" .=) <$> _odAdvertiserId,+                  ("lastSentTime" .=) <$> _odLastSentTime,+                  ("amendedOrderDocumentId" .=) <$>+                    _odAmendedOrderDocumentId,+                  ("lastSentRecipients" .=) <$> _odLastSentRecipients,+                  ("effectiveDate" .=) <$> _odEffectiveDate,+                  ("approvedByUserProfileIds" .=) <$>+                    _odApprovedByUserProFileIds,+                  ("accountId" .=) <$> _odAccountId,+                  ("id" .=) <$> _odId,+                  ("projectId" .=) <$> _odProjectId,+                  ("title" .=) <$> _odTitle,+                  ("subaccountId" .=) <$> _odSubAccountId,+                  ("type" .=) <$> _odType,+                  ("orderId" .=) <$> _odOrderId,+                  ("cancelled" .=) <$> _odCancelled,+                  ("createdInfo" .=) <$> _odCreatedInfo])++-- | Contains information about a metro region that can be targeted by ads.+--+-- /See:/ 'metro' smart constructor.+data Metro = Metro'+    { _metMetroCode     :: !(Maybe Text)+    , _metKind          :: !Text+    , _metName          :: !(Maybe Text)+    , _metCountryCode   :: !(Maybe Text)+    , _metDmaId         :: !(Maybe (Textual Int64))+    , _metCountryDartId :: !(Maybe (Textual Int64))+    , _metDartId        :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Metro' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'metMetroCode'+--+-- * 'metKind'+--+-- * 'metName'+--+-- * 'metCountryCode'+--+-- * 'metDmaId'+--+-- * 'metCountryDartId'+--+-- * 'metDartId'+metro+    :: Metro+metro =+    Metro'+    { _metMetroCode = Nothing+    , _metKind = "dfareporting#metro"+    , _metName = Nothing+    , _metCountryCode = Nothing+    , _metDmaId = Nothing+    , _metCountryDartId = Nothing+    , _metDartId = Nothing+    }++-- | Metro code of this metro region. This is equivalent to dma_id.+metMetroCode :: Lens' Metro (Maybe Text)+metMetroCode+  = lens _metMetroCode (\ s a -> s{_metMetroCode = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#metro\".+metKind :: Lens' Metro Text+metKind = lens _metKind (\ s a -> s{_metKind = a})++-- | Name of this metro region.+metName :: Lens' Metro (Maybe Text)+metName = lens _metName (\ s a -> s{_metName = a})++-- | Country code of the country to which this metro region belongs.+metCountryCode :: Lens' Metro (Maybe Text)+metCountryCode+  = lens _metCountryCode+      (\ s a -> s{_metCountryCode = a})++-- | DMA ID of this metro region. This is the ID used for targeting and+-- generating reports, and is equivalent to metro_code.+metDmaId :: Lens' Metro (Maybe Int64)+metDmaId+  = lens _metDmaId (\ s a -> s{_metDmaId = a}) .+      mapping _Coerce++-- | DART ID of the country to which this metro region belongs.+metCountryDartId :: Lens' Metro (Maybe Int64)+metCountryDartId+  = lens _metCountryDartId+      (\ s a -> s{_metCountryDartId = a})+      . mapping _Coerce++-- | DART ID of this metro region.+metDartId :: Lens' Metro (Maybe Int64)+metDartId+  = lens _metDartId (\ s a -> s{_metDartId = a}) .+      mapping _Coerce++instance FromJSON Metro where+        parseJSON+          = withObject "Metro"+              (\ o ->+                 Metro' <$>+                   (o .:? "metroCode") <*>+                     (o .:? "kind" .!= "dfareporting#metro")+                     <*> (o .:? "name")+                     <*> (o .:? "countryCode")+                     <*> (o .:? "dmaId")+                     <*> (o .:? "countryDartId")+                     <*> (o .:? "dartId"))++instance ToJSON Metro where+        toJSON Metro'{..}+          = object+              (catMaybes+                 [("metroCode" .=) <$> _metMetroCode,+                  Just ("kind" .= _metKind), ("name" .=) <$> _metName,+                  ("countryCode" .=) <$> _metCountryCode,+                  ("dmaId" .=) <$> _metDmaId,+                  ("countryDartId" .=) <$> _metCountryDartId,+                  ("dartId" .=) <$> _metDartId])++-- | Contains properties of a placement.+--+-- /See:/ 'placement' smart constructor.+data Placement = Placement'+    { _p1Status                         :: !(Maybe PlacementStatus)+    , _p1PlacementStrategyId            :: !(Maybe (Textual Int64))+    , _p1TagFormats                     :: !(Maybe [PlacementTagFormatsItem])+    , _p1SiteIdDimensionValue           :: !(Maybe DimensionValue)+    , _p1PricingSchedule                :: !(Maybe PricingSchedule)+    , _p1Size                           :: !(Maybe Size)+    , _p1Kind                           :: !Text+    , _p1KeyName                        :: !(Maybe Text)+    , _p1CampaignIdDimensionValue       :: !(Maybe DimensionValue)+    , _p1AdvertiserId                   :: !(Maybe (Textual Int64))+    , _p1AdvertiserIdDimensionValue     :: !(Maybe DimensionValue)+    , _p1CampaignId                     :: !(Maybe (Textual Int64))+    , _p1IdDimensionValue               :: !(Maybe DimensionValue)+    , _p1Primary                        :: !(Maybe Bool)+    , _p1LookbackConfiguration          :: !(Maybe LookbackConfiguration)+    , _p1TagSetting                     :: !(Maybe TagSetting)+    , _p1ContentCategoryId              :: !(Maybe (Textual Int64))+    , _p1DirectorySiteIdDimensionValue  :: !(Maybe DimensionValue)+    , _p1AccountId                      :: !(Maybe (Textual Int64))+    , _p1PaymentSource                  :: !(Maybe PlacementPaymentSource)+    , _p1Name                           :: !(Maybe Text)+    , _p1DirectorySiteId                :: !(Maybe (Textual Int64))+    , _p1CreateInfo                     :: !(Maybe LastModifiedInfo)+    , _p1LastModifiedInfo               :: !(Maybe LastModifiedInfo)+    , _p1Id                             :: !(Maybe (Textual Int64))+    , _p1SSLRequired                    :: !(Maybe Bool)+    , _p1SubAccountId                   :: !(Maybe (Textual Int64))+    , _p1PlacementGroupIdDimensionValue :: !(Maybe DimensionValue)+    , _p1ExternalId                     :: !(Maybe Text)+    , _p1PlacementGroupId               :: !(Maybe (Textual Int64))+    , _p1Comment                        :: !(Maybe Text)+    , _p1SiteId                         :: !(Maybe (Textual Int64))+    , _p1Compatibility                  :: !(Maybe PlacementCompatibility)+    , _p1Archived                       :: !(Maybe Bool)+    , _p1PaymentApproved                :: !(Maybe Bool)+    , _p1PublisherUpdateInfo            :: !(Maybe LastModifiedInfo)+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'Placement' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'p1Status'+--+-- * 'p1PlacementStrategyId'+--+-- * 'p1TagFormats'+--+-- * 'p1SiteIdDimensionValue'+--+-- * 'p1PricingSchedule'+--+-- * 'p1Size'+--+-- * 'p1Kind'+--+-- * 'p1KeyName'+--+-- * 'p1CampaignIdDimensionValue'+--+-- * 'p1AdvertiserId'+--+-- * 'p1AdvertiserIdDimensionValue'+--+-- * 'p1CampaignId'+--+-- * 'p1IdDimensionValue'+--+-- * 'p1Primary'+--+-- * 'p1LookbackConfiguration'+--+-- * 'p1TagSetting'+--+-- * 'p1ContentCategoryId'+--+-- * 'p1DirectorySiteIdDimensionValue'+--+-- * 'p1AccountId'+--+-- * 'p1PaymentSource'+--+-- * 'p1Name'+--+-- * 'p1DirectorySiteId'+--+-- * 'p1CreateInfo'+--+-- * 'p1LastModifiedInfo'+--+-- * 'p1Id'+--+-- * 'p1SSLRequired'+--+-- * 'p1SubAccountId'+--+-- * 'p1PlacementGroupIdDimensionValue'+--+-- * 'p1ExternalId'+--+-- * 'p1PlacementGroupId'+--+-- * 'p1Comment'+--+-- * 'p1SiteId'+--+-- * 'p1Compatibility'+--+-- * 'p1Archived'+--+-- * 'p1PaymentApproved'+--+-- * 'p1PublisherUpdateInfo'+placement+    :: Placement+placement =+    Placement'+    { _p1Status = Nothing+    , _p1PlacementStrategyId = Nothing+    , _p1TagFormats = Nothing+    , _p1SiteIdDimensionValue = Nothing+    , _p1PricingSchedule = Nothing+    , _p1Size = Nothing+    , _p1Kind = "dfareporting#placement"+    , _p1KeyName = Nothing+    , _p1CampaignIdDimensionValue = Nothing+    , _p1AdvertiserId = Nothing+    , _p1AdvertiserIdDimensionValue = Nothing+    , _p1CampaignId = Nothing+    , _p1IdDimensionValue = Nothing+    , _p1Primary = Nothing+    , _p1LookbackConfiguration = Nothing+    , _p1TagSetting = Nothing+    , _p1ContentCategoryId = Nothing+    , _p1DirectorySiteIdDimensionValue = Nothing+    , _p1AccountId = Nothing+    , _p1PaymentSource = Nothing+    , _p1Name = Nothing+    , _p1DirectorySiteId = Nothing+    , _p1CreateInfo = Nothing+    , _p1LastModifiedInfo = Nothing+    , _p1Id = Nothing+    , _p1SSLRequired = Nothing+    , _p1SubAccountId = Nothing+    , _p1PlacementGroupIdDimensionValue = Nothing+    , _p1ExternalId = Nothing+    , _p1PlacementGroupId = Nothing+    , _p1Comment = Nothing+    , _p1SiteId = Nothing+    , _p1Compatibility = Nothing+    , _p1Archived = Nothing+    , _p1PaymentApproved = Nothing+    , _p1PublisherUpdateInfo = Nothing+    }++-- | Third-party placement status.+p1Status :: Lens' Placement (Maybe PlacementStatus)+p1Status = lens _p1Status (\ s a -> s{_p1Status = a})++-- | ID of the placement strategy assigned to this placement.+p1PlacementStrategyId :: Lens' Placement (Maybe Int64)+p1PlacementStrategyId+  = lens _p1PlacementStrategyId+      (\ s a -> s{_p1PlacementStrategyId = a})+      . mapping _Coerce++-- | Tag formats to generate for this placement. This field is required on+-- insertion. Acceptable values are: - \"PLACEMENT_TAG_STANDARD\" -+-- \"PLACEMENT_TAG_IFRAME_JAVASCRIPT\" - \"PLACEMENT_TAG_IFRAME_ILAYER\" -+-- \"PLACEMENT_TAG_INTERNAL_REDIRECT\" - \"PLACEMENT_TAG_JAVASCRIPT\" -+-- \"PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT\" -+-- \"PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT\" -+-- \"PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT\" -+-- \"PLACEMENT_TAG_CLICK_COMMANDS\" -+-- \"PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH\" - \"PLACEMENT_TAG_TRACKING\" -+-- \"PLACEMENT_TAG_TRACKING_IFRAME\" -+-- \"PLACEMENT_TAG_TRACKING_JAVASCRIPT\"+p1TagFormats :: Lens' Placement [PlacementTagFormatsItem]+p1TagFormats+  = lens _p1TagFormats (\ s a -> s{_p1TagFormats = a})+      . _Default+      . _Coerce++-- | Dimension value for the ID of the site. This is a read-only,+-- auto-generated field.+p1SiteIdDimensionValue :: Lens' Placement (Maybe DimensionValue)+p1SiteIdDimensionValue+  = lens _p1SiteIdDimensionValue+      (\ s a -> s{_p1SiteIdDimensionValue = a})++-- | Pricing schedule of this placement. This field is required on insertion,+-- specifically subfields startDate, endDate and pricingType.+p1PricingSchedule :: Lens' Placement (Maybe PricingSchedule)+p1PricingSchedule+  = lens _p1PricingSchedule+      (\ s a -> s{_p1PricingSchedule = a})++-- | Size associated with this placement. When inserting or updating a+-- placement, only the size ID field is used. This field is required on+-- insertion.+p1Size :: Lens' Placement (Maybe Size)+p1Size = lens _p1Size (\ s a -> s{_p1Size = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#placement\".+p1Kind :: Lens' Placement Text+p1Kind = lens _p1Kind (\ s a -> s{_p1Kind = a})++-- | Key name of this placement. This is a read-only, auto-generated field.+p1KeyName :: Lens' Placement (Maybe Text)+p1KeyName+  = lens _p1KeyName (\ s a -> s{_p1KeyName = a})++-- | Dimension value for the ID of the campaign. This is a read-only,+-- auto-generated field.+p1CampaignIdDimensionValue :: Lens' Placement (Maybe DimensionValue)+p1CampaignIdDimensionValue+  = lens _p1CampaignIdDimensionValue+      (\ s a -> s{_p1CampaignIdDimensionValue = a})++-- | Advertiser ID of this placement. This field can be left blank.+p1AdvertiserId :: Lens' Placement (Maybe Int64)+p1AdvertiserId+  = lens _p1AdvertiserId+      (\ s a -> s{_p1AdvertiserId = a})+      . mapping _Coerce++-- | Dimension value for the ID of the advertiser. This is a read-only,+-- auto-generated field.+p1AdvertiserIdDimensionValue :: Lens' Placement (Maybe DimensionValue)+p1AdvertiserIdDimensionValue+  = lens _p1AdvertiserIdDimensionValue+      (\ s a -> s{_p1AdvertiserIdDimensionValue = a})++-- | Campaign ID of this placement. This field is a required field on+-- insertion.+p1CampaignId :: Lens' Placement (Maybe Int64)+p1CampaignId+  = lens _p1CampaignId (\ s a -> s{_p1CampaignId = a})+      . mapping _Coerce++-- | Dimension value for the ID of this placement. This is a read-only,+-- auto-generated field.+p1IdDimensionValue :: Lens' Placement (Maybe DimensionValue)+p1IdDimensionValue+  = lens _p1IdDimensionValue+      (\ s a -> s{_p1IdDimensionValue = a})++-- | Whether this placement is the primary placement of a roadblock+-- (placement group). You cannot change this field from true to false.+-- Setting this field to true will automatically set the primary field on+-- the original primary placement of the roadblock to false, and it will+-- automatically set the roadblock\'s primaryPlacementId field to the ID of+-- this placement.+p1Primary :: Lens' Placement (Maybe Bool)+p1Primary+  = lens _p1Primary (\ s a -> s{_p1Primary = a})++-- | Lookback window settings for this placement.+p1LookbackConfiguration :: Lens' Placement (Maybe LookbackConfiguration)+p1LookbackConfiguration+  = lens _p1LookbackConfiguration+      (\ s a -> s{_p1LookbackConfiguration = a})++-- | Tag settings for this placement.+p1TagSetting :: Lens' Placement (Maybe TagSetting)+p1TagSetting+  = lens _p1TagSetting (\ s a -> s{_p1TagSetting = a})++-- | ID of the content category assigned to this placement.+p1ContentCategoryId :: Lens' Placement (Maybe Int64)+p1ContentCategoryId+  = lens _p1ContentCategoryId+      (\ s a -> s{_p1ContentCategoryId = a})+      . mapping _Coerce++-- | Dimension value for the ID of the directory site. This is a read-only,+-- auto-generated field.+p1DirectorySiteIdDimensionValue :: Lens' Placement (Maybe DimensionValue)+p1DirectorySiteIdDimensionValue+  = lens _p1DirectorySiteIdDimensionValue+      (\ s a -> s{_p1DirectorySiteIdDimensionValue = a})++-- | Account ID of this placement. This field can be left blank.+p1AccountId :: Lens' Placement (Maybe Int64)+p1AccountId+  = lens _p1AccountId (\ s a -> s{_p1AccountId = a}) .+      mapping _Coerce++-- | Payment source for this placement. This is a required field that is+-- read-only after insertion.+p1PaymentSource :: Lens' Placement (Maybe PlacementPaymentSource)+p1PaymentSource+  = lens _p1PaymentSource+      (\ s a -> s{_p1PaymentSource = a})++-- | Name of this placement.This is a required field and must be less than+-- 256 characters long.+p1Name :: Lens' Placement (Maybe Text)+p1Name = lens _p1Name (\ s a -> s{_p1Name = a})++-- | Directory site ID of this placement. On insert, you must set either this+-- field or the siteId field to specify the site associated with this+-- placement. This is a required field that is read-only after insertion.+p1DirectorySiteId :: Lens' Placement (Maybe Int64)+p1DirectorySiteId+  = lens _p1DirectorySiteId+      (\ s a -> s{_p1DirectorySiteId = a})+      . mapping _Coerce++-- | Information about the creation of this placement. This is a read-only+-- field.+p1CreateInfo :: Lens' Placement (Maybe LastModifiedInfo)+p1CreateInfo+  = lens _p1CreateInfo (\ s a -> s{_p1CreateInfo = a})++-- | Information about the most recent modification of this placement. This+-- is a read-only field.+p1LastModifiedInfo :: Lens' Placement (Maybe LastModifiedInfo)+p1LastModifiedInfo+  = lens _p1LastModifiedInfo+      (\ s a -> s{_p1LastModifiedInfo = a})++-- | ID of this placement. This is a read-only, auto-generated field.+p1Id :: Lens' Placement (Maybe Int64)+p1Id+  = lens _p1Id (\ s a -> s{_p1Id = a}) .+      mapping _Coerce++-- | Whether creatives assigned to this placement must be SSL-compliant.+p1SSLRequired :: Lens' Placement (Maybe Bool)+p1SSLRequired+  = lens _p1SSLRequired+      (\ s a -> s{_p1SSLRequired = a})++-- | Subaccount ID of this placement. This field can be left blank.+p1SubAccountId :: Lens' Placement (Maybe Int64)+p1SubAccountId+  = lens _p1SubAccountId+      (\ s a -> s{_p1SubAccountId = a})+      . mapping _Coerce++-- | Dimension value for the ID of the placement group. This is a read-only,+-- auto-generated field.+p1PlacementGroupIdDimensionValue :: Lens' Placement (Maybe DimensionValue)+p1PlacementGroupIdDimensionValue+  = lens _p1PlacementGroupIdDimensionValue+      (\ s a -> s{_p1PlacementGroupIdDimensionValue = a})++-- | External ID for this placement.+p1ExternalId :: Lens' Placement (Maybe Text)+p1ExternalId+  = lens _p1ExternalId (\ s a -> s{_p1ExternalId = a})++-- | ID of this placement\'s group, if applicable.+p1PlacementGroupId :: Lens' Placement (Maybe Int64)+p1PlacementGroupId+  = lens _p1PlacementGroupId+      (\ s a -> s{_p1PlacementGroupId = a})+      . mapping _Coerce++-- | Comments for this placement.+p1Comment :: Lens' Placement (Maybe Text)+p1Comment+  = lens _p1Comment (\ s a -> s{_p1Comment = a})++-- | Site ID associated with this placement. On insert, you must set either+-- this field or the directorySiteId field to specify the site associated+-- with this placement. This is a required field that is read-only after+-- insertion.+p1SiteId :: Lens' Placement (Maybe Int64)+p1SiteId+  = lens _p1SiteId (\ s a -> s{_p1SiteId = a}) .+      mapping _Coerce++-- | Placement compatibility. DISPLAY and DISPLAY_INTERSTITIAL refer to+-- rendering on desktop, on mobile devices or in mobile apps for regular or+-- interstitial ads respectively. APP and APP_INTERSTITIAL are no longer+-- allowed for new placement insertions. Instead, use DISPLAY or+-- DISPLAY_INTERSTITIAL. IN_STREAM_VIDEO refers to rendering in in-stream+-- video ads developed with the VAST standard. This field is required on+-- insertion.+p1Compatibility :: Lens' Placement (Maybe PlacementCompatibility)+p1Compatibility+  = lens _p1Compatibility+      (\ s a -> s{_p1Compatibility = a})++-- | Whether this placement is archived.+p1Archived :: Lens' Placement (Maybe Bool)+p1Archived+  = lens _p1Archived (\ s a -> s{_p1Archived = a})++-- | Whether payment was approved for this placement. This is a read-only+-- field relevant only to publisher-paid placements.+p1PaymentApproved :: Lens' Placement (Maybe Bool)+p1PaymentApproved+  = lens _p1PaymentApproved+      (\ s a -> s{_p1PaymentApproved = a})++-- | Information about the last publisher update. This is a read-only field.+p1PublisherUpdateInfo :: Lens' Placement (Maybe LastModifiedInfo)+p1PublisherUpdateInfo+  = lens _p1PublisherUpdateInfo+      (\ s a -> s{_p1PublisherUpdateInfo = a})++instance FromJSON Placement where+        parseJSON+          = withObject "Placement"+              (\ o ->+                 Placement' <$>+                   (o .:? "status") <*> (o .:? "placementStrategyId")+                     <*> (o .:? "tagFormats" .!= mempty)+                     <*> (o .:? "siteIdDimensionValue")+                     <*> (o .:? "pricingSchedule")+                     <*> (o .:? "size")+                     <*> (o .:? "kind" .!= "dfareporting#placement")+                     <*> (o .:? "keyName")+                     <*> (o .:? "campaignIdDimensionValue")+                     <*> (o .:? "advertiserId")+                     <*> (o .:? "advertiserIdDimensionValue")+                     <*> (o .:? "campaignId")+                     <*> (o .:? "idDimensionValue")+                     <*> (o .:? "primary")+                     <*> (o .:? "lookbackConfiguration")+                     <*> (o .:? "tagSetting")+                     <*> (o .:? "contentCategoryId")+                     <*> (o .:? "directorySiteIdDimensionValue")+                     <*> (o .:? "accountId")+                     <*> (o .:? "paymentSource")+                     <*> (o .:? "name")+                     <*> (o .:? "directorySiteId")+                     <*> (o .:? "createInfo")+                     <*> (o .:? "lastModifiedInfo")+                     <*> (o .:? "id")+                     <*> (o .:? "sslRequired")+                     <*> (o .:? "subaccountId")+                     <*> (o .:? "placementGroupIdDimensionValue")+                     <*> (o .:? "externalId")+                     <*> (o .:? "placementGroupId")+                     <*> (o .:? "comment")+                     <*> (o .:? "siteId")+                     <*> (o .:? "compatibility")+                     <*> (o .:? "archived")+                     <*> (o .:? "paymentApproved")+                     <*> (o .:? "publisherUpdateInfo"))++instance ToJSON Placement where+        toJSON Placement'{..}+          = object+              (catMaybes+                 [("status" .=) <$> _p1Status,+                  ("placementStrategyId" .=) <$>+                    _p1PlacementStrategyId,+                  ("tagFormats" .=) <$> _p1TagFormats,+                  ("siteIdDimensionValue" .=) <$>+                    _p1SiteIdDimensionValue,+                  ("pricingSchedule" .=) <$> _p1PricingSchedule,+                  ("size" .=) <$> _p1Size, Just ("kind" .= _p1Kind),+                  ("keyName" .=) <$> _p1KeyName,+                  ("campaignIdDimensionValue" .=) <$>+                    _p1CampaignIdDimensionValue,+                  ("advertiserId" .=) <$> _p1AdvertiserId,+                  ("advertiserIdDimensionValue" .=) <$>+                    _p1AdvertiserIdDimensionValue,+                  ("campaignId" .=) <$> _p1CampaignId,+                  ("idDimensionValue" .=) <$> _p1IdDimensionValue,+                  ("primary" .=) <$> _p1Primary,+                  ("lookbackConfiguration" .=) <$>+                    _p1LookbackConfiguration,+                  ("tagSetting" .=) <$> _p1TagSetting,+                  ("contentCategoryId" .=) <$> _p1ContentCategoryId,+                  ("directorySiteIdDimensionValue" .=) <$>+                    _p1DirectorySiteIdDimensionValue,+                  ("accountId" .=) <$> _p1AccountId,+                  ("paymentSource" .=) <$> _p1PaymentSource,+                  ("name" .=) <$> _p1Name,+                  ("directorySiteId" .=) <$> _p1DirectorySiteId,+                  ("createInfo" .=) <$> _p1CreateInfo,+                  ("lastModifiedInfo" .=) <$> _p1LastModifiedInfo,+                  ("id" .=) <$> _p1Id,+                  ("sslRequired" .=) <$> _p1SSLRequired,+                  ("subaccountId" .=) <$> _p1SubAccountId,+                  ("placementGroupIdDimensionValue" .=) <$>+                    _p1PlacementGroupIdDimensionValue,+                  ("externalId" .=) <$> _p1ExternalId,+                  ("placementGroupId" .=) <$> _p1PlacementGroupId,+                  ("comment" .=) <$> _p1Comment,+                  ("siteId" .=) <$> _p1SiteId,+                  ("compatibility" .=) <$> _p1Compatibility,+                  ("archived" .=) <$> _p1Archived,+                  ("paymentApproved" .=) <$> _p1PaymentApproved,+                  ("publisherUpdateInfo" .=) <$>+                    _p1PublisherUpdateInfo])++-- | A description of how user IDs are encrypted.+--+-- /See:/ 'encryptionInfo' smart constructor.+data EncryptionInfo = EncryptionInfo'+    { _eiEncryptionSource     :: !(Maybe EncryptionInfoEncryptionSource)+    , _eiKind                 :: !Text+    , _eiEncryptionEntityType :: !(Maybe EncryptionInfoEncryptionEntityType)+    , _eiEncryptionEntityId   :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'EncryptionInfo' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'eiEncryptionSource'+--+-- * 'eiKind'+--+-- * 'eiEncryptionEntityType'+--+-- * 'eiEncryptionEntityId'+encryptionInfo+    :: EncryptionInfo+encryptionInfo =+    EncryptionInfo'+    { _eiEncryptionSource = Nothing+    , _eiKind = "dfareporting#encryptionInfo"+    , _eiEncryptionEntityType = Nothing+    , _eiEncryptionEntityId = Nothing+    }++-- | Describes whether the encrypted cookie was received from ad serving (the+-- %m macro) or from Data Transfer.+eiEncryptionSource :: Lens' EncryptionInfo (Maybe EncryptionInfoEncryptionSource)+eiEncryptionSource+  = lens _eiEncryptionSource+      (\ s a -> s{_eiEncryptionSource = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#encryptionInfo\".+eiKind :: Lens' EncryptionInfo Text+eiKind = lens _eiKind (\ s a -> s{_eiKind = a})++-- | The encryption entity type. This should match the encryption+-- configuration for ad serving or Data Transfer.+eiEncryptionEntityType :: Lens' EncryptionInfo (Maybe EncryptionInfoEncryptionEntityType)+eiEncryptionEntityType+  = lens _eiEncryptionEntityType+      (\ s a -> s{_eiEncryptionEntityType = a})++-- | The encryption entity ID. This should match the encryption configuration+-- for ad serving or Data Transfer.+eiEncryptionEntityId :: Lens' EncryptionInfo (Maybe Int64)+eiEncryptionEntityId+  = lens _eiEncryptionEntityId+      (\ s a -> s{_eiEncryptionEntityId = a})+      . mapping _Coerce++instance FromJSON EncryptionInfo where+        parseJSON+          = withObject "EncryptionInfo"+              (\ o ->+                 EncryptionInfo' <$>+                   (o .:? "encryptionSource") <*>+                     (o .:? "kind" .!= "dfareporting#encryptionInfo")+                     <*> (o .:? "encryptionEntityType")+                     <*> (o .:? "encryptionEntityId"))++instance ToJSON EncryptionInfo where+        toJSON EncryptionInfo'{..}+          = object+              (catMaybes+                 [("encryptionSource" .=) <$> _eiEncryptionSource,+                  Just ("kind" .= _eiKind),+                  ("encryptionEntityType" .=) <$>+                    _eiEncryptionEntityType,+                  ("encryptionEntityId" .=) <$> _eiEncryptionEntityId])++-- | Site List Response+--+-- /See:/ 'sitesListResponse' smart constructor.+data SitesListResponse = SitesListResponse'+    { _sitNextPageToken :: !(Maybe Text)+    , _sitKind          :: !Text+    , _sitSites         :: !(Maybe [Site])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'SitesListResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'sitNextPageToken'+--+-- * 'sitKind'+--+-- * 'sitSites'+sitesListResponse+    :: SitesListResponse+sitesListResponse =+    SitesListResponse'+    { _sitNextPageToken = Nothing+    , _sitKind = "dfareporting#sitesListResponse"+    , _sitSites = Nothing+    }++-- | Pagination token to be used for the next list operation.+sitNextPageToken :: Lens' SitesListResponse (Maybe Text)+sitNextPageToken+  = lens _sitNextPageToken+      (\ s a -> s{_sitNextPageToken = a})++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#sitesListResponse\".+sitKind :: Lens' SitesListResponse Text+sitKind = lens _sitKind (\ s a -> s{_sitKind = a})++-- | Site collection.+sitSites :: Lens' SitesListResponse [Site]+sitSites+  = lens _sitSites (\ s a -> s{_sitSites = a}) .+      _Default+      . _Coerce++instance FromJSON SitesListResponse where+        parseJSON+          = withObject "SitesListResponse"+              (\ o ->+                 SitesListResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "kind" .!= "dfareporting#sitesListResponse")+                     <*> (o .:? "sites" .!= mempty))++instance ToJSON SitesListResponse where+        toJSON SitesListResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _sitNextPageToken,+                  Just ("kind" .= _sitKind),+                  ("sites" .=) <$> _sitSites])++-- | Contains properties of a creative field.+--+-- /See:/ 'creativeField' smart constructor.+data CreativeField = CreativeField'+    { _cffKind                       :: !Text+    , _cffAdvertiserId               :: !(Maybe (Textual Int64))+    , _cffAdvertiserIdDimensionValue :: !(Maybe DimensionValue)+    , _cffAccountId                  :: !(Maybe (Textual Int64))+    , _cffName                       :: !(Maybe Text)+    , _cffId                         :: !(Maybe (Textual Int64))+    , _cffSubAccountId               :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'CreativeField' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cffKind'+--+-- * 'cffAdvertiserId'+--+-- * 'cffAdvertiserIdDimensionValue'+--+-- * 'cffAccountId'+--+-- * 'cffName'+--+-- * 'cffId'+--+-- * 'cffSubAccountId'+creativeField+    :: CreativeField+creativeField =+    CreativeField'+    { _cffKind = "dfareporting#creativeField"+    , _cffAdvertiserId = Nothing+    , _cffAdvertiserIdDimensionValue = Nothing+    , _cffAccountId = Nothing+    , _cffName = Nothing+    , _cffId = Nothing+    , _cffSubAccountId = Nothing+    }++-- | Identifies what kind of resource this is. Value: the fixed string+-- \"dfareporting#creativeField\".+cffKind :: Lens' CreativeField Text+cffKind = lens _cffKind (\ s a -> s{_cffKind = a})++-- | Advertiser ID of this creative field. This is a required field on+-- insertion.+cffAdvertiserId :: Lens' CreativeField (Maybe Int64)+cffAdvertiserId+  = lens _cffAdvertiserId+      (\ s a -> s{_cffAdvertiserId = a})+      . mapping _Coerce++-- | Dimension value for the ID of the advertiser. This is a read-only,+-- auto-generated field.+cffAdvertiserIdDimensionValue :: Lens' CreativeField (Maybe DimensionValue)+cffAdvertiserIdDimensionValue+  = lens _cffAdvertiserIdDimensionValue+      (\ s a -> s{_cffAdvertiserIdDimensionValue = a})++-- | Account ID of this creative field. This is a read-only field that can be+-- left blank.+cffAccountId :: Lens' CreativeField (Maybe Int64)+cffAccountId+  = lens _cffAccountId (\ s a -> s{_cffAccountId = a})+      . mapping _Coerce++-- | Name of this creative field. This is a required field and must be less+-- than 256 characters long and unique among creative fields of the same+-- advertiser.+cffName :: Lens' CreativeField (Maybe Text)+cffName = lens _cffName (\ s a -> s{_cffName = a})++-- | ID of this creative field. This is a read-only, auto-generated field.+cffId :: Lens' CreativeField (Maybe Int64)+cffId+  = lens _cffId (\ s a -> s{_cffId = a}) .+      mapping _Coerce++-- | Subaccount ID of this creative field. This is a read-only field that can+-- be left blank.+cffSubAccountId :: Lens' CreativeField (Maybe Int64)+cffSubAccountId+  = lens _cffSubAccountId+      (\ s a -> s{_cffSubAccountId = a})+      . mapping _Coerce++instance FromJSON CreativeField where+        parseJSON+          = withObject "CreativeField"+              (\ o ->+                 CreativeField' <$>+                   (o .:? "kind" .!= "dfareporting#creativeField") <*>+                     (o .:? "advertiserId")+                     <*> (o .:? "advertiserIdDimensionValue")+                     <*> (o .:? "accountId")+                     <*> (o .:? "name")+                     <*> (o .:? "id")+                     <*> (o .:? "subaccountId"))++instance ToJSON CreativeField where+        toJSON CreativeField'{..}+          = object+              (catMaybes+                 [Just ("kind" .= _cffKind),+                  ("advertiserId" .=) <$> _cffAdvertiserId,+                  ("advertiserIdDimensionValue" .=) <$>+                    _cffAdvertiserIdDimensionValue,+                  ("accountId" .=) <$> _cffAccountId,+                  ("name" .=) <$> _cffName, ("id" .=) <$> _cffId,+                  ("subaccountId" .=) <$> _cffSubAccountId])++-- | Properties of inheriting and overriding the default click-through event+-- tag. A campaign may override the event tag defined at the advertiser+-- level, and an ad may also override the campaign\'s setting further.+--+-- /See:/ 'defaultClickThroughEventTagProperties' smart constructor.+data DefaultClickThroughEventTagProperties = DefaultClickThroughEventTagProperties'+    { _dctetpOverrideInheritedEventTag     :: !(Maybe Bool)+    , _dctetpDefaultClickThroughEventTagId :: !(Maybe (Textual Int64))+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DefaultClickThroughEventTagProperties' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dctetpOverrideInheritedEventTag'+--+-- * 'dctetpDefaultClickThroughEventTagId'+defaultClickThroughEventTagProperties+    :: DefaultClickThroughEventTagProperties+defaultClickThroughEventTagProperties =+    DefaultClickThroughEventTagProperties'+    { _dctetpOverrideInheritedEventTag = Nothing+    , _dctetpDefaultClickThroughEventTagId = Nothing+    }++-- | Whether this entity should override the inherited default click-through+-- event tag with its own defined value.+dctetpOverrideInheritedEventTag :: Lens' DefaultClickThroughEventTagProperties (Maybe Bool)+dctetpOverrideInheritedEventTag+  = lens _dctetpOverrideInheritedEventTag+      (\ s a -> s{_dctetpOverrideInheritedEventTag = a})++-- | ID of the click-through event tag to apply to all ads in this entity\'s+-- scope.+dctetpDefaultClickThroughEventTagId :: Lens' DefaultClickThroughEventTagProperties (Maybe Int64)+dctetpDefaultClickThroughEventTagId+  = lens _dctetpDefaultClickThroughEventTagId+      (\ s a ->+         s{_dctetpDefaultClickThroughEventTagId = a})+      . mapping _Coerce++instance FromJSON+         DefaultClickThroughEventTagProperties where+        parseJSON+          = withObject "DefaultClickThroughEventTagProperties"+              (\ o ->+                 DefaultClickThroughEventTagProperties' <$>+                   (o .:? "overrideInheritedEventTag") <*>+                     (o .:? "defaultClickThroughEventTagId"))++instance ToJSON DefaultClickThroughEventTagProperties+         where+        toJSON DefaultClickThroughEventTagProperties'{..}+          = object+              (catMaybes+                 [("overrideInheritedEventTag" .=) <$>+                    _dctetpOverrideInheritedEventTag,+                  ("defaultClickThroughEventTagId" .=) <$>+                    _dctetpDefaultClickThroughEventTagId])++-- | Remarketing List Targeting Expression.+--+-- /See:/ 'listTargetingExpression' smart constructor.+newtype ListTargetingExpression = ListTargetingExpression'+    { _lteExpression :: Maybe Text+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ListTargetingExpression' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'lteExpression'+listTargetingExpression+    :: ListTargetingExpression+listTargetingExpression =+    ListTargetingExpression'+    { _lteExpression = Nothing+    }++-- | Expression describing which lists are being targeted by the ad.+lteExpression :: Lens' ListTargetingExpression (Maybe Text)+lteExpression+  = lens _lteExpression+      (\ s a -> s{_lteExpression = a})++instance FromJSON ListTargetingExpression where+        parseJSON+          = withObject "ListTargetingExpression"+              (\ o ->+                 ListTargetingExpression' <$> (o .:? "expression"))++instance ToJSON ListTargetingExpression where+        toJSON ListTargetingExpression'{..}           = object               (catMaybes [("expression" .=) <$> _lteExpression])
gen/Network/Google/DFAReporting/Types/Sum.hs view
@@ -8,7364 +8,7869 @@  -- | -- Module      : Network.Google.DFAReporting.Types.Sum--- Copyright   : (c) 2015 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.DFAReporting.Types.Sum where--import           Network.Google.Prelude---- | Order of sorted results, default is ASCENDING.-data PlacementsListSortOrder-    = Ascending-      -- ^ @ASCENDING@-    | Descending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PlacementsListSortOrder--instance FromText PlacementsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just Ascending-        "DESCENDING" -> Just Descending-        _ -> Nothing--instance ToText PlacementsListSortOrder where-    toText = \case-        Ascending -> "ASCENDING"-        Descending -> "DESCENDING"--instance FromJSON PlacementsListSortOrder where-    parseJSON = parseJSONText "PlacementsListSortOrder"--instance ToJSON PlacementsListSortOrder where-    toJSON = toJSONText---- | The date range relative to the date of when the report is run.-data DateRangeRelativeDateRange-    = Last24Months-      -- ^ @LAST_24_MONTHS@-    | Last30Days-      -- ^ @LAST_30_DAYS@-    | Last365Days-      -- ^ @LAST_365_DAYS@-    | Last7Days-      -- ^ @LAST_7_DAYS@-    | Last90Days-      -- ^ @LAST_90_DAYS@-    | MonthToDate-      -- ^ @MONTH_TO_DATE@-    | PreviousMonth-      -- ^ @PREVIOUS_MONTH@-    | PreviousQuarter-      -- ^ @PREVIOUS_QUARTER@-    | PreviousWeek-      -- ^ @PREVIOUS_WEEK@-    | PreviousYear-      -- ^ @PREVIOUS_YEAR@-    | QuarterToDate-      -- ^ @QUARTER_TO_DATE@-    | Today-      -- ^ @TODAY@-    | WeekToDate-      -- ^ @WEEK_TO_DATE@-    | YearToDate-      -- ^ @YEAR_TO_DATE@-    | Yesterday-      -- ^ @YESTERDAY@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable DateRangeRelativeDateRange--instance FromText DateRangeRelativeDateRange where-    fromText = \case-        "LAST_24_MONTHS" -> Just Last24Months-        "LAST_30_DAYS" -> Just Last30Days-        "LAST_365_DAYS" -> Just Last365Days-        "LAST_7_DAYS" -> Just Last7Days-        "LAST_90_DAYS" -> Just Last90Days-        "MONTH_TO_DATE" -> Just MonthToDate-        "PREVIOUS_MONTH" -> Just PreviousMonth-        "PREVIOUS_QUARTER" -> Just PreviousQuarter-        "PREVIOUS_WEEK" -> Just PreviousWeek-        "PREVIOUS_YEAR" -> Just PreviousYear-        "QUARTER_TO_DATE" -> Just QuarterToDate-        "TODAY" -> Just Today-        "WEEK_TO_DATE" -> Just WeekToDate-        "YEAR_TO_DATE" -> Just YearToDate-        "YESTERDAY" -> Just Yesterday-        _ -> Nothing--instance ToText DateRangeRelativeDateRange where-    toText = \case-        Last24Months -> "LAST_24_MONTHS"-        Last30Days -> "LAST_30_DAYS"-        Last365Days -> "LAST_365_DAYS"-        Last7Days -> "LAST_7_DAYS"-        Last90Days -> "LAST_90_DAYS"-        MonthToDate -> "MONTH_TO_DATE"-        PreviousMonth -> "PREVIOUS_MONTH"-        PreviousQuarter -> "PREVIOUS_QUARTER"-        PreviousWeek -> "PREVIOUS_WEEK"-        PreviousYear -> "PREVIOUS_YEAR"-        QuarterToDate -> "QUARTER_TO_DATE"-        Today -> "TODAY"-        WeekToDate -> "WEEK_TO_DATE"-        YearToDate -> "YEAR_TO_DATE"-        Yesterday -> "YESTERDAY"--instance FromJSON DateRangeRelativeDateRange where-    parseJSON = parseJSONText "DateRangeRelativeDateRange"--instance ToJSON DateRangeRelativeDateRange where-    toJSON = toJSONText---- | Field by which to sort the list.-data AdvertisersListSortField-    = ID-      -- ^ @ID@-    | Name-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AdvertisersListSortField--instance FromText AdvertisersListSortField where-    fromText = \case-        "ID" -> Just ID-        "NAME" -> Just Name-        _ -> Nothing--instance ToText AdvertisersListSortField where-    toText = \case-        ID -> "ID"-        Name -> "NAME"--instance FromJSON AdvertisersListSortField where-    parseJSON = parseJSONText "AdvertisersListSortField"--instance ToJSON AdvertisersListSortField where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data CreativeFieldsListSortOrder-    = CFLSOAscending-      -- ^ @ASCENDING@-    | CFLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeFieldsListSortOrder--instance FromText CreativeFieldsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just CFLSOAscending-        "DESCENDING" -> Just CFLSODescending-        _ -> Nothing--instance ToText CreativeFieldsListSortOrder where-    toText = \case-        CFLSOAscending -> "ASCENDING"-        CFLSODescending -> "DESCENDING"--instance FromJSON CreativeFieldsListSortOrder where-    parseJSON = parseJSONText "CreativeFieldsListSortOrder"--instance ToJSON CreativeFieldsListSortOrder where-    toJSON = toJSONText---- | Field by which to sort the list.-data UserRolesListSortField-    = URLSFID-      -- ^ @ID@-    | URLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable UserRolesListSortField--instance FromText UserRolesListSortField where-    fromText = \case-        "ID" -> Just URLSFID-        "NAME" -> Just URLSFName-        _ -> Nothing--instance ToText UserRolesListSortField where-    toText = \case-        URLSFID -> "ID"-        URLSFName -> "NAME"--instance FromJSON UserRolesListSortField where-    parseJSON = parseJSONText "UserRolesListSortField"--instance ToJSON UserRolesListSortField where-    toJSON = toJSONText---- | Tag format type for the floodlight activity. If left blank, the tag--- format will default to HTML.-data FloodlightActivityTagFormat-    = HTML-      -- ^ @HTML@-    | Xhtml-      -- ^ @XHTML@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FloodlightActivityTagFormat--instance FromText FloodlightActivityTagFormat where-    fromText = \case-        "HTML" -> Just HTML-        "XHTML" -> Just Xhtml-        _ -> Nothing--instance ToText FloodlightActivityTagFormat where-    toText = \case-        HTML -> "HTML"-        Xhtml -> "XHTML"--instance FromJSON FloodlightActivityTagFormat where-    parseJSON = parseJSONText "FloodlightActivityTagFormat"--instance ToJSON FloodlightActivityTagFormat where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data OrderDocumentsListSortOrder-    = ODLSOAscending-      -- ^ @ASCENDING@-    | ODLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable OrderDocumentsListSortOrder--instance FromText OrderDocumentsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just ODLSOAscending-        "DESCENDING" -> Just ODLSODescending-        _ -> Nothing--instance ToText OrderDocumentsListSortOrder where-    toText = \case-        ODLSOAscending -> "ASCENDING"-        ODLSODescending -> "DESCENDING"--instance FromJSON OrderDocumentsListSortOrder where-    parseJSON = parseJSONText "OrderDocumentsListSortOrder"--instance ToJSON OrderDocumentsListSortOrder where-    toJSON = toJSONText---- | Role of the asset in relation to creative. Applicable to all but the--- following creative types: all REDIRECT and TRACKING_TEXT. This is a--- required field. PRIMARY applies to ENHANCED_BANNER, FLASH_INPAGE,--- HTML5_BANNER, IMAGE, IMAGE_GALLERY, all RICH_MEDIA (which may contain--- multiple primary assets), and all VPAID creatives. BACKUP_IMAGE applies--- to ENHANCED_BANNER, FLASH_INPAGE, HTML5_BANNER, all RICH_MEDIA, and all--- VPAID creatives. ADDITIONAL_IMAGE and ADDITIONAL_FLASH apply to--- FLASH_INPAGE creatives. OTHER refers to assets from sources other than--- DCM, such as Studio uploaded assets, applicable to all RICH_MEDIA and--- all VPAID creatives. PARENT_VIDEO refers to videos uploaded by the user--- in DCM and is applicable to INSTREAM_VIDEO and VPAID_LINEAR creatives.--- TRANSCODED_VIDEO refers to videos transcoded by DCM from PARENT_VIDEO--- assets and is applicable to INSTREAM_VIDEO and VPAID_LINEAR creatives.--- ALTERNATE_VIDEO refers to the DCM representation of child asset videos--- from Studio, and is applicable to VPAID_LINEAR creatives. These cannot--- be added or removed within DCM. For VPAID_LINEAR creatives,--- PARENT_VIDEO, TRANSCODED_VIDEO and ALTERNATE_VIDEO assets that are--- marked active serve as backup in case the VPAID creative cannot be--- served. Only PARENT_VIDEO assets can be added or removed for an--- INSTREAM_VIDEO or VPAID_LINEAR creative.-data CreativeAssetRole-    = AdditionalFlash-      -- ^ @ADDITIONAL_FLASH@-    | AdditionalImage-      -- ^ @ADDITIONAL_IMAGE@-    | AlternateVideo-      -- ^ @ALTERNATE_VIDEO@-    | BackupImage-      -- ^ @BACKUP_IMAGE@-    | Other-      -- ^ @OTHER@-    | ParentVideo-      -- ^ @PARENT_VIDEO@-    | Primary-      -- ^ @PRIMARY@-    | TranscodedVideo-      -- ^ @TRANSCODED_VIDEO@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeAssetRole--instance FromText CreativeAssetRole where-    fromText = \case-        "ADDITIONAL_FLASH" -> Just AdditionalFlash-        "ADDITIONAL_IMAGE" -> Just AdditionalImage-        "ALTERNATE_VIDEO" -> Just AlternateVideo-        "BACKUP_IMAGE" -> Just BackupImage-        "OTHER" -> Just Other-        "PARENT_VIDEO" -> Just ParentVideo-        "PRIMARY" -> Just Primary-        "TRANSCODED_VIDEO" -> Just TranscodedVideo-        _ -> Nothing--instance ToText CreativeAssetRole where-    toText = \case-        AdditionalFlash -> "ADDITIONAL_FLASH"-        AdditionalImage -> "ADDITIONAL_IMAGE"-        AlternateVideo -> "ALTERNATE_VIDEO"-        BackupImage -> "BACKUP_IMAGE"-        Other -> "OTHER"-        ParentVideo -> "PARENT_VIDEO"-        Primary -> "PRIMARY"-        TranscodedVideo -> "TRANSCODED_VIDEO"--instance FromJSON CreativeAssetRole where-    parseJSON = parseJSONText "CreativeAssetRole"--instance ToJSON CreativeAssetRole where-    toJSON = toJSONText---- | The delivery type for the recipient.-data RecipientDeliveryType-    = Attachment-      -- ^ @ATTACHMENT@-    | Link-      -- ^ @LINK@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable RecipientDeliveryType--instance FromText RecipientDeliveryType where-    fromText = \case-        "ATTACHMENT" -> Just Attachment-        "LINK" -> Just Link-        _ -> Nothing--instance ToText RecipientDeliveryType where-    toText = \case-        Attachment -> "ATTACHMENT"-        Link -> "LINK"--instance FromJSON RecipientDeliveryType where-    parseJSON = parseJSONText "RecipientDeliveryType"--instance ToJSON RecipientDeliveryType where-    toJSON = toJSONText---- | Third-party URL type for in-stream video creatives.-data ThirdPartyTrackingURLThirdPartyURLType-    = ClickTracking-      -- ^ @CLICK_TRACKING@-    | Impression-      -- ^ @IMPRESSION@-    | RichMediaBackupImpression-      -- ^ @RICH_MEDIA_BACKUP_IMPRESSION@-    | RichMediaImpression-      -- ^ @RICH_MEDIA_IMPRESSION@-    | RichMediaRmImpression-      -- ^ @RICH_MEDIA_RM_IMPRESSION@-    | Survey-      -- ^ @SURVEY@-    | VideoComplete-      -- ^ @VIDEO_COMPLETE@-    | VideoCustom-      -- ^ @VIDEO_CUSTOM@-    | VideoFirstQuartile-      -- ^ @VIDEO_FIRST_QUARTILE@-    | VideoFullscreen-      -- ^ @VIDEO_FULLSCREEN@-    | VideoMidpoint-      -- ^ @VIDEO_MIDPOINT@-    | VideoMute-      -- ^ @VIDEO_MUTE@-    | VideoPause-      -- ^ @VIDEO_PAUSE@-    | VideoRewind-      -- ^ @VIDEO_REWIND@-    | VideoStart-      -- ^ @VIDEO_START@-    | VideoStop-      -- ^ @VIDEO_STOP@-    | VideoThirdQuartile-      -- ^ @VIDEO_THIRD_QUARTILE@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ThirdPartyTrackingURLThirdPartyURLType--instance FromText ThirdPartyTrackingURLThirdPartyURLType where-    fromText = \case-        "CLICK_TRACKING" -> Just ClickTracking-        "IMPRESSION" -> Just Impression-        "RICH_MEDIA_BACKUP_IMPRESSION" -> Just RichMediaBackupImpression-        "RICH_MEDIA_IMPRESSION" -> Just RichMediaImpression-        "RICH_MEDIA_RM_IMPRESSION" -> Just RichMediaRmImpression-        "SURVEY" -> Just Survey-        "VIDEO_COMPLETE" -> Just VideoComplete-        "VIDEO_CUSTOM" -> Just VideoCustom-        "VIDEO_FIRST_QUARTILE" -> Just VideoFirstQuartile-        "VIDEO_FULLSCREEN" -> Just VideoFullscreen-        "VIDEO_MIDPOINT" -> Just VideoMidpoint-        "VIDEO_MUTE" -> Just VideoMute-        "VIDEO_PAUSE" -> Just VideoPause-        "VIDEO_REWIND" -> Just VideoRewind-        "VIDEO_START" -> Just VideoStart-        "VIDEO_STOP" -> Just VideoStop-        "VIDEO_THIRD_QUARTILE" -> Just VideoThirdQuartile-        _ -> Nothing--instance ToText ThirdPartyTrackingURLThirdPartyURLType where-    toText = \case-        ClickTracking -> "CLICK_TRACKING"-        Impression -> "IMPRESSION"-        RichMediaBackupImpression -> "RICH_MEDIA_BACKUP_IMPRESSION"-        RichMediaImpression -> "RICH_MEDIA_IMPRESSION"-        RichMediaRmImpression -> "RICH_MEDIA_RM_IMPRESSION"-        Survey -> "SURVEY"-        VideoComplete -> "VIDEO_COMPLETE"-        VideoCustom -> "VIDEO_CUSTOM"-        VideoFirstQuartile -> "VIDEO_FIRST_QUARTILE"-        VideoFullscreen -> "VIDEO_FULLSCREEN"-        VideoMidpoint -> "VIDEO_MIDPOINT"-        VideoMute -> "VIDEO_MUTE"-        VideoPause -> "VIDEO_PAUSE"-        VideoRewind -> "VIDEO_REWIND"-        VideoStart -> "VIDEO_START"-        VideoStop -> "VIDEO_STOP"-        VideoThirdQuartile -> "VIDEO_THIRD_QUARTILE"--instance FromJSON ThirdPartyTrackingURLThirdPartyURLType where-    parseJSON = parseJSONText "ThirdPartyTrackingURLThirdPartyURLType"--instance ToJSON ThirdPartyTrackingURLThirdPartyURLType where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data TargetableRemarketingListsListSortOrder-    = TRLLSOAscending-      -- ^ @ASCENDING@-    | TRLLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable TargetableRemarketingListsListSortOrder--instance FromText TargetableRemarketingListsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just TRLLSOAscending-        "DESCENDING" -> Just TRLLSODescending-        _ -> Nothing--instance ToText TargetableRemarketingListsListSortOrder where-    toText = \case-        TRLLSOAscending -> "ASCENDING"-        TRLLSODescending -> "DESCENDING"--instance FromJSON TargetableRemarketingListsListSortOrder where-    parseJSON = parseJSONText "TargetableRemarketingListsListSortOrder"--instance ToJSON TargetableRemarketingListsListSortOrder where-    toJSON = toJSONText---- | Offset left unit for an asset. This is a read-only field. Applicable to--- the following creative types: all RICH_MEDIA.-data CreativeAssetPositionLeftUnit-    = OffSetUnitPercent-      -- ^ @OFFSET_UNIT_PERCENT@-    | OffSetUnitPixel-      -- ^ @OFFSET_UNIT_PIXEL@-    | OffSetUnitPixelFromCenter-      -- ^ @OFFSET_UNIT_PIXEL_FROM_CENTER@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeAssetPositionLeftUnit--instance FromText CreativeAssetPositionLeftUnit where-    fromText = \case-        "OFFSET_UNIT_PERCENT" -> Just OffSetUnitPercent-        "OFFSET_UNIT_PIXEL" -> Just OffSetUnitPixel-        "OFFSET_UNIT_PIXEL_FROM_CENTER" -> Just OffSetUnitPixelFromCenter-        _ -> Nothing--instance ToText CreativeAssetPositionLeftUnit where-    toText = \case-        OffSetUnitPercent -> "OFFSET_UNIT_PERCENT"-        OffSetUnitPixel -> "OFFSET_UNIT_PIXEL"-        OffSetUnitPixelFromCenter -> "OFFSET_UNIT_PIXEL_FROM_CENTER"--instance FromJSON CreativeAssetPositionLeftUnit where-    parseJSON = parseJSONText "CreativeAssetPositionLeftUnit"--instance ToJSON CreativeAssetPositionLeftUnit where-    toJSON = toJSONText---- | Placement cap cost option.-data PricingScheduleCapCostOption-    = CapCostCumulative-      -- ^ @CAP_COST_CUMULATIVE@-    | CapCostMonthly-      -- ^ @CAP_COST_MONTHLY@-    | CapCostNone-      -- ^ @CAP_COST_NONE@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PricingScheduleCapCostOption--instance FromText PricingScheduleCapCostOption where-    fromText = \case-        "CAP_COST_CUMULATIVE" -> Just CapCostCumulative-        "CAP_COST_MONTHLY" -> Just CapCostMonthly-        "CAP_COST_NONE" -> Just CapCostNone-        _ -> Nothing--instance ToText PricingScheduleCapCostOption where-    toText = \case-        CapCostCumulative -> "CAP_COST_CUMULATIVE"-        CapCostMonthly -> "CAP_COST_MONTHLY"-        CapCostNone -> "CAP_COST_NONE"--instance FromJSON PricingScheduleCapCostOption where-    parseJSON = parseJSONText "PricingScheduleCapCostOption"--instance ToJSON PricingScheduleCapCostOption where-    toJSON = toJSONText---- | Levels of availability for a user role permission.-data UserRolePermissionAvailability-    = AccountAlways-      -- ^ @ACCOUNT_ALWAYS@-    | AccountByDefault-      -- ^ @ACCOUNT_BY_DEFAULT@-    | NotAvailableByDefault-      -- ^ @NOT_AVAILABLE_BY_DEFAULT@-    | SubAccountAndAccountAlways-      -- ^ @SUBACCOUNT_AND_ACCOUNT_ALWAYS@-    | SubAccountAndAccountByDefault-      -- ^ @SUBACCOUNT_AND_ACCOUNT_BY_DEFAULT@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable UserRolePermissionAvailability--instance FromText UserRolePermissionAvailability where-    fromText = \case-        "ACCOUNT_ALWAYS" -> Just AccountAlways-        "ACCOUNT_BY_DEFAULT" -> Just AccountByDefault-        "NOT_AVAILABLE_BY_DEFAULT" -> Just NotAvailableByDefault-        "SUBACCOUNT_AND_ACCOUNT_ALWAYS" -> Just SubAccountAndAccountAlways-        "SUBACCOUNT_AND_ACCOUNT_BY_DEFAULT" -> Just SubAccountAndAccountByDefault-        _ -> Nothing--instance ToText UserRolePermissionAvailability where-    toText = \case-        AccountAlways -> "ACCOUNT_ALWAYS"-        AccountByDefault -> "ACCOUNT_BY_DEFAULT"-        NotAvailableByDefault -> "NOT_AVAILABLE_BY_DEFAULT"-        SubAccountAndAccountAlways -> "SUBACCOUNT_AND_ACCOUNT_ALWAYS"-        SubAccountAndAccountByDefault -> "SUBACCOUNT_AND_ACCOUNT_BY_DEFAULT"--instance FromJSON UserRolePermissionAvailability where-    parseJSON = parseJSONText "UserRolePermissionAvailability"--instance ToJSON UserRolePermissionAvailability where-    toJSON = toJSONText---- | Visibility of this directory site contact assignment. When set to PUBLIC--- this contact assignment is visible to all account and agency users; when--- set to PRIVATE it is visible only to the site.-data DirectorySiteContactAssignmentVisibility-    = Private-      -- ^ @PRIVATE@-    | Public-      -- ^ @PUBLIC@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable DirectorySiteContactAssignmentVisibility--instance FromText DirectorySiteContactAssignmentVisibility where-    fromText = \case-        "PRIVATE" -> Just Private-        "PUBLIC" -> Just Public-        _ -> Nothing--instance ToText DirectorySiteContactAssignmentVisibility where-    toText = \case-        Private -> "PRIVATE"-        Public -> "PUBLIC"--instance FromJSON DirectorySiteContactAssignmentVisibility where-    parseJSON = parseJSONText "DirectorySiteContactAssignmentVisibility"--instance ToJSON DirectorySiteContactAssignmentVisibility where-    toJSON = toJSONText---- | Placement compatibility. WEB and WEB_INTERSTITIAL refer to rendering--- either on desktop or on mobile devices for regular or interstitial ads,--- respectively. APP and APP_INTERSTITIAL are for rendering in mobile--- apps.IN_STREAM_VIDEO refers to rendering in in-stream video ads--- developed with the VAST standard. This field is required on insertion.-data PlacementCompatibility-    = App-      -- ^ @APP@-    | AppInterstitial-      -- ^ @APP_INTERSTITIAL@-    | InStreamVideo-      -- ^ @IN_STREAM_VIDEO@-    | Web-      -- ^ @WEB@-    | WebInterstitial-      -- ^ @WEB_INTERSTITIAL@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PlacementCompatibility--instance FromText PlacementCompatibility where-    fromText = \case-        "APP" -> Just App-        "APP_INTERSTITIAL" -> Just AppInterstitial-        "IN_STREAM_VIDEO" -> Just InStreamVideo-        "WEB" -> Just Web-        "WEB_INTERSTITIAL" -> Just WebInterstitial-        _ -> Nothing--instance ToText PlacementCompatibility where-    toText = \case-        App -> "APP"-        AppInterstitial -> "APP_INTERSTITIAL"-        InStreamVideo -> "IN_STREAM_VIDEO"-        Web -> "WEB"-        WebInterstitial -> "WEB_INTERSTITIAL"--instance FromJSON PlacementCompatibility where-    parseJSON = parseJSONText "PlacementCompatibility"--instance ToJSON PlacementCompatibility where-    toJSON = toJSONText---- | Comparison operator of this term. This field is only relevant when type--- is left unset or set to CUSTOM_VARIABLE_TERM or REFERRER_TERM.-data ListPopulationTermOperator-    = NumEquals-      -- ^ @NUM_EQUALS@-    | NumGreaterThan-      -- ^ @NUM_GREATER_THAN@-    | NumGreaterThanEqual-      -- ^ @NUM_GREATER_THAN_EQUAL@-    | NumLessThan-      -- ^ @NUM_LESS_THAN@-    | NumLessThanEqual-      -- ^ @NUM_LESS_THAN_EQUAL@-    | StringContains-      -- ^ @STRING_CONTAINS@-    | StringEquals-      -- ^ @STRING_EQUALS@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ListPopulationTermOperator--instance FromText ListPopulationTermOperator where-    fromText = \case-        "NUM_EQUALS" -> Just NumEquals-        "NUM_GREATER_THAN" -> Just NumGreaterThan-        "NUM_GREATER_THAN_EQUAL" -> Just NumGreaterThanEqual-        "NUM_LESS_THAN" -> Just NumLessThan-        "NUM_LESS_THAN_EQUAL" -> Just NumLessThanEqual-        "STRING_CONTAINS" -> Just StringContains-        "STRING_EQUALS" -> Just StringEquals-        _ -> Nothing--instance ToText ListPopulationTermOperator where-    toText = \case-        NumEquals -> "NUM_EQUALS"-        NumGreaterThan -> "NUM_GREATER_THAN"-        NumGreaterThanEqual -> "NUM_GREATER_THAN_EQUAL"-        NumLessThan -> "NUM_LESS_THAN"-        NumLessThanEqual -> "NUM_LESS_THAN_EQUAL"-        StringContains -> "STRING_CONTAINS"-        StringEquals -> "STRING_EQUALS"--instance FromJSON ListPopulationTermOperator where-    parseJSON = parseJSONText "ListPopulationTermOperator"--instance ToJSON ListPopulationTermOperator where-    toJSON = toJSONText---- | Select only placements with this payment source.-data PlacementsListPaymentSource-    = PlacementAgencyPaid-      -- ^ @PLACEMENT_AGENCY_PAID@-    | PlacementPublisherPaid-      -- ^ @PLACEMENT_PUBLISHER_PAID@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PlacementsListPaymentSource--instance FromText PlacementsListPaymentSource where-    fromText = \case-        "PLACEMENT_AGENCY_PAID" -> Just PlacementAgencyPaid-        "PLACEMENT_PUBLISHER_PAID" -> Just PlacementPublisherPaid-        _ -> Nothing--instance ToText PlacementsListPaymentSource where-    toText = \case-        PlacementAgencyPaid -> "PLACEMENT_AGENCY_PAID"-        PlacementPublisherPaid -> "PLACEMENT_PUBLISHER_PAID"--instance FromJSON PlacementsListPaymentSource where-    parseJSON = parseJSONText "PlacementsListPaymentSource"--instance ToJSON PlacementsListPaymentSource where-    toJSON = toJSONText---- | The field by which to sort the list.-data ReportsListSortField-    = RLSFID-      -- ^ @ID@-      -- Sort by report ID.-    | RLSFLastModifiedTime-      -- ^ @LAST_MODIFIED_TIME@-      -- Sort by \'lastModifiedTime\' field.-    | RLSFName-      -- ^ @NAME@-      -- Sort by name of reports.-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ReportsListSortField--instance FromText ReportsListSortField where-    fromText = \case-        "ID" -> Just RLSFID-        "LAST_MODIFIED_TIME" -> Just RLSFLastModifiedTime-        "NAME" -> Just RLSFName-        _ -> Nothing--instance ToText ReportsListSortField where-    toText = \case-        RLSFID -> "ID"-        RLSFLastModifiedTime -> "LAST_MODIFIED_TIME"-        RLSFName -> "NAME"--instance FromJSON ReportsListSortField where-    parseJSON = parseJSONText "ReportsListSortField"--instance ToJSON ReportsListSortField where-    toJSON = toJSONText---- | Ad slot compatibility. WEB and WEB_INTERSTITIAL refer to rendering--- either on desktop or on mobile devices for regular or interstitial ads--- respectively. APP and APP_INTERSTITIAL are for rendering in mobile apps.--- IN_STREAM_VIDEO refers to rendering in in-stream video ads developed--- with the VAST standard.-data AdSlotCompatibility-    = PlanningRenderingEnvironmentTypeApp-      -- ^ @PLANNING_RENDERING_ENVIRONMENT_TYPE_APP@-    | PlanningRenderingEnvironmentTypeAppInterstitial-      -- ^ @PLANNING_RENDERING_ENVIRONMENT_TYPE_APP_INTERSTITIAL@-    | PlanningRenderingEnvironmentTypeInStreamVideo-      -- ^ @PLANNING_RENDERING_ENVIRONMENT_TYPE_IN_STREAM_VIDEO@-    | PlanningRenderingEnvironmentTypeWeb-      -- ^ @PLANNING_RENDERING_ENVIRONMENT_TYPE_WEB@-    | PlanningRenderingEnvironmentTypeWebInterstitial-      -- ^ @PLANNING_RENDERING_ENVIRONMENT_TYPE_WEB_INTERSTITIAL@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AdSlotCompatibility--instance FromText AdSlotCompatibility where-    fromText = \case-        "PLANNING_RENDERING_ENVIRONMENT_TYPE_APP" -> Just PlanningRenderingEnvironmentTypeApp-        "PLANNING_RENDERING_ENVIRONMENT_TYPE_APP_INTERSTITIAL" -> Just PlanningRenderingEnvironmentTypeAppInterstitial-        "PLANNING_RENDERING_ENVIRONMENT_TYPE_IN_STREAM_VIDEO" -> Just PlanningRenderingEnvironmentTypeInStreamVideo-        "PLANNING_RENDERING_ENVIRONMENT_TYPE_WEB" -> Just PlanningRenderingEnvironmentTypeWeb-        "PLANNING_RENDERING_ENVIRONMENT_TYPE_WEB_INTERSTITIAL" -> Just PlanningRenderingEnvironmentTypeWebInterstitial-        _ -> Nothing--instance ToText AdSlotCompatibility where-    toText = \case-        PlanningRenderingEnvironmentTypeApp -> "PLANNING_RENDERING_ENVIRONMENT_TYPE_APP"-        PlanningRenderingEnvironmentTypeAppInterstitial -> "PLANNING_RENDERING_ENVIRONMENT_TYPE_APP_INTERSTITIAL"-        PlanningRenderingEnvironmentTypeInStreamVideo -> "PLANNING_RENDERING_ENVIRONMENT_TYPE_IN_STREAM_VIDEO"-        PlanningRenderingEnvironmentTypeWeb -> "PLANNING_RENDERING_ENVIRONMENT_TYPE_WEB"-        PlanningRenderingEnvironmentTypeWebInterstitial -> "PLANNING_RENDERING_ENVIRONMENT_TYPE_WEB_INTERSTITIAL"--instance FromJSON AdSlotCompatibility where-    parseJSON = parseJSONText "AdSlotCompatibility"--instance ToJSON AdSlotCompatibility where-    toJSON = toJSONText---- | Field by which to sort the list.-data CampaignsListSortField-    = CLSFID-      -- ^ @ID@-    | CLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CampaignsListSortField--instance FromText CampaignsListSortField where-    fromText = \case-        "ID" -> Just CLSFID-        "NAME" -> Just CLSFName-        _ -> Nothing--instance ToText CampaignsListSortField where-    toText = \case-        CLSFID -> "ID"-        CLSFName -> "NAME"--instance FromJSON CampaignsListSortField where-    parseJSON = parseJSONText "CampaignsListSortField"--instance ToJSON CampaignsListSortField where-    toJSON = toJSONText---- | Trafficker type of this user profile.-data AccountUserProFileTraffickerType-    = ExternalTrafficker-      -- ^ @EXTERNAL_TRAFFICKER@-    | InternalNonTrafficker-      -- ^ @INTERNAL_NON_TRAFFICKER@-    | InternalTrafficker-      -- ^ @INTERNAL_TRAFFICKER@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AccountUserProFileTraffickerType--instance FromText AccountUserProFileTraffickerType where-    fromText = \case-        "EXTERNAL_TRAFFICKER" -> Just ExternalTrafficker-        "INTERNAL_NON_TRAFFICKER" -> Just InternalNonTrafficker-        "INTERNAL_TRAFFICKER" -> Just InternalTrafficker-        _ -> Nothing--instance ToText AccountUserProFileTraffickerType where-    toText = \case-        ExternalTrafficker -> "EXTERNAL_TRAFFICKER"-        InternalNonTrafficker -> "INTERNAL_NON_TRAFFICKER"-        InternalTrafficker -> "INTERNAL_TRAFFICKER"--instance FromJSON AccountUserProFileTraffickerType where-    parseJSON = parseJSONText "AccountUserProFileTraffickerType"--instance ToJSON AccountUserProFileTraffickerType where-    toJSON = toJSONText--data CreativeAssetMetadataDetectedFeaturesItem-    = ApplicationCache-      -- ^ @APPLICATION_CACHE@-    | Audio-      -- ^ @AUDIO@-    | Canvas-      -- ^ @CANVAS@-    | CanvasText-      -- ^ @CANVAS_TEXT@-    | CssAnimations-      -- ^ @CSS_ANIMATIONS@-    | CssBackgRoundSize-      -- ^ @CSS_BACKGROUND_SIZE@-    | CssBOrderImage-      -- ^ @CSS_BORDER_IMAGE@-    | CssBOrderRadius-      -- ^ @CSS_BORDER_RADIUS@-    | CssBoxShadow-      -- ^ @CSS_BOX_SHADOW@-    | CssColumns-      -- ^ @CSS_COLUMNS@-    | CssFlexBox-      -- ^ @CSS_FLEX_BOX@-    | CssFontFace-      -- ^ @CSS_FONT_FACE@-    | CssGeneratedContent-      -- ^ @CSS_GENERATED_CONTENT@-    | CssGradients-      -- ^ @CSS_GRADIENTS@-    | CssHsla-      -- ^ @CSS_HSLA@-    | CssMultipleBgs-      -- ^ @CSS_MULTIPLE_BGS@-    | CssOpacity-      -- ^ @CSS_OPACITY@-    | CssReflections-      -- ^ @CSS_REFLECTIONS@-    | CssRgba-      -- ^ @CSS_RGBA@-    | CssTextShadow-      -- ^ @CSS_TEXT_SHADOW@-    | CssTransforms-      -- ^ @CSS_TRANSFORMS@-    | CssTRANSFORMS3D-      -- ^ @CSS_TRANSFORMS3D@-    | CssTransitions-      -- ^ @CSS_TRANSITIONS@-    | DragAndDrop-      -- ^ @DRAG_AND_DROP@-    | GeoLocation-      -- ^ @GEO_LOCATION@-    | HashChange-      -- ^ @HASH_CHANGE@-    | History-      -- ^ @HISTORY@-    | IndexedDB-      -- ^ @INDEXED_DB@-    | InlineSvg-      -- ^ @INLINE_SVG@-    | InputAttrAutocomplete-      -- ^ @INPUT_ATTR_AUTOCOMPLETE@-    | InputAttrAutofocus-      -- ^ @INPUT_ATTR_AUTOFOCUS@-    | InputAttrList-      -- ^ @INPUT_ATTR_LIST@-    | InputAttrMax-      -- ^ @INPUT_ATTR_MAX@-    | InputAttrMin-      -- ^ @INPUT_ATTR_MIN@-    | InputAttrMultiple-      -- ^ @INPUT_ATTR_MULTIPLE@-    | InputAttrPattern-      -- ^ @INPUT_ATTR_PATTERN@-    | InputAttrPlaceholder-      -- ^ @INPUT_ATTR_PLACEHOLDER@-    | InputAttrRequired-      -- ^ @INPUT_ATTR_REQUIRED@-    | InputAttrStep-      -- ^ @INPUT_ATTR_STEP@-    | InputTypeColor-      -- ^ @INPUT_TYPE_COLOR@-    | InputTypeDate-      -- ^ @INPUT_TYPE_DATE@-    | InputTypeDatetime-      -- ^ @INPUT_TYPE_DATETIME@-    | InputTypeDatetimeLocal-      -- ^ @INPUT_TYPE_DATETIME_LOCAL@-    | InputTypeEmail-      -- ^ @INPUT_TYPE_EMAIL@-    | InputTypeMonth-      -- ^ @INPUT_TYPE_MONTH@-    | InputTypeNumber-      -- ^ @INPUT_TYPE_NUMBER@-    | InputTypeRange-      -- ^ @INPUT_TYPE_RANGE@-    | InputTypeSearch-      -- ^ @INPUT_TYPE_SEARCH@-    | InputTypeTel-      -- ^ @INPUT_TYPE_TEL@-    | InputTypeTime-      -- ^ @INPUT_TYPE_TIME@-    | InputTypeURL-      -- ^ @INPUT_TYPE_URL@-    | InputTypeWeek-      -- ^ @INPUT_TYPE_WEEK@-    | LocalStorage-      -- ^ @LOCAL_STORAGE@-    | PostMessage-      -- ^ @POST_MESSAGE@-    | SessionStorage-      -- ^ @SESSION_STORAGE@-    | Smil-      -- ^ @SMIL@-    | SvgClipPaths-      -- ^ @SVG_CLIP_PATHS@-    | SvgFeImage-      -- ^ @SVG_FE_IMAGE@-    | SvgFilters-      -- ^ @SVG_FILTERS@-    | SvgHref-      -- ^ @SVG_HREF@-    | Touch-      -- ^ @TOUCH@-    | Video-      -- ^ @VIDEO@-    | Webgl-      -- ^ @WEBGL@-    | WebSockets-      -- ^ @WEB_SOCKETS@-    | WebSQLDatabase-      -- ^ @WEB_SQL_DATABASE@-    | WebWorkers-      -- ^ @WEB_WORKERS@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeAssetMetadataDetectedFeaturesItem--instance FromText CreativeAssetMetadataDetectedFeaturesItem where-    fromText = \case-        "APPLICATION_CACHE" -> Just ApplicationCache-        "AUDIO" -> Just Audio-        "CANVAS" -> Just Canvas-        "CANVAS_TEXT" -> Just CanvasText-        "CSS_ANIMATIONS" -> Just CssAnimations-        "CSS_BACKGROUND_SIZE" -> Just CssBackgRoundSize-        "CSS_BORDER_IMAGE" -> Just CssBOrderImage-        "CSS_BORDER_RADIUS" -> Just CssBOrderRadius-        "CSS_BOX_SHADOW" -> Just CssBoxShadow-        "CSS_COLUMNS" -> Just CssColumns-        "CSS_FLEX_BOX" -> Just CssFlexBox-        "CSS_FONT_FACE" -> Just CssFontFace-        "CSS_GENERATED_CONTENT" -> Just CssGeneratedContent-        "CSS_GRADIENTS" -> Just CssGradients-        "CSS_HSLA" -> Just CssHsla-        "CSS_MULTIPLE_BGS" -> Just CssMultipleBgs-        "CSS_OPACITY" -> Just CssOpacity-        "CSS_REFLECTIONS" -> Just CssReflections-        "CSS_RGBA" -> Just CssRgba-        "CSS_TEXT_SHADOW" -> Just CssTextShadow-        "CSS_TRANSFORMS" -> Just CssTransforms-        "CSS_TRANSFORMS3D" -> Just CssTRANSFORMS3D-        "CSS_TRANSITIONS" -> Just CssTransitions-        "DRAG_AND_DROP" -> Just DragAndDrop-        "GEO_LOCATION" -> Just GeoLocation-        "HASH_CHANGE" -> Just HashChange-        "HISTORY" -> Just History-        "INDEXED_DB" -> Just IndexedDB-        "INLINE_SVG" -> Just InlineSvg-        "INPUT_ATTR_AUTOCOMPLETE" -> Just InputAttrAutocomplete-        "INPUT_ATTR_AUTOFOCUS" -> Just InputAttrAutofocus-        "INPUT_ATTR_LIST" -> Just InputAttrList-        "INPUT_ATTR_MAX" -> Just InputAttrMax-        "INPUT_ATTR_MIN" -> Just InputAttrMin-        "INPUT_ATTR_MULTIPLE" -> Just InputAttrMultiple-        "INPUT_ATTR_PATTERN" -> Just InputAttrPattern-        "INPUT_ATTR_PLACEHOLDER" -> Just InputAttrPlaceholder-        "INPUT_ATTR_REQUIRED" -> Just InputAttrRequired-        "INPUT_ATTR_STEP" -> Just InputAttrStep-        "INPUT_TYPE_COLOR" -> Just InputTypeColor-        "INPUT_TYPE_DATE" -> Just InputTypeDate-        "INPUT_TYPE_DATETIME" -> Just InputTypeDatetime-        "INPUT_TYPE_DATETIME_LOCAL" -> Just InputTypeDatetimeLocal-        "INPUT_TYPE_EMAIL" -> Just InputTypeEmail-        "INPUT_TYPE_MONTH" -> Just InputTypeMonth-        "INPUT_TYPE_NUMBER" -> Just InputTypeNumber-        "INPUT_TYPE_RANGE" -> Just InputTypeRange-        "INPUT_TYPE_SEARCH" -> Just InputTypeSearch-        "INPUT_TYPE_TEL" -> Just InputTypeTel-        "INPUT_TYPE_TIME" -> Just InputTypeTime-        "INPUT_TYPE_URL" -> Just InputTypeURL-        "INPUT_TYPE_WEEK" -> Just InputTypeWeek-        "LOCAL_STORAGE" -> Just LocalStorage-        "POST_MESSAGE" -> Just PostMessage-        "SESSION_STORAGE" -> Just SessionStorage-        "SMIL" -> Just Smil-        "SVG_CLIP_PATHS" -> Just SvgClipPaths-        "SVG_FE_IMAGE" -> Just SvgFeImage-        "SVG_FILTERS" -> Just SvgFilters-        "SVG_HREF" -> Just SvgHref-        "TOUCH" -> Just Touch-        "VIDEO" -> Just Video-        "WEBGL" -> Just Webgl-        "WEB_SOCKETS" -> Just WebSockets-        "WEB_SQL_DATABASE" -> Just WebSQLDatabase-        "WEB_WORKERS" -> Just WebWorkers-        _ -> Nothing--instance ToText CreativeAssetMetadataDetectedFeaturesItem where-    toText = \case-        ApplicationCache -> "APPLICATION_CACHE"-        Audio -> "AUDIO"-        Canvas -> "CANVAS"-        CanvasText -> "CANVAS_TEXT"-        CssAnimations -> "CSS_ANIMATIONS"-        CssBackgRoundSize -> "CSS_BACKGROUND_SIZE"-        CssBOrderImage -> "CSS_BORDER_IMAGE"-        CssBOrderRadius -> "CSS_BORDER_RADIUS"-        CssBoxShadow -> "CSS_BOX_SHADOW"-        CssColumns -> "CSS_COLUMNS"-        CssFlexBox -> "CSS_FLEX_BOX"-        CssFontFace -> "CSS_FONT_FACE"-        CssGeneratedContent -> "CSS_GENERATED_CONTENT"-        CssGradients -> "CSS_GRADIENTS"-        CssHsla -> "CSS_HSLA"-        CssMultipleBgs -> "CSS_MULTIPLE_BGS"-        CssOpacity -> "CSS_OPACITY"-        CssReflections -> "CSS_REFLECTIONS"-        CssRgba -> "CSS_RGBA"-        CssTextShadow -> "CSS_TEXT_SHADOW"-        CssTransforms -> "CSS_TRANSFORMS"-        CssTRANSFORMS3D -> "CSS_TRANSFORMS3D"-        CssTransitions -> "CSS_TRANSITIONS"-        DragAndDrop -> "DRAG_AND_DROP"-        GeoLocation -> "GEO_LOCATION"-        HashChange -> "HASH_CHANGE"-        History -> "HISTORY"-        IndexedDB -> "INDEXED_DB"-        InlineSvg -> "INLINE_SVG"-        InputAttrAutocomplete -> "INPUT_ATTR_AUTOCOMPLETE"-        InputAttrAutofocus -> "INPUT_ATTR_AUTOFOCUS"-        InputAttrList -> "INPUT_ATTR_LIST"-        InputAttrMax -> "INPUT_ATTR_MAX"-        InputAttrMin -> "INPUT_ATTR_MIN"-        InputAttrMultiple -> "INPUT_ATTR_MULTIPLE"-        InputAttrPattern -> "INPUT_ATTR_PATTERN"-        InputAttrPlaceholder -> "INPUT_ATTR_PLACEHOLDER"-        InputAttrRequired -> "INPUT_ATTR_REQUIRED"-        InputAttrStep -> "INPUT_ATTR_STEP"-        InputTypeColor -> "INPUT_TYPE_COLOR"-        InputTypeDate -> "INPUT_TYPE_DATE"-        InputTypeDatetime -> "INPUT_TYPE_DATETIME"-        InputTypeDatetimeLocal -> "INPUT_TYPE_DATETIME_LOCAL"-        InputTypeEmail -> "INPUT_TYPE_EMAIL"-        InputTypeMonth -> "INPUT_TYPE_MONTH"-        InputTypeNumber -> "INPUT_TYPE_NUMBER"-        InputTypeRange -> "INPUT_TYPE_RANGE"-        InputTypeSearch -> "INPUT_TYPE_SEARCH"-        InputTypeTel -> "INPUT_TYPE_TEL"-        InputTypeTime -> "INPUT_TYPE_TIME"-        InputTypeURL -> "INPUT_TYPE_URL"-        InputTypeWeek -> "INPUT_TYPE_WEEK"-        LocalStorage -> "LOCAL_STORAGE"-        PostMessage -> "POST_MESSAGE"-        SessionStorage -> "SESSION_STORAGE"-        Smil -> "SMIL"-        SvgClipPaths -> "SVG_CLIP_PATHS"-        SvgFeImage -> "SVG_FE_IMAGE"-        SvgFilters -> "SVG_FILTERS"-        SvgHref -> "SVG_HREF"-        Touch -> "TOUCH"-        Video -> "VIDEO"-        Webgl -> "WEBGL"-        WebSockets -> "WEB_SOCKETS"-        WebSQLDatabase -> "WEB_SQL_DATABASE"-        WebWorkers -> "WEB_WORKERS"--instance FromJSON CreativeAssetMetadataDetectedFeaturesItem where-    parseJSON = parseJSONText "CreativeAssetMetadataDetectedFeaturesItem"--instance ToJSON CreativeAssetMetadataDetectedFeaturesItem where-    toJSON = toJSONText---- | Select default ads with the specified compatibility. Applicable when--- type is AD_SERVING_DEFAULT_AD. WEB and WEB_INTERSTITIAL refer to--- rendering either on desktop or on mobile devices for regular or--- interstitial ads, respectively. APP and APP_INTERSTITIAL are for--- rendering in mobile apps. IN_STREAM_VIDEO refers to rendering an--- in-stream video ads developed with the VAST standard.-data AdsListCompatibility-    = ALCApp-      -- ^ @APP@-    | ALCAppInterstitial-      -- ^ @APP_INTERSTITIAL@-    | ALCInStreamVideo-      -- ^ @IN_STREAM_VIDEO@-    | ALCWeb-      -- ^ @WEB@-    | ALCWebInterstitial-      -- ^ @WEB_INTERSTITIAL@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AdsListCompatibility--instance FromText AdsListCompatibility where-    fromText = \case-        "APP" -> Just ALCApp-        "APP_INTERSTITIAL" -> Just ALCAppInterstitial-        "IN_STREAM_VIDEO" -> Just ALCInStreamVideo-        "WEB" -> Just ALCWeb-        "WEB_INTERSTITIAL" -> Just ALCWebInterstitial-        _ -> Nothing--instance ToText AdsListCompatibility where-    toText = \case-        ALCApp -> "APP"-        ALCAppInterstitial -> "APP_INTERSTITIAL"-        ALCInStreamVideo -> "IN_STREAM_VIDEO"-        ALCWeb -> "WEB"-        ALCWebInterstitial -> "WEB_INTERSTITIAL"--instance FromJSON AdsListCompatibility where-    parseJSON = parseJSONText "AdsListCompatibility"--instance ToJSON AdsListCompatibility where-    toJSON = toJSONText---- | Status of this event tag. Must be ENABLED for this event tag to fire.--- This is a required field.-data EventTagStatus-    = Disabled-      -- ^ @DISABLED@-    | Enabled-      -- ^ @ENABLED@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable EventTagStatus--instance FromText EventTagStatus where-    fromText = \case-        "DISABLED" -> Just Disabled-        "ENABLED" -> Just Enabled-        _ -> Nothing--instance ToText EventTagStatus where-    toText = \case-        Disabled -> "DISABLED"-        Enabled -> "ENABLED"--instance FromJSON EventTagStatus where-    parseJSON = parseJSONText "EventTagStatus"--instance ToJSON EventTagStatus where-    toJSON = toJSONText---- | Field by which to sort the list.-data SitesListSortField-    = SLSFID-      -- ^ @ID@-    | SLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable SitesListSortField--instance FromText SitesListSortField where-    fromText = \case-        "ID" -> Just SLSFID-        "NAME" -> Just SLSFName-        _ -> Nothing--instance ToText SitesListSortField where-    toText = \case-        SLSFID -> "ID"-        SLSFName -> "NAME"--instance FromJSON SitesListSortField where-    parseJSON = parseJSONText "SitesListSortField"--instance ToJSON SitesListSortField where-    toJSON = toJSONText---- | Select only event tags with the specified event tag types. Event tag--- types can be used to specify whether to use a third-party pixel, a--- third-party JavaScript URL, or a third-party click-through URL for--- either impression or click tracking.-data EventTagsListEventTagTypes-    = ClickThroughEventTag-      -- ^ @CLICK_THROUGH_EVENT_TAG@-    | ImpressionImageEventTag-      -- ^ @IMPRESSION_IMAGE_EVENT_TAG@-    | ImpressionJavascriptEventTag-      -- ^ @IMPRESSION_JAVASCRIPT_EVENT_TAG@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable EventTagsListEventTagTypes--instance FromText EventTagsListEventTagTypes where-    fromText = \case-        "CLICK_THROUGH_EVENT_TAG" -> Just ClickThroughEventTag-        "IMPRESSION_IMAGE_EVENT_TAG" -> Just ImpressionImageEventTag-        "IMPRESSION_JAVASCRIPT_EVENT_TAG" -> Just ImpressionJavascriptEventTag-        _ -> Nothing--instance ToText EventTagsListEventTagTypes where-    toText = \case-        ClickThroughEventTag -> "CLICK_THROUGH_EVENT_TAG"-        ImpressionImageEventTag -> "IMPRESSION_IMAGE_EVENT_TAG"-        ImpressionJavascriptEventTag -> "IMPRESSION_JAVASCRIPT_EVENT_TAG"--instance FromJSON EventTagsListEventTagTypes where-    parseJSON = parseJSONText "EventTagsListEventTagTypes"--instance ToJSON EventTagsListEventTagTypes where-    toJSON = toJSONText---- | The status of the report file.-data FileStatus-    = Cancelled-      -- ^ @CANCELLED@-    | Failed-      -- ^ @FAILED@-    | Processing-      -- ^ @PROCESSING@-    | ReportAvailable-      -- ^ @REPORT_AVAILABLE@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FileStatus--instance FromText FileStatus where-    fromText = \case-        "CANCELLED" -> Just Cancelled-        "FAILED" -> Just Failed-        "PROCESSING" -> Just Processing-        "REPORT_AVAILABLE" -> Just ReportAvailable-        _ -> Nothing--instance ToText FileStatus where-    toText = \case-        Cancelled -> "CANCELLED"-        Failed -> "FAILED"-        Processing -> "PROCESSING"-        ReportAvailable -> "REPORT_AVAILABLE"--instance FromJSON FileStatus where-    parseJSON = parseJSONText "FileStatus"--instance ToJSON FileStatus where-    toJSON = toJSONText---- | Artwork type used by the creative.This is a read-only field.-data CreativeCustomEventArtworkType-    = ArtworkTypeFlash-      -- ^ @ARTWORK_TYPE_FLASH@-    | ArtworkTypeHTML5-      -- ^ @ARTWORK_TYPE_HTML5@-    | ArtworkTypeMixed-      -- ^ @ARTWORK_TYPE_MIXED@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeCustomEventArtworkType--instance FromText CreativeCustomEventArtworkType where-    fromText = \case-        "ARTWORK_TYPE_FLASH" -> Just ArtworkTypeFlash-        "ARTWORK_TYPE_HTML5" -> Just ArtworkTypeHTML5-        "ARTWORK_TYPE_MIXED" -> Just ArtworkTypeMixed-        _ -> Nothing--instance ToText CreativeCustomEventArtworkType where-    toText = \case-        ArtworkTypeFlash -> "ARTWORK_TYPE_FLASH"-        ArtworkTypeHTML5 -> "ARTWORK_TYPE_HTML5"-        ArtworkTypeMixed -> "ARTWORK_TYPE_MIXED"--instance FromJSON CreativeCustomEventArtworkType where-    parseJSON = parseJSONText "CreativeCustomEventArtworkType"--instance ToJSON CreativeCustomEventArtworkType where-    toJSON = toJSONText---- | Types of attribution options for natural search conversions.-data FloodlightConfigurationNATuralSearchConversionAttributionOption-    = ExcludeNATuralSearchConversionAttribution-      -- ^ @EXCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION@-    | IncludeNATuralSearchConversionAttribution-      -- ^ @INCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION@-    | IncludeNATuralSearchTieredConversionAttribution-      -- ^ @INCLUDE_NATURAL_SEARCH_TIERED_CONVERSION_ATTRIBUTION@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FloodlightConfigurationNATuralSearchConversionAttributionOption--instance FromText FloodlightConfigurationNATuralSearchConversionAttributionOption where-    fromText = \case-        "EXCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION" -> Just ExcludeNATuralSearchConversionAttribution-        "INCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION" -> Just IncludeNATuralSearchConversionAttribution-        "INCLUDE_NATURAL_SEARCH_TIERED_CONVERSION_ATTRIBUTION" -> Just IncludeNATuralSearchTieredConversionAttribution-        _ -> Nothing--instance ToText FloodlightConfigurationNATuralSearchConversionAttributionOption where-    toText = \case-        ExcludeNATuralSearchConversionAttribution -> "EXCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION"-        IncludeNATuralSearchConversionAttribution -> "INCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION"-        IncludeNATuralSearchTieredConversionAttribution -> "INCLUDE_NATURAL_SEARCH_TIERED_CONVERSION_ATTRIBUTION"--instance FromJSON FloodlightConfigurationNATuralSearchConversionAttributionOption where-    parseJSON = parseJSONText "FloodlightConfigurationNATuralSearchConversionAttributionOption"--instance ToJSON FloodlightConfigurationNATuralSearchConversionAttributionOption where-    toJSON = toJSONText---- | Artwork type of rich media creative. This is a read-only field.--- Applicable to the following creative types: all RICH_MEDIA.-data CreativeAssetArtworkType-    = CAATArtworkTypeFlash-      -- ^ @ARTWORK_TYPE_FLASH@-    | CAATArtworkTypeHTML5-      -- ^ @ARTWORK_TYPE_HTML5@-    | CAATArtworkTypeMixed-      -- ^ @ARTWORK_TYPE_MIXED@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeAssetArtworkType--instance FromText CreativeAssetArtworkType where-    fromText = \case-        "ARTWORK_TYPE_FLASH" -> Just CAATArtworkTypeFlash-        "ARTWORK_TYPE_HTML5" -> Just CAATArtworkTypeHTML5-        "ARTWORK_TYPE_MIXED" -> Just CAATArtworkTypeMixed-        _ -> Nothing--instance ToText CreativeAssetArtworkType where-    toText = \case-        CAATArtworkTypeFlash -> "ARTWORK_TYPE_FLASH"-        CAATArtworkTypeHTML5 -> "ARTWORK_TYPE_HTML5"-        CAATArtworkTypeMixed -> "ARTWORK_TYPE_MIXED"--instance FromJSON CreativeAssetArtworkType where-    parseJSON = parseJSONText "CreativeAssetArtworkType"--instance ToJSON CreativeAssetArtworkType where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data FloodlightActivitiesListSortOrder-    = FALSOAscending-      -- ^ @ASCENDING@-    | FALSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FloodlightActivitiesListSortOrder--instance FromText FloodlightActivitiesListSortOrder where-    fromText = \case-        "ASCENDING" -> Just FALSOAscending-        "DESCENDING" -> Just FALSODescending-        _ -> Nothing--instance ToText FloodlightActivitiesListSortOrder where-    toText = \case-        FALSOAscending -> "ASCENDING"-        FALSODescending -> "DESCENDING"--instance FromJSON FloodlightActivitiesListSortOrder where-    parseJSON = parseJSONText "FloodlightActivitiesListSortOrder"--instance ToJSON FloodlightActivitiesListSortOrder where-    toJSON = toJSONText---- | The output format of the report. Only available once the file is--- available.-data FileFormat-    = CSV-      -- ^ @CSV@-    | Excel-      -- ^ @EXCEL@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FileFormat--instance FromText FileFormat where-    fromText = \case-        "CSV" -> Just CSV-        "EXCEL" -> Just Excel-        _ -> Nothing--instance ToText FileFormat where-    toText = \case-        CSV -> "CSV"-        Excel -> "EXCEL"--instance FromJSON FileFormat where-    parseJSON = parseJSONText "FileFormat"--instance ToJSON FileFormat where-    toJSON = toJSONText---- | Placement pricing type. This field is required on insertion.-data PricingSchedulePricingType-    = PricingTypeCpa-      -- ^ @PRICING_TYPE_CPA@-    | PricingTypeCpc-      -- ^ @PRICING_TYPE_CPC@-    | PricingTypeCpm-      -- ^ @PRICING_TYPE_CPM@-    | PricingTypeFlatRateClicks-      -- ^ @PRICING_TYPE_FLAT_RATE_CLICKS@-    | PricingTypeFlatRateImpressions-      -- ^ @PRICING_TYPE_FLAT_RATE_IMPRESSIONS@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PricingSchedulePricingType--instance FromText PricingSchedulePricingType where-    fromText = \case-        "PRICING_TYPE_CPA" -> Just PricingTypeCpa-        "PRICING_TYPE_CPC" -> Just PricingTypeCpc-        "PRICING_TYPE_CPM" -> Just PricingTypeCpm-        "PRICING_TYPE_FLAT_RATE_CLICKS" -> Just PricingTypeFlatRateClicks-        "PRICING_TYPE_FLAT_RATE_IMPRESSIONS" -> Just PricingTypeFlatRateImpressions-        _ -> Nothing--instance ToText PricingSchedulePricingType where-    toText = \case-        PricingTypeCpa -> "PRICING_TYPE_CPA"-        PricingTypeCpc -> "PRICING_TYPE_CPC"-        PricingTypeCpm -> "PRICING_TYPE_CPM"-        PricingTypeFlatRateClicks -> "PRICING_TYPE_FLAT_RATE_CLICKS"-        PricingTypeFlatRateImpressions -> "PRICING_TYPE_FLAT_RATE_IMPRESSIONS"--instance FromJSON PricingSchedulePricingType where-    parseJSON = parseJSONText "PricingSchedulePricingType"--instance ToJSON PricingSchedulePricingType where-    toJSON = toJSONText---- | Target type used by the event.-data CreativeCustomEventTargetType-    = TargetBlank-      -- ^ @TARGET_BLANK@-    | TargetParent-      -- ^ @TARGET_PARENT@-    | TargetPopup-      -- ^ @TARGET_POPUP@-    | TargetSelf-      -- ^ @TARGET_SELF@-    | TargetTop-      -- ^ @TARGET_TOP@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeCustomEventTargetType--instance FromText CreativeCustomEventTargetType where-    fromText = \case-        "TARGET_BLANK" -> Just TargetBlank-        "TARGET_PARENT" -> Just TargetParent-        "TARGET_POPUP" -> Just TargetPopup-        "TARGET_SELF" -> Just TargetSelf-        "TARGET_TOP" -> Just TargetTop-        _ -> Nothing--instance ToText CreativeCustomEventTargetType where-    toText = \case-        TargetBlank -> "TARGET_BLANK"-        TargetParent -> "TARGET_PARENT"-        TargetPopup -> "TARGET_POPUP"-        TargetSelf -> "TARGET_SELF"-        TargetTop -> "TARGET_TOP"--instance FromJSON CreativeCustomEventTargetType where-    parseJSON = parseJSONText "CreativeCustomEventTargetType"--instance ToJSON CreativeCustomEventTargetType where-    toJSON = toJSONText---- | The scope that defines which results are returned, default is \'MINE\'.-data ReportsListScope-    = All-      -- ^ @ALL@-      -- All reports in account.-    | Mine-      -- ^ @MINE@-      -- My reports.-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ReportsListScope--instance FromText ReportsListScope where-    fromText = \case-        "ALL" -> Just All-        "MINE" -> Just Mine-        _ -> Nothing--instance ToText ReportsListScope where-    toText = \case-        All -> "ALL"-        Mine -> "MINE"--instance FromJSON ReportsListScope where-    parseJSON = parseJSONText "ReportsListScope"--instance ToJSON ReportsListScope where-    toJSON = toJSONText---- | Duration type for which an asset will be displayed. Applicable to the--- following creative types: all RICH_MEDIA.-data CreativeAssetDurationType-    = AssetDurationTypeAuto-      -- ^ @ASSET_DURATION_TYPE_AUTO@-    | AssetDurationTypeCustom-      -- ^ @ASSET_DURATION_TYPE_CUSTOM@-    | AssetDurationTypeNone-      -- ^ @ASSET_DURATION_TYPE_NONE@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeAssetDurationType--instance FromText CreativeAssetDurationType where-    fromText = \case-        "ASSET_DURATION_TYPE_AUTO" -> Just AssetDurationTypeAuto-        "ASSET_DURATION_TYPE_CUSTOM" -> Just AssetDurationTypeCustom-        "ASSET_DURATION_TYPE_NONE" -> Just AssetDurationTypeNone-        _ -> Nothing--instance ToText CreativeAssetDurationType where-    toText = \case-        AssetDurationTypeAuto -> "ASSET_DURATION_TYPE_AUTO"-        AssetDurationTypeCustom -> "ASSET_DURATION_TYPE_CUSTOM"-        AssetDurationTypeNone -> "ASSET_DURATION_TYPE_NONE"--instance FromJSON CreativeAssetDurationType where-    parseJSON = parseJSONText "CreativeAssetDurationType"--instance ToJSON CreativeAssetDurationType where-    toJSON = toJSONText---- | Product from which this targetable remarketing list was originated.-data TargetableRemarketingListListSource-    = RemarketingListSourceDBm-      -- ^ @REMARKETING_LIST_SOURCE_DBM@-    | RemarketingListSourceDfa-      -- ^ @REMARKETING_LIST_SOURCE_DFA@-    | RemarketingListSourceDmp-      -- ^ @REMARKETING_LIST_SOURCE_DMP@-    | RemarketingListSourceGa-      -- ^ @REMARKETING_LIST_SOURCE_GA@-    | RemarketingListSourceOther-      -- ^ @REMARKETING_LIST_SOURCE_OTHER@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable TargetableRemarketingListListSource--instance FromText TargetableRemarketingListListSource where-    fromText = \case-        "REMARKETING_LIST_SOURCE_DBM" -> Just RemarketingListSourceDBm-        "REMARKETING_LIST_SOURCE_DFA" -> Just RemarketingListSourceDfa-        "REMARKETING_LIST_SOURCE_DMP" -> Just RemarketingListSourceDmp-        "REMARKETING_LIST_SOURCE_GA" -> Just RemarketingListSourceGa-        "REMARKETING_LIST_SOURCE_OTHER" -> Just RemarketingListSourceOther-        _ -> Nothing--instance ToText TargetableRemarketingListListSource where-    toText = \case-        RemarketingListSourceDBm -> "REMARKETING_LIST_SOURCE_DBM"-        RemarketingListSourceDfa -> "REMARKETING_LIST_SOURCE_DFA"-        RemarketingListSourceDmp -> "REMARKETING_LIST_SOURCE_DMP"-        RemarketingListSourceGa -> "REMARKETING_LIST_SOURCE_GA"-        RemarketingListSourceOther -> "REMARKETING_LIST_SOURCE_OTHER"--instance FromJSON TargetableRemarketingListListSource where-    parseJSON = parseJSONText "TargetableRemarketingListListSource"--instance ToJSON TargetableRemarketingListListSource where-    toJSON = toJSONText---- | Field by which to sort the list.-data CreativeGroupsListSortField-    = CGLSFID-      -- ^ @ID@-    | CGLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeGroupsListSortField--instance FromText CreativeGroupsListSortField where-    fromText = \case-        "ID" -> Just CGLSFID-        "NAME" -> Just CGLSFName-        _ -> Nothing--instance ToText CreativeGroupsListSortField where-    toText = \case-        CGLSFID -> "ID"-        CGLSFName -> "NAME"--instance FromJSON CreativeGroupsListSortField where-    parseJSON = parseJSONText "CreativeGroupsListSortField"--instance ToJSON CreativeGroupsListSortField where-    toJSON = toJSONText---- | Field by which to sort the list.-data PlacementsListSortField-    = PLSFID-      -- ^ @ID@-    | PLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PlacementsListSortField--instance FromText PlacementsListSortField where-    fromText = \case-        "ID" -> Just PLSFID-        "NAME" -> Just PLSFName-        _ -> Nothing--instance ToText PlacementsListSortField where-    toText = \case-        PLSFID -> "ID"-        PLSFName -> "NAME"--instance FromJSON PlacementsListSortField where-    parseJSON = parseJSONText "PlacementsListSortField"--instance ToJSON PlacementsListSortField where-    toJSON = toJSONText--data CreativeBackupImageFeaturesItem-    = CBIFIApplicationCache-      -- ^ @APPLICATION_CACHE@-    | CBIFIAudio-      -- ^ @AUDIO@-    | CBIFICanvas-      -- ^ @CANVAS@-    | CBIFICanvasText-      -- ^ @CANVAS_TEXT@-    | CBIFICssAnimations-      -- ^ @CSS_ANIMATIONS@-    | CBIFICssBackgRoundSize-      -- ^ @CSS_BACKGROUND_SIZE@-    | CBIFICssBOrderImage-      -- ^ @CSS_BORDER_IMAGE@-    | CBIFICssBOrderRadius-      -- ^ @CSS_BORDER_RADIUS@-    | CBIFICssBoxShadow-      -- ^ @CSS_BOX_SHADOW@-    | CBIFICssColumns-      -- ^ @CSS_COLUMNS@-    | CBIFICssFlexBox-      -- ^ @CSS_FLEX_BOX@-    | CBIFICssFontFace-      -- ^ @CSS_FONT_FACE@-    | CBIFICssGeneratedContent-      -- ^ @CSS_GENERATED_CONTENT@-    | CBIFICssGradients-      -- ^ @CSS_GRADIENTS@-    | CBIFICssHsla-      -- ^ @CSS_HSLA@-    | CBIFICssMultipleBgs-      -- ^ @CSS_MULTIPLE_BGS@-    | CBIFICssOpacity-      -- ^ @CSS_OPACITY@-    | CBIFICssReflections-      -- ^ @CSS_REFLECTIONS@-    | CBIFICssRgba-      -- ^ @CSS_RGBA@-    | CBIFICssTextShadow-      -- ^ @CSS_TEXT_SHADOW@-    | CBIFICssTransforms-      -- ^ @CSS_TRANSFORMS@-    | CBIFICssTRANSFORMS3D-      -- ^ @CSS_TRANSFORMS3D@-    | CBIFICssTransitions-      -- ^ @CSS_TRANSITIONS@-    | CBIFIDragAndDrop-      -- ^ @DRAG_AND_DROP@-    | CBIFIGeoLocation-      -- ^ @GEO_LOCATION@-    | CBIFIHashChange-      -- ^ @HASH_CHANGE@-    | CBIFIHistory-      -- ^ @HISTORY@-    | CBIFIIndexedDB-      -- ^ @INDEXED_DB@-    | CBIFIInlineSvg-      -- ^ @INLINE_SVG@-    | CBIFIInputAttrAutocomplete-      -- ^ @INPUT_ATTR_AUTOCOMPLETE@-    | CBIFIInputAttrAutofocus-      -- ^ @INPUT_ATTR_AUTOFOCUS@-    | CBIFIInputAttrList-      -- ^ @INPUT_ATTR_LIST@-    | CBIFIInputAttrMax-      -- ^ @INPUT_ATTR_MAX@-    | CBIFIInputAttrMin-      -- ^ @INPUT_ATTR_MIN@-    | CBIFIInputAttrMultiple-      -- ^ @INPUT_ATTR_MULTIPLE@-    | CBIFIInputAttrPattern-      -- ^ @INPUT_ATTR_PATTERN@-    | CBIFIInputAttrPlaceholder-      -- ^ @INPUT_ATTR_PLACEHOLDER@-    | CBIFIInputAttrRequired-      -- ^ @INPUT_ATTR_REQUIRED@-    | CBIFIInputAttrStep-      -- ^ @INPUT_ATTR_STEP@-    | CBIFIInputTypeColor-      -- ^ @INPUT_TYPE_COLOR@-    | CBIFIInputTypeDate-      -- ^ @INPUT_TYPE_DATE@-    | CBIFIInputTypeDatetime-      -- ^ @INPUT_TYPE_DATETIME@-    | CBIFIInputTypeDatetimeLocal-      -- ^ @INPUT_TYPE_DATETIME_LOCAL@-    | CBIFIInputTypeEmail-      -- ^ @INPUT_TYPE_EMAIL@-    | CBIFIInputTypeMonth-      -- ^ @INPUT_TYPE_MONTH@-    | CBIFIInputTypeNumber-      -- ^ @INPUT_TYPE_NUMBER@-    | CBIFIInputTypeRange-      -- ^ @INPUT_TYPE_RANGE@-    | CBIFIInputTypeSearch-      -- ^ @INPUT_TYPE_SEARCH@-    | CBIFIInputTypeTel-      -- ^ @INPUT_TYPE_TEL@-    | CBIFIInputTypeTime-      -- ^ @INPUT_TYPE_TIME@-    | CBIFIInputTypeURL-      -- ^ @INPUT_TYPE_URL@-    | CBIFIInputTypeWeek-      -- ^ @INPUT_TYPE_WEEK@-    | CBIFILocalStorage-      -- ^ @LOCAL_STORAGE@-    | CBIFIPostMessage-      -- ^ @POST_MESSAGE@-    | CBIFISessionStorage-      -- ^ @SESSION_STORAGE@-    | CBIFISmil-      -- ^ @SMIL@-    | CBIFISvgClipPaths-      -- ^ @SVG_CLIP_PATHS@-    | CBIFISvgFeImage-      -- ^ @SVG_FE_IMAGE@-    | CBIFISvgFilters-      -- ^ @SVG_FILTERS@-    | CBIFISvgHref-      -- ^ @SVG_HREF@-    | CBIFITouch-      -- ^ @TOUCH@-    | CBIFIVideo-      -- ^ @VIDEO@-    | CBIFIWebgl-      -- ^ @WEBGL@-    | CBIFIWebSockets-      -- ^ @WEB_SOCKETS@-    | CBIFIWebSQLDatabase-      -- ^ @WEB_SQL_DATABASE@-    | CBIFIWebWorkers-      -- ^ @WEB_WORKERS@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeBackupImageFeaturesItem--instance FromText CreativeBackupImageFeaturesItem where-    fromText = \case-        "APPLICATION_CACHE" -> Just CBIFIApplicationCache-        "AUDIO" -> Just CBIFIAudio-        "CANVAS" -> Just CBIFICanvas-        "CANVAS_TEXT" -> Just CBIFICanvasText-        "CSS_ANIMATIONS" -> Just CBIFICssAnimations-        "CSS_BACKGROUND_SIZE" -> Just CBIFICssBackgRoundSize-        "CSS_BORDER_IMAGE" -> Just CBIFICssBOrderImage-        "CSS_BORDER_RADIUS" -> Just CBIFICssBOrderRadius-        "CSS_BOX_SHADOW" -> Just CBIFICssBoxShadow-        "CSS_COLUMNS" -> Just CBIFICssColumns-        "CSS_FLEX_BOX" -> Just CBIFICssFlexBox-        "CSS_FONT_FACE" -> Just CBIFICssFontFace-        "CSS_GENERATED_CONTENT" -> Just CBIFICssGeneratedContent-        "CSS_GRADIENTS" -> Just CBIFICssGradients-        "CSS_HSLA" -> Just CBIFICssHsla-        "CSS_MULTIPLE_BGS" -> Just CBIFICssMultipleBgs-        "CSS_OPACITY" -> Just CBIFICssOpacity-        "CSS_REFLECTIONS" -> Just CBIFICssReflections-        "CSS_RGBA" -> Just CBIFICssRgba-        "CSS_TEXT_SHADOW" -> Just CBIFICssTextShadow-        "CSS_TRANSFORMS" -> Just CBIFICssTransforms-        "CSS_TRANSFORMS3D" -> Just CBIFICssTRANSFORMS3D-        "CSS_TRANSITIONS" -> Just CBIFICssTransitions-        "DRAG_AND_DROP" -> Just CBIFIDragAndDrop-        "GEO_LOCATION" -> Just CBIFIGeoLocation-        "HASH_CHANGE" -> Just CBIFIHashChange-        "HISTORY" -> Just CBIFIHistory-        "INDEXED_DB" -> Just CBIFIIndexedDB-        "INLINE_SVG" -> Just CBIFIInlineSvg-        "INPUT_ATTR_AUTOCOMPLETE" -> Just CBIFIInputAttrAutocomplete-        "INPUT_ATTR_AUTOFOCUS" -> Just CBIFIInputAttrAutofocus-        "INPUT_ATTR_LIST" -> Just CBIFIInputAttrList-        "INPUT_ATTR_MAX" -> Just CBIFIInputAttrMax-        "INPUT_ATTR_MIN" -> Just CBIFIInputAttrMin-        "INPUT_ATTR_MULTIPLE" -> Just CBIFIInputAttrMultiple-        "INPUT_ATTR_PATTERN" -> Just CBIFIInputAttrPattern-        "INPUT_ATTR_PLACEHOLDER" -> Just CBIFIInputAttrPlaceholder-        "INPUT_ATTR_REQUIRED" -> Just CBIFIInputAttrRequired-        "INPUT_ATTR_STEP" -> Just CBIFIInputAttrStep-        "INPUT_TYPE_COLOR" -> Just CBIFIInputTypeColor-        "INPUT_TYPE_DATE" -> Just CBIFIInputTypeDate-        "INPUT_TYPE_DATETIME" -> Just CBIFIInputTypeDatetime-        "INPUT_TYPE_DATETIME_LOCAL" -> Just CBIFIInputTypeDatetimeLocal-        "INPUT_TYPE_EMAIL" -> Just CBIFIInputTypeEmail-        "INPUT_TYPE_MONTH" -> Just CBIFIInputTypeMonth-        "INPUT_TYPE_NUMBER" -> Just CBIFIInputTypeNumber-        "INPUT_TYPE_RANGE" -> Just CBIFIInputTypeRange-        "INPUT_TYPE_SEARCH" -> Just CBIFIInputTypeSearch-        "INPUT_TYPE_TEL" -> Just CBIFIInputTypeTel-        "INPUT_TYPE_TIME" -> Just CBIFIInputTypeTime-        "INPUT_TYPE_URL" -> Just CBIFIInputTypeURL-        "INPUT_TYPE_WEEK" -> Just CBIFIInputTypeWeek-        "LOCAL_STORAGE" -> Just CBIFILocalStorage-        "POST_MESSAGE" -> Just CBIFIPostMessage-        "SESSION_STORAGE" -> Just CBIFISessionStorage-        "SMIL" -> Just CBIFISmil-        "SVG_CLIP_PATHS" -> Just CBIFISvgClipPaths-        "SVG_FE_IMAGE" -> Just CBIFISvgFeImage-        "SVG_FILTERS" -> Just CBIFISvgFilters-        "SVG_HREF" -> Just CBIFISvgHref-        "TOUCH" -> Just CBIFITouch-        "VIDEO" -> Just CBIFIVideo-        "WEBGL" -> Just CBIFIWebgl-        "WEB_SOCKETS" -> Just CBIFIWebSockets-        "WEB_SQL_DATABASE" -> Just CBIFIWebSQLDatabase-        "WEB_WORKERS" -> Just CBIFIWebWorkers-        _ -> Nothing--instance ToText CreativeBackupImageFeaturesItem where-    toText = \case-        CBIFIApplicationCache -> "APPLICATION_CACHE"-        CBIFIAudio -> "AUDIO"-        CBIFICanvas -> "CANVAS"-        CBIFICanvasText -> "CANVAS_TEXT"-        CBIFICssAnimations -> "CSS_ANIMATIONS"-        CBIFICssBackgRoundSize -> "CSS_BACKGROUND_SIZE"-        CBIFICssBOrderImage -> "CSS_BORDER_IMAGE"-        CBIFICssBOrderRadius -> "CSS_BORDER_RADIUS"-        CBIFICssBoxShadow -> "CSS_BOX_SHADOW"-        CBIFICssColumns -> "CSS_COLUMNS"-        CBIFICssFlexBox -> "CSS_FLEX_BOX"-        CBIFICssFontFace -> "CSS_FONT_FACE"-        CBIFICssGeneratedContent -> "CSS_GENERATED_CONTENT"-        CBIFICssGradients -> "CSS_GRADIENTS"-        CBIFICssHsla -> "CSS_HSLA"-        CBIFICssMultipleBgs -> "CSS_MULTIPLE_BGS"-        CBIFICssOpacity -> "CSS_OPACITY"-        CBIFICssReflections -> "CSS_REFLECTIONS"-        CBIFICssRgba -> "CSS_RGBA"-        CBIFICssTextShadow -> "CSS_TEXT_SHADOW"-        CBIFICssTransforms -> "CSS_TRANSFORMS"-        CBIFICssTRANSFORMS3D -> "CSS_TRANSFORMS3D"-        CBIFICssTransitions -> "CSS_TRANSITIONS"-        CBIFIDragAndDrop -> "DRAG_AND_DROP"-        CBIFIGeoLocation -> "GEO_LOCATION"-        CBIFIHashChange -> "HASH_CHANGE"-        CBIFIHistory -> "HISTORY"-        CBIFIIndexedDB -> "INDEXED_DB"-        CBIFIInlineSvg -> "INLINE_SVG"-        CBIFIInputAttrAutocomplete -> "INPUT_ATTR_AUTOCOMPLETE"-        CBIFIInputAttrAutofocus -> "INPUT_ATTR_AUTOFOCUS"-        CBIFIInputAttrList -> "INPUT_ATTR_LIST"-        CBIFIInputAttrMax -> "INPUT_ATTR_MAX"-        CBIFIInputAttrMin -> "INPUT_ATTR_MIN"-        CBIFIInputAttrMultiple -> "INPUT_ATTR_MULTIPLE"-        CBIFIInputAttrPattern -> "INPUT_ATTR_PATTERN"-        CBIFIInputAttrPlaceholder -> "INPUT_ATTR_PLACEHOLDER"-        CBIFIInputAttrRequired -> "INPUT_ATTR_REQUIRED"-        CBIFIInputAttrStep -> "INPUT_ATTR_STEP"-        CBIFIInputTypeColor -> "INPUT_TYPE_COLOR"-        CBIFIInputTypeDate -> "INPUT_TYPE_DATE"-        CBIFIInputTypeDatetime -> "INPUT_TYPE_DATETIME"-        CBIFIInputTypeDatetimeLocal -> "INPUT_TYPE_DATETIME_LOCAL"-        CBIFIInputTypeEmail -> "INPUT_TYPE_EMAIL"-        CBIFIInputTypeMonth -> "INPUT_TYPE_MONTH"-        CBIFIInputTypeNumber -> "INPUT_TYPE_NUMBER"-        CBIFIInputTypeRange -> "INPUT_TYPE_RANGE"-        CBIFIInputTypeSearch -> "INPUT_TYPE_SEARCH"-        CBIFIInputTypeTel -> "INPUT_TYPE_TEL"-        CBIFIInputTypeTime -> "INPUT_TYPE_TIME"-        CBIFIInputTypeURL -> "INPUT_TYPE_URL"-        CBIFIInputTypeWeek -> "INPUT_TYPE_WEEK"-        CBIFILocalStorage -> "LOCAL_STORAGE"-        CBIFIPostMessage -> "POST_MESSAGE"-        CBIFISessionStorage -> "SESSION_STORAGE"-        CBIFISmil -> "SMIL"-        CBIFISvgClipPaths -> "SVG_CLIP_PATHS"-        CBIFISvgFeImage -> "SVG_FE_IMAGE"-        CBIFISvgFilters -> "SVG_FILTERS"-        CBIFISvgHref -> "SVG_HREF"-        CBIFITouch -> "TOUCH"-        CBIFIVideo -> "VIDEO"-        CBIFIWebgl -> "WEBGL"-        CBIFIWebSockets -> "WEB_SOCKETS"-        CBIFIWebSQLDatabase -> "WEB_SQL_DATABASE"-        CBIFIWebWorkers -> "WEB_WORKERS"--instance FromJSON CreativeBackupImageFeaturesItem where-    parseJSON = parseJSONText "CreativeBackupImageFeaturesItem"--instance ToJSON CreativeBackupImageFeaturesItem where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data AdvertisersListSortOrder-    = ALSOAscending-      -- ^ @ASCENDING@-    | ALSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AdvertisersListSortOrder--instance FromText AdvertisersListSortOrder where-    fromText = \case-        "ASCENDING" -> Just ALSOAscending-        "DESCENDING" -> Just ALSODescending-        _ -> Nothing--instance ToText AdvertisersListSortOrder where-    toText = \case-        ALSOAscending -> "ASCENDING"-        ALSODescending -> "DESCENDING"--instance FromJSON AdvertisersListSortOrder where-    parseJSON = parseJSONText "AdvertisersListSortOrder"--instance ToJSON AdvertisersListSortOrder where-    toJSON = toJSONText---- | Field by which to sort the list.-data CreativeFieldsListSortField-    = CFLSFID-      -- ^ @ID@-    | CFLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeFieldsListSortField--instance FromText CreativeFieldsListSortField where-    fromText = \case-        "ID" -> Just CFLSFID-        "NAME" -> Just CFLSFName-        _ -> Nothing--instance ToText CreativeFieldsListSortField where-    toText = \case-        CFLSFID -> "ID"-        CFLSFName -> "NAME"--instance FromJSON CreativeFieldsListSortField where-    parseJSON = parseJSONText "CreativeFieldsListSortField"--instance ToJSON CreativeFieldsListSortField where-    toJSON = toJSONText---- | Variable name in the tag. This is a required field.-data UserDefinedVariableConfigurationVariableType-    = U1-      -- ^ @U1@-    | U10-      -- ^ @U10@-    | U11-      -- ^ @U11@-    | U12-      -- ^ @U12@-    | U13-      -- ^ @U13@-    | U14-      -- ^ @U14@-    | U15-      -- ^ @U15@-    | U16-      -- ^ @U16@-    | U17-      -- ^ @U17@-    | U18-      -- ^ @U18@-    | U19-      -- ^ @U19@-    | U2-      -- ^ @U2@-    | U20-      -- ^ @U20@-    | U3-      -- ^ @U3@-    | U4-      -- ^ @U4@-    | U5-      -- ^ @U5@-    | U6-      -- ^ @U6@-    | U7-      -- ^ @U7@-    | U8-      -- ^ @U8@-    | U9-      -- ^ @U9@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable UserDefinedVariableConfigurationVariableType--instance FromText UserDefinedVariableConfigurationVariableType where-    fromText = \case-        "U1" -> Just U1-        "U10" -> Just U10-        "U11" -> Just U11-        "U12" -> Just U12-        "U13" -> Just U13-        "U14" -> Just U14-        "U15" -> Just U15-        "U16" -> Just U16-        "U17" -> Just U17-        "U18" -> Just U18-        "U19" -> Just U19-        "U2" -> Just U2-        "U20" -> Just U20-        "U3" -> Just U3-        "U4" -> Just U4-        "U5" -> Just U5-        "U6" -> Just U6-        "U7" -> Just U7-        "U8" -> Just U8-        "U9" -> Just U9-        _ -> Nothing--instance ToText UserDefinedVariableConfigurationVariableType where-    toText = \case-        U1 -> "U1"-        U10 -> "U10"-        U11 -> "U11"-        U12 -> "U12"-        U13 -> "U13"-        U14 -> "U14"-        U15 -> "U15"-        U16 -> "U16"-        U17 -> "U17"-        U18 -> "U18"-        U19 -> "U19"-        U2 -> "U2"-        U20 -> "U20"-        U3 -> "U3"-        U4 -> "U4"-        U5 -> "U5"-        U6 -> "U6"-        U7 -> "U7"-        U8 -> "U8"-        U9 -> "U9"--instance FromJSON UserDefinedVariableConfigurationVariableType where-    parseJSON = parseJSONText "UserDefinedVariableConfigurationVariableType"--instance ToJSON UserDefinedVariableConfigurationVariableType where-    toJSON = toJSONText---- | Position in the browser where the window will open.-data FsCommandPositionOption-    = Centered-      -- ^ @CENTERED@-    | DistanceFromTopLeftCorner-      -- ^ @DISTANCE_FROM_TOP_LEFT_CORNER@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FsCommandPositionOption--instance FromText FsCommandPositionOption where-    fromText = \case-        "CENTERED" -> Just Centered-        "DISTANCE_FROM_TOP_LEFT_CORNER" -> Just DistanceFromTopLeftCorner-        _ -> Nothing--instance ToText FsCommandPositionOption where-    toText = \case-        Centered -> "CENTERED"-        DistanceFromTopLeftCorner -> "DISTANCE_FROM_TOP_LEFT_CORNER"--instance FromJSON FsCommandPositionOption where-    parseJSON = parseJSONText "FsCommandPositionOption"--instance ToJSON FsCommandPositionOption where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data UserRolesListSortOrder-    = URLSOAscending-      -- ^ @ASCENDING@-    | URLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable UserRolesListSortOrder--instance FromText UserRolesListSortOrder where-    fromText = \case-        "ASCENDING" -> Just URLSOAscending-        "DESCENDING" -> Just URLSODescending-        _ -> Nothing--instance ToText UserRolesListSortOrder where-    toText = \case-        URLSOAscending -> "ASCENDING"-        URLSODescending -> "DESCENDING"--instance FromJSON UserRolesListSortOrder where-    parseJSON = parseJSONText "UserRolesListSortOrder"--instance ToJSON UserRolesListSortOrder where-    toJSON = toJSONText---- | Select only placements that are associated with these compatibilities.--- WEB and WEB_INTERSTITIAL refer to rendering either on desktop or on--- mobile devices for regular or interstitial ads respectively. APP and--- APP_INTERSTITIAL are for rendering in mobile apps.IN_STREAM_VIDEO refers--- to rendering in in-stream video ads developed with the VAST standard.-data PlacementsListCompatibilities-    = PLCApp-      -- ^ @APP@-    | PLCAppInterstitial-      -- ^ @APP_INTERSTITIAL@-    | PLCInStreamVideo-      -- ^ @IN_STREAM_VIDEO@-    | PLCWeb-      -- ^ @WEB@-    | PLCWebInterstitial-      -- ^ @WEB_INTERSTITIAL@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PlacementsListCompatibilities--instance FromText PlacementsListCompatibilities where-    fromText = \case-        "APP" -> Just PLCApp-        "APP_INTERSTITIAL" -> Just PLCAppInterstitial-        "IN_STREAM_VIDEO" -> Just PLCInStreamVideo-        "WEB" -> Just PLCWeb-        "WEB_INTERSTITIAL" -> Just PLCWebInterstitial-        _ -> Nothing--instance ToText PlacementsListCompatibilities where-    toText = \case-        PLCApp -> "APP"-        PLCAppInterstitial -> "APP_INTERSTITIAL"-        PLCInStreamVideo -> "IN_STREAM_VIDEO"-        PLCWeb -> "WEB"-        PLCWebInterstitial -> "WEB_INTERSTITIAL"--instance FromJSON PlacementsListCompatibilities where-    parseJSON = parseJSONText "PlacementsListCompatibilities"--instance ToJSON PlacementsListCompatibilities where-    toJSON = toJSONText---- | Field by which to sort the list.-data OrderDocumentsListSortField-    = ODLSFID-      -- ^ @ID@-    | ODLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable OrderDocumentsListSortField--instance FromText OrderDocumentsListSortField where-    fromText = \case-        "ID" -> Just ODLSFID-        "NAME" -> Just ODLSFName-        _ -> Nothing--instance ToText OrderDocumentsListSortField where-    toText = \case-        ODLSFID -> "ID"-        ODLSFName -> "NAME"--instance FromJSON OrderDocumentsListSortField where-    parseJSON = parseJSONText "OrderDocumentsListSortField"--instance ToJSON OrderDocumentsListSortField where-    toJSON = toJSONText--data CreativeCompatibilityItem-    = CCIApp-      -- ^ @APP@-    | CCIAppInterstitial-      -- ^ @APP_INTERSTITIAL@-    | CCIInStreamVideo-      -- ^ @IN_STREAM_VIDEO@-    | CCIWeb-      -- ^ @WEB@-    | CCIWebInterstitial-      -- ^ @WEB_INTERSTITIAL@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeCompatibilityItem--instance FromText CreativeCompatibilityItem where-    fromText = \case-        "APP" -> Just CCIApp-        "APP_INTERSTITIAL" -> Just CCIAppInterstitial-        "IN_STREAM_VIDEO" -> Just CCIInStreamVideo-        "WEB" -> Just CCIWeb-        "WEB_INTERSTITIAL" -> Just CCIWebInterstitial-        _ -> Nothing--instance ToText CreativeCompatibilityItem where-    toText = \case-        CCIApp -> "APP"-        CCIAppInterstitial -> "APP_INTERSTITIAL"-        CCIInStreamVideo -> "IN_STREAM_VIDEO"-        CCIWeb -> "WEB"-        CCIWebInterstitial -> "WEB_INTERSTITIAL"--instance FromJSON CreativeCompatibilityItem where-    parseJSON = parseJSONText "CreativeCompatibilityItem"--instance ToJSON CreativeCompatibilityItem where-    toJSON = toJSONText---- | The type of delivery for the owner to receive, if enabled.-data ReportDeliveryEmailOwnerDeliveryType-    = RDEODTAttachment-      -- ^ @ATTACHMENT@-    | RDEODTLink-      -- ^ @LINK@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ReportDeliveryEmailOwnerDeliveryType--instance FromText ReportDeliveryEmailOwnerDeliveryType where-    fromText = \case-        "ATTACHMENT" -> Just RDEODTAttachment-        "LINK" -> Just RDEODTLink-        _ -> Nothing--instance ToText ReportDeliveryEmailOwnerDeliveryType where-    toText = \case-        RDEODTAttachment -> "ATTACHMENT"-        RDEODTLink -> "LINK"--instance FromJSON ReportDeliveryEmailOwnerDeliveryType where-    parseJSON = parseJSONText "ReportDeliveryEmailOwnerDeliveryType"--instance ToJSON ReportDeliveryEmailOwnerDeliveryType where-    toJSON = toJSONText---- | Site contact type.-data SiteContactContactType-    = SalesPerson-      -- ^ @SALES_PERSON@-    | Trafficker-      -- ^ @TRAFFICKER@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable SiteContactContactType--instance FromText SiteContactContactType where-    fromText = \case-        "SALES_PERSON" -> Just SalesPerson-        "TRAFFICKER" -> Just Trafficker-        _ -> Nothing--instance ToText SiteContactContactType where-    toText = \case-        SalesPerson -> "SALES_PERSON"-        Trafficker -> "TRAFFICKER"--instance FromJSON SiteContactContactType where-    parseJSON = parseJSONText "SiteContactContactType"--instance ToJSON SiteContactContactType where-    toJSON = toJSONText---- | Order of sorted results, default is \'DESCENDING\'.-data ReportsListSortOrder-    = RLSOAscending-      -- ^ @ASCENDING@-      -- Ascending order.-    | RLSODescending-      -- ^ @DESCENDING@-      -- Descending order.-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ReportsListSortOrder--instance FromText ReportsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just RLSOAscending-        "DESCENDING" -> Just RLSODescending-        _ -> Nothing--instance ToText ReportsListSortOrder where-    toText = \case-        RLSOAscending -> "ASCENDING"-        RLSODescending -> "DESCENDING"--instance FromJSON ReportsListSortOrder where-    parseJSON = parseJSONText "ReportsListSortOrder"--instance ToJSON ReportsListSortOrder where-    toJSON = toJSONText---- | Field by which to sort the list.-data TargetableRemarketingListsListSortField-    = TRLLSFID-      -- ^ @ID@-    | TRLLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable TargetableRemarketingListsListSortField--instance FromText TargetableRemarketingListsListSortField where-    fromText = \case-        "ID" -> Just TRLLSFID-        "NAME" -> Just TRLLSFName-        _ -> Nothing--instance ToText TargetableRemarketingListsListSortField where-    toText = \case-        TRLLSFID -> "ID"-        TRLLSFName -> "NAME"--instance FromJSON TargetableRemarketingListsListSortField where-    parseJSON = parseJSONText "TargetableRemarketingListsListSortField"--instance ToJSON TargetableRemarketingListsListSortField where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data CampaignsListSortOrder-    = CLSOAscending-      -- ^ @ASCENDING@-    | CLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CampaignsListSortOrder--instance FromText CampaignsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just CLSOAscending-        "DESCENDING" -> Just CLSODescending-        _ -> Nothing--instance ToText CampaignsListSortOrder where-    toText = \case-        CLSOAscending -> "ASCENDING"-        CLSODescending -> "DESCENDING"--instance FromJSON CampaignsListSortOrder where-    parseJSON = parseJSONText "CampaignsListSortOrder"--instance ToJSON CampaignsListSortOrder where-    toJSON = toJSONText---- | Select only floodlight activity groups with the specified floodlight--- activity group type.-data FloodlightActivityGroupsListType-    = Counter-      -- ^ @COUNTER@-    | Sale-      -- ^ @SALE@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FloodlightActivityGroupsListType--instance FromText FloodlightActivityGroupsListType where-    fromText = \case-        "COUNTER" -> Just Counter-        "SALE" -> Just Sale-        _ -> Nothing--instance ToText FloodlightActivityGroupsListType where-    toText = \case-        Counter -> "COUNTER"-        Sale -> "SALE"--instance FromJSON FloodlightActivityGroupsListType where-    parseJSON = parseJSONText "FloodlightActivityGroupsListType"--instance ToJSON FloodlightActivityGroupsListType where-    toJSON = toJSONText---- | Day that will be counted as the first day of the week in reports. This--- is a required field.-data FloodlightConfigurationFirstDayOfWeek-    = Monday-      -- ^ @MONDAY@-    | Sunday-      -- ^ @SUNDAY@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FloodlightConfigurationFirstDayOfWeek--instance FromText FloodlightConfigurationFirstDayOfWeek where-    fromText = \case-        "MONDAY" -> Just Monday-        "SUNDAY" -> Just Sunday-        _ -> Nothing--instance ToText FloodlightConfigurationFirstDayOfWeek where-    toText = \case-        Monday -> "MONDAY"-        Sunday -> "SUNDAY"--instance FromJSON FloodlightConfigurationFirstDayOfWeek where-    parseJSON = parseJSONText "FloodlightConfigurationFirstDayOfWeek"--instance ToJSON FloodlightConfigurationFirstDayOfWeek where-    toJSON = toJSONText---- | Serving priority of an ad, with respect to other ads. The lower the--- priority number, the greater the priority with which it is served.-data DeliverySchedulePriority-    = AdPriority01-      -- ^ @AD_PRIORITY_01@-    | AdPriority02-      -- ^ @AD_PRIORITY_02@-    | AdPriority03-      -- ^ @AD_PRIORITY_03@-    | AdPriority04-      -- ^ @AD_PRIORITY_04@-    | AdPriority05-      -- ^ @AD_PRIORITY_05@-    | AdPriority06-      -- ^ @AD_PRIORITY_06@-    | AdPriority07-      -- ^ @AD_PRIORITY_07@-    | AdPriority08-      -- ^ @AD_PRIORITY_08@-    | AdPriority09-      -- ^ @AD_PRIORITY_09@-    | AdPriority10-      -- ^ @AD_PRIORITY_10@-    | AdPriority11-      -- ^ @AD_PRIORITY_11@-    | AdPriority12-      -- ^ @AD_PRIORITY_12@-    | AdPriority13-      -- ^ @AD_PRIORITY_13@-    | AdPriority14-      -- ^ @AD_PRIORITY_14@-    | AdPriority15-      -- ^ @AD_PRIORITY_15@-    | AdPriority16-      -- ^ @AD_PRIORITY_16@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable DeliverySchedulePriority--instance FromText DeliverySchedulePriority where-    fromText = \case-        "AD_PRIORITY_01" -> Just AdPriority01-        "AD_PRIORITY_02" -> Just AdPriority02-        "AD_PRIORITY_03" -> Just AdPriority03-        "AD_PRIORITY_04" -> Just AdPriority04-        "AD_PRIORITY_05" -> Just AdPriority05-        "AD_PRIORITY_06" -> Just AdPriority06-        "AD_PRIORITY_07" -> Just AdPriority07-        "AD_PRIORITY_08" -> Just AdPriority08-        "AD_PRIORITY_09" -> Just AdPriority09-        "AD_PRIORITY_10" -> Just AdPriority10-        "AD_PRIORITY_11" -> Just AdPriority11-        "AD_PRIORITY_12" -> Just AdPriority12-        "AD_PRIORITY_13" -> Just AdPriority13-        "AD_PRIORITY_14" -> Just AdPriority14-        "AD_PRIORITY_15" -> Just AdPriority15-        "AD_PRIORITY_16" -> Just AdPriority16-        _ -> Nothing--instance ToText DeliverySchedulePriority where-    toText = \case-        AdPriority01 -> "AD_PRIORITY_01"-        AdPriority02 -> "AD_PRIORITY_02"-        AdPriority03 -> "AD_PRIORITY_03"-        AdPriority04 -> "AD_PRIORITY_04"-        AdPriority05 -> "AD_PRIORITY_05"-        AdPriority06 -> "AD_PRIORITY_06"-        AdPriority07 -> "AD_PRIORITY_07"-        AdPriority08 -> "AD_PRIORITY_08"-        AdPriority09 -> "AD_PRIORITY_09"-        AdPriority10 -> "AD_PRIORITY_10"-        AdPriority11 -> "AD_PRIORITY_11"-        AdPriority12 -> "AD_PRIORITY_12"-        AdPriority13 -> "AD_PRIORITY_13"-        AdPriority14 -> "AD_PRIORITY_14"-        AdPriority15 -> "AD_PRIORITY_15"-        AdPriority16 -> "AD_PRIORITY_16"--instance FromJSON DeliverySchedulePriority where-    parseJSON = parseJSONText "DeliverySchedulePriority"--instance ToJSON DeliverySchedulePriority where-    toJSON = toJSONText---- | Select only floodlight activities with the specified floodlight activity--- group type.-data FloodlightActivitiesListFloodlightActivityGroupType-    = FALFAGTCounter-      -- ^ @COUNTER@-    | FALFAGTSale-      -- ^ @SALE@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FloodlightActivitiesListFloodlightActivityGroupType--instance FromText FloodlightActivitiesListFloodlightActivityGroupType where-    fromText = \case-        "COUNTER" -> Just FALFAGTCounter-        "SALE" -> Just FALFAGTSale-        _ -> Nothing--instance ToText FloodlightActivitiesListFloodlightActivityGroupType where-    toText = \case-        FALFAGTCounter -> "COUNTER"-        FALFAGTSale -> "SALE"--instance FromJSON FloodlightActivitiesListFloodlightActivityGroupType where-    parseJSON = parseJSONText "FloodlightActivitiesListFloodlightActivityGroupType"--instance ToJSON FloodlightActivitiesListFloodlightActivityGroupType where-    toJSON = toJSONText--data FloodlightConfigurationStandardVariableTypesItem-    = Num-      -- ^ @NUM@-    | Ord-      -- ^ @ORD@-    | Tran-      -- ^ @TRAN@-    | U-      -- ^ @U@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FloodlightConfigurationStandardVariableTypesItem--instance FromText FloodlightConfigurationStandardVariableTypesItem where-    fromText = \case-        "NUM" -> Just Num-        "ORD" -> Just Ord-        "TRAN" -> Just Tran-        "U" -> Just U-        _ -> Nothing--instance ToText FloodlightConfigurationStandardVariableTypesItem where-    toText = \case-        Num -> "NUM"-        Ord -> "ORD"-        Tran -> "TRAN"-        U -> "U"--instance FromJSON FloodlightConfigurationStandardVariableTypesItem where-    parseJSON = parseJSONText "FloodlightConfigurationStandardVariableTypesItem"--instance ToJSON FloodlightConfigurationStandardVariableTypesItem where-    toJSON = toJSONText---- | Payment source for this placement. This is a required field that is--- read-only after insertion.-data PlacementPaymentSource-    = PPSPlacementAgencyPaid-      -- ^ @PLACEMENT_AGENCY_PAID@-    | PPSPlacementPublisherPaid-      -- ^ @PLACEMENT_PUBLISHER_PAID@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PlacementPaymentSource--instance FromText PlacementPaymentSource where-    fromText = \case-        "PLACEMENT_AGENCY_PAID" -> Just PPSPlacementAgencyPaid-        "PLACEMENT_PUBLISHER_PAID" -> Just PPSPlacementPublisherPaid-        _ -> Nothing--instance ToText PlacementPaymentSource where-    toText = \case-        PPSPlacementAgencyPaid -> "PLACEMENT_AGENCY_PAID"-        PPSPlacementPublisherPaid -> "PLACEMENT_PUBLISHER_PAID"--instance FromJSON PlacementPaymentSource where-    parseJSON = parseJSONText "PlacementPaymentSource"--instance ToJSON PlacementPaymentSource where-    toJSON = toJSONText---- | Order of sorted results, default is \'DESCENDING\'.-data ReportsFilesListSortOrder-    = RFLSOAscending-      -- ^ @ASCENDING@-      -- Ascending order.-    | RFLSODescending-      -- ^ @DESCENDING@-      -- Descending order.-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ReportsFilesListSortOrder--instance FromText ReportsFilesListSortOrder where-    fromText = \case-        "ASCENDING" -> Just RFLSOAscending-        "DESCENDING" -> Just RFLSODescending-        _ -> Nothing--instance ToText ReportsFilesListSortOrder where-    toText = \case-        RFLSOAscending -> "ASCENDING"-        RFLSODescending -> "DESCENDING"--instance FromJSON ReportsFilesListSortOrder where-    parseJSON = parseJSONText "ReportsFilesListSortOrder"--instance ToJSON ReportsFilesListSortOrder where-    toJSON = toJSONText---- | Field by which to sort the list.-data InventoryItemsListSortField-    = IILSFID-      -- ^ @ID@-    | IILSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable InventoryItemsListSortField--instance FromText InventoryItemsListSortField where-    fromText = \case-        "ID" -> Just IILSFID-        "NAME" -> Just IILSFName-        _ -> Nothing--instance ToText InventoryItemsListSortField where-    toText = \case-        IILSFID -> "ID"-        IILSFName -> "NAME"--instance FromJSON InventoryItemsListSortField where-    parseJSON = parseJSONText "InventoryItemsListSortField"--instance ToJSON InventoryItemsListSortField where-    toJSON = toJSONText---- | Event tag type. Can be used to specify whether to use a third-party--- pixel, a third-party JavaScript URL, or a third-party click-through URL--- for either impression or click tracking. This is a required field.-data EventTagType-    = ETTClickThroughEventTag-      -- ^ @CLICK_THROUGH_EVENT_TAG@-    | ETTImpressionImageEventTag-      -- ^ @IMPRESSION_IMAGE_EVENT_TAG@-    | ETTImpressionJavascriptEventTag-      -- ^ @IMPRESSION_JAVASCRIPT_EVENT_TAG@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable EventTagType--instance FromText EventTagType where-    fromText = \case-        "CLICK_THROUGH_EVENT_TAG" -> Just ETTClickThroughEventTag-        "IMPRESSION_IMAGE_EVENT_TAG" -> Just ETTImpressionImageEventTag-        "IMPRESSION_JAVASCRIPT_EVENT_TAG" -> Just ETTImpressionJavascriptEventTag-        _ -> Nothing--instance ToText EventTagType where-    toText = \case-        ETTClickThroughEventTag -> "CLICK_THROUGH_EVENT_TAG"-        ETTImpressionImageEventTag -> "IMPRESSION_IMAGE_EVENT_TAG"-        ETTImpressionJavascriptEventTag -> "IMPRESSION_JAVASCRIPT_EVENT_TAG"--instance FromJSON EventTagType where-    parseJSON = parseJSONText "EventTagType"--instance ToJSON EventTagType where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data CreativesListSortOrder-    = CAscending-      -- ^ @ASCENDING@-    | CDescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativesListSortOrder--instance FromText CreativesListSortOrder where-    fromText = \case-        "ASCENDING" -> Just CAscending-        "DESCENDING" -> Just CDescending-        _ -> Nothing--instance ToText CreativesListSortOrder where-    toText = \case-        CAscending -> "ASCENDING"-        CDescending -> "DESCENDING"--instance FromJSON CreativesListSortOrder where-    parseJSON = parseJSONText "CreativesListSortOrder"--instance ToJSON CreativesListSortOrder where-    toJSON = toJSONText---- | Popup window position either centered or at specific coordinate.-data PopupWindowPropertiesPositionType-    = Center-      -- ^ @CENTER@-    | Coordinates-      -- ^ @COORDINATES@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PopupWindowPropertiesPositionType--instance FromText PopupWindowPropertiesPositionType where-    fromText = \case-        "CENTER" -> Just Center-        "COORDINATES" -> Just Coordinates-        _ -> Nothing--instance ToText PopupWindowPropertiesPositionType where-    toText = \case-        Center -> "CENTER"-        Coordinates -> "COORDINATES"--instance FromJSON PopupWindowPropertiesPositionType where-    parseJSON = parseJSONText "PopupWindowPropertiesPositionType"--instance ToJSON PopupWindowPropertiesPositionType where-    toJSON = toJSONText---- | Directory site contact role.-data DirectorySiteContactRole-    = Admin-      -- ^ @ADMIN@-    | Edit-      -- ^ @EDIT@-    | View-      -- ^ @VIEW@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable DirectorySiteContactRole--instance FromText DirectorySiteContactRole where-    fromText = \case-        "ADMIN" -> Just Admin-        "EDIT" -> Just Edit-        "VIEW" -> Just View-        _ -> Nothing--instance ToText DirectorySiteContactRole where-    toText = \case-        Admin -> "ADMIN"-        Edit -> "EDIT"-        View -> "VIEW"--instance FromJSON DirectorySiteContactRole where-    parseJSON = parseJSONText "DirectorySiteContactRole"--instance ToJSON DirectorySiteContactRole where-    toJSON = toJSONText---- | Option specifying how keywords are embedded in ad tags. This setting can--- be used to specify whether keyword placeholders are inserted in--- placement tags for this site. Publishers can then add keywords to those--- placeholders.-data TagSettingKeywordOption-    = GenerateSeparateTagForEachKeyword-      -- ^ @GENERATE_SEPARATE_TAG_FOR_EACH_KEYWORD@-    | Ignore-      -- ^ @IGNORE@-    | PlaceholderWithListOfKeywords-      -- ^ @PLACEHOLDER_WITH_LIST_OF_KEYWORDS@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable TagSettingKeywordOption--instance FromText TagSettingKeywordOption where-    fromText = \case-        "GENERATE_SEPARATE_TAG_FOR_EACH_KEYWORD" -> Just GenerateSeparateTagForEachKeyword-        "IGNORE" -> Just Ignore-        "PLACEHOLDER_WITH_LIST_OF_KEYWORDS" -> Just PlaceholderWithListOfKeywords-        _ -> Nothing--instance ToText TagSettingKeywordOption where-    toText = \case-        GenerateSeparateTagForEachKeyword -> "GENERATE_SEPARATE_TAG_FOR_EACH_KEYWORD"-        Ignore -> "IGNORE"-        PlaceholderWithListOfKeywords -> "PLACEHOLDER_WITH_LIST_OF_KEYWORDS"--instance FromJSON TagSettingKeywordOption where-    parseJSON = parseJSONText "TagSettingKeywordOption"--instance ToJSON TagSettingKeywordOption where-    toJSON = toJSONText---- | Authoring tool for HTML5 banner creatives. This is a read-only field.--- Applicable to the following creative types: HTML5_BANNER.-data CreativeAuthoringTool-    = Ninja-      -- ^ @NINJA@-    | Swiffy-      -- ^ @SWIFFY@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeAuthoringTool--instance FromText CreativeAuthoringTool where-    fromText = \case-        "NINJA" -> Just Ninja-        "SWIFFY" -> Just Swiffy-        _ -> Nothing--instance ToText CreativeAuthoringTool where-    toText = \case-        Ninja -> "NINJA"-        Swiffy -> "SWIFFY"--instance FromJSON CreativeAuthoringTool where-    parseJSON = parseJSONText "CreativeAuthoringTool"--instance ToJSON CreativeAuthoringTool where-    toJSON = toJSONText---- | Type of this contact.-data OrderContactContactType-    = PlanningOrderContactBuyerBillingContact-      -- ^ @PLANNING_ORDER_CONTACT_BUYER_BILLING_CONTACT@-    | PlanningOrderContactBuyerContact-      -- ^ @PLANNING_ORDER_CONTACT_BUYER_CONTACT@-    | PlanningOrderContactSellerContact-      -- ^ @PLANNING_ORDER_CONTACT_SELLER_CONTACT@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable OrderContactContactType--instance FromText OrderContactContactType where-    fromText = \case-        "PLANNING_ORDER_CONTACT_BUYER_BILLING_CONTACT" -> Just PlanningOrderContactBuyerBillingContact-        "PLANNING_ORDER_CONTACT_BUYER_CONTACT" -> Just PlanningOrderContactBuyerContact-        "PLANNING_ORDER_CONTACT_SELLER_CONTACT" -> Just PlanningOrderContactSellerContact-        _ -> Nothing--instance ToText OrderContactContactType where-    toText = \case-        PlanningOrderContactBuyerBillingContact -> "PLANNING_ORDER_CONTACT_BUYER_BILLING_CONTACT"-        PlanningOrderContactBuyerContact -> "PLANNING_ORDER_CONTACT_BUYER_CONTACT"-        PlanningOrderContactSellerContact -> "PLANNING_ORDER_CONTACT_SELLER_CONTACT"--instance FromJSON OrderContactContactType where-    parseJSON = parseJSONText "OrderContactContactType"--instance ToJSON OrderContactContactType where-    toJSON = toJSONText---- | Type of asset to upload. This is a required field. IMAGE is solely used--- for IMAGE creatives. Other image assets should use HTML_IMAGE.-data CreativeAssetIdType-    = CAITFlash-      -- ^ @FLASH@-    | CAITHTML-      -- ^ @HTML@-    | CAITHTMLImage-      -- ^ @HTML_IMAGE@-    | CAITImage-      -- ^ @IMAGE@-    | CAITVideo-      -- ^ @VIDEO@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeAssetIdType--instance FromText CreativeAssetIdType where-    fromText = \case-        "FLASH" -> Just CAITFlash-        "HTML" -> Just CAITHTML-        "HTML_IMAGE" -> Just CAITHTMLImage-        "IMAGE" -> Just CAITImage-        "VIDEO" -> Just CAITVideo-        _ -> Nothing--instance ToText CreativeAssetIdType where-    toText = \case-        CAITFlash -> "FLASH"-        CAITHTML -> "HTML"-        CAITHTMLImage -> "HTML_IMAGE"-        CAITImage -> "IMAGE"-        CAITVideo -> "VIDEO"--instance FromJSON CreativeAssetIdType where-    parseJSON = parseJSONText "CreativeAssetIdType"--instance ToJSON CreativeAssetIdType where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data AccountUserProFilesListSortOrder-    = AUPFLSOAscending-      -- ^ @ASCENDING@-    | AUPFLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AccountUserProFilesListSortOrder--instance FromText AccountUserProFilesListSortOrder where-    fromText = \case-        "ASCENDING" -> Just AUPFLSOAscending-        "DESCENDING" -> Just AUPFLSODescending-        _ -> Nothing--instance ToText AccountUserProFilesListSortOrder where-    toText = \case-        AUPFLSOAscending -> "ASCENDING"-        AUPFLSODescending -> "DESCENDING"--instance FromJSON AccountUserProFilesListSortOrder where-    parseJSON = parseJSONText "AccountUserProFilesListSortOrder"--instance ToJSON AccountUserProFilesListSortOrder where-    toJSON = toJSONText---- | Product from which this remarketing list was originated.-data RemarketingListListSource-    = RLLSRemarketingListSourceDBm-      -- ^ @REMARKETING_LIST_SOURCE_DBM@-    | RLLSRemarketingListSourceDfa-      -- ^ @REMARKETING_LIST_SOURCE_DFA@-    | RLLSRemarketingListSourceDmp-      -- ^ @REMARKETING_LIST_SOURCE_DMP@-    | RLLSRemarketingListSourceGa-      -- ^ @REMARKETING_LIST_SOURCE_GA@-    | RLLSRemarketingListSourceOther-      -- ^ @REMARKETING_LIST_SOURCE_OTHER@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable RemarketingListListSource--instance FromText RemarketingListListSource where-    fromText = \case-        "REMARKETING_LIST_SOURCE_DBM" -> Just RLLSRemarketingListSourceDBm-        "REMARKETING_LIST_SOURCE_DFA" -> Just RLLSRemarketingListSourceDfa-        "REMARKETING_LIST_SOURCE_DMP" -> Just RLLSRemarketingListSourceDmp-        "REMARKETING_LIST_SOURCE_GA" -> Just RLLSRemarketingListSourceGa-        "REMARKETING_LIST_SOURCE_OTHER" -> Just RLLSRemarketingListSourceOther-        _ -> Nothing--instance ToText RemarketingListListSource where-    toText = \case-        RLLSRemarketingListSourceDBm -> "REMARKETING_LIST_SOURCE_DBM"-        RLLSRemarketingListSourceDfa -> "REMARKETING_LIST_SOURCE_DFA"-        RLLSRemarketingListSourceDmp -> "REMARKETING_LIST_SOURCE_DMP"-        RLLSRemarketingListSourceGa -> "REMARKETING_LIST_SOURCE_GA"-        RLLSRemarketingListSourceOther -> "REMARKETING_LIST_SOURCE_OTHER"--instance FromJSON RemarketingListListSource where-    parseJSON = parseJSONText "RemarketingListListSource"--instance ToJSON RemarketingListListSource where-    toJSON = toJSONText---- | User type of the user profile. This is a read-only field that can be--- left blank.-data AccountUserProFileUserAccessType-    = InternalAdministrator-      -- ^ @INTERNAL_ADMINISTRATOR@-    | NormalUser-      -- ^ @NORMAL_USER@-    | SuperUser-      -- ^ @SUPER_USER@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AccountUserProFileUserAccessType--instance FromText AccountUserProFileUserAccessType where-    fromText = \case-        "INTERNAL_ADMINISTRATOR" -> Just InternalAdministrator-        "NORMAL_USER" -> Just NormalUser-        "SUPER_USER" -> Just SuperUser-        _ -> Nothing--instance ToText AccountUserProFileUserAccessType where-    toText = \case-        InternalAdministrator -> "INTERNAL_ADMINISTRATOR"-        NormalUser -> "NORMAL_USER"-        SuperUser -> "SUPER_USER"--instance FromJSON AccountUserProFileUserAccessType where-    parseJSON = parseJSONText "AccountUserProFileUserAccessType"--instance ToJSON AccountUserProFileUserAccessType where-    toJSON = toJSONText---- | Initial wait time type before making the asset visible. Applicable to--- the following creative types: all RICH_MEDIA.-data CreativeAssetStartTimeType-    = AssetStartTimeTypeCustom-      -- ^ @ASSET_START_TIME_TYPE_CUSTOM@-    | AssetStartTimeTypeNone-      -- ^ @ASSET_START_TIME_TYPE_NONE@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeAssetStartTimeType--instance FromText CreativeAssetStartTimeType where-    fromText = \case-        "ASSET_START_TIME_TYPE_CUSTOM" -> Just AssetStartTimeTypeCustom-        "ASSET_START_TIME_TYPE_NONE" -> Just AssetStartTimeTypeNone-        _ -> Nothing--instance ToText CreativeAssetStartTimeType where-    toText = \case-        AssetStartTimeTypeCustom -> "ASSET_START_TIME_TYPE_CUSTOM"-        AssetStartTimeTypeNone -> "ASSET_START_TIME_TYPE_NONE"--instance FromJSON CreativeAssetStartTimeType where-    parseJSON = parseJSONText "CreativeAssetStartTimeType"--instance ToJSON CreativeAssetStartTimeType where-    toJSON = toJSONText---- | Audience gender of this project.-data ProjectAudienceGender-    = PlanningAudienceGenderFemale-      -- ^ @PLANNING_AUDIENCE_GENDER_FEMALE@-    | PlanningAudienceGenderMale-      -- ^ @PLANNING_AUDIENCE_GENDER_MALE@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ProjectAudienceGender--instance FromText ProjectAudienceGender where-    fromText = \case-        "PLANNING_AUDIENCE_GENDER_FEMALE" -> Just PlanningAudienceGenderFemale-        "PLANNING_AUDIENCE_GENDER_MALE" -> Just PlanningAudienceGenderMale-        _ -> Nothing--instance ToText ProjectAudienceGender where-    toText = \case-        PlanningAudienceGenderFemale -> "PLANNING_AUDIENCE_GENDER_FEMALE"-        PlanningAudienceGenderMale -> "PLANNING_AUDIENCE_GENDER_MALE"--instance FromJSON ProjectAudienceGender where-    parseJSON = parseJSONText "ProjectAudienceGender"--instance ToJSON ProjectAudienceGender where-    toJSON = toJSONText---- | Field by which to sort the list.-data PlacementStrategiesListSortField-    = PSLSFID-      -- ^ @ID@-    | PSLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PlacementStrategiesListSortField--instance FromText PlacementStrategiesListSortField where-    fromText = \case-        "ID" -> Just PSLSFID-        "NAME" -> Just PSLSFName-        _ -> Nothing--instance ToText PlacementStrategiesListSortField where-    toText = \case-        PSLSFID -> "ID"-        PSLSFName -> "NAME"--instance FromJSON PlacementStrategiesListSortField where-    parseJSON = parseJSONText "PlacementStrategiesListSortField"--instance ToJSON PlacementStrategiesListSortField where-    toJSON = toJSONText---- | Data type for the variable. This is a required field.-data UserDefinedVariableConfigurationDataType-    = Number-      -- ^ @NUMBER@-    | String-      -- ^ @STRING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable UserDefinedVariableConfigurationDataType--instance FromText UserDefinedVariableConfigurationDataType where-    fromText = \case-        "NUMBER" -> Just Number-        "STRING" -> Just String-        _ -> Nothing--instance ToText UserDefinedVariableConfigurationDataType where-    toText = \case-        Number -> "NUMBER"-        String -> "STRING"--instance FromJSON UserDefinedVariableConfigurationDataType where-    parseJSON = parseJSONText "UserDefinedVariableConfigurationDataType"--instance ToJSON UserDefinedVariableConfigurationDataType where-    toJSON = toJSONText---- | Code type used for cache busting in the generated tag.-data FloodlightActivityCacheBustingType-    = ActiveServerPage-      -- ^ @ACTIVE_SERVER_PAGE@-    | ColdFusion-      -- ^ @COLD_FUSION@-    | Javascript-      -- ^ @JAVASCRIPT@-    | Jsp-      -- ^ @JSP@-    | Php-      -- ^ @PHP@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FloodlightActivityCacheBustingType--instance FromText FloodlightActivityCacheBustingType where-    fromText = \case-        "ACTIVE_SERVER_PAGE" -> Just ActiveServerPage-        "COLD_FUSION" -> Just ColdFusion-        "JAVASCRIPT" -> Just Javascript-        "JSP" -> Just Jsp-        "PHP" -> Just Php-        _ -> Nothing--instance ToText FloodlightActivityCacheBustingType where-    toText = \case-        ActiveServerPage -> "ACTIVE_SERVER_PAGE"-        ColdFusion -> "COLD_FUSION"-        Javascript -> "JAVASCRIPT"-        Jsp -> "JSP"-        Php -> "PHP"--instance FromJSON FloodlightActivityCacheBustingType where-    parseJSON = parseJSONText "FloodlightActivityCacheBustingType"--instance ToJSON FloodlightActivityCacheBustingType where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data CreativeGroupsListSortOrder-    = CGLSOAscending-      -- ^ @ASCENDING@-    | CGLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeGroupsListSortOrder--instance FromText CreativeGroupsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just CGLSOAscending-        "DESCENDING" -> Just CGLSODescending-        _ -> Nothing--instance ToText CreativeGroupsListSortOrder where-    toText = \case-        CGLSOAscending -> "ASCENDING"-        CGLSODescending -> "DESCENDING"--instance FromJSON CreativeGroupsListSortOrder where-    parseJSON = parseJSONText "CreativeGroupsListSortOrder"--instance ToJSON CreativeGroupsListSortOrder where-    toJSON = toJSONText---- | Type of this order document-data OrderDocumentType-    = PlanningOrderTypeChangeOrder-      -- ^ @PLANNING_ORDER_TYPE_CHANGE_ORDER@-    | PlanningOrderTypeInsertionOrder-      -- ^ @PLANNING_ORDER_TYPE_INSERTION_ORDER@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable OrderDocumentType--instance FromText OrderDocumentType where-    fromText = \case-        "PLANNING_ORDER_TYPE_CHANGE_ORDER" -> Just PlanningOrderTypeChangeOrder-        "PLANNING_ORDER_TYPE_INSERTION_ORDER" -> Just PlanningOrderTypeInsertionOrder-        _ -> Nothing--instance ToText OrderDocumentType where-    toText = \case-        PlanningOrderTypeChangeOrder -> "PLANNING_ORDER_TYPE_CHANGE_ORDER"-        PlanningOrderTypeInsertionOrder -> "PLANNING_ORDER_TYPE_INSERTION_ORDER"--instance FromJSON OrderDocumentType where-    parseJSON = parseJSONText "OrderDocumentType"--instance ToJSON OrderDocumentType where-    toJSON = toJSONText---- | TagData tag format of this tag.-data TagDataFormat-    = PlacementTagClickCommands-      -- ^ @PLACEMENT_TAG_CLICK_COMMANDS@-    | PlacementTagIframeIlayer-      -- ^ @PLACEMENT_TAG_IFRAME_ILAYER@-    | PlacementTagIframeJavascript-      -- ^ @PLACEMENT_TAG_IFRAME_JAVASCRIPT@-    | PlacementTagIframeJavascriptLegacy-      -- ^ @PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY@-    | PlacementTagInstreamVideoPrefetch-      -- ^ @PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH@-    | PlacementTagInstreamVideoPrefetchVast3-      -- ^ @PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3@-    | PlacementTagInternalRedirect-      -- ^ @PLACEMENT_TAG_INTERNAL_REDIRECT@-    | PlacementTagInterstitialIframeJavascript-      -- ^ @PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT@-    | PlacementTagInterstitialIframeJavascriptLegacy-      -- ^ @PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY@-    | PlacementTagInterstitialInternalRedirect-      -- ^ @PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT@-    | PlacementTagInterstitialJavascript-      -- ^ @PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT@-    | PlacementTagInterstitialJavascriptLegacy-      -- ^ @PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY@-    | PlacementTagJavascript-      -- ^ @PLACEMENT_TAG_JAVASCRIPT@-    | PlacementTagJavascriptLegacy-      -- ^ @PLACEMENT_TAG_JAVASCRIPT_LEGACY@-    | PlacementTagStandard-      -- ^ @PLACEMENT_TAG_STANDARD@-    | PlacementTagTracking-      -- ^ @PLACEMENT_TAG_TRACKING@-    | PlacementTagTrackingIframe-      -- ^ @PLACEMENT_TAG_TRACKING_IFRAME@-    | PlacementTagTrackingJavascript-      -- ^ @PLACEMENT_TAG_TRACKING_JAVASCRIPT@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable TagDataFormat--instance FromText TagDataFormat where-    fromText = \case-        "PLACEMENT_TAG_CLICK_COMMANDS" -> Just PlacementTagClickCommands-        "PLACEMENT_TAG_IFRAME_ILAYER" -> Just PlacementTagIframeIlayer-        "PLACEMENT_TAG_IFRAME_JAVASCRIPT" -> Just PlacementTagIframeJavascript-        "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY" -> Just PlacementTagIframeJavascriptLegacy-        "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH" -> Just PlacementTagInstreamVideoPrefetch-        "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3" -> Just PlacementTagInstreamVideoPrefetchVast3-        "PLACEMENT_TAG_INTERNAL_REDIRECT" -> Just PlacementTagInternalRedirect-        "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT" -> Just PlacementTagInterstitialIframeJavascript-        "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY" -> Just PlacementTagInterstitialIframeJavascriptLegacy-        "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT" -> Just PlacementTagInterstitialInternalRedirect-        "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT" -> Just PlacementTagInterstitialJavascript-        "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY" -> Just PlacementTagInterstitialJavascriptLegacy-        "PLACEMENT_TAG_JAVASCRIPT" -> Just PlacementTagJavascript-        "PLACEMENT_TAG_JAVASCRIPT_LEGACY" -> Just PlacementTagJavascriptLegacy-        "PLACEMENT_TAG_STANDARD" -> Just PlacementTagStandard-        "PLACEMENT_TAG_TRACKING" -> Just PlacementTagTracking-        "PLACEMENT_TAG_TRACKING_IFRAME" -> Just PlacementTagTrackingIframe-        "PLACEMENT_TAG_TRACKING_JAVASCRIPT" -> Just PlacementTagTrackingJavascript-        _ -> Nothing--instance ToText TagDataFormat where-    toText = \case-        PlacementTagClickCommands -> "PLACEMENT_TAG_CLICK_COMMANDS"-        PlacementTagIframeIlayer -> "PLACEMENT_TAG_IFRAME_ILAYER"-        PlacementTagIframeJavascript -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT"-        PlacementTagIframeJavascriptLegacy -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY"-        PlacementTagInstreamVideoPrefetch -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH"-        PlacementTagInstreamVideoPrefetchVast3 -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3"-        PlacementTagInternalRedirect -> "PLACEMENT_TAG_INTERNAL_REDIRECT"-        PlacementTagInterstitialIframeJavascript -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT"-        PlacementTagInterstitialIframeJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY"-        PlacementTagInterstitialInternalRedirect -> "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT"-        PlacementTagInterstitialJavascript -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT"-        PlacementTagInterstitialJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY"-        PlacementTagJavascript -> "PLACEMENT_TAG_JAVASCRIPT"-        PlacementTagJavascriptLegacy -> "PLACEMENT_TAG_JAVASCRIPT_LEGACY"-        PlacementTagStandard -> "PLACEMENT_TAG_STANDARD"-        PlacementTagTracking -> "PLACEMENT_TAG_TRACKING"-        PlacementTagTrackingIframe -> "PLACEMENT_TAG_TRACKING_IFRAME"-        PlacementTagTrackingJavascript -> "PLACEMENT_TAG_TRACKING_JAVASCRIPT"--instance FromJSON TagDataFormat where-    parseJSON = parseJSONText "TagDataFormat"--instance ToJSON TagDataFormat where-    toJSON = toJSONText---- | Maximum number of active ads allowed for the account.-data AccountActiveAdSummaryActiveAdsLimitTier-    = ActiveAdsTier100K-      -- ^ @ACTIVE_ADS_TIER_100K@-    | ActiveAdsTier200K-      -- ^ @ACTIVE_ADS_TIER_200K@-    | ActiveAdsTier300K-      -- ^ @ACTIVE_ADS_TIER_300K@-    | ActiveAdsTier40K-      -- ^ @ACTIVE_ADS_TIER_40K@-    | ActiveAdsTier75K-      -- ^ @ACTIVE_ADS_TIER_75K@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AccountActiveAdSummaryActiveAdsLimitTier--instance FromText AccountActiveAdSummaryActiveAdsLimitTier where-    fromText = \case-        "ACTIVE_ADS_TIER_100K" -> Just ActiveAdsTier100K-        "ACTIVE_ADS_TIER_200K" -> Just ActiveAdsTier200K-        "ACTIVE_ADS_TIER_300K" -> Just ActiveAdsTier300K-        "ACTIVE_ADS_TIER_40K" -> Just ActiveAdsTier40K-        "ACTIVE_ADS_TIER_75K" -> Just ActiveAdsTier75K-        _ -> Nothing--instance ToText AccountActiveAdSummaryActiveAdsLimitTier where-    toText = \case-        ActiveAdsTier100K -> "ACTIVE_ADS_TIER_100K"-        ActiveAdsTier200K -> "ACTIVE_ADS_TIER_200K"-        ActiveAdsTier300K -> "ACTIVE_ADS_TIER_300K"-        ActiveAdsTier40K -> "ACTIVE_ADS_TIER_40K"-        ActiveAdsTier75K -> "ACTIVE_ADS_TIER_75K"--instance FromJSON AccountActiveAdSummaryActiveAdsLimitTier where-    parseJSON = parseJSONText "AccountActiveAdSummaryActiveAdsLimitTier"--instance ToJSON AccountActiveAdSummaryActiveAdsLimitTier where-    toJSON = toJSONText---- | Rich media child asset type. This is a read-only field. Applicable to--- the following creative types: all VPAID.-data CreativeAssetChildAssetType-    = ChildAssetTypeData-      -- ^ @CHILD_ASSET_TYPE_DATA@-    | ChildAssetTypeFlash-      -- ^ @CHILD_ASSET_TYPE_FLASH@-    | ChildAssetTypeImage-      -- ^ @CHILD_ASSET_TYPE_IMAGE@-    | ChildAssetTypeVideo-      -- ^ @CHILD_ASSET_TYPE_VIDEO@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeAssetChildAssetType--instance FromText CreativeAssetChildAssetType where-    fromText = \case-        "CHILD_ASSET_TYPE_DATA" -> Just ChildAssetTypeData-        "CHILD_ASSET_TYPE_FLASH" -> Just ChildAssetTypeFlash-        "CHILD_ASSET_TYPE_IMAGE" -> Just ChildAssetTypeImage-        "CHILD_ASSET_TYPE_VIDEO" -> Just ChildAssetTypeVideo-        _ -> Nothing--instance ToText CreativeAssetChildAssetType where-    toText = \case-        ChildAssetTypeData -> "CHILD_ASSET_TYPE_DATA"-        ChildAssetTypeFlash -> "CHILD_ASSET_TYPE_FLASH"-        ChildAssetTypeImage -> "CHILD_ASSET_TYPE_IMAGE"-        ChildAssetTypeVideo -> "CHILD_ASSET_TYPE_VIDEO"--instance FromJSON CreativeAssetChildAssetType where-    parseJSON = parseJSONText "CreativeAssetChildAssetType"--instance ToJSON CreativeAssetChildAssetType where-    toJSON = toJSONText---- | Select only placement groups belonging with this group type. A package--- is a simple group of placements that acts as a single pricing point for--- a group of tags. A roadblock is a group of placements that not only acts--- as a single pricing point but also assumes that all the tags in it will--- be served at the same time. A roadblock requires one of its assigned--- placements to be marked as primary for reporting.-data PlacementGroupsListPlacementGroupType-    = PlacementPackage-      -- ^ @PLACEMENT_PACKAGE@-    | PlacementRoadblock-      -- ^ @PLACEMENT_ROADBLOCK@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PlacementGroupsListPlacementGroupType--instance FromText PlacementGroupsListPlacementGroupType where-    fromText = \case-        "PLACEMENT_PACKAGE" -> Just PlacementPackage-        "PLACEMENT_ROADBLOCK" -> Just PlacementRoadblock-        _ -> Nothing--instance ToText PlacementGroupsListPlacementGroupType where-    toText = \case-        PlacementPackage -> "PLACEMENT_PACKAGE"-        PlacementRoadblock -> "PLACEMENT_ROADBLOCK"--instance FromJSON PlacementGroupsListPlacementGroupType where-    parseJSON = parseJSONText "PlacementGroupsListPlacementGroupType"--instance ToJSON PlacementGroupsListPlacementGroupType where-    toJSON = toJSONText---- | Status of the filter. NONE means the user has access to none of the--- objects. ALL means the user has access to all objects. ASSIGNED means--- the user has access to the objects with IDs in the objectIds list.-data ObjectFilterStatus-    = OFSAll-      -- ^ @ALL@-    | OFSAssigned-      -- ^ @ASSIGNED@-    | OFSNone-      -- ^ @NONE@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ObjectFilterStatus--instance FromText ObjectFilterStatus where-    fromText = \case-        "ALL" -> Just OFSAll-        "ASSIGNED" -> Just OFSAssigned-        "NONE" -> Just OFSNone-        _ -> Nothing--instance ToText ObjectFilterStatus where-    toText = \case-        OFSAll -> "ALL"-        OFSAssigned -> "ASSIGNED"-        OFSNone -> "NONE"--instance FromJSON ObjectFilterStatus where-    parseJSON = parseJSONText "ObjectFilterStatus"--instance ToJSON ObjectFilterStatus where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data CampaignCreativeAssociationsListSortOrder-    = CCALSOAscending-      -- ^ @ASCENDING@-    | CCALSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CampaignCreativeAssociationsListSortOrder--instance FromText CampaignCreativeAssociationsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just CCALSOAscending-        "DESCENDING" -> Just CCALSODescending-        _ -> Nothing--instance ToText CampaignCreativeAssociationsListSortOrder where-    toText = \case-        CCALSOAscending -> "ASCENDING"-        CCALSODescending -> "DESCENDING"--instance FromJSON CampaignCreativeAssociationsListSortOrder where-    parseJSON = parseJSONText "CampaignCreativeAssociationsListSortOrder"--instance ToJSON CampaignCreativeAssociationsListSortOrder where-    toJSON = toJSONText---- | Field by which to sort the list.-data FloodlightActivitiesListSortField-    = FALSFID-      -- ^ @ID@-    | FALSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FloodlightActivitiesListSortField--instance FromText FloodlightActivitiesListSortField where-    fromText = \case-        "ID" -> Just FALSFID-        "NAME" -> Just FALSFName-        _ -> Nothing--instance ToText FloodlightActivitiesListSortField where-    toText = \case-        FALSFID -> "ID"-        FALSFName -> "NAME"--instance FromJSON FloodlightActivitiesListSortField where-    parseJSON = parseJSONText "FloodlightActivitiesListSortField"--instance ToJSON FloodlightActivitiesListSortField where-    toJSON = toJSONText---- | Select only creatives with these creative types.-data CreativesListTypes-    = BrandSafeDefaultInstreamVideo-      -- ^ @BRAND_SAFE_DEFAULT_INSTREAM_VIDEO@-    | CustomInpage-      -- ^ @CUSTOM_INPAGE@-    | CustomInterstitial-      -- ^ @CUSTOM_INTERSTITIAL@-    | EnhancedBanner-      -- ^ @ENHANCED_BANNER@-    | EnhancedImage-      -- ^ @ENHANCED_IMAGE@-    | FlashInpage-      -- ^ @FLASH_INPAGE@-    | HTML5Banner-      -- ^ @HTML5_BANNER@-    | Image-      -- ^ @IMAGE@-    | InstreamVideo-      -- ^ @INSTREAM_VIDEO@-    | InternalRedirect-      -- ^ @INTERNAL_REDIRECT@-    | InterstitialInternalRedirect-      -- ^ @INTERSTITIAL_INTERNAL_REDIRECT@-    | Redirect-      -- ^ @REDIRECT@-    | RichMediaExpanding-      -- ^ @RICH_MEDIA_EXPANDING@-    | RichMediaImExpand-      -- ^ @RICH_MEDIA_IM_EXPAND@-    | RichMediaInpage-      -- ^ @RICH_MEDIA_INPAGE@-    | RichMediaInpageFloating-      -- ^ @RICH_MEDIA_INPAGE_FLOATING@-    | RichMediaInterstitialFloat-      -- ^ @RICH_MEDIA_INTERSTITIAL_FLOAT@-    | RichMediaMobileInApp-      -- ^ @RICH_MEDIA_MOBILE_IN_APP@-    | RichMediaMultiFloating-      -- ^ @RICH_MEDIA_MULTI_FLOATING@-    | RichMediaPeelDown-      -- ^ @RICH_MEDIA_PEEL_DOWN@-    | TrackingText-      -- ^ @TRACKING_TEXT@-    | VastRedirect-      -- ^ @VAST_REDIRECT@-    | VpaidLinear-      -- ^ @VPAID_LINEAR@-    | VpaidNonLinear-      -- ^ @VPAID_NON_LINEAR@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativesListTypes--instance FromText CreativesListTypes where-    fromText = \case-        "BRAND_SAFE_DEFAULT_INSTREAM_VIDEO" -> Just BrandSafeDefaultInstreamVideo-        "CUSTOM_INPAGE" -> Just CustomInpage-        "CUSTOM_INTERSTITIAL" -> Just CustomInterstitial-        "ENHANCED_BANNER" -> Just EnhancedBanner-        "ENHANCED_IMAGE" -> Just EnhancedImage-        "FLASH_INPAGE" -> Just FlashInpage-        "HTML5_BANNER" -> Just HTML5Banner-        "IMAGE" -> Just Image-        "INSTREAM_VIDEO" -> Just InstreamVideo-        "INTERNAL_REDIRECT" -> Just InternalRedirect-        "INTERSTITIAL_INTERNAL_REDIRECT" -> Just InterstitialInternalRedirect-        "REDIRECT" -> Just Redirect-        "RICH_MEDIA_EXPANDING" -> Just RichMediaExpanding-        "RICH_MEDIA_IM_EXPAND" -> Just RichMediaImExpand-        "RICH_MEDIA_INPAGE" -> Just RichMediaInpage-        "RICH_MEDIA_INPAGE_FLOATING" -> Just RichMediaInpageFloating-        "RICH_MEDIA_INTERSTITIAL_FLOAT" -> Just RichMediaInterstitialFloat-        "RICH_MEDIA_MOBILE_IN_APP" -> Just RichMediaMobileInApp-        "RICH_MEDIA_MULTI_FLOATING" -> Just RichMediaMultiFloating-        "RICH_MEDIA_PEEL_DOWN" -> Just RichMediaPeelDown-        "TRACKING_TEXT" -> Just TrackingText-        "VAST_REDIRECT" -> Just VastRedirect-        "VPAID_LINEAR" -> Just VpaidLinear-        "VPAID_NON_LINEAR" -> Just VpaidNonLinear-        _ -> Nothing--instance ToText CreativesListTypes where-    toText = \case-        BrandSafeDefaultInstreamVideo -> "BRAND_SAFE_DEFAULT_INSTREAM_VIDEO"-        CustomInpage -> "CUSTOM_INPAGE"-        CustomInterstitial -> "CUSTOM_INTERSTITIAL"-        EnhancedBanner -> "ENHANCED_BANNER"-        EnhancedImage -> "ENHANCED_IMAGE"-        FlashInpage -> "FLASH_INPAGE"-        HTML5Banner -> "HTML5_BANNER"-        Image -> "IMAGE"-        InstreamVideo -> "INSTREAM_VIDEO"-        InternalRedirect -> "INTERNAL_REDIRECT"-        InterstitialInternalRedirect -> "INTERSTITIAL_INTERNAL_REDIRECT"-        Redirect -> "REDIRECT"-        RichMediaExpanding -> "RICH_MEDIA_EXPANDING"-        RichMediaImExpand -> "RICH_MEDIA_IM_EXPAND"-        RichMediaInpage -> "RICH_MEDIA_INPAGE"-        RichMediaInpageFloating -> "RICH_MEDIA_INPAGE_FLOATING"-        RichMediaInterstitialFloat -> "RICH_MEDIA_INTERSTITIAL_FLOAT"-        RichMediaMobileInApp -> "RICH_MEDIA_MOBILE_IN_APP"-        RichMediaMultiFloating -> "RICH_MEDIA_MULTI_FLOATING"-        RichMediaPeelDown -> "RICH_MEDIA_PEEL_DOWN"-        TrackingText -> "TRACKING_TEXT"-        VastRedirect -> "VAST_REDIRECT"-        VpaidLinear -> "VPAID_LINEAR"-        VpaidNonLinear -> "VPAID_NON_LINEAR"--instance FromJSON CreativesListTypes where-    parseJSON = parseJSONText "CreativesListTypes"--instance ToJSON CreativesListTypes where-    toJSON = toJSONText--data DirectorySiteInpageTagFormatsItem-    = IframeJavascriptInpage-      -- ^ @IFRAME_JAVASCRIPT_INPAGE@-    | InternalRedirectInpage-      -- ^ @INTERNAL_REDIRECT_INPAGE@-    | JavascriptInpage-      -- ^ @JAVASCRIPT_INPAGE@-    | Standard-      -- ^ @STANDARD@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable DirectorySiteInpageTagFormatsItem--instance FromText DirectorySiteInpageTagFormatsItem where-    fromText = \case-        "IFRAME_JAVASCRIPT_INPAGE" -> Just IframeJavascriptInpage-        "INTERNAL_REDIRECT_INPAGE" -> Just InternalRedirectInpage-        "JAVASCRIPT_INPAGE" -> Just JavascriptInpage-        "STANDARD" -> Just Standard-        _ -> Nothing--instance ToText DirectorySiteInpageTagFormatsItem where-    toText = \case-        IframeJavascriptInpage -> "IFRAME_JAVASCRIPT_INPAGE"-        InternalRedirectInpage -> "INTERNAL_REDIRECT_INPAGE"-        JavascriptInpage -> "JAVASCRIPT_INPAGE"-        Standard -> "STANDARD"--instance FromJSON DirectorySiteInpageTagFormatsItem where-    parseJSON = parseJSONText "DirectorySiteInpageTagFormatsItem"--instance ToJSON DirectorySiteInpageTagFormatsItem where-    toJSON = toJSONText---- | Window mode options for flash assets. Applicable to the following--- creative types: FLASH_INPAGE, RICH_MEDIA_EXPANDING,--- RICH_MEDIA_IM_EXPAND, RICH_MEDIA_INPAGE, and RICH_MEDIA_INPAGE_FLOATING.-data CreativeAssetWindowMode-    = Opaque-      -- ^ @OPAQUE@-    | Transparent-      -- ^ @TRANSPARENT@-    | Window-      -- ^ @WINDOW@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeAssetWindowMode--instance FromText CreativeAssetWindowMode where-    fromText = \case-        "OPAQUE" -> Just Opaque-        "TRANSPARENT" -> Just Transparent-        "WINDOW" -> Just Window-        _ -> Nothing--instance ToText CreativeAssetWindowMode where-    toText = \case-        Opaque -> "OPAQUE"-        Transparent -> "TRANSPARENT"-        Window -> "WINDOW"--instance FromJSON CreativeAssetWindowMode where-    parseJSON = parseJSONText "CreativeAssetWindowMode"--instance ToJSON CreativeAssetWindowMode where-    toJSON = toJSONText---- | Possible alignments for an asset. This is a read-only field. Applicable--- to the following creative types: RICH_MEDIA_MULTI_FLOATING.-data CreativeAssetAlignment-    = AlignmentBottom-      -- ^ @ALIGNMENT_BOTTOM@-    | AlignmentLeft-      -- ^ @ALIGNMENT_LEFT@-    | AlignmentRight-      -- ^ @ALIGNMENT_RIGHT@-    | AlignmentTop-      -- ^ @ALIGNMENT_TOP@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeAssetAlignment--instance FromText CreativeAssetAlignment where-    fromText = \case-        "ALIGNMENT_BOTTOM" -> Just AlignmentBottom-        "ALIGNMENT_LEFT" -> Just AlignmentLeft-        "ALIGNMENT_RIGHT" -> Just AlignmentRight-        "ALIGNMENT_TOP" -> Just AlignmentTop-        _ -> Nothing--instance ToText CreativeAssetAlignment where-    toText = \case-        AlignmentBottom -> "ALIGNMENT_BOTTOM"-        AlignmentLeft -> "ALIGNMENT_LEFT"-        AlignmentRight -> "ALIGNMENT_RIGHT"-        AlignmentTop -> "ALIGNMENT_TOP"--instance FromJSON CreativeAssetAlignment where-    parseJSON = parseJSONText "CreativeAssetAlignment"--instance ToJSON CreativeAssetAlignment where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data RemarketingListsListSortOrder-    = RLLSOAscending-      -- ^ @ASCENDING@-    | RLLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable RemarketingListsListSortOrder--instance FromText RemarketingListsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just RLLSOAscending-        "DESCENDING" -> Just RLLSODescending-        _ -> Nothing--instance ToText RemarketingListsListSortOrder where-    toText = \case-        RLLSOAscending -> "ASCENDING"-        RLLSODescending -> "DESCENDING"--instance FromJSON RemarketingListsListSortOrder where-    parseJSON = parseJSONText "RemarketingListsListSortOrder"--instance ToJSON RemarketingListsListSortOrder where-    toJSON = toJSONText---- | Select only placement groups with these pricing types.-data PlacementGroupsListPricingTypes-    = PGLPTPricingTypeCpa-      -- ^ @PRICING_TYPE_CPA@-    | PGLPTPricingTypeCpc-      -- ^ @PRICING_TYPE_CPC@-    | PGLPTPricingTypeCpm-      -- ^ @PRICING_TYPE_CPM@-    | PGLPTPricingTypeFlatRateClicks-      -- ^ @PRICING_TYPE_FLAT_RATE_CLICKS@-    | PGLPTPricingTypeFlatRateImpressions-      -- ^ @PRICING_TYPE_FLAT_RATE_IMPRESSIONS@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PlacementGroupsListPricingTypes--instance FromText PlacementGroupsListPricingTypes where-    fromText = \case-        "PRICING_TYPE_CPA" -> Just PGLPTPricingTypeCpa-        "PRICING_TYPE_CPC" -> Just PGLPTPricingTypeCpc-        "PRICING_TYPE_CPM" -> Just PGLPTPricingTypeCpm-        "PRICING_TYPE_FLAT_RATE_CLICKS" -> Just PGLPTPricingTypeFlatRateClicks-        "PRICING_TYPE_FLAT_RATE_IMPRESSIONS" -> Just PGLPTPricingTypeFlatRateImpressions-        _ -> Nothing--instance ToText PlacementGroupsListPricingTypes where-    toText = \case-        PGLPTPricingTypeCpa -> "PRICING_TYPE_CPA"-        PGLPTPricingTypeCpc -> "PRICING_TYPE_CPC"-        PGLPTPricingTypeCpm -> "PRICING_TYPE_CPM"-        PGLPTPricingTypeFlatRateClicks -> "PRICING_TYPE_FLAT_RATE_CLICKS"-        PGLPTPricingTypeFlatRateImpressions -> "PRICING_TYPE_FLAT_RATE_IMPRESSIONS"--instance FromJSON PlacementGroupsListPricingTypes where-    parseJSON = parseJSONText "PlacementGroupsListPricingTypes"--instance ToJSON PlacementGroupsListPricingTypes where-    toJSON = toJSONText---- | Maximum number of active ads allowed for this account.-data AccountActiveAdsLimitTier-    = AAALTActiveAdsTier100K-      -- ^ @ACTIVE_ADS_TIER_100K@-    | AAALTActiveAdsTier200K-      -- ^ @ACTIVE_ADS_TIER_200K@-    | AAALTActiveAdsTier300K-      -- ^ @ACTIVE_ADS_TIER_300K@-    | AAALTActiveAdsTier40K-      -- ^ @ACTIVE_ADS_TIER_40K@-    | AAALTActiveAdsTier75K-      -- ^ @ACTIVE_ADS_TIER_75K@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AccountActiveAdsLimitTier--instance FromText AccountActiveAdsLimitTier where-    fromText = \case-        "ACTIVE_ADS_TIER_100K" -> Just AAALTActiveAdsTier100K-        "ACTIVE_ADS_TIER_200K" -> Just AAALTActiveAdsTier200K-        "ACTIVE_ADS_TIER_300K" -> Just AAALTActiveAdsTier300K-        "ACTIVE_ADS_TIER_40K" -> Just AAALTActiveAdsTier40K-        "ACTIVE_ADS_TIER_75K" -> Just AAALTActiveAdsTier75K-        _ -> Nothing--instance ToText AccountActiveAdsLimitTier where-    toText = \case-        AAALTActiveAdsTier100K -> "ACTIVE_ADS_TIER_100K"-        AAALTActiveAdsTier200K -> "ACTIVE_ADS_TIER_200K"-        AAALTActiveAdsTier300K -> "ACTIVE_ADS_TIER_300K"-        AAALTActiveAdsTier40K -> "ACTIVE_ADS_TIER_40K"-        AAALTActiveAdsTier75K -> "ACTIVE_ADS_TIER_75K"--instance FromJSON AccountActiveAdsLimitTier where-    parseJSON = parseJSONText "AccountActiveAdsLimitTier"--instance ToJSON AccountActiveAdsLimitTier where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data AccountsListSortOrder-    = AAscending-      -- ^ @ASCENDING@-    | ADescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AccountsListSortOrder--instance FromText AccountsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just AAscending-        "DESCENDING" -> Just ADescending-        _ -> Nothing--instance ToText AccountsListSortOrder where-    toText = \case-        AAscending -> "ASCENDING"-        ADescending -> "DESCENDING"--instance FromJSON AccountsListSortOrder where-    parseJSON = parseJSONText "AccountsListSortOrder"--instance ToJSON AccountsListSortOrder where-    toJSON = toJSONText---- | Field by which to sort the list.-data SubAccountsListSortField-    = SALSFID-      -- ^ @ID@-    | SALSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable SubAccountsListSortField--instance FromText SubAccountsListSortField where-    fromText = \case-        "ID" -> Just SALSFID-        "NAME" -> Just SALSFName-        _ -> Nothing--instance ToText SubAccountsListSortField where-    toText = \case-        SALSFID -> "ID"-        SALSFName -> "NAME"--instance FromJSON SubAccountsListSortField where-    parseJSON = parseJSONText "SubAccountsListSortField"--instance ToJSON SubAccountsListSortField where-    toJSON = toJSONText---- | Field by which to sort the list.-data AdsListSortField-    = ALSFID-      -- ^ @ID@-    | ALSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AdsListSortField--instance FromText AdsListSortField where-    fromText = \case-        "ID" -> Just ALSFID-        "NAME" -> Just ALSFName-        _ -> Nothing--instance ToText AdsListSortField where-    toText = \case-        ALSFID -> "ID"-        ALSFName -> "NAME"--instance FromJSON AdsListSortField where-    parseJSON = parseJSONText "AdsListSortField"--instance ToJSON AdsListSortField where-    toJSON = toJSONText---- | Field by which to sort the list.-data ProjectsListSortField-    = PID-      -- ^ @ID@-    | PName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ProjectsListSortField--instance FromText ProjectsListSortField where-    fromText = \case-        "ID" -> Just PID-        "NAME" -> Just PName-        _ -> Nothing--instance ToText ProjectsListSortField where-    toText = \case-        PID -> "ID"-        PName -> "NAME"--instance FromJSON ProjectsListSortField where-    parseJSON = parseJSONText "ProjectsListSortField"--instance ToJSON ProjectsListSortField where-    toJSON = toJSONText---- | Select only ads with these types.-data AdsListType-    = AdServingClickTracker-      -- ^ @AD_SERVING_CLICK_TRACKER@-    | AdServingDefaultAd-      -- ^ @AD_SERVING_DEFAULT_AD@-    | AdServingStandardAd-      -- ^ @AD_SERVING_STANDARD_AD@-    | AdServingTracking-      -- ^ @AD_SERVING_TRACKING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AdsListType--instance FromText AdsListType where-    fromText = \case-        "AD_SERVING_CLICK_TRACKER" -> Just AdServingClickTracker-        "AD_SERVING_DEFAULT_AD" -> Just AdServingDefaultAd-        "AD_SERVING_STANDARD_AD" -> Just AdServingStandardAd-        "AD_SERVING_TRACKING" -> Just AdServingTracking-        _ -> Nothing--instance ToText AdsListType where-    toText = \case-        AdServingClickTracker -> "AD_SERVING_CLICK_TRACKER"-        AdServingDefaultAd -> "AD_SERVING_DEFAULT_AD"-        AdServingStandardAd -> "AD_SERVING_STANDARD_AD"-        AdServingTracking -> "AD_SERVING_TRACKING"--instance FromJSON AdsListType where-    parseJSON = parseJSONText "AdsListType"--instance ToJSON AdsListType where-    toJSON = toJSONText---- | Optimization model for this configuration.-data CreativeOptimizationConfigurationOptimizationModel-    = Click-      -- ^ @CLICK@-    | PostClick-      -- ^ @POST_CLICK@-    | PostClickAndImpression-      -- ^ @POST_CLICK_AND_IMPRESSION@-    | PostImpression-      -- ^ @POST_IMPRESSION@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeOptimizationConfigurationOptimizationModel--instance FromText CreativeOptimizationConfigurationOptimizationModel where-    fromText = \case-        "CLICK" -> Just Click-        "POST_CLICK" -> Just PostClick-        "POST_CLICK_AND_IMPRESSION" -> Just PostClickAndImpression-        "POST_IMPRESSION" -> Just PostImpression-        _ -> Nothing--instance ToText CreativeOptimizationConfigurationOptimizationModel where-    toText = \case-        Click -> "CLICK"-        PostClick -> "POST_CLICK"-        PostClickAndImpression -> "POST_CLICK_AND_IMPRESSION"-        PostImpression -> "POST_IMPRESSION"--instance FromJSON CreativeOptimizationConfigurationOptimizationModel where-    parseJSON = parseJSONText "CreativeOptimizationConfigurationOptimizationModel"--instance ToJSON CreativeOptimizationConfigurationOptimizationModel where-    toJSON = toJSONText---- | Administrative level required to enable this account permission.-data AccountPermissionLevel-    = Administrator-      -- ^ @ADMINISTRATOR@-    | User-      -- ^ @USER@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AccountPermissionLevel--instance FromText AccountPermissionLevel where-    fromText = \case-        "ADMINISTRATOR" -> Just Administrator-        "USER" -> Just User-        _ -> Nothing--instance ToText AccountPermissionLevel where-    toText = \case-        Administrator -> "ADMINISTRATOR"-        User -> "USER"--instance FromJSON AccountPermissionLevel where-    parseJSON = parseJSONText "AccountPermissionLevel"--instance ToJSON AccountPermissionLevel where-    toJSON = toJSONText---- | List population term type determines the applicable fields in this--- object. If left unset or set to CUSTOM_VARIABLE_TERM, then variableName,--- variableFriendlyName, operator, value, and negation are applicable. If--- set to LIST_MEMBERSHIP_TERM then remarketingListId and contains are--- applicable. If set to REFERRER_TERM then operator, value, and negation--- are applicable.-data ListPopulationTermType-    = CustomVariableTerm-      -- ^ @CUSTOM_VARIABLE_TERM@-    | ListMembershipTerm-      -- ^ @LIST_MEMBERSHIP_TERM@-    | ReferrerTerm-      -- ^ @REFERRER_TERM@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ListPopulationTermType--instance FromText ListPopulationTermType where-    fromText = \case-        "CUSTOM_VARIABLE_TERM" -> Just CustomVariableTerm-        "LIST_MEMBERSHIP_TERM" -> Just ListMembershipTerm-        "REFERRER_TERM" -> Just ReferrerTerm-        _ -> Nothing--instance ToText ListPopulationTermType where-    toText = \case-        CustomVariableTerm -> "CUSTOM_VARIABLE_TERM"-        ListMembershipTerm -> "LIST_MEMBERSHIP_TERM"-        ReferrerTerm -> "REFERRER_TERM"--instance FromJSON ListPopulationTermType where-    parseJSON = parseJSONText "ListPopulationTermType"--instance ToJSON ListPopulationTermType where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data AdvertiserGroupsListSortOrder-    = AGLSOAscending-      -- ^ @ASCENDING@-    | AGLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AdvertiserGroupsListSortOrder--instance FromText AdvertiserGroupsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just AGLSOAscending-        "DESCENDING" -> Just AGLSODescending-        _ -> Nothing--instance ToText AdvertiserGroupsListSortOrder where-    toText = \case-        AGLSOAscending -> "ASCENDING"-        AGLSODescending -> "DESCENDING"--instance FromJSON AdvertiserGroupsListSortOrder where-    parseJSON = parseJSONText "AdvertiserGroupsListSortOrder"--instance ToJSON AdvertiserGroupsListSortOrder where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data CreativeFieldValuesListSortOrder-    = CFVLSOAscending-      -- ^ @ASCENDING@-    | CFVLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeFieldValuesListSortOrder--instance FromText CreativeFieldValuesListSortOrder where-    fromText = \case-        "ASCENDING" -> Just CFVLSOAscending-        "DESCENDING" -> Just CFVLSODescending-        _ -> Nothing--instance ToText CreativeFieldValuesListSortOrder where-    toText = \case-        CFVLSOAscending -> "ASCENDING"-        CFVLSODescending -> "DESCENDING"--instance FromJSON CreativeFieldValuesListSortOrder where-    parseJSON = parseJSONText "CreativeFieldValuesListSortOrder"--instance ToJSON CreativeFieldValuesListSortOrder where-    toJSON = toJSONText---- | An optional sort order for the dimension column.-data SortedDimensionSortOrder-    = SDSOAscending-      -- ^ @ASCENDING@-    | SDSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable SortedDimensionSortOrder--instance FromText SortedDimensionSortOrder where-    fromText = \case-        "ASCENDING" -> Just SDSOAscending-        "DESCENDING" -> Just SDSODescending-        _ -> Nothing--instance ToText SortedDimensionSortOrder where-    toText = \case-        SDSOAscending -> "ASCENDING"-        SDSODescending -> "DESCENDING"--instance FromJSON SortedDimensionSortOrder where-    parseJSON = parseJSONText "SortedDimensionSortOrder"--instance ToJSON SortedDimensionSortOrder where-    toJSON = toJSONText---- | The field by which to sort the list.-data FilesListSortField-    = FLSFID-      -- ^ @ID@-      -- Sort by file ID.-    | FLSFLastModifiedTime-      -- ^ @LAST_MODIFIED_TIME@-      -- Sort by \'lastmodifiedAt\' field.-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FilesListSortField--instance FromText FilesListSortField where-    fromText = \case-        "ID" -> Just FLSFID-        "LAST_MODIFIED_TIME" -> Just FLSFLastModifiedTime-        _ -> Nothing--instance ToText FilesListSortField where-    toText = \case-        FLSFID -> "ID"-        FLSFLastModifiedTime -> "LAST_MODIFIED_TIME"--instance FromJSON FilesListSortField where-    parseJSON = parseJSONText "FilesListSortField"--instance ToJSON FilesListSortField where-    toJSON = toJSONText--data DirectorySiteInterstitialTagFormatsItem-    = IframeJavascriptInterstitial-      -- ^ @IFRAME_JAVASCRIPT_INTERSTITIAL@-    | InternalRedirectInterstitial-      -- ^ @INTERNAL_REDIRECT_INTERSTITIAL@-    | JavascriptInterstitial-      -- ^ @JAVASCRIPT_INTERSTITIAL@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable DirectorySiteInterstitialTagFormatsItem--instance FromText DirectorySiteInterstitialTagFormatsItem where-    fromText = \case-        "IFRAME_JAVASCRIPT_INTERSTITIAL" -> Just IframeJavascriptInterstitial-        "INTERNAL_REDIRECT_INTERSTITIAL" -> Just InternalRedirectInterstitial-        "JAVASCRIPT_INTERSTITIAL" -> Just JavascriptInterstitial-        _ -> Nothing--instance ToText DirectorySiteInterstitialTagFormatsItem where-    toText = \case-        IframeJavascriptInterstitial -> "IFRAME_JAVASCRIPT_INTERSTITIAL"-        InternalRedirectInterstitial -> "INTERNAL_REDIRECT_INTERSTITIAL"-        JavascriptInterstitial -> "JAVASCRIPT_INTERSTITIAL"--instance FromJSON DirectorySiteInterstitialTagFormatsItem where-    parseJSON = parseJSONText "DirectorySiteInterstitialTagFormatsItem"--instance ToJSON DirectorySiteInterstitialTagFormatsItem where-    toJSON = toJSONText---- | Field by which to sort the list.-data EventTagsListSortField-    = ETLSFID-      -- ^ @ID@-    | ETLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable EventTagsListSortField--instance FromText EventTagsListSortField where-    fromText = \case-        "ID" -> Just ETLSFID-        "NAME" -> Just ETLSFName-        _ -> Nothing--instance ToText EventTagsListSortField where-    toText = \case-        ETLSFID -> "ID"-        ETLSFName -> "NAME"--instance FromJSON EventTagsListSortField where-    parseJSON = parseJSONText "EventTagsListSortField"--instance ToJSON EventTagsListSortField where-    toJSON = toJSONText---- | Offset top unit for an asset. This is a read-only field if the asset--- displayType is ASSET_DISPLAY_TYPE_OVERLAY. Applicable to the following--- creative types: all RICH_MEDIA.-data CreativeAssetPositionTopUnit-    = CAPTUOffSetUnitPercent-      -- ^ @OFFSET_UNIT_PERCENT@-    | CAPTUOffSetUnitPixel-      -- ^ @OFFSET_UNIT_PIXEL@-    | CAPTUOffSetUnitPixelFromCenter-      -- ^ @OFFSET_UNIT_PIXEL_FROM_CENTER@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeAssetPositionTopUnit--instance FromText CreativeAssetPositionTopUnit where-    fromText = \case-        "OFFSET_UNIT_PERCENT" -> Just CAPTUOffSetUnitPercent-        "OFFSET_UNIT_PIXEL" -> Just CAPTUOffSetUnitPixel-        "OFFSET_UNIT_PIXEL_FROM_CENTER" -> Just CAPTUOffSetUnitPixelFromCenter-        _ -> Nothing--instance ToText CreativeAssetPositionTopUnit where-    toText = \case-        CAPTUOffSetUnitPercent -> "OFFSET_UNIT_PERCENT"-        CAPTUOffSetUnitPixel -> "OFFSET_UNIT_PIXEL"-        CAPTUOffSetUnitPixelFromCenter -> "OFFSET_UNIT_PIXEL_FROM_CENTER"--instance FromJSON CreativeAssetPositionTopUnit where-    parseJSON = parseJSONText "CreativeAssetPositionTopUnit"--instance ToJSON CreativeAssetPositionTopUnit where-    toJSON = toJSONText---- | Type of the associated floodlight activity group. This is a read-only--- field.-data FloodlightActivityFloodlightActivityGroupType-    = FAFAGTCounter-      -- ^ @COUNTER@-    | FAFAGTSale-      -- ^ @SALE@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FloodlightActivityFloodlightActivityGroupType--instance FromText FloodlightActivityFloodlightActivityGroupType where-    fromText = \case-        "COUNTER" -> Just FAFAGTCounter-        "SALE" -> Just FAFAGTSale-        _ -> Nothing--instance ToText FloodlightActivityFloodlightActivityGroupType where-    toText = \case-        FAFAGTCounter -> "COUNTER"-        FAFAGTSale -> "SALE"--instance FromJSON FloodlightActivityFloodlightActivityGroupType where-    parseJSON = parseJSONText "FloodlightActivityFloodlightActivityGroupType"--instance ToJSON FloodlightActivityFloodlightActivityGroupType where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data DirectorySiteContactsListSortOrder-    = DSCLSOAscending-      -- ^ @ASCENDING@-    | DSCLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable DirectorySiteContactsListSortOrder--instance FromText DirectorySiteContactsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just DSCLSOAscending-        "DESCENDING" -> Just DSCLSODescending-        _ -> Nothing--instance ToText DirectorySiteContactsListSortOrder where-    toText = \case-        DSCLSOAscending -> "ASCENDING"-        DSCLSODescending -> "DESCENDING"--instance FromJSON DirectorySiteContactsListSortOrder where-    parseJSON = parseJSONText "DirectorySiteContactsListSortOrder"--instance ToJSON DirectorySiteContactsListSortOrder where-    toJSON = toJSONText---- | Group type of this inventory item if it represents a placement group. Is--- null otherwise. There are two type of placement groups:--- PLANNING_PLACEMENT_GROUP_TYPE_PACKAGE is a simple group of inventory--- items that acts as a single pricing point for a group of tags.--- PLANNING_PLACEMENT_GROUP_TYPE_ROADBLOCK is a group of inventory items--- that not only acts as a single pricing point, but also assumes that all--- the tags in it will be served at the same time. A roadblock requires one--- of its assigned inventory items to be marked as primary.-data PricingGroupType-    = PlanningPlacementGroupTypePackage-      -- ^ @PLANNING_PLACEMENT_GROUP_TYPE_PACKAGE@-    | PlanningPlacementGroupTypeRoadblock-      -- ^ @PLANNING_PLACEMENT_GROUP_TYPE_ROADBLOCK@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PricingGroupType--instance FromText PricingGroupType where-    fromText = \case-        "PLANNING_PLACEMENT_GROUP_TYPE_PACKAGE" -> Just PlanningPlacementGroupTypePackage-        "PLANNING_PLACEMENT_GROUP_TYPE_ROADBLOCK" -> Just PlanningPlacementGroupTypeRoadblock-        _ -> Nothing--instance ToText PricingGroupType where-    toText = \case-        PlanningPlacementGroupTypePackage -> "PLANNING_PLACEMENT_GROUP_TYPE_PACKAGE"-        PlanningPlacementGroupTypeRoadblock -> "PLANNING_PLACEMENT_GROUP_TYPE_ROADBLOCK"--instance FromJSON PricingGroupType where-    parseJSON = parseJSONText "PricingGroupType"--instance ToJSON PricingGroupType where-    toJSON = toJSONText---- | Select only ads with the specified creativeType.-data AdsListCreativeType-    = ALCTBrandSafeDefaultInstreamVideo-      -- ^ @BRAND_SAFE_DEFAULT_INSTREAM_VIDEO@-    | ALCTCustomInpage-      -- ^ @CUSTOM_INPAGE@-    | ALCTCustomInterstitial-      -- ^ @CUSTOM_INTERSTITIAL@-    | ALCTEnhancedBanner-      -- ^ @ENHANCED_BANNER@-    | ALCTEnhancedImage-      -- ^ @ENHANCED_IMAGE@-    | ALCTFlashInpage-      -- ^ @FLASH_INPAGE@-    | ALCTHTML5Banner-      -- ^ @HTML5_BANNER@-    | ALCTImage-      -- ^ @IMAGE@-    | ALCTInstreamVideo-      -- ^ @INSTREAM_VIDEO@-    | ALCTInternalRedirect-      -- ^ @INTERNAL_REDIRECT@-    | ALCTInterstitialInternalRedirect-      -- ^ @INTERSTITIAL_INTERNAL_REDIRECT@-    | ALCTRedirect-      -- ^ @REDIRECT@-    | ALCTRichMediaExpanding-      -- ^ @RICH_MEDIA_EXPANDING@-    | ALCTRichMediaImExpand-      -- ^ @RICH_MEDIA_IM_EXPAND@-    | ALCTRichMediaInpage-      -- ^ @RICH_MEDIA_INPAGE@-    | ALCTRichMediaInpageFloating-      -- ^ @RICH_MEDIA_INPAGE_FLOATING@-    | ALCTRichMediaInterstitialFloat-      -- ^ @RICH_MEDIA_INTERSTITIAL_FLOAT@-    | ALCTRichMediaMobileInApp-      -- ^ @RICH_MEDIA_MOBILE_IN_APP@-    | ALCTRichMediaMultiFloating-      -- ^ @RICH_MEDIA_MULTI_FLOATING@-    | ALCTRichMediaPeelDown-      -- ^ @RICH_MEDIA_PEEL_DOWN@-    | ALCTTrackingText-      -- ^ @TRACKING_TEXT@-    | ALCTVastRedirect-      -- ^ @VAST_REDIRECT@-    | ALCTVpaidLinear-      -- ^ @VPAID_LINEAR@-    | ALCTVpaidNonLinear-      -- ^ @VPAID_NON_LINEAR@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AdsListCreativeType--instance FromText AdsListCreativeType where-    fromText = \case-        "BRAND_SAFE_DEFAULT_INSTREAM_VIDEO" -> Just ALCTBrandSafeDefaultInstreamVideo-        "CUSTOM_INPAGE" -> Just ALCTCustomInpage-        "CUSTOM_INTERSTITIAL" -> Just ALCTCustomInterstitial-        "ENHANCED_BANNER" -> Just ALCTEnhancedBanner-        "ENHANCED_IMAGE" -> Just ALCTEnhancedImage-        "FLASH_INPAGE" -> Just ALCTFlashInpage-        "HTML5_BANNER" -> Just ALCTHTML5Banner-        "IMAGE" -> Just ALCTImage-        "INSTREAM_VIDEO" -> Just ALCTInstreamVideo-        "INTERNAL_REDIRECT" -> Just ALCTInternalRedirect-        "INTERSTITIAL_INTERNAL_REDIRECT" -> Just ALCTInterstitialInternalRedirect-        "REDIRECT" -> Just ALCTRedirect-        "RICH_MEDIA_EXPANDING" -> Just ALCTRichMediaExpanding-        "RICH_MEDIA_IM_EXPAND" -> Just ALCTRichMediaImExpand-        "RICH_MEDIA_INPAGE" -> Just ALCTRichMediaInpage-        "RICH_MEDIA_INPAGE_FLOATING" -> Just ALCTRichMediaInpageFloating-        "RICH_MEDIA_INTERSTITIAL_FLOAT" -> Just ALCTRichMediaInterstitialFloat-        "RICH_MEDIA_MOBILE_IN_APP" -> Just ALCTRichMediaMobileInApp-        "RICH_MEDIA_MULTI_FLOATING" -> Just ALCTRichMediaMultiFloating-        "RICH_MEDIA_PEEL_DOWN" -> Just ALCTRichMediaPeelDown-        "TRACKING_TEXT" -> Just ALCTTrackingText-        "VAST_REDIRECT" -> Just ALCTVastRedirect-        "VPAID_LINEAR" -> Just ALCTVpaidLinear-        "VPAID_NON_LINEAR" -> Just ALCTVpaidNonLinear-        _ -> Nothing--instance ToText AdsListCreativeType where-    toText = \case-        ALCTBrandSafeDefaultInstreamVideo -> "BRAND_SAFE_DEFAULT_INSTREAM_VIDEO"-        ALCTCustomInpage -> "CUSTOM_INPAGE"-        ALCTCustomInterstitial -> "CUSTOM_INTERSTITIAL"-        ALCTEnhancedBanner -> "ENHANCED_BANNER"-        ALCTEnhancedImage -> "ENHANCED_IMAGE"-        ALCTFlashInpage -> "FLASH_INPAGE"-        ALCTHTML5Banner -> "HTML5_BANNER"-        ALCTImage -> "IMAGE"-        ALCTInstreamVideo -> "INSTREAM_VIDEO"-        ALCTInternalRedirect -> "INTERNAL_REDIRECT"-        ALCTInterstitialInternalRedirect -> "INTERSTITIAL_INTERNAL_REDIRECT"-        ALCTRedirect -> "REDIRECT"-        ALCTRichMediaExpanding -> "RICH_MEDIA_EXPANDING"-        ALCTRichMediaImExpand -> "RICH_MEDIA_IM_EXPAND"-        ALCTRichMediaInpage -> "RICH_MEDIA_INPAGE"-        ALCTRichMediaInpageFloating -> "RICH_MEDIA_INPAGE_FLOATING"-        ALCTRichMediaInterstitialFloat -> "RICH_MEDIA_INTERSTITIAL_FLOAT"-        ALCTRichMediaMobileInApp -> "RICH_MEDIA_MOBILE_IN_APP"-        ALCTRichMediaMultiFloating -> "RICH_MEDIA_MULTI_FLOATING"-        ALCTRichMediaPeelDown -> "RICH_MEDIA_PEEL_DOWN"-        ALCTTrackingText -> "TRACKING_TEXT"-        ALCTVastRedirect -> "VAST_REDIRECT"-        ALCTVpaidLinear -> "VPAID_LINEAR"-        ALCTVpaidNonLinear -> "VPAID_NON_LINEAR"--instance FromJSON AdsListCreativeType where-    parseJSON = parseJSONText "AdsListCreativeType"--instance ToJSON AdsListCreativeType where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data FloodlightActivityGroupsListSortOrder-    = FAGLSOAscending-      -- ^ @ASCENDING@-    | FAGLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FloodlightActivityGroupsListSortOrder--instance FromText FloodlightActivityGroupsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just FAGLSOAscending-        "DESCENDING" -> Just FAGLSODescending-        _ -> Nothing--instance ToText FloodlightActivityGroupsListSortOrder where-    toText = \case-        FAGLSOAscending -> "ASCENDING"-        FAGLSODescending -> "DESCENDING"--instance FromJSON FloodlightActivityGroupsListSortOrder where-    parseJSON = parseJSONText "FloodlightActivityGroupsListSortOrder"--instance ToJSON FloodlightActivityGroupsListSortOrder where-    toJSON = toJSONText---- | Type of creative rotation. Can be used to specify whether to use--- sequential or random rotation.-data CreativeRotationType-    = CreativeRotationTypeRandom-      -- ^ @CREATIVE_ROTATION_TYPE_RANDOM@-    | CreativeRotationTypeSequential-      -- ^ @CREATIVE_ROTATION_TYPE_SEQUENTIAL@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeRotationType--instance FromText CreativeRotationType where-    fromText = \case-        "CREATIVE_ROTATION_TYPE_RANDOM" -> Just CreativeRotationTypeRandom-        "CREATIVE_ROTATION_TYPE_SEQUENTIAL" -> Just CreativeRotationTypeSequential-        _ -> Nothing--instance ToText CreativeRotationType where-    toText = \case-        CreativeRotationTypeRandom -> "CREATIVE_ROTATION_TYPE_RANDOM"-        CreativeRotationTypeSequential -> "CREATIVE_ROTATION_TYPE_SEQUENTIAL"--instance FromJSON CreativeRotationType where-    parseJSON = parseJSONText "CreativeRotationType"--instance ToJSON CreativeRotationType where-    toJSON = toJSONText---- | Field by which to sort the list.-data OrdersListSortField-    = OLSFID-      -- ^ @ID@-    | OLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable OrdersListSortField--instance FromText OrdersListSortField where-    fromText = \case-        "ID" -> Just OLSFID-        "NAME" -> Just OLSFName-        _ -> Nothing--instance ToText OrdersListSortField where-    toText = \case-        OLSFID -> "ID"-        OLSFName -> "NAME"--instance FromJSON OrdersListSortField where-    parseJSON = parseJSONText "OrdersListSortField"--instance ToJSON OrdersListSortField where-    toJSON = toJSONText---- | Field by which to sort the list.-data PlacementGroupsListSortField-    = PGLSFID-      -- ^ @ID@-    | PGLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PlacementGroupsListSortField--instance FromText PlacementGroupsListSortField where-    fromText = \case-        "ID" -> Just PGLSFID-        "NAME" -> Just PGLSFName-        _ -> Nothing--instance ToText PlacementGroupsListSortField where-    toText = \case-        PGLSFID -> "ID"-        PGLSFName -> "NAME"--instance FromJSON PlacementGroupsListSortField where-    parseJSON = parseJSONText "PlacementGroupsListSortField"--instance ToJSON PlacementGroupsListSortField where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data DirectorySitesListSortOrder-    = DSLSOAscending-      -- ^ @ASCENDING@-    | DSLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable DirectorySitesListSortOrder--instance FromText DirectorySitesListSortOrder where-    fromText = \case-        "ASCENDING" -> Just DSLSOAscending-        "DESCENDING" -> Just DSLSODescending-        _ -> Nothing--instance ToText DirectorySitesListSortOrder where-    toText = \case-        DSLSOAscending -> "ASCENDING"-        DSLSODescending -> "DESCENDING"--instance FromJSON DirectorySitesListSortOrder where-    parseJSON = parseJSONText "DirectorySitesListSortOrder"--instance ToJSON DirectorySitesListSortOrder where-    toJSON = toJSONText--data CreativeAssetDetectedFeaturesItem-    = CADFIApplicationCache-      -- ^ @APPLICATION_CACHE@-    | CADFIAudio-      -- ^ @AUDIO@-    | CADFICanvas-      -- ^ @CANVAS@-    | CADFICanvasText-      -- ^ @CANVAS_TEXT@-    | CADFICssAnimations-      -- ^ @CSS_ANIMATIONS@-    | CADFICssBackgRoundSize-      -- ^ @CSS_BACKGROUND_SIZE@-    | CADFICssBOrderImage-      -- ^ @CSS_BORDER_IMAGE@-    | CADFICssBOrderRadius-      -- ^ @CSS_BORDER_RADIUS@-    | CADFICssBoxShadow-      -- ^ @CSS_BOX_SHADOW@-    | CADFICssColumns-      -- ^ @CSS_COLUMNS@-    | CADFICssFlexBox-      -- ^ @CSS_FLEX_BOX@-    | CADFICssFontFace-      -- ^ @CSS_FONT_FACE@-    | CADFICssGeneratedContent-      -- ^ @CSS_GENERATED_CONTENT@-    | CADFICssGradients-      -- ^ @CSS_GRADIENTS@-    | CADFICssHsla-      -- ^ @CSS_HSLA@-    | CADFICssMultipleBgs-      -- ^ @CSS_MULTIPLE_BGS@-    | CADFICssOpacity-      -- ^ @CSS_OPACITY@-    | CADFICssReflections-      -- ^ @CSS_REFLECTIONS@-    | CADFICssRgba-      -- ^ @CSS_RGBA@-    | CADFICssTextShadow-      -- ^ @CSS_TEXT_SHADOW@-    | CADFICssTransforms-      -- ^ @CSS_TRANSFORMS@-    | CADFICssTRANSFORMS3D-      -- ^ @CSS_TRANSFORMS3D@-    | CADFICssTransitions-      -- ^ @CSS_TRANSITIONS@-    | CADFIDragAndDrop-      -- ^ @DRAG_AND_DROP@-    | CADFIGeoLocation-      -- ^ @GEO_LOCATION@-    | CADFIHashChange-      -- ^ @HASH_CHANGE@-    | CADFIHistory-      -- ^ @HISTORY@-    | CADFIIndexedDB-      -- ^ @INDEXED_DB@-    | CADFIInlineSvg-      -- ^ @INLINE_SVG@-    | CADFIInputAttrAutocomplete-      -- ^ @INPUT_ATTR_AUTOCOMPLETE@-    | CADFIInputAttrAutofocus-      -- ^ @INPUT_ATTR_AUTOFOCUS@-    | CADFIInputAttrList-      -- ^ @INPUT_ATTR_LIST@-    | CADFIInputAttrMax-      -- ^ @INPUT_ATTR_MAX@-    | CADFIInputAttrMin-      -- ^ @INPUT_ATTR_MIN@-    | CADFIInputAttrMultiple-      -- ^ @INPUT_ATTR_MULTIPLE@-    | CADFIInputAttrPattern-      -- ^ @INPUT_ATTR_PATTERN@-    | CADFIInputAttrPlaceholder-      -- ^ @INPUT_ATTR_PLACEHOLDER@-    | CADFIInputAttrRequired-      -- ^ @INPUT_ATTR_REQUIRED@-    | CADFIInputAttrStep-      -- ^ @INPUT_ATTR_STEP@-    | CADFIInputTypeColor-      -- ^ @INPUT_TYPE_COLOR@-    | CADFIInputTypeDate-      -- ^ @INPUT_TYPE_DATE@-    | CADFIInputTypeDatetime-      -- ^ @INPUT_TYPE_DATETIME@-    | CADFIInputTypeDatetimeLocal-      -- ^ @INPUT_TYPE_DATETIME_LOCAL@-    | CADFIInputTypeEmail-      -- ^ @INPUT_TYPE_EMAIL@-    | CADFIInputTypeMonth-      -- ^ @INPUT_TYPE_MONTH@-    | CADFIInputTypeNumber-      -- ^ @INPUT_TYPE_NUMBER@-    | CADFIInputTypeRange-      -- ^ @INPUT_TYPE_RANGE@-    | CADFIInputTypeSearch-      -- ^ @INPUT_TYPE_SEARCH@-    | CADFIInputTypeTel-      -- ^ @INPUT_TYPE_TEL@-    | CADFIInputTypeTime-      -- ^ @INPUT_TYPE_TIME@-    | CADFIInputTypeURL-      -- ^ @INPUT_TYPE_URL@-    | CADFIInputTypeWeek-      -- ^ @INPUT_TYPE_WEEK@-    | CADFILocalStorage-      -- ^ @LOCAL_STORAGE@-    | CADFIPostMessage-      -- ^ @POST_MESSAGE@-    | CADFISessionStorage-      -- ^ @SESSION_STORAGE@-    | CADFISmil-      -- ^ @SMIL@-    | CADFISvgClipPaths-      -- ^ @SVG_CLIP_PATHS@-    | CADFISvgFeImage-      -- ^ @SVG_FE_IMAGE@-    | CADFISvgFilters-      -- ^ @SVG_FILTERS@-    | CADFISvgHref-      -- ^ @SVG_HREF@-    | CADFITouch-      -- ^ @TOUCH@-    | CADFIVideo-      -- ^ @VIDEO@-    | CADFIWebgl-      -- ^ @WEBGL@-    | CADFIWebSockets-      -- ^ @WEB_SOCKETS@-    | CADFIWebSQLDatabase-      -- ^ @WEB_SQL_DATABASE@-    | CADFIWebWorkers-      -- ^ @WEB_WORKERS@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeAssetDetectedFeaturesItem--instance FromText CreativeAssetDetectedFeaturesItem where-    fromText = \case-        "APPLICATION_CACHE" -> Just CADFIApplicationCache-        "AUDIO" -> Just CADFIAudio-        "CANVAS" -> Just CADFICanvas-        "CANVAS_TEXT" -> Just CADFICanvasText-        "CSS_ANIMATIONS" -> Just CADFICssAnimations-        "CSS_BACKGROUND_SIZE" -> Just CADFICssBackgRoundSize-        "CSS_BORDER_IMAGE" -> Just CADFICssBOrderImage-        "CSS_BORDER_RADIUS" -> Just CADFICssBOrderRadius-        "CSS_BOX_SHADOW" -> Just CADFICssBoxShadow-        "CSS_COLUMNS" -> Just CADFICssColumns-        "CSS_FLEX_BOX" -> Just CADFICssFlexBox-        "CSS_FONT_FACE" -> Just CADFICssFontFace-        "CSS_GENERATED_CONTENT" -> Just CADFICssGeneratedContent-        "CSS_GRADIENTS" -> Just CADFICssGradients-        "CSS_HSLA" -> Just CADFICssHsla-        "CSS_MULTIPLE_BGS" -> Just CADFICssMultipleBgs-        "CSS_OPACITY" -> Just CADFICssOpacity-        "CSS_REFLECTIONS" -> Just CADFICssReflections-        "CSS_RGBA" -> Just CADFICssRgba-        "CSS_TEXT_SHADOW" -> Just CADFICssTextShadow-        "CSS_TRANSFORMS" -> Just CADFICssTransforms-        "CSS_TRANSFORMS3D" -> Just CADFICssTRANSFORMS3D-        "CSS_TRANSITIONS" -> Just CADFICssTransitions-        "DRAG_AND_DROP" -> Just CADFIDragAndDrop-        "GEO_LOCATION" -> Just CADFIGeoLocation-        "HASH_CHANGE" -> Just CADFIHashChange-        "HISTORY" -> Just CADFIHistory-        "INDEXED_DB" -> Just CADFIIndexedDB-        "INLINE_SVG" -> Just CADFIInlineSvg-        "INPUT_ATTR_AUTOCOMPLETE" -> Just CADFIInputAttrAutocomplete-        "INPUT_ATTR_AUTOFOCUS" -> Just CADFIInputAttrAutofocus-        "INPUT_ATTR_LIST" -> Just CADFIInputAttrList-        "INPUT_ATTR_MAX" -> Just CADFIInputAttrMax-        "INPUT_ATTR_MIN" -> Just CADFIInputAttrMin-        "INPUT_ATTR_MULTIPLE" -> Just CADFIInputAttrMultiple-        "INPUT_ATTR_PATTERN" -> Just CADFIInputAttrPattern-        "INPUT_ATTR_PLACEHOLDER" -> Just CADFIInputAttrPlaceholder-        "INPUT_ATTR_REQUIRED" -> Just CADFIInputAttrRequired-        "INPUT_ATTR_STEP" -> Just CADFIInputAttrStep-        "INPUT_TYPE_COLOR" -> Just CADFIInputTypeColor-        "INPUT_TYPE_DATE" -> Just CADFIInputTypeDate-        "INPUT_TYPE_DATETIME" -> Just CADFIInputTypeDatetime-        "INPUT_TYPE_DATETIME_LOCAL" -> Just CADFIInputTypeDatetimeLocal-        "INPUT_TYPE_EMAIL" -> Just CADFIInputTypeEmail-        "INPUT_TYPE_MONTH" -> Just CADFIInputTypeMonth-        "INPUT_TYPE_NUMBER" -> Just CADFIInputTypeNumber-        "INPUT_TYPE_RANGE" -> Just CADFIInputTypeRange-        "INPUT_TYPE_SEARCH" -> Just CADFIInputTypeSearch-        "INPUT_TYPE_TEL" -> Just CADFIInputTypeTel-        "INPUT_TYPE_TIME" -> Just CADFIInputTypeTime-        "INPUT_TYPE_URL" -> Just CADFIInputTypeURL-        "INPUT_TYPE_WEEK" -> Just CADFIInputTypeWeek-        "LOCAL_STORAGE" -> Just CADFILocalStorage-        "POST_MESSAGE" -> Just CADFIPostMessage-        "SESSION_STORAGE" -> Just CADFISessionStorage-        "SMIL" -> Just CADFISmil-        "SVG_CLIP_PATHS" -> Just CADFISvgClipPaths-        "SVG_FE_IMAGE" -> Just CADFISvgFeImage-        "SVG_FILTERS" -> Just CADFISvgFilters-        "SVG_HREF" -> Just CADFISvgHref-        "TOUCH" -> Just CADFITouch-        "VIDEO" -> Just CADFIVideo-        "WEBGL" -> Just CADFIWebgl-        "WEB_SOCKETS" -> Just CADFIWebSockets-        "WEB_SQL_DATABASE" -> Just CADFIWebSQLDatabase-        "WEB_WORKERS" -> Just CADFIWebWorkers-        _ -> Nothing--instance ToText CreativeAssetDetectedFeaturesItem where-    toText = \case-        CADFIApplicationCache -> "APPLICATION_CACHE"-        CADFIAudio -> "AUDIO"-        CADFICanvas -> "CANVAS"-        CADFICanvasText -> "CANVAS_TEXT"-        CADFICssAnimations -> "CSS_ANIMATIONS"-        CADFICssBackgRoundSize -> "CSS_BACKGROUND_SIZE"-        CADFICssBOrderImage -> "CSS_BORDER_IMAGE"-        CADFICssBOrderRadius -> "CSS_BORDER_RADIUS"-        CADFICssBoxShadow -> "CSS_BOX_SHADOW"-        CADFICssColumns -> "CSS_COLUMNS"-        CADFICssFlexBox -> "CSS_FLEX_BOX"-        CADFICssFontFace -> "CSS_FONT_FACE"-        CADFICssGeneratedContent -> "CSS_GENERATED_CONTENT"-        CADFICssGradients -> "CSS_GRADIENTS"-        CADFICssHsla -> "CSS_HSLA"-        CADFICssMultipleBgs -> "CSS_MULTIPLE_BGS"-        CADFICssOpacity -> "CSS_OPACITY"-        CADFICssReflections -> "CSS_REFLECTIONS"-        CADFICssRgba -> "CSS_RGBA"-        CADFICssTextShadow -> "CSS_TEXT_SHADOW"-        CADFICssTransforms -> "CSS_TRANSFORMS"-        CADFICssTRANSFORMS3D -> "CSS_TRANSFORMS3D"-        CADFICssTransitions -> "CSS_TRANSITIONS"-        CADFIDragAndDrop -> "DRAG_AND_DROP"-        CADFIGeoLocation -> "GEO_LOCATION"-        CADFIHashChange -> "HASH_CHANGE"-        CADFIHistory -> "HISTORY"-        CADFIIndexedDB -> "INDEXED_DB"-        CADFIInlineSvg -> "INLINE_SVG"-        CADFIInputAttrAutocomplete -> "INPUT_ATTR_AUTOCOMPLETE"-        CADFIInputAttrAutofocus -> "INPUT_ATTR_AUTOFOCUS"-        CADFIInputAttrList -> "INPUT_ATTR_LIST"-        CADFIInputAttrMax -> "INPUT_ATTR_MAX"-        CADFIInputAttrMin -> "INPUT_ATTR_MIN"-        CADFIInputAttrMultiple -> "INPUT_ATTR_MULTIPLE"-        CADFIInputAttrPattern -> "INPUT_ATTR_PATTERN"-        CADFIInputAttrPlaceholder -> "INPUT_ATTR_PLACEHOLDER"-        CADFIInputAttrRequired -> "INPUT_ATTR_REQUIRED"-        CADFIInputAttrStep -> "INPUT_ATTR_STEP"-        CADFIInputTypeColor -> "INPUT_TYPE_COLOR"-        CADFIInputTypeDate -> "INPUT_TYPE_DATE"-        CADFIInputTypeDatetime -> "INPUT_TYPE_DATETIME"-        CADFIInputTypeDatetimeLocal -> "INPUT_TYPE_DATETIME_LOCAL"-        CADFIInputTypeEmail -> "INPUT_TYPE_EMAIL"-        CADFIInputTypeMonth -> "INPUT_TYPE_MONTH"-        CADFIInputTypeNumber -> "INPUT_TYPE_NUMBER"-        CADFIInputTypeRange -> "INPUT_TYPE_RANGE"-        CADFIInputTypeSearch -> "INPUT_TYPE_SEARCH"-        CADFIInputTypeTel -> "INPUT_TYPE_TEL"-        CADFIInputTypeTime -> "INPUT_TYPE_TIME"-        CADFIInputTypeURL -> "INPUT_TYPE_URL"-        CADFIInputTypeWeek -> "INPUT_TYPE_WEEK"-        CADFILocalStorage -> "LOCAL_STORAGE"-        CADFIPostMessage -> "POST_MESSAGE"-        CADFISessionStorage -> "SESSION_STORAGE"-        CADFISmil -> "SMIL"-        CADFISvgClipPaths -> "SVG_CLIP_PATHS"-        CADFISvgFeImage -> "SVG_FE_IMAGE"-        CADFISvgFilters -> "SVG_FILTERS"-        CADFISvgHref -> "SVG_HREF"-        CADFITouch -> "TOUCH"-        CADFIVideo -> "VIDEO"-        CADFIWebgl -> "WEBGL"-        CADFIWebSockets -> "WEB_SOCKETS"-        CADFIWebSQLDatabase -> "WEB_SQL_DATABASE"-        CADFIWebWorkers -> "WEB_WORKERS"--instance FromJSON CreativeAssetDetectedFeaturesItem where-    parseJSON = parseJSONText "CreativeAssetDetectedFeaturesItem"--instance ToJSON CreativeAssetDetectedFeaturesItem where-    toJSON = toJSONText---- | Type of the floodlight activity group. This is a required field that is--- read-only after insertion.-data FloodlightActivityGroupType-    = FAGTCounter-      -- ^ @COUNTER@-    | FAGTSale-      -- ^ @SALE@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FloodlightActivityGroupType--instance FromText FloodlightActivityGroupType where-    fromText = \case-        "COUNTER" -> Just FAGTCounter-        "SALE" -> Just FAGTSale-        _ -> Nothing--instance ToText FloodlightActivityGroupType where-    toText = \case-        FAGTCounter -> "COUNTER"-        FAGTSale -> "SALE"--instance FromJSON FloodlightActivityGroupType where-    parseJSON = parseJSONText "FloodlightActivityGroupType"--instance ToJSON FloodlightActivityGroupType where-    toJSON = toJSONText---- | Directory site contact type.-data DirectorySiteContactType-    = DSCTBilling-      -- ^ @BILLING@-    | DSCTOther-      -- ^ @OTHER@-    | DSCTSales-      -- ^ @SALES@-    | DSCTTechnical-      -- ^ @TECHNICAL@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable DirectorySiteContactType--instance FromText DirectorySiteContactType where-    fromText = \case-        "BILLING" -> Just DSCTBilling-        "OTHER" -> Just DSCTOther-        "SALES" -> Just DSCTSales-        "TECHNICAL" -> Just DSCTTechnical-        _ -> Nothing--instance ToText DirectorySiteContactType where-    toText = \case-        DSCTBilling -> "BILLING"-        DSCTOther -> "OTHER"-        DSCTSales -> "SALES"-        DSCTTechnical -> "TECHNICAL"--instance FromJSON DirectorySiteContactType where-    parseJSON = parseJSONText "DirectorySiteContactType"--instance ToJSON DirectorySiteContactType where-    toJSON = toJSONText---- | Tag formats to generate for these placements.-data PlacementsGeneratetagsTagFormats-    = PGTFPlacementTagClickCommands-      -- ^ @PLACEMENT_TAG_CLICK_COMMANDS@-    | PGTFPlacementTagIframeIlayer-      -- ^ @PLACEMENT_TAG_IFRAME_ILAYER@-    | PGTFPlacementTagIframeJavascript-      -- ^ @PLACEMENT_TAG_IFRAME_JAVASCRIPT@-    | PGTFPlacementTagIframeJavascriptLegacy-      -- ^ @PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY@-    | PGTFPlacementTagInstreamVideoPrefetch-      -- ^ @PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH@-    | PGTFPlacementTagInstreamVideoPrefetchVast3-      -- ^ @PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3@-    | PGTFPlacementTagInternalRedirect-      -- ^ @PLACEMENT_TAG_INTERNAL_REDIRECT@-    | PGTFPlacementTagInterstitialIframeJavascript-      -- ^ @PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT@-    | PGTFPlacementTagInterstitialIframeJavascriptLegacy-      -- ^ @PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY@-    | PGTFPlacementTagInterstitialInternalRedirect-      -- ^ @PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT@-    | PGTFPlacementTagInterstitialJavascript-      -- ^ @PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT@-    | PGTFPlacementTagInterstitialJavascriptLegacy-      -- ^ @PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY@-    | PGTFPlacementTagJavascript-      -- ^ @PLACEMENT_TAG_JAVASCRIPT@-    | PGTFPlacementTagJavascriptLegacy-      -- ^ @PLACEMENT_TAG_JAVASCRIPT_LEGACY@-    | PGTFPlacementTagStandard-      -- ^ @PLACEMENT_TAG_STANDARD@-    | PGTFPlacementTagTracking-      -- ^ @PLACEMENT_TAG_TRACKING@-    | PGTFPlacementTagTrackingIframe-      -- ^ @PLACEMENT_TAG_TRACKING_IFRAME@-    | PGTFPlacementTagTrackingJavascript-      -- ^ @PLACEMENT_TAG_TRACKING_JAVASCRIPT@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PlacementsGeneratetagsTagFormats--instance FromText PlacementsGeneratetagsTagFormats where-    fromText = \case-        "PLACEMENT_TAG_CLICK_COMMANDS" -> Just PGTFPlacementTagClickCommands-        "PLACEMENT_TAG_IFRAME_ILAYER" -> Just PGTFPlacementTagIframeIlayer-        "PLACEMENT_TAG_IFRAME_JAVASCRIPT" -> Just PGTFPlacementTagIframeJavascript-        "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY" -> Just PGTFPlacementTagIframeJavascriptLegacy-        "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH" -> Just PGTFPlacementTagInstreamVideoPrefetch-        "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3" -> Just PGTFPlacementTagInstreamVideoPrefetchVast3-        "PLACEMENT_TAG_INTERNAL_REDIRECT" -> Just PGTFPlacementTagInternalRedirect-        "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT" -> Just PGTFPlacementTagInterstitialIframeJavascript-        "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY" -> Just PGTFPlacementTagInterstitialIframeJavascriptLegacy-        "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT" -> Just PGTFPlacementTagInterstitialInternalRedirect-        "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT" -> Just PGTFPlacementTagInterstitialJavascript-        "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY" -> Just PGTFPlacementTagInterstitialJavascriptLegacy-        "PLACEMENT_TAG_JAVASCRIPT" -> Just PGTFPlacementTagJavascript-        "PLACEMENT_TAG_JAVASCRIPT_LEGACY" -> Just PGTFPlacementTagJavascriptLegacy-        "PLACEMENT_TAG_STANDARD" -> Just PGTFPlacementTagStandard-        "PLACEMENT_TAG_TRACKING" -> Just PGTFPlacementTagTracking-        "PLACEMENT_TAG_TRACKING_IFRAME" -> Just PGTFPlacementTagTrackingIframe-        "PLACEMENT_TAG_TRACKING_JAVASCRIPT" -> Just PGTFPlacementTagTrackingJavascript-        _ -> Nothing--instance ToText PlacementsGeneratetagsTagFormats where-    toText = \case-        PGTFPlacementTagClickCommands -> "PLACEMENT_TAG_CLICK_COMMANDS"-        PGTFPlacementTagIframeIlayer -> "PLACEMENT_TAG_IFRAME_ILAYER"-        PGTFPlacementTagIframeJavascript -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT"-        PGTFPlacementTagIframeJavascriptLegacy -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY"-        PGTFPlacementTagInstreamVideoPrefetch -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH"-        PGTFPlacementTagInstreamVideoPrefetchVast3 -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3"-        PGTFPlacementTagInternalRedirect -> "PLACEMENT_TAG_INTERNAL_REDIRECT"-        PGTFPlacementTagInterstitialIframeJavascript -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT"-        PGTFPlacementTagInterstitialIframeJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY"-        PGTFPlacementTagInterstitialInternalRedirect -> "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT"-        PGTFPlacementTagInterstitialJavascript -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT"-        PGTFPlacementTagInterstitialJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY"-        PGTFPlacementTagJavascript -> "PLACEMENT_TAG_JAVASCRIPT"-        PGTFPlacementTagJavascriptLegacy -> "PLACEMENT_TAG_JAVASCRIPT_LEGACY"-        PGTFPlacementTagStandard -> "PLACEMENT_TAG_STANDARD"-        PGTFPlacementTagTracking -> "PLACEMENT_TAG_TRACKING"-        PGTFPlacementTagTrackingIframe -> "PLACEMENT_TAG_TRACKING_IFRAME"-        PGTFPlacementTagTrackingJavascript -> "PLACEMENT_TAG_TRACKING_JAVASCRIPT"--instance FromJSON PlacementsGeneratetagsTagFormats where-    parseJSON = parseJSONText "PlacementsGeneratetagsTagFormats"--instance ToJSON PlacementsGeneratetagsTagFormats where-    toJSON = toJSONText---- | Field by which to sort the list.-data AccountUserProFilesListSortField-    = AUPFLSFID-      -- ^ @ID@-    | AUPFLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AccountUserProFilesListSortField--instance FromText AccountUserProFilesListSortField where-    fromText = \case-        "ID" -> Just AUPFLSFID-        "NAME" -> Just AUPFLSFName-        _ -> Nothing--instance ToText AccountUserProFilesListSortField where-    toText = \case-        AUPFLSFID -> "ID"-        AUPFLSFName -> "NAME"--instance FromJSON AccountUserProFilesListSortField where-    parseJSON = parseJSONText "AccountUserProFilesListSortField"--instance ToJSON AccountUserProFilesListSortField where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data InventoryItemsListSortOrder-    = IILSOAscending-      -- ^ @ASCENDING@-    | IILSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable InventoryItemsListSortOrder--instance FromText InventoryItemsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just IILSOAscending-        "DESCENDING" -> Just IILSODescending-        _ -> Nothing--instance ToText InventoryItemsListSortOrder where-    toText = \case-        IILSOAscending -> "ASCENDING"-        IILSODescending -> "DESCENDING"--instance FromJSON InventoryItemsListSortOrder where-    parseJSON = parseJSONText "InventoryItemsListSortOrder"--instance ToJSON InventoryItemsListSortOrder where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data PlacementStrategiesListSortOrder-    = PSLSOAscending-      -- ^ @ASCENDING@-    | PSLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PlacementStrategiesListSortOrder--instance FromText PlacementStrategiesListSortOrder where-    fromText = \case-        "ASCENDING" -> Just PSLSOAscending-        "DESCENDING" -> Just PSLSODescending-        _ -> Nothing--instance ToText PlacementStrategiesListSortOrder where-    toText = \case-        PSLSOAscending -> "ASCENDING"-        PSLSODescending -> "DESCENDING"--instance FromJSON PlacementStrategiesListSortOrder where-    parseJSON = parseJSONText "PlacementStrategiesListSortOrder"--instance ToJSON PlacementStrategiesListSortOrder where-    toJSON = toJSONText---- | The field by which to sort the list.-data ReportsFilesListSortField-    = RFLSFID-      -- ^ @ID@-      -- Sort by file ID.-    | RFLSFLastModifiedTime-      -- ^ @LAST_MODIFIED_TIME@-      -- Sort by \'lastmodifiedAt\' field.-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ReportsFilesListSortField--instance FromText ReportsFilesListSortField where-    fromText = \case-        "ID" -> Just RFLSFID-        "LAST_MODIFIED_TIME" -> Just RFLSFLastModifiedTime-        _ -> Nothing--instance ToText ReportsFilesListSortField where-    toText = \case-        RFLSFID -> "ID"-        RFLSFLastModifiedTime -> "LAST_MODIFIED_TIME"--instance FromJSON ReportsFilesListSortField where-    parseJSON = parseJSONText "ReportsFilesListSortField"--instance ToJSON ReportsFilesListSortField where-    toJSON = toJSONText---- | Field by which to sort the list.-data CreativesListSortField-    = CID-      -- ^ @ID@-    | CName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativesListSortField--instance FromText CreativesListSortField where-    fromText = \case-        "ID" -> Just CID-        "NAME" -> Just CName-        _ -> Nothing--instance ToText CreativesListSortField where-    toText = \case-        CID -> "ID"-        CName -> "NAME"--instance FromJSON CreativesListSortField where-    parseJSON = parseJSONText "CreativesListSortField"--instance ToJSON CreativesListSortField where-    toJSON = toJSONText--data DayPartTargetingDaysOfWeekItem-    = DPTDOWIFriday-      -- ^ @FRIDAY@-    | DPTDOWIMonday-      -- ^ @MONDAY@-    | DPTDOWISaturday-      -- ^ @SATURDAY@-    | DPTDOWISunday-      -- ^ @SUNDAY@-    | DPTDOWIThursday-      -- ^ @THURSDAY@-    | DPTDOWITuesday-      -- ^ @TUESDAY@-    | DPTDOWIWednesday-      -- ^ @WEDNESDAY@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable DayPartTargetingDaysOfWeekItem--instance FromText DayPartTargetingDaysOfWeekItem where-    fromText = \case-        "FRIDAY" -> Just DPTDOWIFriday-        "MONDAY" -> Just DPTDOWIMonday-        "SATURDAY" -> Just DPTDOWISaturday-        "SUNDAY" -> Just DPTDOWISunday-        "THURSDAY" -> Just DPTDOWIThursday-        "TUESDAY" -> Just DPTDOWITuesday-        "WEDNESDAY" -> Just DPTDOWIWednesday-        _ -> Nothing--instance ToText DayPartTargetingDaysOfWeekItem where-    toText = \case-        DPTDOWIFriday -> "FRIDAY"-        DPTDOWIMonday -> "MONDAY"-        DPTDOWISaturday -> "SATURDAY"-        DPTDOWISunday -> "SUNDAY"-        DPTDOWIThursday -> "THURSDAY"-        DPTDOWITuesday -> "TUESDAY"-        DPTDOWIWednesday -> "WEDNESDAY"--instance FromJSON DayPartTargetingDaysOfWeekItem where-    parseJSON = parseJSONText "DayPartTargetingDaysOfWeekItem"--instance ToJSON DayPartTargetingDaysOfWeekItem where-    toJSON = toJSONText---- | Strategy for calculating weights. Used with--- CREATIVE_ROTATION_TYPE_RANDOM.-data CreativeRotationWeightCalculationStrategy-    = WeightStrategyCustom-      -- ^ @WEIGHT_STRATEGY_CUSTOM@-    | WeightStrategyEqual-      -- ^ @WEIGHT_STRATEGY_EQUAL@-    | WeightStrategyHighestCtr-      -- ^ @WEIGHT_STRATEGY_HIGHEST_CTR@-    | WeightStrategyOptimized-      -- ^ @WEIGHT_STRATEGY_OPTIMIZED@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeRotationWeightCalculationStrategy--instance FromText CreativeRotationWeightCalculationStrategy where-    fromText = \case-        "WEIGHT_STRATEGY_CUSTOM" -> Just WeightStrategyCustom-        "WEIGHT_STRATEGY_EQUAL" -> Just WeightStrategyEqual-        "WEIGHT_STRATEGY_HIGHEST_CTR" -> Just WeightStrategyHighestCtr-        "WEIGHT_STRATEGY_OPTIMIZED" -> Just WeightStrategyOptimized-        _ -> Nothing--instance ToText CreativeRotationWeightCalculationStrategy where-    toText = \case-        WeightStrategyCustom -> "WEIGHT_STRATEGY_CUSTOM"-        WeightStrategyEqual -> "WEIGHT_STRATEGY_EQUAL"-        WeightStrategyHighestCtr -> "WEIGHT_STRATEGY_HIGHEST_CTR"-        WeightStrategyOptimized -> "WEIGHT_STRATEGY_OPTIMIZED"--instance FromJSON CreativeRotationWeightCalculationStrategy where-    parseJSON = parseJSONText "CreativeRotationWeightCalculationStrategy"--instance ToJSON CreativeRotationWeightCalculationStrategy where-    toJSON = toJSONText---- | The scope that defines which results are returned, default is \'MINE\'.-data FilesListScope-    = FLSAll-      -- ^ @ALL@-      -- All files in account.-    | FLSMine-      -- ^ @MINE@-      -- My files.-    | FLSSharedWithMe-      -- ^ @SHARED_WITH_ME@-      -- Files shared with me.-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FilesListScope--instance FromText FilesListScope where-    fromText = \case-        "ALL" -> Just FLSAll-        "MINE" -> Just FLSMine-        "SHARED_WITH_ME" -> Just FLSSharedWithMe-        _ -> Nothing--instance ToText FilesListScope where-    toText = \case-        FLSAll -> "ALL"-        FLSMine -> "MINE"-        FLSSharedWithMe -> "SHARED_WITH_ME"--instance FromJSON FilesListScope where-    parseJSON = parseJSONText "FilesListScope"--instance ToJSON FilesListScope where-    toJSON = toJSONText---- | Field by which to sort the list.-data ContentCategoriesListSortField-    = CCLSFID-      -- ^ @ID@-    | CCLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ContentCategoriesListSortField--instance FromText ContentCategoriesListSortField where-    fromText = \case-        "ID" -> Just CCLSFID-        "NAME" -> Just CCLSFName-        _ -> Nothing--instance ToText ContentCategoriesListSortField where-    toText = \case-        CCLSFID -> "ID"-        CCLSFName -> "NAME"--instance FromJSON ContentCategoriesListSortField where-    parseJSON = parseJSONText "ContentCategoriesListSortField"--instance ToJSON ContentCategoriesListSortField where-    toJSON = toJSONText---- | Audience age group of this project.-data ProjectAudienceAgeGroup-    = PlanningAudienceAge1824-      -- ^ @PLANNING_AUDIENCE_AGE_18_24@-    | PlanningAudienceAge2534-      -- ^ @PLANNING_AUDIENCE_AGE_25_34@-    | PlanningAudienceAge3544-      -- ^ @PLANNING_AUDIENCE_AGE_35_44@-    | PlanningAudienceAge4554-      -- ^ @PLANNING_AUDIENCE_AGE_45_54@-    | PlanningAudienceAge5564-      -- ^ @PLANNING_AUDIENCE_AGE_55_64@-    | PlanningAudienceAge65OrMore-      -- ^ @PLANNING_AUDIENCE_AGE_65_OR_MORE@-    | PlanningAudienceAgeUnknown-      -- ^ @PLANNING_AUDIENCE_AGE_UNKNOWN@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ProjectAudienceAgeGroup--instance FromText ProjectAudienceAgeGroup where-    fromText = \case-        "PLANNING_AUDIENCE_AGE_18_24" -> Just PlanningAudienceAge1824-        "PLANNING_AUDIENCE_AGE_25_34" -> Just PlanningAudienceAge2534-        "PLANNING_AUDIENCE_AGE_35_44" -> Just PlanningAudienceAge3544-        "PLANNING_AUDIENCE_AGE_45_54" -> Just PlanningAudienceAge4554-        "PLANNING_AUDIENCE_AGE_55_64" -> Just PlanningAudienceAge5564-        "PLANNING_AUDIENCE_AGE_65_OR_MORE" -> Just PlanningAudienceAge65OrMore-        "PLANNING_AUDIENCE_AGE_UNKNOWN" -> Just PlanningAudienceAgeUnknown-        _ -> Nothing--instance ToText ProjectAudienceAgeGroup where-    toText = \case-        PlanningAudienceAge1824 -> "PLANNING_AUDIENCE_AGE_18_24"-        PlanningAudienceAge2534 -> "PLANNING_AUDIENCE_AGE_25_34"-        PlanningAudienceAge3544 -> "PLANNING_AUDIENCE_AGE_35_44"-        PlanningAudienceAge4554 -> "PLANNING_AUDIENCE_AGE_45_54"-        PlanningAudienceAge5564 -> "PLANNING_AUDIENCE_AGE_55_64"-        PlanningAudienceAge65OrMore -> "PLANNING_AUDIENCE_AGE_65_OR_MORE"-        PlanningAudienceAgeUnknown -> "PLANNING_AUDIENCE_AGE_UNKNOWN"--instance FromJSON ProjectAudienceAgeGroup where-    parseJSON = parseJSONText "ProjectAudienceAgeGroup"--instance ToJSON ProjectAudienceAgeGroup where-    toJSON = toJSONText---- | Type of ad. This is a required field on insertion. Note that default ads--- (AD_SERVING_DEFAULT_AD) cannot be created directly (see Creative--- resource).-data AdType-    = ATAdServingClickTracker-      -- ^ @AD_SERVING_CLICK_TRACKER@-    | ATAdServingDefaultAd-      -- ^ @AD_SERVING_DEFAULT_AD@-    | ATAdServingStandardAd-      -- ^ @AD_SERVING_STANDARD_AD@-    | ATAdServingTracking-      -- ^ @AD_SERVING_TRACKING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AdType--instance FromText AdType where-    fromText = \case-        "AD_SERVING_CLICK_TRACKER" -> Just ATAdServingClickTracker-        "AD_SERVING_DEFAULT_AD" -> Just ATAdServingDefaultAd-        "AD_SERVING_STANDARD_AD" -> Just ATAdServingStandardAd-        "AD_SERVING_TRACKING" -> Just ATAdServingTracking-        _ -> Nothing--instance ToText AdType where-    toText = \case-        ATAdServingClickTracker -> "AD_SERVING_CLICK_TRACKER"-        ATAdServingDefaultAd -> "AD_SERVING_DEFAULT_AD"-        ATAdServingStandardAd -> "AD_SERVING_STANDARD_AD"-        ATAdServingTracking -> "AD_SERVING_TRACKING"--instance FromJSON AdType where-    parseJSON = parseJSONText "AdType"--instance ToJSON AdType where-    toJSON = toJSONText---- | Select only change logs with the specified action.-data ChangeLogsListAction-    = ActionAdd-      -- ^ @ACTION_ADD@-    | ActionAssign-      -- ^ @ACTION_ASSIGN@-    | ActionAssociate-      -- ^ @ACTION_ASSOCIATE@-    | ActionCreate-      -- ^ @ACTION_CREATE@-    | ActionDelete-      -- ^ @ACTION_DELETE@-    | ActionDisable-      -- ^ @ACTION_DISABLE@-    | ActionEmailTags-      -- ^ @ACTION_EMAIL_TAGS@-    | ActionEnable-      -- ^ @ACTION_ENABLE@-    | ActionLink-      -- ^ @ACTION_LINK@-    | ActionMarkAsDefault-      -- ^ @ACTION_MARK_AS_DEFAULT@-    | ActionPush-      -- ^ @ACTION_PUSH@-    | ActionRemove-      -- ^ @ACTION_REMOVE@-    | ActionSend-      -- ^ @ACTION_SEND@-    | ActionShare-      -- ^ @ACTION_SHARE@-    | ActionUnassign-      -- ^ @ACTION_UNASSIGN@-    | ActionUnlink-      -- ^ @ACTION_UNLINK@-    | ActionUpdate-      -- ^ @ACTION_UPDATE@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ChangeLogsListAction--instance FromText ChangeLogsListAction where-    fromText = \case-        "ACTION_ADD" -> Just ActionAdd-        "ACTION_ASSIGN" -> Just ActionAssign-        "ACTION_ASSOCIATE" -> Just ActionAssociate-        "ACTION_CREATE" -> Just ActionCreate-        "ACTION_DELETE" -> Just ActionDelete-        "ACTION_DISABLE" -> Just ActionDisable-        "ACTION_EMAIL_TAGS" -> Just ActionEmailTags-        "ACTION_ENABLE" -> Just ActionEnable-        "ACTION_LINK" -> Just ActionLink-        "ACTION_MARK_AS_DEFAULT" -> Just ActionMarkAsDefault-        "ACTION_PUSH" -> Just ActionPush-        "ACTION_REMOVE" -> Just ActionRemove-        "ACTION_SEND" -> Just ActionSend-        "ACTION_SHARE" -> Just ActionShare-        "ACTION_UNASSIGN" -> Just ActionUnassign-        "ACTION_UNLINK" -> Just ActionUnlink-        "ACTION_UPDATE" -> Just ActionUpdate-        _ -> Nothing--instance ToText ChangeLogsListAction where-    toText = \case-        ActionAdd -> "ACTION_ADD"-        ActionAssign -> "ACTION_ASSIGN"-        ActionAssociate -> "ACTION_ASSOCIATE"-        ActionCreate -> "ACTION_CREATE"-        ActionDelete -> "ACTION_DELETE"-        ActionDisable -> "ACTION_DISABLE"-        ActionEmailTags -> "ACTION_EMAIL_TAGS"-        ActionEnable -> "ACTION_ENABLE"-        ActionLink -> "ACTION_LINK"-        ActionMarkAsDefault -> "ACTION_MARK_AS_DEFAULT"-        ActionPush -> "ACTION_PUSH"-        ActionRemove -> "ACTION_REMOVE"-        ActionSend -> "ACTION_SEND"-        ActionShare -> "ACTION_SHARE"-        ActionUnassign -> "ACTION_UNASSIGN"-        ActionUnlink -> "ACTION_UNLINK"-        ActionUpdate -> "ACTION_UPDATE"--instance FromJSON ChangeLogsListAction where-    parseJSON = parseJSONText "ChangeLogsListAction"--instance ToJSON ChangeLogsListAction where-    toJSON = toJSONText---- | Type of artwork used for the creative. This is a read-only field.--- Applicable to the following creative types: all RICH_MEDIA, and all--- VPAID.-data CreativeArtworkType-    = CATArtworkTypeFlash-      -- ^ @ARTWORK_TYPE_FLASH@-    | CATArtworkTypeHTML5-      -- ^ @ARTWORK_TYPE_HTML5@-    | CATArtworkTypeMixed-      -- ^ @ARTWORK_TYPE_MIXED@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeArtworkType--instance FromText CreativeArtworkType where-    fromText = \case-        "ARTWORK_TYPE_FLASH" -> Just CATArtworkTypeFlash-        "ARTWORK_TYPE_HTML5" -> Just CATArtworkTypeHTML5-        "ARTWORK_TYPE_MIXED" -> Just CATArtworkTypeMixed-        _ -> Nothing--instance ToText CreativeArtworkType where-    toText = \case-        CATArtworkTypeFlash -> "ARTWORK_TYPE_FLASH"-        CATArtworkTypeHTML5 -> "ARTWORK_TYPE_HTML5"-        CATArtworkTypeMixed -> "ARTWORK_TYPE_MIXED"--instance FromJSON CreativeArtworkType where-    parseJSON = parseJSONText "CreativeArtworkType"--instance ToJSON CreativeArtworkType where-    toJSON = toJSONText---- | Third-party placement status.-data PlacementStatus-    = AcknowledgeAcceptance-      -- ^ @ACKNOWLEDGE_ACCEPTANCE@-    | AcknowledgeRejection-      -- ^ @ACKNOWLEDGE_REJECTION@-    | Draft-      -- ^ @DRAFT@-    | PaymentAccepted-      -- ^ @PAYMENT_ACCEPTED@-    | PaymentRejected-      -- ^ @PAYMENT_REJECTED@-    | PendingReview-      -- ^ @PENDING_REVIEW@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PlacementStatus--instance FromText PlacementStatus where-    fromText = \case-        "ACKNOWLEDGE_ACCEPTANCE" -> Just AcknowledgeAcceptance-        "ACKNOWLEDGE_REJECTION" -> Just AcknowledgeRejection-        "DRAFT" -> Just Draft-        "PAYMENT_ACCEPTED" -> Just PaymentAccepted-        "PAYMENT_REJECTED" -> Just PaymentRejected-        "PENDING_REVIEW" -> Just PendingReview-        _ -> Nothing--instance ToText PlacementStatus where-    toText = \case-        AcknowledgeAcceptance -> "ACKNOWLEDGE_ACCEPTANCE"-        AcknowledgeRejection -> "ACKNOWLEDGE_REJECTION"-        Draft -> "DRAFT"-        PaymentAccepted -> "PAYMENT_ACCEPTED"-        PaymentRejected -> "PAYMENT_REJECTED"-        PendingReview -> "PENDING_REVIEW"--instance FromJSON PlacementStatus where-    parseJSON = parseJSONText "PlacementStatus"--instance ToJSON PlacementStatus where-    toJSON = toJSONText---- | Enum to define for \"MONTHLY\" scheduled reports whether reports should--- be repeated on the same day of the month as \"startDate\" or the same--- day of the week of the month. Example: If \'startDate\' is Monday, April--- 2nd 2012 (2012-04-02), \"DAY_OF_MONTH\" would run subsequent reports on--- the 2nd of every Month, and \"WEEK_OF_MONTH\" would run subsequent--- reports on the first Monday of the month.-data ReportScheduleRunsOnDayOfMonth-    = DayOfMonth-      -- ^ @DAY_OF_MONTH@-    | WeekOfMonth-      -- ^ @WEEK_OF_MONTH@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ReportScheduleRunsOnDayOfMonth--instance FromText ReportScheduleRunsOnDayOfMonth where-    fromText = \case-        "DAY_OF_MONTH" -> Just DayOfMonth-        "WEEK_OF_MONTH" -> Just WeekOfMonth-        _ -> Nothing--instance ToText ReportScheduleRunsOnDayOfMonth where-    toText = \case-        DayOfMonth -> "DAY_OF_MONTH"-        WeekOfMonth -> "WEEK_OF_MONTH"--instance FromJSON ReportScheduleRunsOnDayOfMonth where-    parseJSON = parseJSONText "ReportScheduleRunsOnDayOfMonth"--instance ToJSON ReportScheduleRunsOnDayOfMonth where-    toJSON = toJSONText--data FloodlightActivityUserDefinedVariableTypesItem-    = FAUDVTIU1-      -- ^ @U1@-    | FAUDVTIU10-      -- ^ @U10@-    | FAUDVTIU11-      -- ^ @U11@-    | FAUDVTIU12-      -- ^ @U12@-    | FAUDVTIU13-      -- ^ @U13@-    | FAUDVTIU14-      -- ^ @U14@-    | FAUDVTIU15-      -- ^ @U15@-    | FAUDVTIU16-      -- ^ @U16@-    | FAUDVTIU17-      -- ^ @U17@-    | FAUDVTIU18-      -- ^ @U18@-    | FAUDVTIU19-      -- ^ @U19@-    | FAUDVTIU2-      -- ^ @U2@-    | FAUDVTIU20-      -- ^ @U20@-    | FAUDVTIU3-      -- ^ @U3@-    | FAUDVTIU4-      -- ^ @U4@-    | FAUDVTIU5-      -- ^ @U5@-    | FAUDVTIU6-      -- ^ @U6@-    | FAUDVTIU7-      -- ^ @U7@-    | FAUDVTIU8-      -- ^ @U8@-    | FAUDVTIU9-      -- ^ @U9@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FloodlightActivityUserDefinedVariableTypesItem--instance FromText FloodlightActivityUserDefinedVariableTypesItem where-    fromText = \case-        "U1" -> Just FAUDVTIU1-        "U10" -> Just FAUDVTIU10-        "U11" -> Just FAUDVTIU11-        "U12" -> Just FAUDVTIU12-        "U13" -> Just FAUDVTIU13-        "U14" -> Just FAUDVTIU14-        "U15" -> Just FAUDVTIU15-        "U16" -> Just FAUDVTIU16-        "U17" -> Just FAUDVTIU17-        "U18" -> Just FAUDVTIU18-        "U19" -> Just FAUDVTIU19-        "U2" -> Just FAUDVTIU2-        "U20" -> Just FAUDVTIU20-        "U3" -> Just FAUDVTIU3-        "U4" -> Just FAUDVTIU4-        "U5" -> Just FAUDVTIU5-        "U6" -> Just FAUDVTIU6-        "U7" -> Just FAUDVTIU7-        "U8" -> Just FAUDVTIU8-        "U9" -> Just FAUDVTIU9-        _ -> Nothing--instance ToText FloodlightActivityUserDefinedVariableTypesItem where-    toText = \case-        FAUDVTIU1 -> "U1"-        FAUDVTIU10 -> "U10"-        FAUDVTIU11 -> "U11"-        FAUDVTIU12 -> "U12"-        FAUDVTIU13 -> "U13"-        FAUDVTIU14 -> "U14"-        FAUDVTIU15 -> "U15"-        FAUDVTIU16 -> "U16"-        FAUDVTIU17 -> "U17"-        FAUDVTIU18 -> "U18"-        FAUDVTIU19 -> "U19"-        FAUDVTIU2 -> "U2"-        FAUDVTIU20 -> "U20"-        FAUDVTIU3 -> "U3"-        FAUDVTIU4 -> "U4"-        FAUDVTIU5 -> "U5"-        FAUDVTIU6 -> "U6"-        FAUDVTIU7 -> "U7"-        FAUDVTIU8 -> "U8"-        FAUDVTIU9 -> "U9"--instance FromJSON FloodlightActivityUserDefinedVariableTypesItem where-    parseJSON = parseJSONText "FloodlightActivityUserDefinedVariableTypesItem"--instance ToJSON FloodlightActivityUserDefinedVariableTypesItem where-    toJSON = toJSONText---- | Site filter type for this event tag. If no type is specified then the--- event tag will be applied to all sites.-data EventTagSiteFilterType-    = BlackList-      -- ^ @BLACKLIST@-    | WhiteList-      -- ^ @WHITELIST@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable EventTagSiteFilterType--instance FromText EventTagSiteFilterType where-    fromText = \case-        "BLACKLIST" -> Just BlackList-        "WHITELIST" -> Just WhiteList-        _ -> Nothing--instance ToText EventTagSiteFilterType where-    toText = \case-        BlackList -> "BLACKLIST"-        WhiteList -> "WHITELIST"--instance FromJSON EventTagSiteFilterType where-    parseJSON = parseJSONText "EventTagSiteFilterType"--instance ToJSON EventTagSiteFilterType where-    toJSON = toJSONText---- | The output format of the report. If not specified, default format is--- \"CSV\". Note that the actual format in the completed report file might--- differ if for instance the report\'s size exceeds the format\'s--- capabilities. \"CSV\" will then be the fallback format.-data ReportFormat-    = RFCSV-      -- ^ @CSV@-    | RFExcel-      -- ^ @EXCEL@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ReportFormat--instance FromText ReportFormat where-    fromText = \case-        "CSV" -> Just RFCSV-        "EXCEL" -> Just RFExcel-        _ -> Nothing--instance ToText ReportFormat where-    toText = \case-        RFCSV -> "CSV"-        RFExcel -> "EXCEL"--instance FromJSON ReportFormat where-    parseJSON = parseJSONText "ReportFormat"--instance ToJSON ReportFormat where-    toJSON = toJSONText---- | Type of this placement group. A package is a simple group of placements--- that acts as a single pricing point for a group of tags. A roadblock is--- a group of placements that not only acts as a single pricing point, but--- also assumes that all the tags in it will be served at the same time. A--- roadblock requires one of its assigned placements to be marked as--- primary for reporting. This field is required on insertion.-data PlacementGroupPlacementGroupType-    = PGPGTPlacementPackage-      -- ^ @PLACEMENT_PACKAGE@-    | PGPGTPlacementRoadblock-      -- ^ @PLACEMENT_ROADBLOCK@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PlacementGroupPlacementGroupType--instance FromText PlacementGroupPlacementGroupType where-    fromText = \case-        "PLACEMENT_PACKAGE" -> Just PGPGTPlacementPackage-        "PLACEMENT_ROADBLOCK" -> Just PGPGTPlacementRoadblock-        _ -> Nothing--instance ToText PlacementGroupPlacementGroupType where-    toText = \case-        PGPGTPlacementPackage -> "PLACEMENT_PACKAGE"-        PGPGTPlacementRoadblock -> "PLACEMENT_ROADBLOCK"--instance FromJSON PlacementGroupPlacementGroupType where-    parseJSON = parseJSONText "PlacementGroupPlacementGroupType"--instance ToJSON PlacementGroupPlacementGroupType where-    toJSON = toJSONText---- | Pricing type of this inventory item.-data PricingPricingType-    = PlanningPlacementPricingTypeClicks-      -- ^ @PLANNING_PLACEMENT_PRICING_TYPE_CLICKS@-    | PlanningPlacementPricingTypeCpa-      -- ^ @PLANNING_PLACEMENT_PRICING_TYPE_CPA@-    | PlanningPlacementPricingTypeCpc-      -- ^ @PLANNING_PLACEMENT_PRICING_TYPE_CPC@-    | PlanningPlacementPricingTypeCpm-      -- ^ @PLANNING_PLACEMENT_PRICING_TYPE_CPM@-    | PlanningPlacementPricingTypeFlatRateClicks-      -- ^ @PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_CLICKS@-    | PlanningPlacementPricingTypeFlatRateImpressions-      -- ^ @PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_IMPRESSIONS@-    | PlanningPlacementPricingTypeImpressions-      -- ^ @PLANNING_PLACEMENT_PRICING_TYPE_IMPRESSIONS@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PricingPricingType--instance FromText PricingPricingType where-    fromText = \case-        "PLANNING_PLACEMENT_PRICING_TYPE_CLICKS" -> Just PlanningPlacementPricingTypeClicks-        "PLANNING_PLACEMENT_PRICING_TYPE_CPA" -> Just PlanningPlacementPricingTypeCpa-        "PLANNING_PLACEMENT_PRICING_TYPE_CPC" -> Just PlanningPlacementPricingTypeCpc-        "PLANNING_PLACEMENT_PRICING_TYPE_CPM" -> Just PlanningPlacementPricingTypeCpm-        "PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_CLICKS" -> Just PlanningPlacementPricingTypeFlatRateClicks-        "PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_IMPRESSIONS" -> Just PlanningPlacementPricingTypeFlatRateImpressions-        "PLANNING_PLACEMENT_PRICING_TYPE_IMPRESSIONS" -> Just PlanningPlacementPricingTypeImpressions-        _ -> Nothing--instance ToText PricingPricingType where-    toText = \case-        PlanningPlacementPricingTypeClicks -> "PLANNING_PLACEMENT_PRICING_TYPE_CLICKS"-        PlanningPlacementPricingTypeCpa -> "PLANNING_PLACEMENT_PRICING_TYPE_CPA"-        PlanningPlacementPricingTypeCpc -> "PLANNING_PLACEMENT_PRICING_TYPE_CPC"-        PlanningPlacementPricingTypeCpm -> "PLANNING_PLACEMENT_PRICING_TYPE_CPM"-        PlanningPlacementPricingTypeFlatRateClicks -> "PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_CLICKS"-        PlanningPlacementPricingTypeFlatRateImpressions -> "PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_IMPRESSIONS"-        PlanningPlacementPricingTypeImpressions -> "PLANNING_PLACEMENT_PRICING_TYPE_IMPRESSIONS"--instance FromJSON PricingPricingType where-    parseJSON = parseJSONText "PricingPricingType"--instance ToJSON PricingPricingType where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data SubAccountsListSortOrder-    = SALSOAscending-      -- ^ @ASCENDING@-    | SALSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable SubAccountsListSortOrder--instance FromText SubAccountsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just SALSOAscending-        "DESCENDING" -> Just SALSODescending-        _ -> Nothing--instance ToText SubAccountsListSortOrder where-    toText = \case-        SALSOAscending -> "ASCENDING"-        SALSODescending -> "DESCENDING"--instance FromJSON SubAccountsListSortOrder where-    parseJSON = parseJSONText "SubAccountsListSortOrder"--instance ToJSON SubAccountsListSortOrder where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data AdsListSortOrder-    = ADSAscending-      -- ^ @ASCENDING@-    | ADSDescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AdsListSortOrder--instance FromText AdsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just ADSAscending-        "DESCENDING" -> Just ADSDescending-        _ -> Nothing--instance ToText AdsListSortOrder where-    toText = \case-        ADSAscending -> "ASCENDING"-        ADSDescending -> "DESCENDING"--instance FromJSON AdsListSortOrder where-    parseJSON = parseJSONText "AdsListSortOrder"--instance ToJSON AdsListSortOrder where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data ProjectsListSortOrder-    = PLSOAscending-      -- ^ @ASCENDING@-    | PLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ProjectsListSortOrder--instance FromText ProjectsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just PLSOAscending-        "DESCENDING" -> Just PLSODescending-        _ -> Nothing--instance ToText ProjectsListSortOrder where-    toText = \case-        PLSOAscending -> "ASCENDING"-        PLSODescending -> "DESCENDING"--instance FromJSON ProjectsListSortOrder where-    parseJSON = parseJSONText "ProjectsListSortOrder"--instance ToJSON ProjectsListSortOrder where-    toJSON = toJSONText---- | Field by which to sort the list.-data RemarketingListsListSortField-    = RLLSFID-      -- ^ @ID@-    | RLLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable RemarketingListsListSortField--instance FromText RemarketingListsListSortField where-    fromText = \case-        "ID" -> Just RLLSFID-        "NAME" -> Just RLLSFName-        _ -> Nothing--instance ToText RemarketingListsListSortField where-    toText = \case-        RLLSFID -> "ID"-        RLLSFName -> "NAME"--instance FromJSON RemarketingListsListSortField where-    parseJSON = parseJSONText "RemarketingListsListSortField"--instance ToJSON RemarketingListsListSortField where-    toJSON = toJSONText--data ReportScheduleRepeatsOnWeekDaysItem-    = RSROWDIFriday-      -- ^ @FRIDAY@-    | RSROWDIMonday-      -- ^ @MONDAY@-    | RSROWDISaturday-      -- ^ @SATURDAY@-    | RSROWDISunday-      -- ^ @SUNDAY@-    | RSROWDIThursday-      -- ^ @THURSDAY@-    | RSROWDITuesday-      -- ^ @TUESDAY@-    | RSROWDIWednesday-      -- ^ @WEDNESDAY@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ReportScheduleRepeatsOnWeekDaysItem--instance FromText ReportScheduleRepeatsOnWeekDaysItem where-    fromText = \case-        "FRIDAY" -> Just RSROWDIFriday-        "MONDAY" -> Just RSROWDIMonday-        "SATURDAY" -> Just RSROWDISaturday-        "SUNDAY" -> Just RSROWDISunday-        "THURSDAY" -> Just RSROWDIThursday-        "TUESDAY" -> Just RSROWDITuesday-        "WEDNESDAY" -> Just RSROWDIWednesday-        _ -> Nothing--instance ToText ReportScheduleRepeatsOnWeekDaysItem where-    toText = \case-        RSROWDIFriday -> "FRIDAY"-        RSROWDIMonday -> "MONDAY"-        RSROWDISaturday -> "SATURDAY"-        RSROWDISunday -> "SUNDAY"-        RSROWDIThursday -> "THURSDAY"-        RSROWDITuesday -> "TUESDAY"-        RSROWDIWednesday -> "WEDNESDAY"--instance FromJSON ReportScheduleRepeatsOnWeekDaysItem where-    parseJSON = parseJSONText "ReportScheduleRepeatsOnWeekDaysItem"--instance ToJSON ReportScheduleRepeatsOnWeekDaysItem where-    toJSON = toJSONText---- | Creative group number of the creative group assignment.-data CreativeGroupAssignmentCreativeGroupNumber-    = CreativeGroupOne-      -- ^ @CREATIVE_GROUP_ONE@-    | CreativeGroupTwo-      -- ^ @CREATIVE_GROUP_TWO@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeGroupAssignmentCreativeGroupNumber--instance FromText CreativeGroupAssignmentCreativeGroupNumber where-    fromText = \case-        "CREATIVE_GROUP_ONE" -> Just CreativeGroupOne-        "CREATIVE_GROUP_TWO" -> Just CreativeGroupTwo-        _ -> Nothing--instance ToText CreativeGroupAssignmentCreativeGroupNumber where-    toText = \case-        CreativeGroupOne -> "CREATIVE_GROUP_ONE"-        CreativeGroupTwo -> "CREATIVE_GROUP_TWO"--instance FromJSON CreativeGroupAssignmentCreativeGroupNumber where-    parseJSON = parseJSONText "CreativeGroupAssignmentCreativeGroupNumber"--instance ToJSON CreativeGroupAssignmentCreativeGroupNumber where-    toJSON = toJSONText---- | Field by which to sort the list.-data AccountsListSortField-    = AID-      -- ^ @ID@-    | AName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AccountsListSortField--instance FromText AccountsListSortField where-    fromText = \case-        "ID" -> Just AID-        "NAME" -> Just AName-        _ -> Nothing--instance ToText AccountsListSortField where-    toText = \case-        AID -> "ID"-        AName -> "NAME"--instance FromJSON AccountsListSortField where-    parseJSON = parseJSONText "AccountsListSortField"--instance ToJSON AccountsListSortField where-    toJSON = toJSONText---- | Select only advertisers with the specified status.-data AdvertisersListStatus-    = Approved-      -- ^ @APPROVED@-    | OnHold-      -- ^ @ON_HOLD@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AdvertisersListStatus--instance FromText AdvertisersListStatus where-    fromText = \case-        "APPROVED" -> Just Approved-        "ON_HOLD" -> Just OnHold-        _ -> Nothing--instance ToText AdvertisersListStatus where-    toText = \case-        Approved -> "APPROVED"-        OnHold -> "ON_HOLD"--instance FromJSON AdvertisersListStatus where-    parseJSON = parseJSONText "AdvertisersListStatus"--instance ToJSON AdvertisersListStatus where-    toJSON = toJSONText---- | Determines how the \'value\' field is matched when filtering. If not--- specified, defaults to EXACT. If set to WILDCARD_EXPRESSION, \'*\' is--- allowed as a placeholder for variable length character sequences, and it--- can be escaped with a backslash. Note, only paid search dimensions--- (\'dfa:paidSearch*\') allow a matchType other than EXACT.-data DimensionValueMatchType-    = BeginsWith-      -- ^ @BEGINS_WITH@-    | Contains-      -- ^ @CONTAINS@-    | Exact-      -- ^ @EXACT@-    | WildcardExpression-      -- ^ @WILDCARD_EXPRESSION@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable DimensionValueMatchType--instance FromText DimensionValueMatchType where-    fromText = \case-        "BEGINS_WITH" -> Just BeginsWith-        "CONTAINS" -> Just Contains-        "EXACT" -> Just Exact-        "WILDCARD_EXPRESSION" -> Just WildcardExpression-        _ -> Nothing--instance ToText DimensionValueMatchType where-    toText = \case-        BeginsWith -> "BEGINS_WITH"-        Contains -> "CONTAINS"-        Exact -> "EXACT"-        WildcardExpression -> "WILDCARD_EXPRESSION"--instance FromJSON DimensionValueMatchType where-    parseJSON = parseJSONText "DimensionValueMatchType"--instance ToJSON DimensionValueMatchType where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data PlacementGroupsListSortOrder-    = PGLSOAscending-      -- ^ @ASCENDING@-    | PGLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PlacementGroupsListSortOrder--instance FromText PlacementGroupsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just PGLSOAscending-        "DESCENDING" -> Just PGLSODescending-        _ -> Nothing--instance ToText PlacementGroupsListSortOrder where-    toText = \case-        PGLSOAscending -> "ASCENDING"-        PGLSODescending -> "DESCENDING"--instance FromJSON PlacementGroupsListSortOrder where-    parseJSON = parseJSONText "PlacementGroupsListSortOrder"--instance ToJSON PlacementGroupsListSortOrder where-    toJSON = toJSONText---- | Compatibility of this ad. Applicable when type is AD_SERVING_DEFAULT_AD.--- WEB and WEB_INTERSTITIAL refer to rendering either on desktop or on--- mobile devices for regular or interstitial ads, respectively. APP and--- APP_INTERSTITIAL are for rendering in mobile apps. IN_STREAM_VIDEO--- refers to rendering an in-stream video ads developed with the VAST--- standard.-data AdCompatibility-    = ACApp-      -- ^ @APP@-    | ACAppInterstitial-      -- ^ @APP_INTERSTITIAL@-    | ACInStreamVideo-      -- ^ @IN_STREAM_VIDEO@-    | ACWeb-      -- ^ @WEB@-    | ACWebInterstitial-      -- ^ @WEB_INTERSTITIAL@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AdCompatibility--instance FromText AdCompatibility where-    fromText = \case-        "APP" -> Just ACApp-        "APP_INTERSTITIAL" -> Just ACAppInterstitial-        "IN_STREAM_VIDEO" -> Just ACInStreamVideo-        "WEB" -> Just ACWeb-        "WEB_INTERSTITIAL" -> Just ACWebInterstitial-        _ -> Nothing--instance ToText AdCompatibility where-    toText = \case-        ACApp -> "APP"-        ACAppInterstitial -> "APP_INTERSTITIAL"-        ACInStreamVideo -> "IN_STREAM_VIDEO"-        ACWeb -> "WEB"-        ACWebInterstitial -> "WEB_INTERSTITIAL"--instance FromJSON AdCompatibility where-    parseJSON = parseJSONText "AdCompatibility"--instance ToJSON AdCompatibility where-    toJSON = toJSONText---- | Field by which to sort the list.-data CreativeFieldValuesListSortField-    = CFVLSFID-      -- ^ @ID@-    | CFVLSFValue-      -- ^ @VALUE@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeFieldValuesListSortField--instance FromText CreativeFieldValuesListSortField where-    fromText = \case-        "ID" -> Just CFVLSFID-        "VALUE" -> Just CFVLSFValue-        _ -> Nothing--instance ToText CreativeFieldValuesListSortField where-    toText = \case-        CFVLSFID -> "ID"-        CFVLSFValue -> "VALUE"--instance FromJSON CreativeFieldValuesListSortField where-    parseJSON = parseJSONText "CreativeFieldValuesListSortField"--instance ToJSON CreativeFieldValuesListSortField where-    toJSON = toJSONText---- | Field by which to sort the list.-data FloodlightActivityGroupsListSortField-    = FAGLSFID-      -- ^ @ID@-    | FAGLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FloodlightActivityGroupsListSortField--instance FromText FloodlightActivityGroupsListSortField where-    fromText = \case-        "ID" -> Just FAGLSFID-        "NAME" -> Just FAGLSFName-        _ -> Nothing--instance ToText FloodlightActivityGroupsListSortField where-    toText = \case-        FAGLSFID -> "ID"-        FAGLSFName -> "NAME"--instance FromJSON FloodlightActivityGroupsListSortField where-    parseJSON = parseJSONText "FloodlightActivityGroupsListSortField"--instance ToJSON FloodlightActivityGroupsListSortField where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data OrdersListSortOrder-    = OLSOAscending-      -- ^ @ASCENDING@-    | OLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable OrdersListSortOrder--instance FromText OrdersListSortOrder where-    fromText = \case-        "ASCENDING" -> Just OLSOAscending-        "DESCENDING" -> Just OLSODescending-        _ -> Nothing--instance ToText OrdersListSortOrder where-    toText = \case-        OLSOAscending -> "ASCENDING"-        OLSODescending -> "DESCENDING"--instance FromJSON OrdersListSortOrder where-    parseJSON = parseJSONText "OrdersListSortOrder"--instance ToJSON OrdersListSortOrder where-    toJSON = toJSONText---- | Profile for this account. This is a read-only field that can be left--- blank.-data AccountAccountProFile-    = AccountProFileBasic-      -- ^ @ACCOUNT_PROFILE_BASIC@-    | AccountProFileStandard-      -- ^ @ACCOUNT_PROFILE_STANDARD@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AccountAccountProFile--instance FromText AccountAccountProFile where-    fromText = \case-        "ACCOUNT_PROFILE_BASIC" -> Just AccountProFileBasic-        "ACCOUNT_PROFILE_STANDARD" -> Just AccountProFileStandard-        _ -> Nothing--instance ToText AccountAccountProFile where-    toText = \case-        AccountProFileBasic -> "ACCOUNT_PROFILE_BASIC"-        AccountProFileStandard -> "ACCOUNT_PROFILE_STANDARD"--instance FromJSON AccountAccountProFile where-    parseJSON = parseJSONText "AccountAccountProFile"--instance ToJSON AccountAccountProFile where-    toJSON = toJSONText---- | Type of this creative.This is a required field. Applicable to all--- creative types.-data CreativeType-    = CTBrandSafeDefaultInstreamVideo-      -- ^ @BRAND_SAFE_DEFAULT_INSTREAM_VIDEO@-    | CTCustomInpage-      -- ^ @CUSTOM_INPAGE@-    | CTCustomInterstitial-      -- ^ @CUSTOM_INTERSTITIAL@-    | CTEnhancedBanner-      -- ^ @ENHANCED_BANNER@-    | CTEnhancedImage-      -- ^ @ENHANCED_IMAGE@-    | CTFlashInpage-      -- ^ @FLASH_INPAGE@-    | CTHTML5Banner-      -- ^ @HTML5_BANNER@-    | CTImage-      -- ^ @IMAGE@-    | CTInstreamVideo-      -- ^ @INSTREAM_VIDEO@-    | CTInternalRedirect-      -- ^ @INTERNAL_REDIRECT@-    | CTInterstitialInternalRedirect-      -- ^ @INTERSTITIAL_INTERNAL_REDIRECT@-    | CTRedirect-      -- ^ @REDIRECT@-    | CTRichMediaExpanding-      -- ^ @RICH_MEDIA_EXPANDING@-    | CTRichMediaImExpand-      -- ^ @RICH_MEDIA_IM_EXPAND@-    | CTRichMediaInpage-      -- ^ @RICH_MEDIA_INPAGE@-    | CTRichMediaInpageFloating-      -- ^ @RICH_MEDIA_INPAGE_FLOATING@-    | CTRichMediaInterstitialFloat-      -- ^ @RICH_MEDIA_INTERSTITIAL_FLOAT@-    | CTRichMediaMobileInApp-      -- ^ @RICH_MEDIA_MOBILE_IN_APP@-    | CTRichMediaMultiFloating-      -- ^ @RICH_MEDIA_MULTI_FLOATING@-    | CTRichMediaPeelDown-      -- ^ @RICH_MEDIA_PEEL_DOWN@-    | CTTrackingText-      -- ^ @TRACKING_TEXT@-    | CTVastRedirect-      -- ^ @VAST_REDIRECT@-    | CTVpaidLinear-      -- ^ @VPAID_LINEAR@-    | CTVpaidNonLinear-      -- ^ @VPAID_NON_LINEAR@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeType--instance FromText CreativeType where-    fromText = \case-        "BRAND_SAFE_DEFAULT_INSTREAM_VIDEO" -> Just CTBrandSafeDefaultInstreamVideo-        "CUSTOM_INPAGE" -> Just CTCustomInpage-        "CUSTOM_INTERSTITIAL" -> Just CTCustomInterstitial-        "ENHANCED_BANNER" -> Just CTEnhancedBanner-        "ENHANCED_IMAGE" -> Just CTEnhancedImage-        "FLASH_INPAGE" -> Just CTFlashInpage-        "HTML5_BANNER" -> Just CTHTML5Banner-        "IMAGE" -> Just CTImage-        "INSTREAM_VIDEO" -> Just CTInstreamVideo-        "INTERNAL_REDIRECT" -> Just CTInternalRedirect-        "INTERSTITIAL_INTERNAL_REDIRECT" -> Just CTInterstitialInternalRedirect-        "REDIRECT" -> Just CTRedirect-        "RICH_MEDIA_EXPANDING" -> Just CTRichMediaExpanding-        "RICH_MEDIA_IM_EXPAND" -> Just CTRichMediaImExpand-        "RICH_MEDIA_INPAGE" -> Just CTRichMediaInpage-        "RICH_MEDIA_INPAGE_FLOATING" -> Just CTRichMediaInpageFloating-        "RICH_MEDIA_INTERSTITIAL_FLOAT" -> Just CTRichMediaInterstitialFloat-        "RICH_MEDIA_MOBILE_IN_APP" -> Just CTRichMediaMobileInApp-        "RICH_MEDIA_MULTI_FLOATING" -> Just CTRichMediaMultiFloating-        "RICH_MEDIA_PEEL_DOWN" -> Just CTRichMediaPeelDown-        "TRACKING_TEXT" -> Just CTTrackingText-        "VAST_REDIRECT" -> Just CTVastRedirect-        "VPAID_LINEAR" -> Just CTVpaidLinear-        "VPAID_NON_LINEAR" -> Just CTVpaidNonLinear-        _ -> Nothing--instance ToText CreativeType where-    toText = \case-        CTBrandSafeDefaultInstreamVideo -> "BRAND_SAFE_DEFAULT_INSTREAM_VIDEO"-        CTCustomInpage -> "CUSTOM_INPAGE"-        CTCustomInterstitial -> "CUSTOM_INTERSTITIAL"-        CTEnhancedBanner -> "ENHANCED_BANNER"-        CTEnhancedImage -> "ENHANCED_IMAGE"-        CTFlashInpage -> "FLASH_INPAGE"-        CTHTML5Banner -> "HTML5_BANNER"-        CTImage -> "IMAGE"-        CTInstreamVideo -> "INSTREAM_VIDEO"-        CTInternalRedirect -> "INTERNAL_REDIRECT"-        CTInterstitialInternalRedirect -> "INTERSTITIAL_INTERNAL_REDIRECT"-        CTRedirect -> "REDIRECT"-        CTRichMediaExpanding -> "RICH_MEDIA_EXPANDING"-        CTRichMediaImExpand -> "RICH_MEDIA_IM_EXPAND"-        CTRichMediaInpage -> "RICH_MEDIA_INPAGE"-        CTRichMediaInpageFloating -> "RICH_MEDIA_INPAGE_FLOATING"-        CTRichMediaInterstitialFloat -> "RICH_MEDIA_INTERSTITIAL_FLOAT"-        CTRichMediaMobileInApp -> "RICH_MEDIA_MOBILE_IN_APP"-        CTRichMediaMultiFloating -> "RICH_MEDIA_MULTI_FLOATING"-        CTRichMediaPeelDown -> "RICH_MEDIA_PEEL_DOWN"-        CTTrackingText -> "TRACKING_TEXT"-        CTVastRedirect -> "VAST_REDIRECT"-        CTVpaidLinear -> "VPAID_LINEAR"-        CTVpaidNonLinear -> "VPAID_NON_LINEAR"--instance FromJSON CreativeType where-    parseJSON = parseJSONText "CreativeType"--instance ToJSON CreativeType where-    toJSON = toJSONText---- | Order of sorted results, default is \'DESCENDING\'.-data FilesListSortOrder-    = FLSOAscending-      -- ^ @ASCENDING@-      -- Ascending order.-    | FLSODescending-      -- ^ @DESCENDING@-      -- Descending order.-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FilesListSortOrder--instance FromText FilesListSortOrder where-    fromText = \case-        "ASCENDING" -> Just FLSOAscending-        "DESCENDING" -> Just FLSODescending-        _ -> Nothing--instance ToText FilesListSortOrder where-    toText = \case-        FLSOAscending -> "ASCENDING"-        FLSODescending -> "DESCENDING"--instance FromJSON FilesListSortOrder where-    parseJSON = parseJSONText "FilesListSortOrder"--instance ToJSON FilesListSortOrder where-    toJSON = toJSONText---- | Field by which to sort the list.-data AdvertiserGroupsListSortField-    = AGLSFID-      -- ^ @ID@-    | AGLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AdvertiserGroupsListSortField--instance FromText AdvertiserGroupsListSortField where-    fromText = \case-        "ID" -> Just AGLSFID-        "NAME" -> Just AGLSFName-        _ -> Nothing--instance ToText AdvertiserGroupsListSortField where-    toText = \case-        AGLSFID -> "ID"-        AGLSFName -> "NAME"--instance FromJSON AdvertiserGroupsListSortField where-    parseJSON = parseJSONText "AdvertiserGroupsListSortField"--instance ToJSON AdvertiserGroupsListSortField where-    toJSON = toJSONText---- | Type of browser window for which the backup image of the flash creative--- can be displayed.-data TargetWindowTargetWindowOption-    = CurrentWindow-      -- ^ @CURRENT_WINDOW@-    | Custom-      -- ^ @CUSTOM@-    | NewWindow-      -- ^ @NEW_WINDOW@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable TargetWindowTargetWindowOption--instance FromText TargetWindowTargetWindowOption where-    fromText = \case-        "CURRENT_WINDOW" -> Just CurrentWindow-        "CUSTOM" -> Just Custom-        "NEW_WINDOW" -> Just NewWindow-        _ -> Nothing--instance ToText TargetWindowTargetWindowOption where-    toText = \case-        CurrentWindow -> "CURRENT_WINDOW"-        Custom -> "CUSTOM"-        NewWindow -> "NEW_WINDOW"--instance FromJSON TargetWindowTargetWindowOption where-    parseJSON = parseJSONText "TargetWindowTargetWindowOption"--instance ToJSON TargetWindowTargetWindowOption where-    toJSON = toJSONText---- | Field by which to sort the list.-data DirectorySiteContactsListSortField-    = DSCLSFID-      -- ^ @ID@-    | DSCLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable DirectorySiteContactsListSortField--instance FromText DirectorySiteContactsListSortField where-    fromText = \case-        "ID" -> Just DSCLSFID-        "NAME" -> Just DSCLSFName-        _ -> Nothing--instance ToText DirectorySiteContactsListSortField where-    toText = \case-        DSCLSFID -> "ID"-        DSCLSFName -> "NAME"--instance FromJSON DirectorySiteContactsListSortField where-    parseJSON = parseJSONText "DirectorySiteContactsListSortField"--instance ToJSON DirectorySiteContactsListSortField where-    toJSON = toJSONText---- | Select only placements with these pricing types.-data PlacementsListPricingTypes-    = PLPTPricingTypeCpa-      -- ^ @PRICING_TYPE_CPA@-    | PLPTPricingTypeCpc-      -- ^ @PRICING_TYPE_CPC@-    | PLPTPricingTypeCpm-      -- ^ @PRICING_TYPE_CPM@-    | PLPTPricingTypeFlatRateClicks-      -- ^ @PRICING_TYPE_FLAT_RATE_CLICKS@-    | PLPTPricingTypeFlatRateImpressions-      -- ^ @PRICING_TYPE_FLAT_RATE_IMPRESSIONS@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PlacementsListPricingTypes--instance FromText PlacementsListPricingTypes where-    fromText = \case-        "PRICING_TYPE_CPA" -> Just PLPTPricingTypeCpa-        "PRICING_TYPE_CPC" -> Just PLPTPricingTypeCpc-        "PRICING_TYPE_CPM" -> Just PLPTPricingTypeCpm-        "PRICING_TYPE_FLAT_RATE_CLICKS" -> Just PLPTPricingTypeFlatRateClicks-        "PRICING_TYPE_FLAT_RATE_IMPRESSIONS" -> Just PLPTPricingTypeFlatRateImpressions-        _ -> Nothing--instance ToText PlacementsListPricingTypes where-    toText = \case-        PLPTPricingTypeCpa -> "PRICING_TYPE_CPA"-        PLPTPricingTypeCpc -> "PRICING_TYPE_CPC"-        PLPTPricingTypeCpm -> "PRICING_TYPE_CPM"-        PLPTPricingTypeFlatRateClicks -> "PRICING_TYPE_FLAT_RATE_CLICKS"-        PLPTPricingTypeFlatRateImpressions -> "PRICING_TYPE_FLAT_RATE_IMPRESSIONS"--instance FromJSON PlacementsListPricingTypes where-    parseJSON = parseJSONText "PlacementsListPricingTypes"--instance ToJSON PlacementsListPricingTypes where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data EventTagsListSortOrder-    = ETLSOAscending-      -- ^ @ASCENDING@-    | ETLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable EventTagsListSortOrder--instance FromText EventTagsListSortOrder where-    fromText = \case-        "ASCENDING" -> Just ETLSOAscending-        "DESCENDING" -> Just ETLSODescending-        _ -> Nothing--instance ToText EventTagsListSortOrder where-    toText = \case-        ETLSOAscending -> "ASCENDING"-        ETLSODescending -> "DESCENDING"--instance FromJSON EventTagsListSortOrder where-    parseJSON = parseJSONText "EventTagsListSortOrder"--instance ToJSON EventTagsListSortOrder where-    toJSON = toJSONText---- | Field by which to sort the list.-data DirectorySitesListSortField-    = DSLSFID-      -- ^ @ID@-    | DSLSFName-      -- ^ @NAME@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable DirectorySitesListSortField--instance FromText DirectorySitesListSortField where-    fromText = \case-        "ID" -> Just DSLSFID-        "NAME" -> Just DSLSFName-        _ -> Nothing--instance ToText DirectorySitesListSortField where-    toText = \case-        DSLSFID -> "ID"-        DSLSFName -> "NAME"--instance FromJSON DirectorySitesListSortField where-    parseJSON = parseJSONText "DirectorySitesListSortField"--instance ToJSON DirectorySitesListSortField where-    toJSON = toJSONText---- | The dimension option.-data ReportCrossDimensionReachCriteriaDimension-    = RCDRCDAdvertiser-      -- ^ @ADVERTISER@-    | RCDRCDCampaign-      -- ^ @CAMPAIGN@-    | RCDRCDSiteByAdvertiser-      -- ^ @SITE_BY_ADVERTISER@-    | RCDRCDSiteByCampaign-      -- ^ @SITE_BY_CAMPAIGN@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ReportCrossDimensionReachCriteriaDimension--instance FromText ReportCrossDimensionReachCriteriaDimension where-    fromText = \case-        "ADVERTISER" -> Just RCDRCDAdvertiser-        "CAMPAIGN" -> Just RCDRCDCampaign-        "SITE_BY_ADVERTISER" -> Just RCDRCDSiteByAdvertiser-        "SITE_BY_CAMPAIGN" -> Just RCDRCDSiteByCampaign-        _ -> Nothing--instance ToText ReportCrossDimensionReachCriteriaDimension where-    toText = \case-        RCDRCDAdvertiser -> "ADVERTISER"-        RCDRCDCampaign -> "CAMPAIGN"-        RCDRCDSiteByAdvertiser -> "SITE_BY_ADVERTISER"-        RCDRCDSiteByCampaign -> "SITE_BY_CAMPAIGN"--instance FromJSON ReportCrossDimensionReachCriteriaDimension where-    parseJSON = parseJSONText "ReportCrossDimensionReachCriteriaDimension"--instance ToJSON ReportCrossDimensionReachCriteriaDimension where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data SitesListSortOrder-    = SLSOAscending-      -- ^ @ASCENDING@-    | SLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable SitesListSortOrder--instance FromText SitesListSortOrder where-    fromText = \case-        "ASCENDING" -> Just SLSOAscending-        "DESCENDING" -> Just SLSODescending-        _ -> Nothing--instance ToText SitesListSortOrder where-    toText = \case-        SLSOAscending -> "ASCENDING"-        SLSODescending -> "DESCENDING"--instance FromJSON SitesListSortOrder where-    parseJSON = parseJSONText "SitesListSortOrder"--instance ToJSON SitesListSortOrder where-    toJSON = toJSONText--data PlacementTagFormatsItem-    = PTFIPlacementTagClickCommands-      -- ^ @PLACEMENT_TAG_CLICK_COMMANDS@-    | PTFIPlacementTagIframeIlayer-      -- ^ @PLACEMENT_TAG_IFRAME_ILAYER@-    | PTFIPlacementTagIframeJavascript-      -- ^ @PLACEMENT_TAG_IFRAME_JAVASCRIPT@-    | PTFIPlacementTagIframeJavascriptLegacy-      -- ^ @PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY@-    | PTFIPlacementTagInstreamVideoPrefetch-      -- ^ @PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH@-    | PTFIPlacementTagInstreamVideoPrefetchVast3-      -- ^ @PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3@-    | PTFIPlacementTagInternalRedirect-      -- ^ @PLACEMENT_TAG_INTERNAL_REDIRECT@-    | PTFIPlacementTagInterstitialIframeJavascript-      -- ^ @PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT@-    | PTFIPlacementTagInterstitialIframeJavascriptLegacy-      -- ^ @PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY@-    | PTFIPlacementTagInterstitialInternalRedirect-      -- ^ @PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT@-    | PTFIPlacementTagInterstitialJavascript-      -- ^ @PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT@-    | PTFIPlacementTagInterstitialJavascriptLegacy-      -- ^ @PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY@-    | PTFIPlacementTagJavascript-      -- ^ @PLACEMENT_TAG_JAVASCRIPT@-    | PTFIPlacementTagJavascriptLegacy-      -- ^ @PLACEMENT_TAG_JAVASCRIPT_LEGACY@-    | PTFIPlacementTagStandard-      -- ^ @PLACEMENT_TAG_STANDARD@-    | PTFIPlacementTagTracking-      -- ^ @PLACEMENT_TAG_TRACKING@-    | PTFIPlacementTagTrackingIframe-      -- ^ @PLACEMENT_TAG_TRACKING_IFRAME@-    | PTFIPlacementTagTrackingJavascript-      -- ^ @PLACEMENT_TAG_TRACKING_JAVASCRIPT@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PlacementTagFormatsItem--instance FromText PlacementTagFormatsItem where-    fromText = \case-        "PLACEMENT_TAG_CLICK_COMMANDS" -> Just PTFIPlacementTagClickCommands-        "PLACEMENT_TAG_IFRAME_ILAYER" -> Just PTFIPlacementTagIframeIlayer-        "PLACEMENT_TAG_IFRAME_JAVASCRIPT" -> Just PTFIPlacementTagIframeJavascript-        "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY" -> Just PTFIPlacementTagIframeJavascriptLegacy-        "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH" -> Just PTFIPlacementTagInstreamVideoPrefetch-        "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3" -> Just PTFIPlacementTagInstreamVideoPrefetchVast3-        "PLACEMENT_TAG_INTERNAL_REDIRECT" -> Just PTFIPlacementTagInternalRedirect-        "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT" -> Just PTFIPlacementTagInterstitialIframeJavascript-        "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY" -> Just PTFIPlacementTagInterstitialIframeJavascriptLegacy-        "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT" -> Just PTFIPlacementTagInterstitialInternalRedirect-        "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT" -> Just PTFIPlacementTagInterstitialJavascript-        "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY" -> Just PTFIPlacementTagInterstitialJavascriptLegacy-        "PLACEMENT_TAG_JAVASCRIPT" -> Just PTFIPlacementTagJavascript-        "PLACEMENT_TAG_JAVASCRIPT_LEGACY" -> Just PTFIPlacementTagJavascriptLegacy-        "PLACEMENT_TAG_STANDARD" -> Just PTFIPlacementTagStandard-        "PLACEMENT_TAG_TRACKING" -> Just PTFIPlacementTagTracking-        "PLACEMENT_TAG_TRACKING_IFRAME" -> Just PTFIPlacementTagTrackingIframe-        "PLACEMENT_TAG_TRACKING_JAVASCRIPT" -> Just PTFIPlacementTagTrackingJavascript-        _ -> Nothing--instance ToText PlacementTagFormatsItem where-    toText = \case-        PTFIPlacementTagClickCommands -> "PLACEMENT_TAG_CLICK_COMMANDS"-        PTFIPlacementTagIframeIlayer -> "PLACEMENT_TAG_IFRAME_ILAYER"-        PTFIPlacementTagIframeJavascript -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT"-        PTFIPlacementTagIframeJavascriptLegacy -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY"-        PTFIPlacementTagInstreamVideoPrefetch -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH"-        PTFIPlacementTagInstreamVideoPrefetchVast3 -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3"-        PTFIPlacementTagInternalRedirect -> "PLACEMENT_TAG_INTERNAL_REDIRECT"-        PTFIPlacementTagInterstitialIframeJavascript -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT"-        PTFIPlacementTagInterstitialIframeJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY"-        PTFIPlacementTagInterstitialInternalRedirect -> "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT"-        PTFIPlacementTagInterstitialJavascript -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT"-        PTFIPlacementTagInterstitialJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY"-        PTFIPlacementTagJavascript -> "PLACEMENT_TAG_JAVASCRIPT"-        PTFIPlacementTagJavascriptLegacy -> "PLACEMENT_TAG_JAVASCRIPT_LEGACY"-        PTFIPlacementTagStandard -> "PLACEMENT_TAG_STANDARD"-        PTFIPlacementTagTracking -> "PLACEMENT_TAG_TRACKING"-        PTFIPlacementTagTrackingIframe -> "PLACEMENT_TAG_TRACKING_IFRAME"-        PTFIPlacementTagTrackingJavascript -> "PLACEMENT_TAG_TRACKING_JAVASCRIPT"--instance FromJSON PlacementTagFormatsItem where-    parseJSON = parseJSONText "PlacementTagFormatsItem"--instance ToJSON PlacementTagFormatsItem where-    toJSON = toJSONText---- | The type of the report.-data ReportType-    = RTCrossDimensionReach-      -- ^ @CROSS_DIMENSION_REACH@-    | RTFloodlight-      -- ^ @FLOODLIGHT@-    | RTPathToConversion-      -- ^ @PATH_TO_CONVERSION@-    | RTReach-      -- ^ @REACH@-    | RTStandard-      -- ^ @STANDARD@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ReportType--instance FromText ReportType where-    fromText = \case-        "CROSS_DIMENSION_REACH" -> Just RTCrossDimensionReach-        "FLOODLIGHT" -> Just RTFloodlight-        "PATH_TO_CONVERSION" -> Just RTPathToConversion-        "REACH" -> Just RTReach-        "STANDARD" -> Just RTStandard-        _ -> Nothing--instance ToText ReportType where-    toText = \case-        RTCrossDimensionReach -> "CROSS_DIMENSION_REACH"-        RTFloodlight -> "FLOODLIGHT"-        RTPathToConversion -> "PATH_TO_CONVERSION"-        RTReach -> "REACH"-        RTStandard -> "STANDARD"--instance FromJSON ReportType where-    parseJSON = parseJSONText "ReportType"--instance ToJSON ReportType where-    toJSON = toJSONText--data CreativeAssetMetadataWarnedValidationRulesItem-    = ADMobReferenced-      -- ^ @ADMOB_REFERENCED@-    | AssetFormatUnsupportedDcm-      -- ^ @ASSET_FORMAT_UNSUPPORTED_DCM@-    | AssetInvalid-      -- ^ @ASSET_INVALID@-    | ClickTagInvalid-      -- ^ @CLICK_TAG_INVALID@-    | ClickTagMissing-      -- ^ @CLICK_TAG_MISSING@-    | ClickTagMoreThanOne-      -- ^ @CLICK_TAG_MORE_THAN_ONE@-    | ClickTagNonTopLevel-      -- ^ @CLICK_TAG_NON_TOP_LEVEL@-    | ComponentUnsupportedDcm-      -- ^ @COMPONENT_UNSUPPORTED_DCM@-    | EnablerUnsupportedMethodDcm-      -- ^ @ENABLER_UNSUPPORTED_METHOD_DCM@-    | ExternalFileReferenced-      -- ^ @EXTERNAL_FILE_REFERENCED@-    | FileDetailEmpty-      -- ^ @FILE_DETAIL_EMPTY@-    | FileTypeInvalid-      -- ^ @FILE_TYPE_INVALID@-    | GwdPropertiesInvalid-      -- ^ @GWD_PROPERTIES_INVALID@-    | HTML5FeatureUnsupported-      -- ^ @HTML5_FEATURE_UNSUPPORTED@-    | LinkedFileNotFound-      -- ^ @LINKED_FILE_NOT_FOUND@-    | MaxFlashVersion11-      -- ^ @MAX_FLASH_VERSION_11@-    | MraidReferenced-      -- ^ @MRAID_REFERENCED@-    | NotSSLCompliant-      -- ^ @NOT_SSL_COMPLIANT@-    | OrphanedAsset-      -- ^ @ORPHANED_ASSET@-    | PrimaryHTMLMissing-      -- ^ @PRIMARY_HTML_MISSING@-    | ZipInvalid-      -- ^ @ZIP_INVALID@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeAssetMetadataWarnedValidationRulesItem--instance FromText CreativeAssetMetadataWarnedValidationRulesItem where-    fromText = \case-        "ADMOB_REFERENCED" -> Just ADMobReferenced-        "ASSET_FORMAT_UNSUPPORTED_DCM" -> Just AssetFormatUnsupportedDcm-        "ASSET_INVALID" -> Just AssetInvalid-        "CLICK_TAG_INVALID" -> Just ClickTagInvalid-        "CLICK_TAG_MISSING" -> Just ClickTagMissing-        "CLICK_TAG_MORE_THAN_ONE" -> Just ClickTagMoreThanOne-        "CLICK_TAG_NON_TOP_LEVEL" -> Just ClickTagNonTopLevel-        "COMPONENT_UNSUPPORTED_DCM" -> Just ComponentUnsupportedDcm-        "ENABLER_UNSUPPORTED_METHOD_DCM" -> Just EnablerUnsupportedMethodDcm-        "EXTERNAL_FILE_REFERENCED" -> Just ExternalFileReferenced-        "FILE_DETAIL_EMPTY" -> Just FileDetailEmpty-        "FILE_TYPE_INVALID" -> Just FileTypeInvalid-        "GWD_PROPERTIES_INVALID" -> Just GwdPropertiesInvalid-        "HTML5_FEATURE_UNSUPPORTED" -> Just HTML5FeatureUnsupported-        "LINKED_FILE_NOT_FOUND" -> Just LinkedFileNotFound-        "MAX_FLASH_VERSION_11" -> Just MaxFlashVersion11-        "MRAID_REFERENCED" -> Just MraidReferenced-        "NOT_SSL_COMPLIANT" -> Just NotSSLCompliant-        "ORPHANED_ASSET" -> Just OrphanedAsset-        "PRIMARY_HTML_MISSING" -> Just PrimaryHTMLMissing-        "ZIP_INVALID" -> Just ZipInvalid-        _ -> Nothing--instance ToText CreativeAssetMetadataWarnedValidationRulesItem where-    toText = \case-        ADMobReferenced -> "ADMOB_REFERENCED"-        AssetFormatUnsupportedDcm -> "ASSET_FORMAT_UNSUPPORTED_DCM"-        AssetInvalid -> "ASSET_INVALID"-        ClickTagInvalid -> "CLICK_TAG_INVALID"-        ClickTagMissing -> "CLICK_TAG_MISSING"-        ClickTagMoreThanOne -> "CLICK_TAG_MORE_THAN_ONE"-        ClickTagNonTopLevel -> "CLICK_TAG_NON_TOP_LEVEL"-        ComponentUnsupportedDcm -> "COMPONENT_UNSUPPORTED_DCM"-        EnablerUnsupportedMethodDcm -> "ENABLER_UNSUPPORTED_METHOD_DCM"-        ExternalFileReferenced -> "EXTERNAL_FILE_REFERENCED"-        FileDetailEmpty -> "FILE_DETAIL_EMPTY"-        FileTypeInvalid -> "FILE_TYPE_INVALID"-        GwdPropertiesInvalid -> "GWD_PROPERTIES_INVALID"-        HTML5FeatureUnsupported -> "HTML5_FEATURE_UNSUPPORTED"-        LinkedFileNotFound -> "LINKED_FILE_NOT_FOUND"-        MaxFlashVersion11 -> "MAX_FLASH_VERSION_11"-        MraidReferenced -> "MRAID_REFERENCED"-        NotSSLCompliant -> "NOT_SSL_COMPLIANT"-        OrphanedAsset -> "ORPHANED_ASSET"-        PrimaryHTMLMissing -> "PRIMARY_HTML_MISSING"-        ZipInvalid -> "ZIP_INVALID"--instance FromJSON CreativeAssetMetadataWarnedValidationRulesItem where-    parseJSON = parseJSONText "CreativeAssetMetadataWarnedValidationRulesItem"--instance ToJSON CreativeAssetMetadataWarnedValidationRulesItem where-    toJSON = toJSONText---- | Payment source type of this ad slot.-data AdSlotPaymentSourceType-    = PlanningPaymentSourceTypeAgencyPaid-      -- ^ @PLANNING_PAYMENT_SOURCE_TYPE_AGENCY_PAID@-    | PlanningPaymentSourceTypePublisherPaid-      -- ^ @PLANNING_PAYMENT_SOURCE_TYPE_PUBLISHER_PAID@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AdSlotPaymentSourceType--instance FromText AdSlotPaymentSourceType where-    fromText = \case-        "PLANNING_PAYMENT_SOURCE_TYPE_AGENCY_PAID" -> Just PlanningPaymentSourceTypeAgencyPaid-        "PLANNING_PAYMENT_SOURCE_TYPE_PUBLISHER_PAID" -> Just PlanningPaymentSourceTypePublisherPaid-        _ -> Nothing--instance ToText AdSlotPaymentSourceType where-    toText = \case-        PlanningPaymentSourceTypeAgencyPaid -> "PLANNING_PAYMENT_SOURCE_TYPE_AGENCY_PAID"-        PlanningPaymentSourceTypePublisherPaid -> "PLANNING_PAYMENT_SOURCE_TYPE_PUBLISHER_PAID"--instance FromJSON AdSlotPaymentSourceType where-    parseJSON = parseJSONText "AdSlotPaymentSourceType"--instance ToJSON AdSlotPaymentSourceType where-    toJSON = toJSONText--data AccountPermissionAccountProFilesItem-    = APAPFIAccountProFileBasic-      -- ^ @ACCOUNT_PROFILE_BASIC@-    | APAPFIAccountProFileStandard-      -- ^ @ACCOUNT_PROFILE_STANDARD@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AccountPermissionAccountProFilesItem--instance FromText AccountPermissionAccountProFilesItem where-    fromText = \case-        "ACCOUNT_PROFILE_BASIC" -> Just APAPFIAccountProFileBasic-        "ACCOUNT_PROFILE_STANDARD" -> Just APAPFIAccountProFileStandard-        _ -> Nothing--instance ToText AccountPermissionAccountProFilesItem where-    toText = \case-        APAPFIAccountProFileBasic -> "ACCOUNT_PROFILE_BASIC"-        APAPFIAccountProFileStandard -> "ACCOUNT_PROFILE_STANDARD"--instance FromJSON AccountPermissionAccountProFilesItem where-    parseJSON = parseJSONText "AccountPermissionAccountProFilesItem"--instance ToJSON AccountPermissionAccountProFilesItem where-    toJSON = toJSONText---- | Type of the event. This is a read-only field.-data CreativeCustomEventAdvertiserCustomEventType-    = AdvertiserEventCounter-      -- ^ @ADVERTISER_EVENT_COUNTER@-    | AdvertiserEventExit-      -- ^ @ADVERTISER_EVENT_EXIT@-    | AdvertiserEventTimer-      -- ^ @ADVERTISER_EVENT_TIMER@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeCustomEventAdvertiserCustomEventType--instance FromText CreativeCustomEventAdvertiserCustomEventType where-    fromText = \case-        "ADVERTISER_EVENT_COUNTER" -> Just AdvertiserEventCounter-        "ADVERTISER_EVENT_EXIT" -> Just AdvertiserEventExit-        "ADVERTISER_EVENT_TIMER" -> Just AdvertiserEventTimer-        _ -> Nothing--instance ToText CreativeCustomEventAdvertiserCustomEventType where-    toText = \case-        AdvertiserEventCounter -> "ADVERTISER_EVENT_COUNTER"-        AdvertiserEventExit -> "ADVERTISER_EVENT_EXIT"-        AdvertiserEventTimer -> "ADVERTISER_EVENT_TIMER"--instance FromJSON CreativeCustomEventAdvertiserCustomEventType where-    parseJSON = parseJSONText "CreativeCustomEventAdvertiserCustomEventType"--instance ToJSON CreativeCustomEventAdvertiserCustomEventType where-    toJSON = toJSONText---- | Select only change logs with the specified object type.-data ChangeLogsListObjectType-    = ObjectAccount-      -- ^ @OBJECT_ACCOUNT@-    | ObjectAccountBillingFeature-      -- ^ @OBJECT_ACCOUNT_BILLING_FEATURE@-    | ObjectAd-      -- ^ @OBJECT_AD@-    | ObjectAdvertiser-      -- ^ @OBJECT_ADVERTISER@-    | ObjectAdvertiserGroup-      -- ^ @OBJECT_ADVERTISER_GROUP@-    | ObjectBillingAccountGroup-      -- ^ @OBJECT_BILLING_ACCOUNT_GROUP@-    | ObjectBillingFeature-      -- ^ @OBJECT_BILLING_FEATURE@-    | ObjectBillingMinimumFee-      -- ^ @OBJECT_BILLING_MINIMUM_FEE@-    | ObjectBillingProFile-      -- ^ @OBJECT_BILLING_PROFILE@-    | ObjectCampaign-      -- ^ @OBJECT_CAMPAIGN@-    | ObjectContentCategory-      -- ^ @OBJECT_CONTENT_CATEGORY@-    | ObjectCreative-      -- ^ @OBJECT_CREATIVE@-    | ObjectCreativeAsset-      -- ^ @OBJECT_CREATIVE_ASSET@-    | ObjectCreativeBundle-      -- ^ @OBJECT_CREATIVE_BUNDLE@-    | ObjectCreativeField-      -- ^ @OBJECT_CREATIVE_FIELD@-    | ObjectCreativeGroup-      -- ^ @OBJECT_CREATIVE_GROUP@-    | ObjectDfaSite-      -- ^ @OBJECT_DFA_SITE@-    | ObjectEventTag-      -- ^ @OBJECT_EVENT_TAG@-    | ObjectFloodlightActivityGroup-      -- ^ @OBJECT_FLOODLIGHT_ACTIVITY_GROUP@-    | ObjectFloodlightActvity-      -- ^ @OBJECT_FLOODLIGHT_ACTVITY@-    | ObjectFloodlightConfiguration-      -- ^ @OBJECT_FLOODLIGHT_CONFIGURATION@-    | ObjectInstreamCreative-      -- ^ @OBJECT_INSTREAM_CREATIVE@-    | ObjectLandingPage-      -- ^ @OBJECT_LANDING_PAGE@-    | ObjectMediaOrder-      -- ^ @OBJECT_MEDIA_ORDER@-    | ObjectPlacement-      -- ^ @OBJECT_PLACEMENT@-    | ObjectPlacementStrategy-      -- ^ @OBJECT_PLACEMENT_STRATEGY@-    | ObjectProvidedListClient-      -- ^ @OBJECT_PROVIDED_LIST_CLIENT@-    | ObjectRateCard-      -- ^ @OBJECT_RATE_CARD@-    | ObjectRemarketingList-      -- ^ @OBJECT_REMARKETING_LIST@-    | ObjectRichmediaCreative-      -- ^ @OBJECT_RICHMEDIA_CREATIVE@-    | ObjectSdSite-      -- ^ @OBJECT_SD_SITE@-    | ObjectSize-      -- ^ @OBJECT_SIZE@-    | ObjectSubAccount-      -- ^ @OBJECT_SUBACCOUNT@-    | ObjectUserProFile-      -- ^ @OBJECT_USER_PROFILE@-    | ObjectUserProFileFilter-      -- ^ @OBJECT_USER_PROFILE_FILTER@-    | ObjectUserRole-      -- ^ @OBJECT_USER_ROLE@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ChangeLogsListObjectType--instance FromText ChangeLogsListObjectType where-    fromText = \case-        "OBJECT_ACCOUNT" -> Just ObjectAccount-        "OBJECT_ACCOUNT_BILLING_FEATURE" -> Just ObjectAccountBillingFeature-        "OBJECT_AD" -> Just ObjectAd-        "OBJECT_ADVERTISER" -> Just ObjectAdvertiser-        "OBJECT_ADVERTISER_GROUP" -> Just ObjectAdvertiserGroup-        "OBJECT_BILLING_ACCOUNT_GROUP" -> Just ObjectBillingAccountGroup-        "OBJECT_BILLING_FEATURE" -> Just ObjectBillingFeature-        "OBJECT_BILLING_MINIMUM_FEE" -> Just ObjectBillingMinimumFee-        "OBJECT_BILLING_PROFILE" -> Just ObjectBillingProFile-        "OBJECT_CAMPAIGN" -> Just ObjectCampaign-        "OBJECT_CONTENT_CATEGORY" -> Just ObjectContentCategory-        "OBJECT_CREATIVE" -> Just ObjectCreative-        "OBJECT_CREATIVE_ASSET" -> Just ObjectCreativeAsset-        "OBJECT_CREATIVE_BUNDLE" -> Just ObjectCreativeBundle-        "OBJECT_CREATIVE_FIELD" -> Just ObjectCreativeField-        "OBJECT_CREATIVE_GROUP" -> Just ObjectCreativeGroup-        "OBJECT_DFA_SITE" -> Just ObjectDfaSite-        "OBJECT_EVENT_TAG" -> Just ObjectEventTag-        "OBJECT_FLOODLIGHT_ACTIVITY_GROUP" -> Just ObjectFloodlightActivityGroup-        "OBJECT_FLOODLIGHT_ACTVITY" -> Just ObjectFloodlightActvity-        "OBJECT_FLOODLIGHT_CONFIGURATION" -> Just ObjectFloodlightConfiguration-        "OBJECT_INSTREAM_CREATIVE" -> Just ObjectInstreamCreative-        "OBJECT_LANDING_PAGE" -> Just ObjectLandingPage-        "OBJECT_MEDIA_ORDER" -> Just ObjectMediaOrder-        "OBJECT_PLACEMENT" -> Just ObjectPlacement-        "OBJECT_PLACEMENT_STRATEGY" -> Just ObjectPlacementStrategy-        "OBJECT_PROVIDED_LIST_CLIENT" -> Just ObjectProvidedListClient-        "OBJECT_RATE_CARD" -> Just ObjectRateCard-        "OBJECT_REMARKETING_LIST" -> Just ObjectRemarketingList-        "OBJECT_RICHMEDIA_CREATIVE" -> Just ObjectRichmediaCreative-        "OBJECT_SD_SITE" -> Just ObjectSdSite-        "OBJECT_SIZE" -> Just ObjectSize-        "OBJECT_SUBACCOUNT" -> Just ObjectSubAccount-        "OBJECT_USER_PROFILE" -> Just ObjectUserProFile-        "OBJECT_USER_PROFILE_FILTER" -> Just ObjectUserProFileFilter-        "OBJECT_USER_ROLE" -> Just ObjectUserRole-        _ -> Nothing--instance ToText ChangeLogsListObjectType where-    toText = \case-        ObjectAccount -> "OBJECT_ACCOUNT"-        ObjectAccountBillingFeature -> "OBJECT_ACCOUNT_BILLING_FEATURE"-        ObjectAd -> "OBJECT_AD"-        ObjectAdvertiser -> "OBJECT_ADVERTISER"-        ObjectAdvertiserGroup -> "OBJECT_ADVERTISER_GROUP"-        ObjectBillingAccountGroup -> "OBJECT_BILLING_ACCOUNT_GROUP"-        ObjectBillingFeature -> "OBJECT_BILLING_FEATURE"-        ObjectBillingMinimumFee -> "OBJECT_BILLING_MINIMUM_FEE"-        ObjectBillingProFile -> "OBJECT_BILLING_PROFILE"-        ObjectCampaign -> "OBJECT_CAMPAIGN"-        ObjectContentCategory -> "OBJECT_CONTENT_CATEGORY"-        ObjectCreative -> "OBJECT_CREATIVE"-        ObjectCreativeAsset -> "OBJECT_CREATIVE_ASSET"-        ObjectCreativeBundle -> "OBJECT_CREATIVE_BUNDLE"-        ObjectCreativeField -> "OBJECT_CREATIVE_FIELD"-        ObjectCreativeGroup -> "OBJECT_CREATIVE_GROUP"-        ObjectDfaSite -> "OBJECT_DFA_SITE"-        ObjectEventTag -> "OBJECT_EVENT_TAG"-        ObjectFloodlightActivityGroup -> "OBJECT_FLOODLIGHT_ACTIVITY_GROUP"-        ObjectFloodlightActvity -> "OBJECT_FLOODLIGHT_ACTVITY"-        ObjectFloodlightConfiguration -> "OBJECT_FLOODLIGHT_CONFIGURATION"-        ObjectInstreamCreative -> "OBJECT_INSTREAM_CREATIVE"-        ObjectLandingPage -> "OBJECT_LANDING_PAGE"-        ObjectMediaOrder -> "OBJECT_MEDIA_ORDER"-        ObjectPlacement -> "OBJECT_PLACEMENT"-        ObjectPlacementStrategy -> "OBJECT_PLACEMENT_STRATEGY"-        ObjectProvidedListClient -> "OBJECT_PROVIDED_LIST_CLIENT"-        ObjectRateCard -> "OBJECT_RATE_CARD"-        ObjectRemarketingList -> "OBJECT_REMARKETING_LIST"-        ObjectRichmediaCreative -> "OBJECT_RICHMEDIA_CREATIVE"-        ObjectSdSite -> "OBJECT_SD_SITE"-        ObjectSize -> "OBJECT_SIZE"-        ObjectSubAccount -> "OBJECT_SUBACCOUNT"-        ObjectUserProFile -> "OBJECT_USER_PROFILE"-        ObjectUserProFileFilter -> "OBJECT_USER_PROFILE_FILTER"-        ObjectUserRole -> "OBJECT_USER_ROLE"--instance FromJSON ChangeLogsListObjectType where-    parseJSON = parseJSONText "ChangeLogsListObjectType"--instance ToJSON ChangeLogsListObjectType where-    toJSON = toJSONText---- | Cap cost type of this inventory item.-data PricingCapCostType-    = PlanningPlacementCapCostTypeCumulative-      -- ^ @PLANNING_PLACEMENT_CAP_COST_TYPE_CUMULATIVE@-    | PlanningPlacementCapCostTypeMonthly-      -- ^ @PLANNING_PLACEMENT_CAP_COST_TYPE_MONTHLY@-    | PlanningPlacementCapCostTypeNone-      -- ^ @PLANNING_PLACEMENT_CAP_COST_TYPE_NONE@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable PricingCapCostType--instance FromText PricingCapCostType where-    fromText = \case-        "PLANNING_PLACEMENT_CAP_COST_TYPE_CUMULATIVE" -> Just PlanningPlacementCapCostTypeCumulative-        "PLANNING_PLACEMENT_CAP_COST_TYPE_MONTHLY" -> Just PlanningPlacementCapCostTypeMonthly-        "PLANNING_PLACEMENT_CAP_COST_TYPE_NONE" -> Just PlanningPlacementCapCostTypeNone-        _ -> Nothing--instance ToText PricingCapCostType where-    toText = \case-        PlanningPlacementCapCostTypeCumulative -> "PLANNING_PLACEMENT_CAP_COST_TYPE_CUMULATIVE"-        PlanningPlacementCapCostTypeMonthly -> "PLANNING_PLACEMENT_CAP_COST_TYPE_MONTHLY"-        PlanningPlacementCapCostTypeNone -> "PLANNING_PLACEMENT_CAP_COST_TYPE_NONE"--instance FromJSON PricingCapCostType where-    parseJSON = parseJSONText "PricingCapCostType"--instance ToJSON PricingCapCostType where-    toJSON = toJSONText---- | Type of rich media asset. This is a read-only field. Applicable to the--- following creative types: all RICH_MEDIA.-data CreativeAssetDisplayType-    = AssetDisplayTypeExpanding-      -- ^ @ASSET_DISPLAY_TYPE_EXPANDING@-    | AssetDisplayTypeFlashInFlash-      -- ^ @ASSET_DISPLAY_TYPE_FLASH_IN_FLASH@-    | AssetDisplayTypeFlashInFlashExpanding-      -- ^ @ASSET_DISPLAY_TYPE_FLASH_IN_FLASH_EXPANDING@-    | AssetDisplayTypeFloating-      -- ^ @ASSET_DISPLAY_TYPE_FLOATING@-    | AssetDisplayTypeInpage-      -- ^ @ASSET_DISPLAY_TYPE_INPAGE@-    | AssetDisplayTypeOverlay-      -- ^ @ASSET_DISPLAY_TYPE_OVERLAY@-    | AssetDisplayTypePeelDown-      -- ^ @ASSET_DISPLAY_TYPE_PEEL_DOWN@-    | AssetDisplayTypeVpaidLinear-      -- ^ @ASSET_DISPLAY_TYPE_VPAID_LINEAR@-    | AssetDisplayTypeVpaidNonLinear-      -- ^ @ASSET_DISPLAY_TYPE_VPAID_NON_LINEAR@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable CreativeAssetDisplayType--instance FromText CreativeAssetDisplayType where-    fromText = \case-        "ASSET_DISPLAY_TYPE_EXPANDING" -> Just AssetDisplayTypeExpanding-        "ASSET_DISPLAY_TYPE_FLASH_IN_FLASH" -> Just AssetDisplayTypeFlashInFlash-        "ASSET_DISPLAY_TYPE_FLASH_IN_FLASH_EXPANDING" -> Just AssetDisplayTypeFlashInFlashExpanding-        "ASSET_DISPLAY_TYPE_FLOATING" -> Just AssetDisplayTypeFloating-        "ASSET_DISPLAY_TYPE_INPAGE" -> Just AssetDisplayTypeInpage-        "ASSET_DISPLAY_TYPE_OVERLAY" -> Just AssetDisplayTypeOverlay-        "ASSET_DISPLAY_TYPE_PEEL_DOWN" -> Just AssetDisplayTypePeelDown-        "ASSET_DISPLAY_TYPE_VPAID_LINEAR" -> Just AssetDisplayTypeVpaidLinear-        "ASSET_DISPLAY_TYPE_VPAID_NON_LINEAR" -> Just AssetDisplayTypeVpaidNonLinear-        _ -> Nothing--instance ToText CreativeAssetDisplayType where-    toText = \case-        AssetDisplayTypeExpanding -> "ASSET_DISPLAY_TYPE_EXPANDING"-        AssetDisplayTypeFlashInFlash -> "ASSET_DISPLAY_TYPE_FLASH_IN_FLASH"-        AssetDisplayTypeFlashInFlashExpanding -> "ASSET_DISPLAY_TYPE_FLASH_IN_FLASH_EXPANDING"-        AssetDisplayTypeFloating -> "ASSET_DISPLAY_TYPE_FLOATING"-        AssetDisplayTypeInpage -> "ASSET_DISPLAY_TYPE_INPAGE"-        AssetDisplayTypeOverlay -> "ASSET_DISPLAY_TYPE_OVERLAY"-        AssetDisplayTypePeelDown -> "ASSET_DISPLAY_TYPE_PEEL_DOWN"-        AssetDisplayTypeVpaidLinear -> "ASSET_DISPLAY_TYPE_VPAID_LINEAR"-        AssetDisplayTypeVpaidNonLinear -> "ASSET_DISPLAY_TYPE_VPAID_NON_LINEAR"--instance FromJSON CreativeAssetDisplayType where-    parseJSON = parseJSONText "CreativeAssetDisplayType"--instance ToJSON CreativeAssetDisplayType where-    toJSON = toJSONText---- | Counting method for conversions for this floodlight activity. This is a--- required field.-data FloodlightActivityCountingMethod-    = ItemsSoldCounting-      -- ^ @ITEMS_SOLD_COUNTING@-    | SessionCounting-      -- ^ @SESSION_COUNTING@-    | StandardCounting-      -- ^ @STANDARD_COUNTING@-    | TransactionsCounting-      -- ^ @TRANSACTIONS_COUNTING@-    | UniqueCounting-      -- ^ @UNIQUE_COUNTING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable FloodlightActivityCountingMethod--instance FromText FloodlightActivityCountingMethod where-    fromText = \case-        "ITEMS_SOLD_COUNTING" -> Just ItemsSoldCounting-        "SESSION_COUNTING" -> Just SessionCounting-        "STANDARD_COUNTING" -> Just StandardCounting-        "TRANSACTIONS_COUNTING" -> Just TransactionsCounting-        "UNIQUE_COUNTING" -> Just UniqueCounting-        _ -> Nothing--instance ToText FloodlightActivityCountingMethod where-    toText = \case-        ItemsSoldCounting -> "ITEMS_SOLD_COUNTING"-        SessionCounting -> "SESSION_COUNTING"-        StandardCounting -> "STANDARD_COUNTING"-        TransactionsCounting -> "TRANSACTIONS_COUNTING"-        UniqueCounting -> "UNIQUE_COUNTING"--instance FromJSON FloodlightActivityCountingMethod where-    parseJSON = parseJSONText "FloodlightActivityCountingMethod"--instance ToJSON FloodlightActivityCountingMethod where-    toJSON = toJSONText---- | Order of sorted results, default is ASCENDING.-data ContentCategoriesListSortOrder-    = CCLSOAscending-      -- ^ @ASCENDING@-    | CCLSODescending-      -- ^ @DESCENDING@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable ContentCategoriesListSortOrder--instance FromText ContentCategoriesListSortOrder where-    fromText = \case-        "ASCENDING" -> Just CCLSOAscending-        "DESCENDING" -> Just CCLSODescending-        _ -> Nothing--instance ToText ContentCategoriesListSortOrder where-    toText = \case-        CCLSOAscending -> "ASCENDING"-        CCLSODescending -> "DESCENDING"--instance FromJSON ContentCategoriesListSortOrder where-    parseJSON = parseJSONText "ContentCategoriesListSortOrder"--instance ToJSON ContentCategoriesListSortOrder where-    toJSON = toJSONText---- | Status of this advertiser.-data AdvertiserStatus-    = ASApproved-      -- ^ @APPROVED@-    | ASOnHold-      -- ^ @ON_HOLD@-      deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)--instance Hashable AdvertiserStatus--instance FromText AdvertiserStatus where-    fromText = \case-        "APPROVED" -> Just ASApproved-        "ON_HOLD" -> Just ASOnHold-        _ -> Nothing--instance ToText AdvertiserStatus where-    toText = \case+-- 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.DFAReporting.Types.Sum where++import           Network.Google.Prelude++-- | Order of sorted results, default is ASCENDING.+data PlacementsListSortOrder+    = Ascending+      -- ^ @ASCENDING@+    | Descending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PlacementsListSortOrder++instance FromHttpApiData PlacementsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right Ascending+        "DESCENDING" -> Right Descending+        x -> Left ("Unable to parse PlacementsListSortOrder from: " <> x)++instance ToHttpApiData PlacementsListSortOrder where+    toQueryParam = \case+        Ascending -> "ASCENDING"+        Descending -> "DESCENDING"++instance FromJSON PlacementsListSortOrder where+    parseJSON = parseJSONText "PlacementsListSortOrder"++instance ToJSON PlacementsListSortOrder where+    toJSON = toJSONText++-- | The date range relative to the date of when the report is run.+data DateRangeRelativeDateRange+    = Last24Months+      -- ^ @LAST_24_MONTHS@+    | Last30Days+      -- ^ @LAST_30_DAYS@+    | Last365Days+      -- ^ @LAST_365_DAYS@+    | Last7Days+      -- ^ @LAST_7_DAYS@+    | Last90Days+      -- ^ @LAST_90_DAYS@+    | MonthToDate+      -- ^ @MONTH_TO_DATE@+    | PreviousMonth+      -- ^ @PREVIOUS_MONTH@+    | PreviousQuarter+      -- ^ @PREVIOUS_QUARTER@+    | PreviousWeek+      -- ^ @PREVIOUS_WEEK@+    | PreviousYear+      -- ^ @PREVIOUS_YEAR@+    | QuarterToDate+      -- ^ @QUARTER_TO_DATE@+    | Today+      -- ^ @TODAY@+    | WeekToDate+      -- ^ @WEEK_TO_DATE@+    | YearToDate+      -- ^ @YEAR_TO_DATE@+    | Yesterday+      -- ^ @YESTERDAY@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable DateRangeRelativeDateRange++instance FromHttpApiData DateRangeRelativeDateRange where+    parseQueryParam = \case+        "LAST_24_MONTHS" -> Right Last24Months+        "LAST_30_DAYS" -> Right Last30Days+        "LAST_365_DAYS" -> Right Last365Days+        "LAST_7_DAYS" -> Right Last7Days+        "LAST_90_DAYS" -> Right Last90Days+        "MONTH_TO_DATE" -> Right MonthToDate+        "PREVIOUS_MONTH" -> Right PreviousMonth+        "PREVIOUS_QUARTER" -> Right PreviousQuarter+        "PREVIOUS_WEEK" -> Right PreviousWeek+        "PREVIOUS_YEAR" -> Right PreviousYear+        "QUARTER_TO_DATE" -> Right QuarterToDate+        "TODAY" -> Right Today+        "WEEK_TO_DATE" -> Right WeekToDate+        "YEAR_TO_DATE" -> Right YearToDate+        "YESTERDAY" -> Right Yesterday+        x -> Left ("Unable to parse DateRangeRelativeDateRange from: " <> x)++instance ToHttpApiData DateRangeRelativeDateRange where+    toQueryParam = \case+        Last24Months -> "LAST_24_MONTHS"+        Last30Days -> "LAST_30_DAYS"+        Last365Days -> "LAST_365_DAYS"+        Last7Days -> "LAST_7_DAYS"+        Last90Days -> "LAST_90_DAYS"+        MonthToDate -> "MONTH_TO_DATE"+        PreviousMonth -> "PREVIOUS_MONTH"+        PreviousQuarter -> "PREVIOUS_QUARTER"+        PreviousWeek -> "PREVIOUS_WEEK"+        PreviousYear -> "PREVIOUS_YEAR"+        QuarterToDate -> "QUARTER_TO_DATE"+        Today -> "TODAY"+        WeekToDate -> "WEEK_TO_DATE"+        YearToDate -> "YEAR_TO_DATE"+        Yesterday -> "YESTERDAY"++instance FromJSON DateRangeRelativeDateRange where+    parseJSON = parseJSONText "DateRangeRelativeDateRange"++instance ToJSON DateRangeRelativeDateRange where+    toJSON = toJSONText++-- | Field by which to sort the list.+data AdvertisersListSortField+    = ID+      -- ^ @ID@+    | Name+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AdvertisersListSortField++instance FromHttpApiData AdvertisersListSortField where+    parseQueryParam = \case+        "ID" -> Right ID+        "NAME" -> Right Name+        x -> Left ("Unable to parse AdvertisersListSortField from: " <> x)++instance ToHttpApiData AdvertisersListSortField where+    toQueryParam = \case+        ID -> "ID"+        Name -> "NAME"++instance FromJSON AdvertisersListSortField where+    parseJSON = parseJSONText "AdvertisersListSortField"++instance ToJSON AdvertisersListSortField where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data CreativeFieldsListSortOrder+    = CFLSOAscending+      -- ^ @ASCENDING@+    | CFLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeFieldsListSortOrder++instance FromHttpApiData CreativeFieldsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right CFLSOAscending+        "DESCENDING" -> Right CFLSODescending+        x -> Left ("Unable to parse CreativeFieldsListSortOrder from: " <> x)++instance ToHttpApiData CreativeFieldsListSortOrder where+    toQueryParam = \case+        CFLSOAscending -> "ASCENDING"+        CFLSODescending -> "DESCENDING"++instance FromJSON CreativeFieldsListSortOrder where+    parseJSON = parseJSONText "CreativeFieldsListSortOrder"++instance ToJSON CreativeFieldsListSortOrder where+    toJSON = toJSONText++-- | Field by which to sort the list.+data UserRolesListSortField+    = URLSFID+      -- ^ @ID@+    | URLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable UserRolesListSortField++instance FromHttpApiData UserRolesListSortField where+    parseQueryParam = \case+        "ID" -> Right URLSFID+        "NAME" -> Right URLSFName+        x -> Left ("Unable to parse UserRolesListSortField from: " <> x)++instance ToHttpApiData UserRolesListSortField where+    toQueryParam = \case+        URLSFID -> "ID"+        URLSFName -> "NAME"++instance FromJSON UserRolesListSortField where+    parseJSON = parseJSONText "UserRolesListSortField"++instance ToJSON UserRolesListSortField where+    toJSON = toJSONText++-- | Tag format type for the floodlight activity. If left blank, the tag+-- format will default to HTML.+data FloodlightActivityTagFormat+    = HTML+      -- ^ @HTML@+    | Xhtml+      -- ^ @XHTML@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FloodlightActivityTagFormat++instance FromHttpApiData FloodlightActivityTagFormat where+    parseQueryParam = \case+        "HTML" -> Right HTML+        "XHTML" -> Right Xhtml+        x -> Left ("Unable to parse FloodlightActivityTagFormat from: " <> x)++instance ToHttpApiData FloodlightActivityTagFormat where+    toQueryParam = \case+        HTML -> "HTML"+        Xhtml -> "XHTML"++instance FromJSON FloodlightActivityTagFormat where+    parseJSON = parseJSONText "FloodlightActivityTagFormat"++instance ToJSON FloodlightActivityTagFormat where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data OrderDocumentsListSortOrder+    = ODLSOAscending+      -- ^ @ASCENDING@+    | ODLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable OrderDocumentsListSortOrder++instance FromHttpApiData OrderDocumentsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right ODLSOAscending+        "DESCENDING" -> Right ODLSODescending+        x -> Left ("Unable to parse OrderDocumentsListSortOrder from: " <> x)++instance ToHttpApiData OrderDocumentsListSortOrder where+    toQueryParam = \case+        ODLSOAscending -> "ASCENDING"+        ODLSODescending -> "DESCENDING"++instance FromJSON OrderDocumentsListSortOrder where+    parseJSON = parseJSONText "OrderDocumentsListSortOrder"++instance ToJSON OrderDocumentsListSortOrder where+    toJSON = toJSONText++-- | Role of the asset in relation to creative. Applicable to all but the+-- following creative types: all REDIRECT and TRACKING_TEXT. This is a+-- required field. PRIMARY applies to DISPLAY, FLASH_INPAGE, HTML5_BANNER,+-- IMAGE, DISPLAY_IMAGE_GALLERY, all RICH_MEDIA (which may contain multiple+-- primary assets), and all VPAID creatives. BACKUP_IMAGE applies to+-- FLASH_INPAGE, HTML5_BANNER, all RICH_MEDIA, and all VPAID creatives.+-- Applicable to DISPLAY when the primary asset type is not HTML_IMAGE.+-- ADDITIONAL_IMAGE and ADDITIONAL_FLASH apply to FLASH_INPAGE creatives.+-- OTHER refers to assets from sources other than DCM, such as Studio+-- uploaded assets, applicable to all RICH_MEDIA and all VPAID creatives.+-- PARENT_VIDEO refers to videos uploaded by the user in DCM and is+-- applicable to INSTREAM_VIDEO and VPAID_LINEAR_VIDEO creatives.+-- TRANSCODED_VIDEO refers to videos transcoded by DCM from PARENT_VIDEO+-- assets and is applicable to INSTREAM_VIDEO and VPAID_LINEAR_VIDEO+-- creatives. ALTERNATE_VIDEO refers to the DCM representation of child+-- asset videos from Studio, and is applicable to VPAID_LINEAR_VIDEO+-- creatives. These cannot be added or removed within DCM. For+-- VPAID_LINEAR_VIDEO creatives, PARENT_VIDEO, TRANSCODED_VIDEO and+-- ALTERNATE_VIDEO assets that are marked active serve as backup in case+-- the VPAID creative cannot be served. Only PARENT_VIDEO assets can be+-- added or removed for an INSTREAM_VIDEO or VPAID_LINEAR_VIDEO creative.+data CreativeAssetRole+    = AdditionalFlash+      -- ^ @ADDITIONAL_FLASH@+    | AdditionalImage+      -- ^ @ADDITIONAL_IMAGE@+    | AlternateVideo+      -- ^ @ALTERNATE_VIDEO@+    | BackupImage+      -- ^ @BACKUP_IMAGE@+    | Other+      -- ^ @OTHER@+    | ParentVideo+      -- ^ @PARENT_VIDEO@+    | Primary+      -- ^ @PRIMARY@+    | TranscodedVideo+      -- ^ @TRANSCODED_VIDEO@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeAssetRole++instance FromHttpApiData CreativeAssetRole where+    parseQueryParam = \case+        "ADDITIONAL_FLASH" -> Right AdditionalFlash+        "ADDITIONAL_IMAGE" -> Right AdditionalImage+        "ALTERNATE_VIDEO" -> Right AlternateVideo+        "BACKUP_IMAGE" -> Right BackupImage+        "OTHER" -> Right Other+        "PARENT_VIDEO" -> Right ParentVideo+        "PRIMARY" -> Right Primary+        "TRANSCODED_VIDEO" -> Right TranscodedVideo+        x -> Left ("Unable to parse CreativeAssetRole from: " <> x)++instance ToHttpApiData CreativeAssetRole where+    toQueryParam = \case+        AdditionalFlash -> "ADDITIONAL_FLASH"+        AdditionalImage -> "ADDITIONAL_IMAGE"+        AlternateVideo -> "ALTERNATE_VIDEO"+        BackupImage -> "BACKUP_IMAGE"+        Other -> "OTHER"+        ParentVideo -> "PARENT_VIDEO"+        Primary -> "PRIMARY"+        TranscodedVideo -> "TRANSCODED_VIDEO"++instance FromJSON CreativeAssetRole where+    parseJSON = parseJSONText "CreativeAssetRole"++instance ToJSON CreativeAssetRole where+    toJSON = toJSONText++-- | Select only dynamic targeting keys with this object type.+data DynamicTargetingKeysListObjectType+    = ObjectAd+      -- ^ @OBJECT_AD@+    | ObjectAdvertiser+      -- ^ @OBJECT_ADVERTISER@+    | ObjectCreative+      -- ^ @OBJECT_CREATIVE@+    | ObjectPlacement+      -- ^ @OBJECT_PLACEMENT@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable DynamicTargetingKeysListObjectType++instance FromHttpApiData DynamicTargetingKeysListObjectType where+    parseQueryParam = \case+        "OBJECT_AD" -> Right ObjectAd+        "OBJECT_ADVERTISER" -> Right ObjectAdvertiser+        "OBJECT_CREATIVE" -> Right ObjectCreative+        "OBJECT_PLACEMENT" -> Right ObjectPlacement+        x -> Left ("Unable to parse DynamicTargetingKeysListObjectType from: " <> x)++instance ToHttpApiData DynamicTargetingKeysListObjectType where+    toQueryParam = \case+        ObjectAd -> "OBJECT_AD"+        ObjectAdvertiser -> "OBJECT_ADVERTISER"+        ObjectCreative -> "OBJECT_CREATIVE"+        ObjectPlacement -> "OBJECT_PLACEMENT"++instance FromJSON DynamicTargetingKeysListObjectType where+    parseJSON = parseJSONText "DynamicTargetingKeysListObjectType"++instance ToJSON DynamicTargetingKeysListObjectType where+    toJSON = toJSONText++-- | The delivery type for the recipient.+data RecipientDeliveryType+    = Attachment+      -- ^ @ATTACHMENT@+    | Link+      -- ^ @LINK@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable RecipientDeliveryType++instance FromHttpApiData RecipientDeliveryType where+    parseQueryParam = \case+        "ATTACHMENT" -> Right Attachment+        "LINK" -> Right Link+        x -> Left ("Unable to parse RecipientDeliveryType from: " <> x)++instance ToHttpApiData RecipientDeliveryType where+    toQueryParam = \case+        Attachment -> "ATTACHMENT"+        Link -> "LINK"++instance FromJSON RecipientDeliveryType where+    parseJSON = parseJSONText "RecipientDeliveryType"++instance ToJSON RecipientDeliveryType where+    toJSON = toJSONText++-- | Third-party URL type for in-stream video creatives.+data ThirdPartyTrackingURLThirdPartyURLType+    = ClickTracking+      -- ^ @CLICK_TRACKING@+    | Impression+      -- ^ @IMPRESSION@+    | RichMediaBackupImpression+      -- ^ @RICH_MEDIA_BACKUP_IMPRESSION@+    | RichMediaImpression+      -- ^ @RICH_MEDIA_IMPRESSION@+    | RichMediaRmImpression+      -- ^ @RICH_MEDIA_RM_IMPRESSION@+    | Survey+      -- ^ @SURVEY@+    | VideoComplete+      -- ^ @VIDEO_COMPLETE@+    | VideoCustom+      -- ^ @VIDEO_CUSTOM@+    | VideoFirstQuartile+      -- ^ @VIDEO_FIRST_QUARTILE@+    | VideoFullscreen+      -- ^ @VIDEO_FULLSCREEN@+    | VideoMidpoint+      -- ^ @VIDEO_MIDPOINT@+    | VideoMute+      -- ^ @VIDEO_MUTE@+    | VideoPause+      -- ^ @VIDEO_PAUSE@+    | VideoProgress+      -- ^ @VIDEO_PROGRESS@+    | VideoRewind+      -- ^ @VIDEO_REWIND@+    | VideoSkip+      -- ^ @VIDEO_SKIP@+    | VideoStart+      -- ^ @VIDEO_START@+    | VideoStop+      -- ^ @VIDEO_STOP@+    | VideoThirdQuartile+      -- ^ @VIDEO_THIRD_QUARTILE@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ThirdPartyTrackingURLThirdPartyURLType++instance FromHttpApiData ThirdPartyTrackingURLThirdPartyURLType where+    parseQueryParam = \case+        "CLICK_TRACKING" -> Right ClickTracking+        "IMPRESSION" -> Right Impression+        "RICH_MEDIA_BACKUP_IMPRESSION" -> Right RichMediaBackupImpression+        "RICH_MEDIA_IMPRESSION" -> Right RichMediaImpression+        "RICH_MEDIA_RM_IMPRESSION" -> Right RichMediaRmImpression+        "SURVEY" -> Right Survey+        "VIDEO_COMPLETE" -> Right VideoComplete+        "VIDEO_CUSTOM" -> Right VideoCustom+        "VIDEO_FIRST_QUARTILE" -> Right VideoFirstQuartile+        "VIDEO_FULLSCREEN" -> Right VideoFullscreen+        "VIDEO_MIDPOINT" -> Right VideoMidpoint+        "VIDEO_MUTE" -> Right VideoMute+        "VIDEO_PAUSE" -> Right VideoPause+        "VIDEO_PROGRESS" -> Right VideoProgress+        "VIDEO_REWIND" -> Right VideoRewind+        "VIDEO_SKIP" -> Right VideoSkip+        "VIDEO_START" -> Right VideoStart+        "VIDEO_STOP" -> Right VideoStop+        "VIDEO_THIRD_QUARTILE" -> Right VideoThirdQuartile+        x -> Left ("Unable to parse ThirdPartyTrackingURLThirdPartyURLType from: " <> x)++instance ToHttpApiData ThirdPartyTrackingURLThirdPartyURLType where+    toQueryParam = \case+        ClickTracking -> "CLICK_TRACKING"+        Impression -> "IMPRESSION"+        RichMediaBackupImpression -> "RICH_MEDIA_BACKUP_IMPRESSION"+        RichMediaImpression -> "RICH_MEDIA_IMPRESSION"+        RichMediaRmImpression -> "RICH_MEDIA_RM_IMPRESSION"+        Survey -> "SURVEY"+        VideoComplete -> "VIDEO_COMPLETE"+        VideoCustom -> "VIDEO_CUSTOM"+        VideoFirstQuartile -> "VIDEO_FIRST_QUARTILE"+        VideoFullscreen -> "VIDEO_FULLSCREEN"+        VideoMidpoint -> "VIDEO_MIDPOINT"+        VideoMute -> "VIDEO_MUTE"+        VideoPause -> "VIDEO_PAUSE"+        VideoProgress -> "VIDEO_PROGRESS"+        VideoRewind -> "VIDEO_REWIND"+        VideoSkip -> "VIDEO_SKIP"+        VideoStart -> "VIDEO_START"+        VideoStop -> "VIDEO_STOP"+        VideoThirdQuartile -> "VIDEO_THIRD_QUARTILE"++instance FromJSON ThirdPartyTrackingURLThirdPartyURLType where+    parseJSON = parseJSONText "ThirdPartyTrackingURLThirdPartyURLType"++instance ToJSON ThirdPartyTrackingURLThirdPartyURLType where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data TargetableRemarketingListsListSortOrder+    = TRLLSOAscending+      -- ^ @ASCENDING@+    | TRLLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable TargetableRemarketingListsListSortOrder++instance FromHttpApiData TargetableRemarketingListsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right TRLLSOAscending+        "DESCENDING" -> Right TRLLSODescending+        x -> Left ("Unable to parse TargetableRemarketingListsListSortOrder from: " <> x)++instance ToHttpApiData TargetableRemarketingListsListSortOrder where+    toQueryParam = \case+        TRLLSOAscending -> "ASCENDING"+        TRLLSODescending -> "DESCENDING"++instance FromJSON TargetableRemarketingListsListSortOrder where+    parseJSON = parseJSONText "TargetableRemarketingListsListSortOrder"++instance ToJSON TargetableRemarketingListsListSortOrder where+    toJSON = toJSONText++-- | Offset left unit for an asset. This is a read-only field. Applicable to+-- the following creative types: all RICH_MEDIA.+data CreativeAssetPositionLeftUnit+    = OffSetUnitPercent+      -- ^ @OFFSET_UNIT_PERCENT@+    | OffSetUnitPixel+      -- ^ @OFFSET_UNIT_PIXEL@+    | OffSetUnitPixelFromCenter+      -- ^ @OFFSET_UNIT_PIXEL_FROM_CENTER@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeAssetPositionLeftUnit++instance FromHttpApiData CreativeAssetPositionLeftUnit where+    parseQueryParam = \case+        "OFFSET_UNIT_PERCENT" -> Right OffSetUnitPercent+        "OFFSET_UNIT_PIXEL" -> Right OffSetUnitPixel+        "OFFSET_UNIT_PIXEL_FROM_CENTER" -> Right OffSetUnitPixelFromCenter+        x -> Left ("Unable to parse CreativeAssetPositionLeftUnit from: " <> x)++instance ToHttpApiData CreativeAssetPositionLeftUnit where+    toQueryParam = \case+        OffSetUnitPercent -> "OFFSET_UNIT_PERCENT"+        OffSetUnitPixel -> "OFFSET_UNIT_PIXEL"+        OffSetUnitPixelFromCenter -> "OFFSET_UNIT_PIXEL_FROM_CENTER"++instance FromJSON CreativeAssetPositionLeftUnit where+    parseJSON = parseJSONText "CreativeAssetPositionLeftUnit"++instance ToJSON CreativeAssetPositionLeftUnit where+    toJSON = toJSONText++-- | Placement cap cost option.+data PricingScheduleCapCostOption+    = CapCostCumulative+      -- ^ @CAP_COST_CUMULATIVE@+    | CapCostMonthly+      -- ^ @CAP_COST_MONTHLY@+    | CapCostNone+      -- ^ @CAP_COST_NONE@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PricingScheduleCapCostOption++instance FromHttpApiData PricingScheduleCapCostOption where+    parseQueryParam = \case+        "CAP_COST_CUMULATIVE" -> Right CapCostCumulative+        "CAP_COST_MONTHLY" -> Right CapCostMonthly+        "CAP_COST_NONE" -> Right CapCostNone+        x -> Left ("Unable to parse PricingScheduleCapCostOption from: " <> x)++instance ToHttpApiData PricingScheduleCapCostOption where+    toQueryParam = \case+        CapCostCumulative -> "CAP_COST_CUMULATIVE"+        CapCostMonthly -> "CAP_COST_MONTHLY"+        CapCostNone -> "CAP_COST_NONE"++instance FromJSON PricingScheduleCapCostOption where+    parseJSON = parseJSONText "PricingScheduleCapCostOption"++instance ToJSON PricingScheduleCapCostOption where+    toJSON = toJSONText++-- | Levels of availability for a user role permission.+data UserRolePermissionAvailability+    = AccountAlways+      -- ^ @ACCOUNT_ALWAYS@+    | AccountByDefault+      -- ^ @ACCOUNT_BY_DEFAULT@+    | NotAvailableByDefault+      -- ^ @NOT_AVAILABLE_BY_DEFAULT@+    | SubAccountAndAccountAlways+      -- ^ @SUBACCOUNT_AND_ACCOUNT_ALWAYS@+    | SubAccountAndAccountByDefault+      -- ^ @SUBACCOUNT_AND_ACCOUNT_BY_DEFAULT@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable UserRolePermissionAvailability++instance FromHttpApiData UserRolePermissionAvailability where+    parseQueryParam = \case+        "ACCOUNT_ALWAYS" -> Right AccountAlways+        "ACCOUNT_BY_DEFAULT" -> Right AccountByDefault+        "NOT_AVAILABLE_BY_DEFAULT" -> Right NotAvailableByDefault+        "SUBACCOUNT_AND_ACCOUNT_ALWAYS" -> Right SubAccountAndAccountAlways+        "SUBACCOUNT_AND_ACCOUNT_BY_DEFAULT" -> Right SubAccountAndAccountByDefault+        x -> Left ("Unable to parse UserRolePermissionAvailability from: " <> x)++instance ToHttpApiData UserRolePermissionAvailability where+    toQueryParam = \case+        AccountAlways -> "ACCOUNT_ALWAYS"+        AccountByDefault -> "ACCOUNT_BY_DEFAULT"+        NotAvailableByDefault -> "NOT_AVAILABLE_BY_DEFAULT"+        SubAccountAndAccountAlways -> "SUBACCOUNT_AND_ACCOUNT_ALWAYS"+        SubAccountAndAccountByDefault -> "SUBACCOUNT_AND_ACCOUNT_BY_DEFAULT"++instance FromJSON UserRolePermissionAvailability where+    parseJSON = parseJSONText "UserRolePermissionAvailability"++instance ToJSON UserRolePermissionAvailability where+    toJSON = toJSONText++-- | Visibility of this directory site contact assignment. When set to PUBLIC+-- this contact assignment is visible to all account and agency users; when+-- set to PRIVATE it is visible only to the site.+data DirectorySiteContactAssignmentVisibility+    = Private+      -- ^ @PRIVATE@+    | Public+      -- ^ @PUBLIC@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable DirectorySiteContactAssignmentVisibility++instance FromHttpApiData DirectorySiteContactAssignmentVisibility where+    parseQueryParam = \case+        "PRIVATE" -> Right Private+        "PUBLIC" -> Right Public+        x -> Left ("Unable to parse DirectorySiteContactAssignmentVisibility from: " <> x)++instance ToHttpApiData DirectorySiteContactAssignmentVisibility where+    toQueryParam = \case+        Private -> "PRIVATE"+        Public -> "PUBLIC"++instance FromJSON DirectorySiteContactAssignmentVisibility where+    parseJSON = parseJSONText "DirectorySiteContactAssignmentVisibility"++instance ToJSON DirectorySiteContactAssignmentVisibility where+    toJSON = toJSONText++-- | Placement compatibility. DISPLAY and DISPLAY_INTERSTITIAL refer to+-- rendering on desktop, on mobile devices or in mobile apps for regular or+-- interstitial ads respectively. APP and APP_INTERSTITIAL are no longer+-- allowed for new placement insertions. Instead, use DISPLAY or+-- DISPLAY_INTERSTITIAL. IN_STREAM_VIDEO refers to rendering in in-stream+-- video ads developed with the VAST standard. This field is required on+-- insertion.+data PlacementCompatibility+    = App+      -- ^ @APP@+    | AppInterstitial+      -- ^ @APP_INTERSTITIAL@+    | Display+      -- ^ @DISPLAY@+    | DisplayInterstitial+      -- ^ @DISPLAY_INTERSTITIAL@+    | InStreamVideo+      -- ^ @IN_STREAM_VIDEO@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PlacementCompatibility++instance FromHttpApiData PlacementCompatibility where+    parseQueryParam = \case+        "APP" -> Right App+        "APP_INTERSTITIAL" -> Right AppInterstitial+        "DISPLAY" -> Right Display+        "DISPLAY_INTERSTITIAL" -> Right DisplayInterstitial+        "IN_STREAM_VIDEO" -> Right InStreamVideo+        x -> Left ("Unable to parse PlacementCompatibility from: " <> x)++instance ToHttpApiData PlacementCompatibility where+    toQueryParam = \case+        App -> "APP"+        AppInterstitial -> "APP_INTERSTITIAL"+        Display -> "DISPLAY"+        DisplayInterstitial -> "DISPLAY_INTERSTITIAL"+        InStreamVideo -> "IN_STREAM_VIDEO"++instance FromJSON PlacementCompatibility where+    parseJSON = parseJSONText "PlacementCompatibility"++instance ToJSON PlacementCompatibility where+    toJSON = toJSONText++-- | Comparison operator of this term. This field is only relevant when type+-- is left unset or set to CUSTOM_VARIABLE_TERM or REFERRER_TERM.+data ListPopulationTermOperator+    = NumEquals+      -- ^ @NUM_EQUALS@+    | NumGreaterThan+      -- ^ @NUM_GREATER_THAN@+    | NumGreaterThanEqual+      -- ^ @NUM_GREATER_THAN_EQUAL@+    | NumLessThan+      -- ^ @NUM_LESS_THAN@+    | NumLessThanEqual+      -- ^ @NUM_LESS_THAN_EQUAL@+    | StringContains+      -- ^ @STRING_CONTAINS@+    | StringEquals+      -- ^ @STRING_EQUALS@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ListPopulationTermOperator++instance FromHttpApiData ListPopulationTermOperator where+    parseQueryParam = \case+        "NUM_EQUALS" -> Right NumEquals+        "NUM_GREATER_THAN" -> Right NumGreaterThan+        "NUM_GREATER_THAN_EQUAL" -> Right NumGreaterThanEqual+        "NUM_LESS_THAN" -> Right NumLessThan+        "NUM_LESS_THAN_EQUAL" -> Right NumLessThanEqual+        "STRING_CONTAINS" -> Right StringContains+        "STRING_EQUALS" -> Right StringEquals+        x -> Left ("Unable to parse ListPopulationTermOperator from: " <> x)++instance ToHttpApiData ListPopulationTermOperator where+    toQueryParam = \case+        NumEquals -> "NUM_EQUALS"+        NumGreaterThan -> "NUM_GREATER_THAN"+        NumGreaterThanEqual -> "NUM_GREATER_THAN_EQUAL"+        NumLessThan -> "NUM_LESS_THAN"+        NumLessThanEqual -> "NUM_LESS_THAN_EQUAL"+        StringContains -> "STRING_CONTAINS"+        StringEquals -> "STRING_EQUALS"++instance FromJSON ListPopulationTermOperator where+    parseJSON = parseJSONText "ListPopulationTermOperator"++instance ToJSON ListPopulationTermOperator where+    toJSON = toJSONText++-- | Select only placements with this payment source.+data PlacementsListPaymentSource+    = PlacementAgencyPaid+      -- ^ @PLACEMENT_AGENCY_PAID@+    | PlacementPublisherPaid+      -- ^ @PLACEMENT_PUBLISHER_PAID@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PlacementsListPaymentSource++instance FromHttpApiData PlacementsListPaymentSource where+    parseQueryParam = \case+        "PLACEMENT_AGENCY_PAID" -> Right PlacementAgencyPaid+        "PLACEMENT_PUBLISHER_PAID" -> Right PlacementPublisherPaid+        x -> Left ("Unable to parse PlacementsListPaymentSource from: " <> x)++instance ToHttpApiData PlacementsListPaymentSource where+    toQueryParam = \case+        PlacementAgencyPaid -> "PLACEMENT_AGENCY_PAID"+        PlacementPublisherPaid -> "PLACEMENT_PUBLISHER_PAID"++instance FromJSON PlacementsListPaymentSource where+    parseJSON = parseJSONText "PlacementsListPaymentSource"++instance ToJSON PlacementsListPaymentSource where+    toJSON = toJSONText++-- | The field by which to sort the list.+data ReportsListSortField+    = RLSFID+      -- ^ @ID@+      -- Sort by report ID.+    | RLSFLastModifiedTime+      -- ^ @LAST_MODIFIED_TIME@+      -- Sort by \'lastModifiedTime\' field.+    | RLSFName+      -- ^ @NAME@+      -- Sort by name of reports.+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ReportsListSortField++instance FromHttpApiData ReportsListSortField where+    parseQueryParam = \case+        "ID" -> Right RLSFID+        "LAST_MODIFIED_TIME" -> Right RLSFLastModifiedTime+        "NAME" -> Right RLSFName+        x -> Left ("Unable to parse ReportsListSortField from: " <> x)++instance ToHttpApiData ReportsListSortField where+    toQueryParam = \case+        RLSFID -> "ID"+        RLSFLastModifiedTime -> "LAST_MODIFIED_TIME"+        RLSFName -> "NAME"++instance FromJSON ReportsListSortField where+    parseJSON = parseJSONText "ReportsListSortField"++instance ToJSON ReportsListSortField where+    toJSON = toJSONText++-- | Ad slot compatibility. DISPLAY and DISPLAY_INTERSTITIAL refer to+-- rendering either on desktop, mobile devices or in mobile apps for+-- regular or interstitial ads respectively. APP and APP_INTERSTITIAL are+-- for rendering in mobile apps. IN_STREAM_VIDEO refers to rendering in+-- in-stream video ads developed with the VAST standard.+data AdSlotCompatibility+    = ASCApp+      -- ^ @APP@+    | ASCAppInterstitial+      -- ^ @APP_INTERSTITIAL@+    | ASCDisplay+      -- ^ @DISPLAY@+    | ASCDisplayInterstitial+      -- ^ @DISPLAY_INTERSTITIAL@+    | ASCInStreamVideo+      -- ^ @IN_STREAM_VIDEO@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AdSlotCompatibility++instance FromHttpApiData AdSlotCompatibility where+    parseQueryParam = \case+        "APP" -> Right ASCApp+        "APP_INTERSTITIAL" -> Right ASCAppInterstitial+        "DISPLAY" -> Right ASCDisplay+        "DISPLAY_INTERSTITIAL" -> Right ASCDisplayInterstitial+        "IN_STREAM_VIDEO" -> Right ASCInStreamVideo+        x -> Left ("Unable to parse AdSlotCompatibility from: " <> x)++instance ToHttpApiData AdSlotCompatibility where+    toQueryParam = \case+        ASCApp -> "APP"+        ASCAppInterstitial -> "APP_INTERSTITIAL"+        ASCDisplay -> "DISPLAY"+        ASCDisplayInterstitial -> "DISPLAY_INTERSTITIAL"+        ASCInStreamVideo -> "IN_STREAM_VIDEO"++instance FromJSON AdSlotCompatibility where+    parseJSON = parseJSONText "AdSlotCompatibility"++instance ToJSON AdSlotCompatibility where+    toJSON = toJSONText++-- | Field by which to sort the list.+data CampaignsListSortField+    = CLSFID+      -- ^ @ID@+    | CLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CampaignsListSortField++instance FromHttpApiData CampaignsListSortField where+    parseQueryParam = \case+        "ID" -> Right CLSFID+        "NAME" -> Right CLSFName+        x -> Left ("Unable to parse CampaignsListSortField from: " <> x)++instance ToHttpApiData CampaignsListSortField where+    toQueryParam = \case+        CLSFID -> "ID"+        CLSFName -> "NAME"++instance FromJSON CampaignsListSortField where+    parseJSON = parseJSONText "CampaignsListSortField"++instance ToJSON CampaignsListSortField where+    toJSON = toJSONText++-- | Trafficker type of this user profile.+data AccountUserProFileTraffickerType+    = ExternalTrafficker+      -- ^ @EXTERNAL_TRAFFICKER@+    | InternalNonTrafficker+      -- ^ @INTERNAL_NON_TRAFFICKER@+    | InternalTrafficker+      -- ^ @INTERNAL_TRAFFICKER@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AccountUserProFileTraffickerType++instance FromHttpApiData AccountUserProFileTraffickerType where+    parseQueryParam = \case+        "EXTERNAL_TRAFFICKER" -> Right ExternalTrafficker+        "INTERNAL_NON_TRAFFICKER" -> Right InternalNonTrafficker+        "INTERNAL_TRAFFICKER" -> Right InternalTrafficker+        x -> Left ("Unable to parse AccountUserProFileTraffickerType from: " <> x)++instance ToHttpApiData AccountUserProFileTraffickerType where+    toQueryParam = \case+        ExternalTrafficker -> "EXTERNAL_TRAFFICKER"+        InternalNonTrafficker -> "INTERNAL_NON_TRAFFICKER"+        InternalTrafficker -> "INTERNAL_TRAFFICKER"++instance FromJSON AccountUserProFileTraffickerType where+    parseJSON = parseJSONText "AccountUserProFileTraffickerType"++instance ToJSON AccountUserProFileTraffickerType where+    toJSON = toJSONText++data CreativeAssetMetadataDetectedFeaturesItem+    = ApplicationCache+      -- ^ @APPLICATION_CACHE@+    | Audio+      -- ^ @AUDIO@+    | Canvas+      -- ^ @CANVAS@+    | CanvasText+      -- ^ @CANVAS_TEXT@+    | CssAnimations+      -- ^ @CSS_ANIMATIONS@+    | CssBackgRoundSize+      -- ^ @CSS_BACKGROUND_SIZE@+    | CssBOrderImage+      -- ^ @CSS_BORDER_IMAGE@+    | CssBOrderRadius+      -- ^ @CSS_BORDER_RADIUS@+    | CssBoxShadow+      -- ^ @CSS_BOX_SHADOW@+    | CssColumns+      -- ^ @CSS_COLUMNS@+    | CssFlexBox+      -- ^ @CSS_FLEX_BOX@+    | CssFontFace+      -- ^ @CSS_FONT_FACE@+    | CssGeneratedContent+      -- ^ @CSS_GENERATED_CONTENT@+    | CssGradients+      -- ^ @CSS_GRADIENTS@+    | CssHsla+      -- ^ @CSS_HSLA@+    | CssMultipleBgs+      -- ^ @CSS_MULTIPLE_BGS@+    | CssOpacity+      -- ^ @CSS_OPACITY@+    | CssReflections+      -- ^ @CSS_REFLECTIONS@+    | CssRgba+      -- ^ @CSS_RGBA@+    | CssTextShadow+      -- ^ @CSS_TEXT_SHADOW@+    | CssTransforms+      -- ^ @CSS_TRANSFORMS@+    | CssTRANSFORMS3D+      -- ^ @CSS_TRANSFORMS3D@+    | CssTransitions+      -- ^ @CSS_TRANSITIONS@+    | DragAndDrop+      -- ^ @DRAG_AND_DROP@+    | GeoLocation+      -- ^ @GEO_LOCATION@+    | HashChange+      -- ^ @HASH_CHANGE@+    | History+      -- ^ @HISTORY@+    | IndexedDB+      -- ^ @INDEXED_DB@+    | InlineSvg+      -- ^ @INLINE_SVG@+    | InputAttrAutocomplete+      -- ^ @INPUT_ATTR_AUTOCOMPLETE@+    | InputAttrAutofocus+      -- ^ @INPUT_ATTR_AUTOFOCUS@+    | InputAttrList+      -- ^ @INPUT_ATTR_LIST@+    | InputAttrMax+      -- ^ @INPUT_ATTR_MAX@+    | InputAttrMin+      -- ^ @INPUT_ATTR_MIN@+    | InputAttrMultiple+      -- ^ @INPUT_ATTR_MULTIPLE@+    | InputAttrPattern+      -- ^ @INPUT_ATTR_PATTERN@+    | InputAttrPlaceholder+      -- ^ @INPUT_ATTR_PLACEHOLDER@+    | InputAttrRequired+      -- ^ @INPUT_ATTR_REQUIRED@+    | InputAttrStep+      -- ^ @INPUT_ATTR_STEP@+    | InputTypeColor+      -- ^ @INPUT_TYPE_COLOR@+    | InputTypeDate+      -- ^ @INPUT_TYPE_DATE@+    | InputTypeDatetime+      -- ^ @INPUT_TYPE_DATETIME@+    | InputTypeDatetimeLocal+      -- ^ @INPUT_TYPE_DATETIME_LOCAL@+    | InputTypeEmail+      -- ^ @INPUT_TYPE_EMAIL@+    | InputTypeMonth+      -- ^ @INPUT_TYPE_MONTH@+    | InputTypeNumber+      -- ^ @INPUT_TYPE_NUMBER@+    | InputTypeRange+      -- ^ @INPUT_TYPE_RANGE@+    | InputTypeSearch+      -- ^ @INPUT_TYPE_SEARCH@+    | InputTypeTel+      -- ^ @INPUT_TYPE_TEL@+    | InputTypeTime+      -- ^ @INPUT_TYPE_TIME@+    | InputTypeURL+      -- ^ @INPUT_TYPE_URL@+    | InputTypeWeek+      -- ^ @INPUT_TYPE_WEEK@+    | LocalStorage+      -- ^ @LOCAL_STORAGE@+    | PostMessage+      -- ^ @POST_MESSAGE@+    | SessionStorage+      -- ^ @SESSION_STORAGE@+    | Smil+      -- ^ @SMIL@+    | SvgClipPaths+      -- ^ @SVG_CLIP_PATHS@+    | SvgFeImage+      -- ^ @SVG_FE_IMAGE@+    | SvgFilters+      -- ^ @SVG_FILTERS@+    | SvgHref+      -- ^ @SVG_HREF@+    | Touch+      -- ^ @TOUCH@+    | Video+      -- ^ @VIDEO@+    | Webgl+      -- ^ @WEBGL@+    | WebSockets+      -- ^ @WEB_SOCKETS@+    | WebSQLDatabase+      -- ^ @WEB_SQL_DATABASE@+    | WebWorkers+      -- ^ @WEB_WORKERS@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeAssetMetadataDetectedFeaturesItem++instance FromHttpApiData CreativeAssetMetadataDetectedFeaturesItem where+    parseQueryParam = \case+        "APPLICATION_CACHE" -> Right ApplicationCache+        "AUDIO" -> Right Audio+        "CANVAS" -> Right Canvas+        "CANVAS_TEXT" -> Right CanvasText+        "CSS_ANIMATIONS" -> Right CssAnimations+        "CSS_BACKGROUND_SIZE" -> Right CssBackgRoundSize+        "CSS_BORDER_IMAGE" -> Right CssBOrderImage+        "CSS_BORDER_RADIUS" -> Right CssBOrderRadius+        "CSS_BOX_SHADOW" -> Right CssBoxShadow+        "CSS_COLUMNS" -> Right CssColumns+        "CSS_FLEX_BOX" -> Right CssFlexBox+        "CSS_FONT_FACE" -> Right CssFontFace+        "CSS_GENERATED_CONTENT" -> Right CssGeneratedContent+        "CSS_GRADIENTS" -> Right CssGradients+        "CSS_HSLA" -> Right CssHsla+        "CSS_MULTIPLE_BGS" -> Right CssMultipleBgs+        "CSS_OPACITY" -> Right CssOpacity+        "CSS_REFLECTIONS" -> Right CssReflections+        "CSS_RGBA" -> Right CssRgba+        "CSS_TEXT_SHADOW" -> Right CssTextShadow+        "CSS_TRANSFORMS" -> Right CssTransforms+        "CSS_TRANSFORMS3D" -> Right CssTRANSFORMS3D+        "CSS_TRANSITIONS" -> Right CssTransitions+        "DRAG_AND_DROP" -> Right DragAndDrop+        "GEO_LOCATION" -> Right GeoLocation+        "HASH_CHANGE" -> Right HashChange+        "HISTORY" -> Right History+        "INDEXED_DB" -> Right IndexedDB+        "INLINE_SVG" -> Right InlineSvg+        "INPUT_ATTR_AUTOCOMPLETE" -> Right InputAttrAutocomplete+        "INPUT_ATTR_AUTOFOCUS" -> Right InputAttrAutofocus+        "INPUT_ATTR_LIST" -> Right InputAttrList+        "INPUT_ATTR_MAX" -> Right InputAttrMax+        "INPUT_ATTR_MIN" -> Right InputAttrMin+        "INPUT_ATTR_MULTIPLE" -> Right InputAttrMultiple+        "INPUT_ATTR_PATTERN" -> Right InputAttrPattern+        "INPUT_ATTR_PLACEHOLDER" -> Right InputAttrPlaceholder+        "INPUT_ATTR_REQUIRED" -> Right InputAttrRequired+        "INPUT_ATTR_STEP" -> Right InputAttrStep+        "INPUT_TYPE_COLOR" -> Right InputTypeColor+        "INPUT_TYPE_DATE" -> Right InputTypeDate+        "INPUT_TYPE_DATETIME" -> Right InputTypeDatetime+        "INPUT_TYPE_DATETIME_LOCAL" -> Right InputTypeDatetimeLocal+        "INPUT_TYPE_EMAIL" -> Right InputTypeEmail+        "INPUT_TYPE_MONTH" -> Right InputTypeMonth+        "INPUT_TYPE_NUMBER" -> Right InputTypeNumber+        "INPUT_TYPE_RANGE" -> Right InputTypeRange+        "INPUT_TYPE_SEARCH" -> Right InputTypeSearch+        "INPUT_TYPE_TEL" -> Right InputTypeTel+        "INPUT_TYPE_TIME" -> Right InputTypeTime+        "INPUT_TYPE_URL" -> Right InputTypeURL+        "INPUT_TYPE_WEEK" -> Right InputTypeWeek+        "LOCAL_STORAGE" -> Right LocalStorage+        "POST_MESSAGE" -> Right PostMessage+        "SESSION_STORAGE" -> Right SessionStorage+        "SMIL" -> Right Smil+        "SVG_CLIP_PATHS" -> Right SvgClipPaths+        "SVG_FE_IMAGE" -> Right SvgFeImage+        "SVG_FILTERS" -> Right SvgFilters+        "SVG_HREF" -> Right SvgHref+        "TOUCH" -> Right Touch+        "VIDEO" -> Right Video+        "WEBGL" -> Right Webgl+        "WEB_SOCKETS" -> Right WebSockets+        "WEB_SQL_DATABASE" -> Right WebSQLDatabase+        "WEB_WORKERS" -> Right WebWorkers+        x -> Left ("Unable to parse CreativeAssetMetadataDetectedFeaturesItem from: " <> x)++instance ToHttpApiData CreativeAssetMetadataDetectedFeaturesItem where+    toQueryParam = \case+        ApplicationCache -> "APPLICATION_CACHE"+        Audio -> "AUDIO"+        Canvas -> "CANVAS"+        CanvasText -> "CANVAS_TEXT"+        CssAnimations -> "CSS_ANIMATIONS"+        CssBackgRoundSize -> "CSS_BACKGROUND_SIZE"+        CssBOrderImage -> "CSS_BORDER_IMAGE"+        CssBOrderRadius -> "CSS_BORDER_RADIUS"+        CssBoxShadow -> "CSS_BOX_SHADOW"+        CssColumns -> "CSS_COLUMNS"+        CssFlexBox -> "CSS_FLEX_BOX"+        CssFontFace -> "CSS_FONT_FACE"+        CssGeneratedContent -> "CSS_GENERATED_CONTENT"+        CssGradients -> "CSS_GRADIENTS"+        CssHsla -> "CSS_HSLA"+        CssMultipleBgs -> "CSS_MULTIPLE_BGS"+        CssOpacity -> "CSS_OPACITY"+        CssReflections -> "CSS_REFLECTIONS"+        CssRgba -> "CSS_RGBA"+        CssTextShadow -> "CSS_TEXT_SHADOW"+        CssTransforms -> "CSS_TRANSFORMS"+        CssTRANSFORMS3D -> "CSS_TRANSFORMS3D"+        CssTransitions -> "CSS_TRANSITIONS"+        DragAndDrop -> "DRAG_AND_DROP"+        GeoLocation -> "GEO_LOCATION"+        HashChange -> "HASH_CHANGE"+        History -> "HISTORY"+        IndexedDB -> "INDEXED_DB"+        InlineSvg -> "INLINE_SVG"+        InputAttrAutocomplete -> "INPUT_ATTR_AUTOCOMPLETE"+        InputAttrAutofocus -> "INPUT_ATTR_AUTOFOCUS"+        InputAttrList -> "INPUT_ATTR_LIST"+        InputAttrMax -> "INPUT_ATTR_MAX"+        InputAttrMin -> "INPUT_ATTR_MIN"+        InputAttrMultiple -> "INPUT_ATTR_MULTIPLE"+        InputAttrPattern -> "INPUT_ATTR_PATTERN"+        InputAttrPlaceholder -> "INPUT_ATTR_PLACEHOLDER"+        InputAttrRequired -> "INPUT_ATTR_REQUIRED"+        InputAttrStep -> "INPUT_ATTR_STEP"+        InputTypeColor -> "INPUT_TYPE_COLOR"+        InputTypeDate -> "INPUT_TYPE_DATE"+        InputTypeDatetime -> "INPUT_TYPE_DATETIME"+        InputTypeDatetimeLocal -> "INPUT_TYPE_DATETIME_LOCAL"+        InputTypeEmail -> "INPUT_TYPE_EMAIL"+        InputTypeMonth -> "INPUT_TYPE_MONTH"+        InputTypeNumber -> "INPUT_TYPE_NUMBER"+        InputTypeRange -> "INPUT_TYPE_RANGE"+        InputTypeSearch -> "INPUT_TYPE_SEARCH"+        InputTypeTel -> "INPUT_TYPE_TEL"+        InputTypeTime -> "INPUT_TYPE_TIME"+        InputTypeURL -> "INPUT_TYPE_URL"+        InputTypeWeek -> "INPUT_TYPE_WEEK"+        LocalStorage -> "LOCAL_STORAGE"+        PostMessage -> "POST_MESSAGE"+        SessionStorage -> "SESSION_STORAGE"+        Smil -> "SMIL"+        SvgClipPaths -> "SVG_CLIP_PATHS"+        SvgFeImage -> "SVG_FE_IMAGE"+        SvgFilters -> "SVG_FILTERS"+        SvgHref -> "SVG_HREF"+        Touch -> "TOUCH"+        Video -> "VIDEO"+        Webgl -> "WEBGL"+        WebSockets -> "WEB_SOCKETS"+        WebSQLDatabase -> "WEB_SQL_DATABASE"+        WebWorkers -> "WEB_WORKERS"++instance FromJSON CreativeAssetMetadataDetectedFeaturesItem where+    parseJSON = parseJSONText "CreativeAssetMetadataDetectedFeaturesItem"++instance ToJSON CreativeAssetMetadataDetectedFeaturesItem where+    toJSON = toJSONText++-- | Select default ads with the specified compatibility. Applicable when+-- type is AD_SERVING_DEFAULT_AD. DISPLAY and DISPLAY_INTERSTITIAL refer to+-- rendering either on desktop or on mobile devices for regular or+-- interstitial ads, respectively. APP and APP_INTERSTITIAL are for+-- rendering in mobile apps. IN_STREAM_VIDEO refers to rendering an+-- in-stream video ads developed with the VAST standard.+data AdsListCompatibility+    = ALCApp+      -- ^ @APP@+    | ALCAppInterstitial+      -- ^ @APP_INTERSTITIAL@+    | ALCDisplay+      -- ^ @DISPLAY@+    | ALCDisplayInterstitial+      -- ^ @DISPLAY_INTERSTITIAL@+    | ALCInStreamVideo+      -- ^ @IN_STREAM_VIDEO@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AdsListCompatibility++instance FromHttpApiData AdsListCompatibility where+    parseQueryParam = \case+        "APP" -> Right ALCApp+        "APP_INTERSTITIAL" -> Right ALCAppInterstitial+        "DISPLAY" -> Right ALCDisplay+        "DISPLAY_INTERSTITIAL" -> Right ALCDisplayInterstitial+        "IN_STREAM_VIDEO" -> Right ALCInStreamVideo+        x -> Left ("Unable to parse AdsListCompatibility from: " <> x)++instance ToHttpApiData AdsListCompatibility where+    toQueryParam = \case+        ALCApp -> "APP"+        ALCAppInterstitial -> "APP_INTERSTITIAL"+        ALCDisplay -> "DISPLAY"+        ALCDisplayInterstitial -> "DISPLAY_INTERSTITIAL"+        ALCInStreamVideo -> "IN_STREAM_VIDEO"++instance FromJSON AdsListCompatibility where+    parseJSON = parseJSONText "AdsListCompatibility"++instance ToJSON AdsListCompatibility where+    toJSON = toJSONText++-- | Status of this event tag. Must be ENABLED for this event tag to fire.+-- This is a required field.+data EventTagStatus+    = Disabled+      -- ^ @DISABLED@+    | Enabled+      -- ^ @ENABLED@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable EventTagStatus++instance FromHttpApiData EventTagStatus where+    parseQueryParam = \case+        "DISABLED" -> Right Disabled+        "ENABLED" -> Right Enabled+        x -> Left ("Unable to parse EventTagStatus from: " <> x)++instance ToHttpApiData EventTagStatus where+    toQueryParam = \case+        Disabled -> "DISABLED"+        Enabled -> "ENABLED"++instance FromJSON EventTagStatus where+    parseJSON = parseJSONText "EventTagStatus"++instance ToJSON EventTagStatus where+    toJSON = toJSONText++-- | Field by which to sort the list.+data SitesListSortField+    = SLSFID+      -- ^ @ID@+    | SLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable SitesListSortField++instance FromHttpApiData SitesListSortField where+    parseQueryParam = \case+        "ID" -> Right SLSFID+        "NAME" -> Right SLSFName+        x -> Left ("Unable to parse SitesListSortField from: " <> x)++instance ToHttpApiData SitesListSortField where+    toQueryParam = \case+        SLSFID -> "ID"+        SLSFName -> "NAME"++instance FromJSON SitesListSortField where+    parseJSON = parseJSONText "SitesListSortField"++instance ToJSON SitesListSortField where+    toJSON = toJSONText++-- | Select only event tags with the specified event tag types. Event tag+-- types can be used to specify whether to use a third-party pixel, a+-- third-party JavaScript URL, or a third-party click-through URL for+-- either impression or click tracking.+data EventTagsListEventTagTypes+    = ClickThroughEventTag+      -- ^ @CLICK_THROUGH_EVENT_TAG@+    | ImpressionImageEventTag+      -- ^ @IMPRESSION_IMAGE_EVENT_TAG@+    | ImpressionJavascriptEventTag+      -- ^ @IMPRESSION_JAVASCRIPT_EVENT_TAG@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable EventTagsListEventTagTypes++instance FromHttpApiData EventTagsListEventTagTypes where+    parseQueryParam = \case+        "CLICK_THROUGH_EVENT_TAG" -> Right ClickThroughEventTag+        "IMPRESSION_IMAGE_EVENT_TAG" -> Right ImpressionImageEventTag+        "IMPRESSION_JAVASCRIPT_EVENT_TAG" -> Right ImpressionJavascriptEventTag+        x -> Left ("Unable to parse EventTagsListEventTagTypes from: " <> x)++instance ToHttpApiData EventTagsListEventTagTypes where+    toQueryParam = \case+        ClickThroughEventTag -> "CLICK_THROUGH_EVENT_TAG"+        ImpressionImageEventTag -> "IMPRESSION_IMAGE_EVENT_TAG"+        ImpressionJavascriptEventTag -> "IMPRESSION_JAVASCRIPT_EVENT_TAG"++instance FromJSON EventTagsListEventTagTypes where+    parseJSON = parseJSONText "EventTagsListEventTagTypes"++instance ToJSON EventTagsListEventTagTypes where+    toJSON = toJSONText++-- | The status of the report file.+data FileStatus+    = Cancelled+      -- ^ @CANCELLED@+    | Failed+      -- ^ @FAILED@+    | Processing+      -- ^ @PROCESSING@+    | ReportAvailable+      -- ^ @REPORT_AVAILABLE@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FileStatus++instance FromHttpApiData FileStatus where+    parseQueryParam = \case+        "CANCELLED" -> Right Cancelled+        "FAILED" -> Right Failed+        "PROCESSING" -> Right Processing+        "REPORT_AVAILABLE" -> Right ReportAvailable+        x -> Left ("Unable to parse FileStatus from: " <> x)++instance ToHttpApiData FileStatus where+    toQueryParam = \case+        Cancelled -> "CANCELLED"+        Failed -> "FAILED"+        Processing -> "PROCESSING"+        ReportAvailable -> "REPORT_AVAILABLE"++instance FromJSON FileStatus where+    parseJSON = parseJSONText "FileStatus"++instance ToJSON FileStatus where+    toJSON = toJSONText++-- | Artwork type used by the creative.This is a read-only field.+data CreativeCustomEventArtworkType+    = ArtworkTypeFlash+      -- ^ @ARTWORK_TYPE_FLASH@+    | ArtworkTypeHTML5+      -- ^ @ARTWORK_TYPE_HTML5@+    | ArtworkTypeImage+      -- ^ @ARTWORK_TYPE_IMAGE@+    | ArtworkTypeMixed+      -- ^ @ARTWORK_TYPE_MIXED@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeCustomEventArtworkType++instance FromHttpApiData CreativeCustomEventArtworkType where+    parseQueryParam = \case+        "ARTWORK_TYPE_FLASH" -> Right ArtworkTypeFlash+        "ARTWORK_TYPE_HTML5" -> Right ArtworkTypeHTML5+        "ARTWORK_TYPE_IMAGE" -> Right ArtworkTypeImage+        "ARTWORK_TYPE_MIXED" -> Right ArtworkTypeMixed+        x -> Left ("Unable to parse CreativeCustomEventArtworkType from: " <> x)++instance ToHttpApiData CreativeCustomEventArtworkType where+    toQueryParam = \case+        ArtworkTypeFlash -> "ARTWORK_TYPE_FLASH"+        ArtworkTypeHTML5 -> "ARTWORK_TYPE_HTML5"+        ArtworkTypeImage -> "ARTWORK_TYPE_IMAGE"+        ArtworkTypeMixed -> "ARTWORK_TYPE_MIXED"++instance FromJSON CreativeCustomEventArtworkType where+    parseJSON = parseJSONText "CreativeCustomEventArtworkType"++instance ToJSON CreativeCustomEventArtworkType where+    toJSON = toJSONText++-- | Types of attribution options for natural search conversions.+data FloodlightConfigurationNATuralSearchConversionAttributionOption+    = ExcludeNATuralSearchConversionAttribution+      -- ^ @EXCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION@+    | IncludeNATuralSearchConversionAttribution+      -- ^ @INCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION@+    | IncludeNATuralSearchTieredConversionAttribution+      -- ^ @INCLUDE_NATURAL_SEARCH_TIERED_CONVERSION_ATTRIBUTION@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FloodlightConfigurationNATuralSearchConversionAttributionOption++instance FromHttpApiData FloodlightConfigurationNATuralSearchConversionAttributionOption where+    parseQueryParam = \case+        "EXCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION" -> Right ExcludeNATuralSearchConversionAttribution+        "INCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION" -> Right IncludeNATuralSearchConversionAttribution+        "INCLUDE_NATURAL_SEARCH_TIERED_CONVERSION_ATTRIBUTION" -> Right IncludeNATuralSearchTieredConversionAttribution+        x -> Left ("Unable to parse FloodlightConfigurationNATuralSearchConversionAttributionOption from: " <> x)++instance ToHttpApiData FloodlightConfigurationNATuralSearchConversionAttributionOption where+    toQueryParam = \case+        ExcludeNATuralSearchConversionAttribution -> "EXCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION"+        IncludeNATuralSearchConversionAttribution -> "INCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION"+        IncludeNATuralSearchTieredConversionAttribution -> "INCLUDE_NATURAL_SEARCH_TIERED_CONVERSION_ATTRIBUTION"++instance FromJSON FloodlightConfigurationNATuralSearchConversionAttributionOption where+    parseJSON = parseJSONText "FloodlightConfigurationNATuralSearchConversionAttributionOption"++instance ToJSON FloodlightConfigurationNATuralSearchConversionAttributionOption where+    toJSON = toJSONText++-- | Artwork type of rich media creative. This is a read-only field.+-- Applicable to the following creative types: all RICH_MEDIA.+data CreativeAssetArtworkType+    = CAATArtworkTypeFlash+      -- ^ @ARTWORK_TYPE_FLASH@+    | CAATArtworkTypeHTML5+      -- ^ @ARTWORK_TYPE_HTML5@+    | CAATArtworkTypeImage+      -- ^ @ARTWORK_TYPE_IMAGE@+    | CAATArtworkTypeMixed+      -- ^ @ARTWORK_TYPE_MIXED@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeAssetArtworkType++instance FromHttpApiData CreativeAssetArtworkType where+    parseQueryParam = \case+        "ARTWORK_TYPE_FLASH" -> Right CAATArtworkTypeFlash+        "ARTWORK_TYPE_HTML5" -> Right CAATArtworkTypeHTML5+        "ARTWORK_TYPE_IMAGE" -> Right CAATArtworkTypeImage+        "ARTWORK_TYPE_MIXED" -> Right CAATArtworkTypeMixed+        x -> Left ("Unable to parse CreativeAssetArtworkType from: " <> x)++instance ToHttpApiData CreativeAssetArtworkType where+    toQueryParam = \case+        CAATArtworkTypeFlash -> "ARTWORK_TYPE_FLASH"+        CAATArtworkTypeHTML5 -> "ARTWORK_TYPE_HTML5"+        CAATArtworkTypeImage -> "ARTWORK_TYPE_IMAGE"+        CAATArtworkTypeMixed -> "ARTWORK_TYPE_MIXED"++instance FromJSON CreativeAssetArtworkType where+    parseJSON = parseJSONText "CreativeAssetArtworkType"++instance ToJSON CreativeAssetArtworkType where+    toJSON = toJSONText++-- | The type of custom floodlight variable to supply a value for. These map+-- to the \"u[1-20]=\" in the tags.+data CustomFloodlightVariableType+    = U1+      -- ^ @U1@+    | U10+      -- ^ @U10@+    | U11+      -- ^ @U11@+    | U12+      -- ^ @U12@+    | U13+      -- ^ @U13@+    | U14+      -- ^ @U14@+    | U15+      -- ^ @U15@+    | U16+      -- ^ @U16@+    | U17+      -- ^ @U17@+    | U18+      -- ^ @U18@+    | U19+      -- ^ @U19@+    | U2+      -- ^ @U2@+    | U20+      -- ^ @U20@+    | U3+      -- ^ @U3@+    | U4+      -- ^ @U4@+    | U5+      -- ^ @U5@+    | U6+      -- ^ @U6@+    | U7+      -- ^ @U7@+    | U8+      -- ^ @U8@+    | U9+      -- ^ @U9@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CustomFloodlightVariableType++instance FromHttpApiData CustomFloodlightVariableType where+    parseQueryParam = \case+        "U1" -> Right U1+        "U10" -> Right U10+        "U11" -> Right U11+        "U12" -> Right U12+        "U13" -> Right U13+        "U14" -> Right U14+        "U15" -> Right U15+        "U16" -> Right U16+        "U17" -> Right U17+        "U18" -> Right U18+        "U19" -> Right U19+        "U2" -> Right U2+        "U20" -> Right U20+        "U3" -> Right U3+        "U4" -> Right U4+        "U5" -> Right U5+        "U6" -> Right U6+        "U7" -> Right U7+        "U8" -> Right U8+        "U9" -> Right U9+        x -> Left ("Unable to parse CustomFloodlightVariableType from: " <> x)++instance ToHttpApiData CustomFloodlightVariableType where+    toQueryParam = \case+        U1 -> "U1"+        U10 -> "U10"+        U11 -> "U11"+        U12 -> "U12"+        U13 -> "U13"+        U14 -> "U14"+        U15 -> "U15"+        U16 -> "U16"+        U17 -> "U17"+        U18 -> "U18"+        U19 -> "U19"+        U2 -> "U2"+        U20 -> "U20"+        U3 -> "U3"+        U4 -> "U4"+        U5 -> "U5"+        U6 -> "U6"+        U7 -> "U7"+        U8 -> "U8"+        U9 -> "U9"++instance FromJSON CustomFloodlightVariableType where+    parseJSON = parseJSONText "CustomFloodlightVariableType"++instance ToJSON CustomFloodlightVariableType where+    toJSON = toJSONText++-- | The error code.+data ConversionErrorCode+    = Internal+      -- ^ @INTERNAL@+    | InvalidArgument+      -- ^ @INVALID_ARGUMENT@+    | NotFound+      -- ^ @NOT_FOUND@+    | PermissionDenied+      -- ^ @PERMISSION_DENIED@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ConversionErrorCode++instance FromHttpApiData ConversionErrorCode where+    parseQueryParam = \case+        "INTERNAL" -> Right Internal+        "INVALID_ARGUMENT" -> Right InvalidArgument+        "NOT_FOUND" -> Right NotFound+        "PERMISSION_DENIED" -> Right PermissionDenied+        x -> Left ("Unable to parse ConversionErrorCode from: " <> x)++instance ToHttpApiData ConversionErrorCode where+    toQueryParam = \case+        Internal -> "INTERNAL"+        InvalidArgument -> "INVALID_ARGUMENT"+        NotFound -> "NOT_FOUND"+        PermissionDenied -> "PERMISSION_DENIED"++instance FromJSON ConversionErrorCode where+    parseJSON = parseJSONText "ConversionErrorCode"++instance ToJSON ConversionErrorCode where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data FloodlightActivitiesListSortOrder+    = FALSOAscending+      -- ^ @ASCENDING@+    | FALSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FloodlightActivitiesListSortOrder++instance FromHttpApiData FloodlightActivitiesListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right FALSOAscending+        "DESCENDING" -> Right FALSODescending+        x -> Left ("Unable to parse FloodlightActivitiesListSortOrder from: " <> x)++instance ToHttpApiData FloodlightActivitiesListSortOrder where+    toQueryParam = \case+        FALSOAscending -> "ASCENDING"+        FALSODescending -> "DESCENDING"++instance FromJSON FloodlightActivitiesListSortOrder where+    parseJSON = parseJSONText "FloodlightActivitiesListSortOrder"++instance ToJSON FloodlightActivitiesListSortOrder where+    toJSON = toJSONText++-- | The output format of the report. Only available once the file is+-- available.+data FileFormat+    = CSV+      -- ^ @CSV@+    | Excel+      -- ^ @EXCEL@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FileFormat++instance FromHttpApiData FileFormat where+    parseQueryParam = \case+        "CSV" -> Right CSV+        "EXCEL" -> Right Excel+        x -> Left ("Unable to parse FileFormat from: " <> x)++instance ToHttpApiData FileFormat where+    toQueryParam = \case+        CSV -> "CSV"+        Excel -> "EXCEL"++instance FromJSON FileFormat where+    parseJSON = parseJSONText "FileFormat"++instance ToJSON FileFormat where+    toJSON = toJSONText++-- | The encryption entity type. This should match the encryption+-- configuration for ad serving or Data Transfer.+data EncryptionInfoEncryptionEntityType+    = AdwordsCustomer+      -- ^ @ADWORDS_CUSTOMER@+    | DBmAdvertiser+      -- ^ @DBM_ADVERTISER@+    | DBmPartner+      -- ^ @DBM_PARTNER@+    | DcmAccount+      -- ^ @DCM_ACCOUNT@+    | DcmAdvertiser+      -- ^ @DCM_ADVERTISER@+    | EncryptionEntityTypeUnknown+      -- ^ @ENCRYPTION_ENTITY_TYPE_UNKNOWN@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable EncryptionInfoEncryptionEntityType++instance FromHttpApiData EncryptionInfoEncryptionEntityType where+    parseQueryParam = \case+        "ADWORDS_CUSTOMER" -> Right AdwordsCustomer+        "DBM_ADVERTISER" -> Right DBmAdvertiser+        "DBM_PARTNER" -> Right DBmPartner+        "DCM_ACCOUNT" -> Right DcmAccount+        "DCM_ADVERTISER" -> Right DcmAdvertiser+        "ENCRYPTION_ENTITY_TYPE_UNKNOWN" -> Right EncryptionEntityTypeUnknown+        x -> Left ("Unable to parse EncryptionInfoEncryptionEntityType from: " <> x)++instance ToHttpApiData EncryptionInfoEncryptionEntityType where+    toQueryParam = \case+        AdwordsCustomer -> "ADWORDS_CUSTOMER"+        DBmAdvertiser -> "DBM_ADVERTISER"+        DBmPartner -> "DBM_PARTNER"+        DcmAccount -> "DCM_ACCOUNT"+        DcmAdvertiser -> "DCM_ADVERTISER"+        EncryptionEntityTypeUnknown -> "ENCRYPTION_ENTITY_TYPE_UNKNOWN"++instance FromJSON EncryptionInfoEncryptionEntityType where+    parseJSON = parseJSONText "EncryptionInfoEncryptionEntityType"++instance ToJSON EncryptionInfoEncryptionEntityType where+    toJSON = toJSONText++-- | Placement pricing type. This field is required on insertion.+data PricingSchedulePricingType+    = PricingTypeCpa+      -- ^ @PRICING_TYPE_CPA@+    | PricingTypeCpc+      -- ^ @PRICING_TYPE_CPC@+    | PricingTypeCpm+      -- ^ @PRICING_TYPE_CPM@+    | PricingTypeFlatRateClicks+      -- ^ @PRICING_TYPE_FLAT_RATE_CLICKS@+    | PricingTypeFlatRateImpressions+      -- ^ @PRICING_TYPE_FLAT_RATE_IMPRESSIONS@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PricingSchedulePricingType++instance FromHttpApiData PricingSchedulePricingType where+    parseQueryParam = \case+        "PRICING_TYPE_CPA" -> Right PricingTypeCpa+        "PRICING_TYPE_CPC" -> Right PricingTypeCpc+        "PRICING_TYPE_CPM" -> Right PricingTypeCpm+        "PRICING_TYPE_FLAT_RATE_CLICKS" -> Right PricingTypeFlatRateClicks+        "PRICING_TYPE_FLAT_RATE_IMPRESSIONS" -> Right PricingTypeFlatRateImpressions+        x -> Left ("Unable to parse PricingSchedulePricingType from: " <> x)++instance ToHttpApiData PricingSchedulePricingType where+    toQueryParam = \case+        PricingTypeCpa -> "PRICING_TYPE_CPA"+        PricingTypeCpc -> "PRICING_TYPE_CPC"+        PricingTypeCpm -> "PRICING_TYPE_CPM"+        PricingTypeFlatRateClicks -> "PRICING_TYPE_FLAT_RATE_CLICKS"+        PricingTypeFlatRateImpressions -> "PRICING_TYPE_FLAT_RATE_IMPRESSIONS"++instance FromJSON PricingSchedulePricingType where+    parseJSON = parseJSONText "PricingSchedulePricingType"++instance ToJSON PricingSchedulePricingType where+    toJSON = toJSONText++-- | Target type used by the event.+data CreativeCustomEventTargetType+    = TargetBlank+      -- ^ @TARGET_BLANK@+    | TargetParent+      -- ^ @TARGET_PARENT@+    | TargetPopup+      -- ^ @TARGET_POPUP@+    | TargetSelf+      -- ^ @TARGET_SELF@+    | TargetTop+      -- ^ @TARGET_TOP@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeCustomEventTargetType++instance FromHttpApiData CreativeCustomEventTargetType where+    parseQueryParam = \case+        "TARGET_BLANK" -> Right TargetBlank+        "TARGET_PARENT" -> Right TargetParent+        "TARGET_POPUP" -> Right TargetPopup+        "TARGET_SELF" -> Right TargetSelf+        "TARGET_TOP" -> Right TargetTop+        x -> Left ("Unable to parse CreativeCustomEventTargetType from: " <> x)++instance ToHttpApiData CreativeCustomEventTargetType where+    toQueryParam = \case+        TargetBlank -> "TARGET_BLANK"+        TargetParent -> "TARGET_PARENT"+        TargetPopup -> "TARGET_POPUP"+        TargetSelf -> "TARGET_SELF"+        TargetTop -> "TARGET_TOP"++instance FromJSON CreativeCustomEventTargetType where+    parseJSON = parseJSONText "CreativeCustomEventTargetType"++instance ToJSON CreativeCustomEventTargetType where+    toJSON = toJSONText++-- | The scope that defines which results are returned, default is \'MINE\'.+data ReportsListScope+    = All+      -- ^ @ALL@+      -- All reports in account.+    | Mine+      -- ^ @MINE@+      -- My reports.+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ReportsListScope++instance FromHttpApiData ReportsListScope where+    parseQueryParam = \case+        "ALL" -> Right All+        "MINE" -> Right Mine+        x -> Left ("Unable to parse ReportsListScope from: " <> x)++instance ToHttpApiData ReportsListScope where+    toQueryParam = \case+        All -> "ALL"+        Mine -> "MINE"++instance FromJSON ReportsListScope where+    parseJSON = parseJSONText "ReportsListScope"++instance ToJSON ReportsListScope where+    toJSON = toJSONText++-- | Duration type for which an asset will be displayed. Applicable to the+-- following creative types: all RICH_MEDIA.+data CreativeAssetDurationType+    = AssetDurationTypeAuto+      -- ^ @ASSET_DURATION_TYPE_AUTO@+    | AssetDurationTypeCustom+      -- ^ @ASSET_DURATION_TYPE_CUSTOM@+    | AssetDurationTypeNone+      -- ^ @ASSET_DURATION_TYPE_NONE@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeAssetDurationType++instance FromHttpApiData CreativeAssetDurationType where+    parseQueryParam = \case+        "ASSET_DURATION_TYPE_AUTO" -> Right AssetDurationTypeAuto+        "ASSET_DURATION_TYPE_CUSTOM" -> Right AssetDurationTypeCustom+        "ASSET_DURATION_TYPE_NONE" -> Right AssetDurationTypeNone+        x -> Left ("Unable to parse CreativeAssetDurationType from: " <> x)++instance ToHttpApiData CreativeAssetDurationType where+    toQueryParam = \case+        AssetDurationTypeAuto -> "ASSET_DURATION_TYPE_AUTO"+        AssetDurationTypeCustom -> "ASSET_DURATION_TYPE_CUSTOM"+        AssetDurationTypeNone -> "ASSET_DURATION_TYPE_NONE"++instance FromJSON CreativeAssetDurationType where+    parseJSON = parseJSONText "CreativeAssetDurationType"++instance ToJSON CreativeAssetDurationType where+    toJSON = toJSONText++-- | Product from which this targetable remarketing list was originated.+data TargetableRemarketingListListSource+    = RemarketingListSourceAdx+      -- ^ @REMARKETING_LIST_SOURCE_ADX@+    | RemarketingListSourceDBm+      -- ^ @REMARKETING_LIST_SOURCE_DBM@+    | RemarketingListSourceDfa+      -- ^ @REMARKETING_LIST_SOURCE_DFA@+    | RemarketingListSourceDfp+      -- ^ @REMARKETING_LIST_SOURCE_DFP@+    | RemarketingListSourceDmp+      -- ^ @REMARKETING_LIST_SOURCE_DMP@+    | RemarketingListSourceGa+      -- ^ @REMARKETING_LIST_SOURCE_GA@+    | RemarketingListSourceGplus+      -- ^ @REMARKETING_LIST_SOURCE_GPLUS@+    | RemarketingListSourceOther+      -- ^ @REMARKETING_LIST_SOURCE_OTHER@+    | RemarketingListSourcePlayStore+      -- ^ @REMARKETING_LIST_SOURCE_PLAY_STORE@+    | RemarketingListSourceXfp+      -- ^ @REMARKETING_LIST_SOURCE_XFP@+    | RemarketingListSourceYouTube+      -- ^ @REMARKETING_LIST_SOURCE_YOUTUBE@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable TargetableRemarketingListListSource++instance FromHttpApiData TargetableRemarketingListListSource where+    parseQueryParam = \case+        "REMARKETING_LIST_SOURCE_ADX" -> Right RemarketingListSourceAdx+        "REMARKETING_LIST_SOURCE_DBM" -> Right RemarketingListSourceDBm+        "REMARKETING_LIST_SOURCE_DFA" -> Right RemarketingListSourceDfa+        "REMARKETING_LIST_SOURCE_DFP" -> Right RemarketingListSourceDfp+        "REMARKETING_LIST_SOURCE_DMP" -> Right RemarketingListSourceDmp+        "REMARKETING_LIST_SOURCE_GA" -> Right RemarketingListSourceGa+        "REMARKETING_LIST_SOURCE_GPLUS" -> Right RemarketingListSourceGplus+        "REMARKETING_LIST_SOURCE_OTHER" -> Right RemarketingListSourceOther+        "REMARKETING_LIST_SOURCE_PLAY_STORE" -> Right RemarketingListSourcePlayStore+        "REMARKETING_LIST_SOURCE_XFP" -> Right RemarketingListSourceXfp+        "REMARKETING_LIST_SOURCE_YOUTUBE" -> Right RemarketingListSourceYouTube+        x -> Left ("Unable to parse TargetableRemarketingListListSource from: " <> x)++instance ToHttpApiData TargetableRemarketingListListSource where+    toQueryParam = \case+        RemarketingListSourceAdx -> "REMARKETING_LIST_SOURCE_ADX"+        RemarketingListSourceDBm -> "REMARKETING_LIST_SOURCE_DBM"+        RemarketingListSourceDfa -> "REMARKETING_LIST_SOURCE_DFA"+        RemarketingListSourceDfp -> "REMARKETING_LIST_SOURCE_DFP"+        RemarketingListSourceDmp -> "REMARKETING_LIST_SOURCE_DMP"+        RemarketingListSourceGa -> "REMARKETING_LIST_SOURCE_GA"+        RemarketingListSourceGplus -> "REMARKETING_LIST_SOURCE_GPLUS"+        RemarketingListSourceOther -> "REMARKETING_LIST_SOURCE_OTHER"+        RemarketingListSourcePlayStore -> "REMARKETING_LIST_SOURCE_PLAY_STORE"+        RemarketingListSourceXfp -> "REMARKETING_LIST_SOURCE_XFP"+        RemarketingListSourceYouTube -> "REMARKETING_LIST_SOURCE_YOUTUBE"++instance FromJSON TargetableRemarketingListListSource where+    parseJSON = parseJSONText "TargetableRemarketingListListSource"++instance ToJSON TargetableRemarketingListListSource where+    toJSON = toJSONText++-- | Field by which to sort the list.+data CreativeGroupsListSortField+    = CGLSFID+      -- ^ @ID@+    | CGLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeGroupsListSortField++instance FromHttpApiData CreativeGroupsListSortField where+    parseQueryParam = \case+        "ID" -> Right CGLSFID+        "NAME" -> Right CGLSFName+        x -> Left ("Unable to parse CreativeGroupsListSortField from: " <> x)++instance ToHttpApiData CreativeGroupsListSortField where+    toQueryParam = \case+        CGLSFID -> "ID"+        CGLSFName -> "NAME"++instance FromJSON CreativeGroupsListSortField where+    parseJSON = parseJSONText "CreativeGroupsListSortField"++instance ToJSON CreativeGroupsListSortField where+    toJSON = toJSONText++-- | Field by which to sort the list.+data PlacementsListSortField+    = PLSFID+      -- ^ @ID@+    | PLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PlacementsListSortField++instance FromHttpApiData PlacementsListSortField where+    parseQueryParam = \case+        "ID" -> Right PLSFID+        "NAME" -> Right PLSFName+        x -> Left ("Unable to parse PlacementsListSortField from: " <> x)++instance ToHttpApiData PlacementsListSortField where+    toQueryParam = \case+        PLSFID -> "ID"+        PLSFName -> "NAME"++instance FromJSON PlacementsListSortField where+    parseJSON = parseJSONText "PlacementsListSortField"++instance ToJSON PlacementsListSortField where+    toJSON = toJSONText++data CreativeBackupImageFeaturesItem+    = CBIFIApplicationCache+      -- ^ @APPLICATION_CACHE@+    | CBIFIAudio+      -- ^ @AUDIO@+    | CBIFICanvas+      -- ^ @CANVAS@+    | CBIFICanvasText+      -- ^ @CANVAS_TEXT@+    | CBIFICssAnimations+      -- ^ @CSS_ANIMATIONS@+    | CBIFICssBackgRoundSize+      -- ^ @CSS_BACKGROUND_SIZE@+    | CBIFICssBOrderImage+      -- ^ @CSS_BORDER_IMAGE@+    | CBIFICssBOrderRadius+      -- ^ @CSS_BORDER_RADIUS@+    | CBIFICssBoxShadow+      -- ^ @CSS_BOX_SHADOW@+    | CBIFICssColumns+      -- ^ @CSS_COLUMNS@+    | CBIFICssFlexBox+      -- ^ @CSS_FLEX_BOX@+    | CBIFICssFontFace+      -- ^ @CSS_FONT_FACE@+    | CBIFICssGeneratedContent+      -- ^ @CSS_GENERATED_CONTENT@+    | CBIFICssGradients+      -- ^ @CSS_GRADIENTS@+    | CBIFICssHsla+      -- ^ @CSS_HSLA@+    | CBIFICssMultipleBgs+      -- ^ @CSS_MULTIPLE_BGS@+    | CBIFICssOpacity+      -- ^ @CSS_OPACITY@+    | CBIFICssReflections+      -- ^ @CSS_REFLECTIONS@+    | CBIFICssRgba+      -- ^ @CSS_RGBA@+    | CBIFICssTextShadow+      -- ^ @CSS_TEXT_SHADOW@+    | CBIFICssTransforms+      -- ^ @CSS_TRANSFORMS@+    | CBIFICssTRANSFORMS3D+      -- ^ @CSS_TRANSFORMS3D@+    | CBIFICssTransitions+      -- ^ @CSS_TRANSITIONS@+    | CBIFIDragAndDrop+      -- ^ @DRAG_AND_DROP@+    | CBIFIGeoLocation+      -- ^ @GEO_LOCATION@+    | CBIFIHashChange+      -- ^ @HASH_CHANGE@+    | CBIFIHistory+      -- ^ @HISTORY@+    | CBIFIIndexedDB+      -- ^ @INDEXED_DB@+    | CBIFIInlineSvg+      -- ^ @INLINE_SVG@+    | CBIFIInputAttrAutocomplete+      -- ^ @INPUT_ATTR_AUTOCOMPLETE@+    | CBIFIInputAttrAutofocus+      -- ^ @INPUT_ATTR_AUTOFOCUS@+    | CBIFIInputAttrList+      -- ^ @INPUT_ATTR_LIST@+    | CBIFIInputAttrMax+      -- ^ @INPUT_ATTR_MAX@+    | CBIFIInputAttrMin+      -- ^ @INPUT_ATTR_MIN@+    | CBIFIInputAttrMultiple+      -- ^ @INPUT_ATTR_MULTIPLE@+    | CBIFIInputAttrPattern+      -- ^ @INPUT_ATTR_PATTERN@+    | CBIFIInputAttrPlaceholder+      -- ^ @INPUT_ATTR_PLACEHOLDER@+    | CBIFIInputAttrRequired+      -- ^ @INPUT_ATTR_REQUIRED@+    | CBIFIInputAttrStep+      -- ^ @INPUT_ATTR_STEP@+    | CBIFIInputTypeColor+      -- ^ @INPUT_TYPE_COLOR@+    | CBIFIInputTypeDate+      -- ^ @INPUT_TYPE_DATE@+    | CBIFIInputTypeDatetime+      -- ^ @INPUT_TYPE_DATETIME@+    | CBIFIInputTypeDatetimeLocal+      -- ^ @INPUT_TYPE_DATETIME_LOCAL@+    | CBIFIInputTypeEmail+      -- ^ @INPUT_TYPE_EMAIL@+    | CBIFIInputTypeMonth+      -- ^ @INPUT_TYPE_MONTH@+    | CBIFIInputTypeNumber+      -- ^ @INPUT_TYPE_NUMBER@+    | CBIFIInputTypeRange+      -- ^ @INPUT_TYPE_RANGE@+    | CBIFIInputTypeSearch+      -- ^ @INPUT_TYPE_SEARCH@+    | CBIFIInputTypeTel+      -- ^ @INPUT_TYPE_TEL@+    | CBIFIInputTypeTime+      -- ^ @INPUT_TYPE_TIME@+    | CBIFIInputTypeURL+      -- ^ @INPUT_TYPE_URL@+    | CBIFIInputTypeWeek+      -- ^ @INPUT_TYPE_WEEK@+    | CBIFILocalStorage+      -- ^ @LOCAL_STORAGE@+    | CBIFIPostMessage+      -- ^ @POST_MESSAGE@+    | CBIFISessionStorage+      -- ^ @SESSION_STORAGE@+    | CBIFISmil+      -- ^ @SMIL@+    | CBIFISvgClipPaths+      -- ^ @SVG_CLIP_PATHS@+    | CBIFISvgFeImage+      -- ^ @SVG_FE_IMAGE@+    | CBIFISvgFilters+      -- ^ @SVG_FILTERS@+    | CBIFISvgHref+      -- ^ @SVG_HREF@+    | CBIFITouch+      -- ^ @TOUCH@+    | CBIFIVideo+      -- ^ @VIDEO@+    | CBIFIWebgl+      -- ^ @WEBGL@+    | CBIFIWebSockets+      -- ^ @WEB_SOCKETS@+    | CBIFIWebSQLDatabase+      -- ^ @WEB_SQL_DATABASE@+    | CBIFIWebWorkers+      -- ^ @WEB_WORKERS@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeBackupImageFeaturesItem++instance FromHttpApiData CreativeBackupImageFeaturesItem where+    parseQueryParam = \case+        "APPLICATION_CACHE" -> Right CBIFIApplicationCache+        "AUDIO" -> Right CBIFIAudio+        "CANVAS" -> Right CBIFICanvas+        "CANVAS_TEXT" -> Right CBIFICanvasText+        "CSS_ANIMATIONS" -> Right CBIFICssAnimations+        "CSS_BACKGROUND_SIZE" -> Right CBIFICssBackgRoundSize+        "CSS_BORDER_IMAGE" -> Right CBIFICssBOrderImage+        "CSS_BORDER_RADIUS" -> Right CBIFICssBOrderRadius+        "CSS_BOX_SHADOW" -> Right CBIFICssBoxShadow+        "CSS_COLUMNS" -> Right CBIFICssColumns+        "CSS_FLEX_BOX" -> Right CBIFICssFlexBox+        "CSS_FONT_FACE" -> Right CBIFICssFontFace+        "CSS_GENERATED_CONTENT" -> Right CBIFICssGeneratedContent+        "CSS_GRADIENTS" -> Right CBIFICssGradients+        "CSS_HSLA" -> Right CBIFICssHsla+        "CSS_MULTIPLE_BGS" -> Right CBIFICssMultipleBgs+        "CSS_OPACITY" -> Right CBIFICssOpacity+        "CSS_REFLECTIONS" -> Right CBIFICssReflections+        "CSS_RGBA" -> Right CBIFICssRgba+        "CSS_TEXT_SHADOW" -> Right CBIFICssTextShadow+        "CSS_TRANSFORMS" -> Right CBIFICssTransforms+        "CSS_TRANSFORMS3D" -> Right CBIFICssTRANSFORMS3D+        "CSS_TRANSITIONS" -> Right CBIFICssTransitions+        "DRAG_AND_DROP" -> Right CBIFIDragAndDrop+        "GEO_LOCATION" -> Right CBIFIGeoLocation+        "HASH_CHANGE" -> Right CBIFIHashChange+        "HISTORY" -> Right CBIFIHistory+        "INDEXED_DB" -> Right CBIFIIndexedDB+        "INLINE_SVG" -> Right CBIFIInlineSvg+        "INPUT_ATTR_AUTOCOMPLETE" -> Right CBIFIInputAttrAutocomplete+        "INPUT_ATTR_AUTOFOCUS" -> Right CBIFIInputAttrAutofocus+        "INPUT_ATTR_LIST" -> Right CBIFIInputAttrList+        "INPUT_ATTR_MAX" -> Right CBIFIInputAttrMax+        "INPUT_ATTR_MIN" -> Right CBIFIInputAttrMin+        "INPUT_ATTR_MULTIPLE" -> Right CBIFIInputAttrMultiple+        "INPUT_ATTR_PATTERN" -> Right CBIFIInputAttrPattern+        "INPUT_ATTR_PLACEHOLDER" -> Right CBIFIInputAttrPlaceholder+        "INPUT_ATTR_REQUIRED" -> Right CBIFIInputAttrRequired+        "INPUT_ATTR_STEP" -> Right CBIFIInputAttrStep+        "INPUT_TYPE_COLOR" -> Right CBIFIInputTypeColor+        "INPUT_TYPE_DATE" -> Right CBIFIInputTypeDate+        "INPUT_TYPE_DATETIME" -> Right CBIFIInputTypeDatetime+        "INPUT_TYPE_DATETIME_LOCAL" -> Right CBIFIInputTypeDatetimeLocal+        "INPUT_TYPE_EMAIL" -> Right CBIFIInputTypeEmail+        "INPUT_TYPE_MONTH" -> Right CBIFIInputTypeMonth+        "INPUT_TYPE_NUMBER" -> Right CBIFIInputTypeNumber+        "INPUT_TYPE_RANGE" -> Right CBIFIInputTypeRange+        "INPUT_TYPE_SEARCH" -> Right CBIFIInputTypeSearch+        "INPUT_TYPE_TEL" -> Right CBIFIInputTypeTel+        "INPUT_TYPE_TIME" -> Right CBIFIInputTypeTime+        "INPUT_TYPE_URL" -> Right CBIFIInputTypeURL+        "INPUT_TYPE_WEEK" -> Right CBIFIInputTypeWeek+        "LOCAL_STORAGE" -> Right CBIFILocalStorage+        "POST_MESSAGE" -> Right CBIFIPostMessage+        "SESSION_STORAGE" -> Right CBIFISessionStorage+        "SMIL" -> Right CBIFISmil+        "SVG_CLIP_PATHS" -> Right CBIFISvgClipPaths+        "SVG_FE_IMAGE" -> Right CBIFISvgFeImage+        "SVG_FILTERS" -> Right CBIFISvgFilters+        "SVG_HREF" -> Right CBIFISvgHref+        "TOUCH" -> Right CBIFITouch+        "VIDEO" -> Right CBIFIVideo+        "WEBGL" -> Right CBIFIWebgl+        "WEB_SOCKETS" -> Right CBIFIWebSockets+        "WEB_SQL_DATABASE" -> Right CBIFIWebSQLDatabase+        "WEB_WORKERS" -> Right CBIFIWebWorkers+        x -> Left ("Unable to parse CreativeBackupImageFeaturesItem from: " <> x)++instance ToHttpApiData CreativeBackupImageFeaturesItem where+    toQueryParam = \case+        CBIFIApplicationCache -> "APPLICATION_CACHE"+        CBIFIAudio -> "AUDIO"+        CBIFICanvas -> "CANVAS"+        CBIFICanvasText -> "CANVAS_TEXT"+        CBIFICssAnimations -> "CSS_ANIMATIONS"+        CBIFICssBackgRoundSize -> "CSS_BACKGROUND_SIZE"+        CBIFICssBOrderImage -> "CSS_BORDER_IMAGE"+        CBIFICssBOrderRadius -> "CSS_BORDER_RADIUS"+        CBIFICssBoxShadow -> "CSS_BOX_SHADOW"+        CBIFICssColumns -> "CSS_COLUMNS"+        CBIFICssFlexBox -> "CSS_FLEX_BOX"+        CBIFICssFontFace -> "CSS_FONT_FACE"+        CBIFICssGeneratedContent -> "CSS_GENERATED_CONTENT"+        CBIFICssGradients -> "CSS_GRADIENTS"+        CBIFICssHsla -> "CSS_HSLA"+        CBIFICssMultipleBgs -> "CSS_MULTIPLE_BGS"+        CBIFICssOpacity -> "CSS_OPACITY"+        CBIFICssReflections -> "CSS_REFLECTIONS"+        CBIFICssRgba -> "CSS_RGBA"+        CBIFICssTextShadow -> "CSS_TEXT_SHADOW"+        CBIFICssTransforms -> "CSS_TRANSFORMS"+        CBIFICssTRANSFORMS3D -> "CSS_TRANSFORMS3D"+        CBIFICssTransitions -> "CSS_TRANSITIONS"+        CBIFIDragAndDrop -> "DRAG_AND_DROP"+        CBIFIGeoLocation -> "GEO_LOCATION"+        CBIFIHashChange -> "HASH_CHANGE"+        CBIFIHistory -> "HISTORY"+        CBIFIIndexedDB -> "INDEXED_DB"+        CBIFIInlineSvg -> "INLINE_SVG"+        CBIFIInputAttrAutocomplete -> "INPUT_ATTR_AUTOCOMPLETE"+        CBIFIInputAttrAutofocus -> "INPUT_ATTR_AUTOFOCUS"+        CBIFIInputAttrList -> "INPUT_ATTR_LIST"+        CBIFIInputAttrMax -> "INPUT_ATTR_MAX"+        CBIFIInputAttrMin -> "INPUT_ATTR_MIN"+        CBIFIInputAttrMultiple -> "INPUT_ATTR_MULTIPLE"+        CBIFIInputAttrPattern -> "INPUT_ATTR_PATTERN"+        CBIFIInputAttrPlaceholder -> "INPUT_ATTR_PLACEHOLDER"+        CBIFIInputAttrRequired -> "INPUT_ATTR_REQUIRED"+        CBIFIInputAttrStep -> "INPUT_ATTR_STEP"+        CBIFIInputTypeColor -> "INPUT_TYPE_COLOR"+        CBIFIInputTypeDate -> "INPUT_TYPE_DATE"+        CBIFIInputTypeDatetime -> "INPUT_TYPE_DATETIME"+        CBIFIInputTypeDatetimeLocal -> "INPUT_TYPE_DATETIME_LOCAL"+        CBIFIInputTypeEmail -> "INPUT_TYPE_EMAIL"+        CBIFIInputTypeMonth -> "INPUT_TYPE_MONTH"+        CBIFIInputTypeNumber -> "INPUT_TYPE_NUMBER"+        CBIFIInputTypeRange -> "INPUT_TYPE_RANGE"+        CBIFIInputTypeSearch -> "INPUT_TYPE_SEARCH"+        CBIFIInputTypeTel -> "INPUT_TYPE_TEL"+        CBIFIInputTypeTime -> "INPUT_TYPE_TIME"+        CBIFIInputTypeURL -> "INPUT_TYPE_URL"+        CBIFIInputTypeWeek -> "INPUT_TYPE_WEEK"+        CBIFILocalStorage -> "LOCAL_STORAGE"+        CBIFIPostMessage -> "POST_MESSAGE"+        CBIFISessionStorage -> "SESSION_STORAGE"+        CBIFISmil -> "SMIL"+        CBIFISvgClipPaths -> "SVG_CLIP_PATHS"+        CBIFISvgFeImage -> "SVG_FE_IMAGE"+        CBIFISvgFilters -> "SVG_FILTERS"+        CBIFISvgHref -> "SVG_HREF"+        CBIFITouch -> "TOUCH"+        CBIFIVideo -> "VIDEO"+        CBIFIWebgl -> "WEBGL"+        CBIFIWebSockets -> "WEB_SOCKETS"+        CBIFIWebSQLDatabase -> "WEB_SQL_DATABASE"+        CBIFIWebWorkers -> "WEB_WORKERS"++instance FromJSON CreativeBackupImageFeaturesItem where+    parseJSON = parseJSONText "CreativeBackupImageFeaturesItem"++instance ToJSON CreativeBackupImageFeaturesItem where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data AdvertisersListSortOrder+    = ALSOAscending+      -- ^ @ASCENDING@+    | ALSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AdvertisersListSortOrder++instance FromHttpApiData AdvertisersListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right ALSOAscending+        "DESCENDING" -> Right ALSODescending+        x -> Left ("Unable to parse AdvertisersListSortOrder from: " <> x)++instance ToHttpApiData AdvertisersListSortOrder where+    toQueryParam = \case+        ALSOAscending -> "ASCENDING"+        ALSODescending -> "DESCENDING"++instance FromJSON AdvertisersListSortOrder where+    parseJSON = parseJSONText "AdvertisersListSortOrder"++instance ToJSON AdvertisersListSortOrder where+    toJSON = toJSONText++-- | Field by which to sort the list.+data CreativeFieldsListSortField+    = CFLSFID+      -- ^ @ID@+    | CFLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeFieldsListSortField++instance FromHttpApiData CreativeFieldsListSortField where+    parseQueryParam = \case+        "ID" -> Right CFLSFID+        "NAME" -> Right CFLSFName+        x -> Left ("Unable to parse CreativeFieldsListSortField from: " <> x)++instance ToHttpApiData CreativeFieldsListSortField where+    toQueryParam = \case+        CFLSFID -> "ID"+        CFLSFName -> "NAME"++instance FromJSON CreativeFieldsListSortField where+    parseJSON = parseJSONText "CreativeFieldsListSortField"++instance ToJSON CreativeFieldsListSortField where+    toJSON = toJSONText++-- | Variable name in the tag. This is a required field.+data UserDefinedVariableConfigurationVariableType+    = UDVCVTU1+      -- ^ @U1@+    | UDVCVTU10+      -- ^ @U10@+    | UDVCVTU11+      -- ^ @U11@+    | UDVCVTU12+      -- ^ @U12@+    | UDVCVTU13+      -- ^ @U13@+    | UDVCVTU14+      -- ^ @U14@+    | UDVCVTU15+      -- ^ @U15@+    | UDVCVTU16+      -- ^ @U16@+    | UDVCVTU17+      -- ^ @U17@+    | UDVCVTU18+      -- ^ @U18@+    | UDVCVTU19+      -- ^ @U19@+    | UDVCVTU2+      -- ^ @U2@+    | UDVCVTU20+      -- ^ @U20@+    | UDVCVTU3+      -- ^ @U3@+    | UDVCVTU4+      -- ^ @U4@+    | UDVCVTU5+      -- ^ @U5@+    | UDVCVTU6+      -- ^ @U6@+    | UDVCVTU7+      -- ^ @U7@+    | UDVCVTU8+      -- ^ @U8@+    | UDVCVTU9+      -- ^ @U9@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable UserDefinedVariableConfigurationVariableType++instance FromHttpApiData UserDefinedVariableConfigurationVariableType where+    parseQueryParam = \case+        "U1" -> Right UDVCVTU1+        "U10" -> Right UDVCVTU10+        "U11" -> Right UDVCVTU11+        "U12" -> Right UDVCVTU12+        "U13" -> Right UDVCVTU13+        "U14" -> Right UDVCVTU14+        "U15" -> Right UDVCVTU15+        "U16" -> Right UDVCVTU16+        "U17" -> Right UDVCVTU17+        "U18" -> Right UDVCVTU18+        "U19" -> Right UDVCVTU19+        "U2" -> Right UDVCVTU2+        "U20" -> Right UDVCVTU20+        "U3" -> Right UDVCVTU3+        "U4" -> Right UDVCVTU4+        "U5" -> Right UDVCVTU5+        "U6" -> Right UDVCVTU6+        "U7" -> Right UDVCVTU7+        "U8" -> Right UDVCVTU8+        "U9" -> Right UDVCVTU9+        x -> Left ("Unable to parse UserDefinedVariableConfigurationVariableType from: " <> x)++instance ToHttpApiData UserDefinedVariableConfigurationVariableType where+    toQueryParam = \case+        UDVCVTU1 -> "U1"+        UDVCVTU10 -> "U10"+        UDVCVTU11 -> "U11"+        UDVCVTU12 -> "U12"+        UDVCVTU13 -> "U13"+        UDVCVTU14 -> "U14"+        UDVCVTU15 -> "U15"+        UDVCVTU16 -> "U16"+        UDVCVTU17 -> "U17"+        UDVCVTU18 -> "U18"+        UDVCVTU19 -> "U19"+        UDVCVTU2 -> "U2"+        UDVCVTU20 -> "U20"+        UDVCVTU3 -> "U3"+        UDVCVTU4 -> "U4"+        UDVCVTU5 -> "U5"+        UDVCVTU6 -> "U6"+        UDVCVTU7 -> "U7"+        UDVCVTU8 -> "U8"+        UDVCVTU9 -> "U9"++instance FromJSON UserDefinedVariableConfigurationVariableType where+    parseJSON = parseJSONText "UserDefinedVariableConfigurationVariableType"++instance ToJSON UserDefinedVariableConfigurationVariableType where+    toJSON = toJSONText++-- | Position in the browser where the window will open.+data FsCommandPositionOption+    = Centered+      -- ^ @CENTERED@+    | DistanceFromTopLeftCorner+      -- ^ @DISTANCE_FROM_TOP_LEFT_CORNER@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FsCommandPositionOption++instance FromHttpApiData FsCommandPositionOption where+    parseQueryParam = \case+        "CENTERED" -> Right Centered+        "DISTANCE_FROM_TOP_LEFT_CORNER" -> Right DistanceFromTopLeftCorner+        x -> Left ("Unable to parse FsCommandPositionOption from: " <> x)++instance ToHttpApiData FsCommandPositionOption where+    toQueryParam = \case+        Centered -> "CENTERED"+        DistanceFromTopLeftCorner -> "DISTANCE_FROM_TOP_LEFT_CORNER"++instance FromJSON FsCommandPositionOption where+    parseJSON = parseJSONText "FsCommandPositionOption"++instance ToJSON FsCommandPositionOption where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data UserRolesListSortOrder+    = URLSOAscending+      -- ^ @ASCENDING@+    | URLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable UserRolesListSortOrder++instance FromHttpApiData UserRolesListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right URLSOAscending+        "DESCENDING" -> Right URLSODescending+        x -> Left ("Unable to parse UserRolesListSortOrder from: " <> x)++instance ToHttpApiData UserRolesListSortOrder where+    toQueryParam = \case+        URLSOAscending -> "ASCENDING"+        URLSODescending -> "DESCENDING"++instance FromJSON UserRolesListSortOrder where+    parseJSON = parseJSONText "UserRolesListSortOrder"++instance ToJSON UserRolesListSortOrder where+    toJSON = toJSONText++-- | Select only placements that are associated with these compatibilities.+-- DISPLAY and DISPLAY_INTERSTITIAL refer to rendering either on desktop or+-- on mobile devices for regular or interstitial ads respectively. APP and+-- APP_INTERSTITIAL are for rendering in mobile apps. IN_STREAM_VIDEO+-- refers to rendering in in-stream video ads developed with the VAST+-- standard.+data PlacementsListCompatibilities+    = PLCApp+      -- ^ @APP@+    | PLCAppInterstitial+      -- ^ @APP_INTERSTITIAL@+    | PLCDisplay+      -- ^ @DISPLAY@+    | PLCDisplayInterstitial+      -- ^ @DISPLAY_INTERSTITIAL@+    | PLCInStreamVideo+      -- ^ @IN_STREAM_VIDEO@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PlacementsListCompatibilities++instance FromHttpApiData PlacementsListCompatibilities where+    parseQueryParam = \case+        "APP" -> Right PLCApp+        "APP_INTERSTITIAL" -> Right PLCAppInterstitial+        "DISPLAY" -> Right PLCDisplay+        "DISPLAY_INTERSTITIAL" -> Right PLCDisplayInterstitial+        "IN_STREAM_VIDEO" -> Right PLCInStreamVideo+        x -> Left ("Unable to parse PlacementsListCompatibilities from: " <> x)++instance ToHttpApiData PlacementsListCompatibilities where+    toQueryParam = \case+        PLCApp -> "APP"+        PLCAppInterstitial -> "APP_INTERSTITIAL"+        PLCDisplay -> "DISPLAY"+        PLCDisplayInterstitial -> "DISPLAY_INTERSTITIAL"+        PLCInStreamVideo -> "IN_STREAM_VIDEO"++instance FromJSON PlacementsListCompatibilities where+    parseJSON = parseJSONText "PlacementsListCompatibilities"++instance ToJSON PlacementsListCompatibilities where+    toJSON = toJSONText++-- | Field by which to sort the list.+data OrderDocumentsListSortField+    = ODLSFID+      -- ^ @ID@+    | ODLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable OrderDocumentsListSortField++instance FromHttpApiData OrderDocumentsListSortField where+    parseQueryParam = \case+        "ID" -> Right ODLSFID+        "NAME" -> Right ODLSFName+        x -> Left ("Unable to parse OrderDocumentsListSortField from: " <> x)++instance ToHttpApiData OrderDocumentsListSortField where+    toQueryParam = \case+        ODLSFID -> "ID"+        ODLSFName -> "NAME"++instance FromJSON OrderDocumentsListSortField where+    parseJSON = parseJSONText "OrderDocumentsListSortField"++instance ToJSON OrderDocumentsListSortField where+    toJSON = toJSONText++data CreativeCompatibilityItem+    = CCIApp+      -- ^ @APP@+    | CCIAppInterstitial+      -- ^ @APP_INTERSTITIAL@+    | CCIDisplay+      -- ^ @DISPLAY@+    | CCIDisplayInterstitial+      -- ^ @DISPLAY_INTERSTITIAL@+    | CCIInStreamVideo+      -- ^ @IN_STREAM_VIDEO@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeCompatibilityItem++instance FromHttpApiData CreativeCompatibilityItem where+    parseQueryParam = \case+        "APP" -> Right CCIApp+        "APP_INTERSTITIAL" -> Right CCIAppInterstitial+        "DISPLAY" -> Right CCIDisplay+        "DISPLAY_INTERSTITIAL" -> Right CCIDisplayInterstitial+        "IN_STREAM_VIDEO" -> Right CCIInStreamVideo+        x -> Left ("Unable to parse CreativeCompatibilityItem from: " <> x)++instance ToHttpApiData CreativeCompatibilityItem where+    toQueryParam = \case+        CCIApp -> "APP"+        CCIAppInterstitial -> "APP_INTERSTITIAL"+        CCIDisplay -> "DISPLAY"+        CCIDisplayInterstitial -> "DISPLAY_INTERSTITIAL"+        CCIInStreamVideo -> "IN_STREAM_VIDEO"++instance FromJSON CreativeCompatibilityItem where+    parseJSON = parseJSONText "CreativeCompatibilityItem"++instance ToJSON CreativeCompatibilityItem where+    toJSON = toJSONText++-- | The type of delivery for the owner to receive, if enabled.+data ReportDeliveryEmailOwnerDeliveryType+    = RDEODTAttachment+      -- ^ @ATTACHMENT@+    | RDEODTLink+      -- ^ @LINK@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ReportDeliveryEmailOwnerDeliveryType++instance FromHttpApiData ReportDeliveryEmailOwnerDeliveryType where+    parseQueryParam = \case+        "ATTACHMENT" -> Right RDEODTAttachment+        "LINK" -> Right RDEODTLink+        x -> Left ("Unable to parse ReportDeliveryEmailOwnerDeliveryType from: " <> x)++instance ToHttpApiData ReportDeliveryEmailOwnerDeliveryType where+    toQueryParam = \case+        RDEODTAttachment -> "ATTACHMENT"+        RDEODTLink -> "LINK"++instance FromJSON ReportDeliveryEmailOwnerDeliveryType where+    parseJSON = parseJSONText "ReportDeliveryEmailOwnerDeliveryType"++instance ToJSON ReportDeliveryEmailOwnerDeliveryType where+    toJSON = toJSONText++-- | Site contact type.+data SiteContactContactType+    = SalesPerson+      -- ^ @SALES_PERSON@+    | Trafficker+      -- ^ @TRAFFICKER@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable SiteContactContactType++instance FromHttpApiData SiteContactContactType where+    parseQueryParam = \case+        "SALES_PERSON" -> Right SalesPerson+        "TRAFFICKER" -> Right Trafficker+        x -> Left ("Unable to parse SiteContactContactType from: " <> x)++instance ToHttpApiData SiteContactContactType where+    toQueryParam = \case+        SalesPerson -> "SALES_PERSON"+        Trafficker -> "TRAFFICKER"++instance FromJSON SiteContactContactType where+    parseJSON = parseJSONText "SiteContactContactType"++instance ToJSON SiteContactContactType where+    toJSON = toJSONText++-- | Order of sorted results, default is \'DESCENDING\'.+data ReportsListSortOrder+    = RLSOAscending+      -- ^ @ASCENDING@+      -- Ascending order.+    | RLSODescending+      -- ^ @DESCENDING@+      -- Descending order.+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ReportsListSortOrder++instance FromHttpApiData ReportsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right RLSOAscending+        "DESCENDING" -> Right RLSODescending+        x -> Left ("Unable to parse ReportsListSortOrder from: " <> x)++instance ToHttpApiData ReportsListSortOrder where+    toQueryParam = \case+        RLSOAscending -> "ASCENDING"+        RLSODescending -> "DESCENDING"++instance FromJSON ReportsListSortOrder where+    parseJSON = parseJSONText "ReportsListSortOrder"++instance ToJSON ReportsListSortOrder where+    toJSON = toJSONText++-- | Field by which to sort the list.+data TargetableRemarketingListsListSortField+    = TRLLSFID+      -- ^ @ID@+    | TRLLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable TargetableRemarketingListsListSortField++instance FromHttpApiData TargetableRemarketingListsListSortField where+    parseQueryParam = \case+        "ID" -> Right TRLLSFID+        "NAME" -> Right TRLLSFName+        x -> Left ("Unable to parse TargetableRemarketingListsListSortField from: " <> x)++instance ToHttpApiData TargetableRemarketingListsListSortField where+    toQueryParam = \case+        TRLLSFID -> "ID"+        TRLLSFName -> "NAME"++instance FromJSON TargetableRemarketingListsListSortField where+    parseJSON = parseJSONText "TargetableRemarketingListsListSortField"++instance ToJSON TargetableRemarketingListsListSortField where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data CampaignsListSortOrder+    = CLSOAscending+      -- ^ @ASCENDING@+    | CLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CampaignsListSortOrder++instance FromHttpApiData CampaignsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right CLSOAscending+        "DESCENDING" -> Right CLSODescending+        x -> Left ("Unable to parse CampaignsListSortOrder from: " <> x)++instance ToHttpApiData CampaignsListSortOrder where+    toQueryParam = \case+        CLSOAscending -> "ASCENDING"+        CLSODescending -> "DESCENDING"++instance FromJSON CampaignsListSortOrder where+    parseJSON = parseJSONText "CampaignsListSortOrder"++instance ToJSON CampaignsListSortOrder where+    toJSON = toJSONText++-- | Select only floodlight activity groups with the specified floodlight+-- activity group type.+data FloodlightActivityGroupsListType+    = Counter+      -- ^ @COUNTER@+    | Sale+      -- ^ @SALE@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FloodlightActivityGroupsListType++instance FromHttpApiData FloodlightActivityGroupsListType where+    parseQueryParam = \case+        "COUNTER" -> Right Counter+        "SALE" -> Right Sale+        x -> Left ("Unable to parse FloodlightActivityGroupsListType from: " <> x)++instance ToHttpApiData FloodlightActivityGroupsListType where+    toQueryParam = \case+        Counter -> "COUNTER"+        Sale -> "SALE"++instance FromJSON FloodlightActivityGroupsListType where+    parseJSON = parseJSONText "FloodlightActivityGroupsListType"++instance ToJSON FloodlightActivityGroupsListType where+    toJSON = toJSONText++-- | Day that will be counted as the first day of the week in reports. This+-- is a required field.+data FloodlightConfigurationFirstDayOfWeek+    = Monday+      -- ^ @MONDAY@+    | Sunday+      -- ^ @SUNDAY@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FloodlightConfigurationFirstDayOfWeek++instance FromHttpApiData FloodlightConfigurationFirstDayOfWeek where+    parseQueryParam = \case+        "MONDAY" -> Right Monday+        "SUNDAY" -> Right Sunday+        x -> Left ("Unable to parse FloodlightConfigurationFirstDayOfWeek from: " <> x)++instance ToHttpApiData FloodlightConfigurationFirstDayOfWeek where+    toQueryParam = \case+        Monday -> "MONDAY"+        Sunday -> "SUNDAY"++instance FromJSON FloodlightConfigurationFirstDayOfWeek where+    parseJSON = parseJSONText "FloodlightConfigurationFirstDayOfWeek"++instance ToJSON FloodlightConfigurationFirstDayOfWeek where+    toJSON = toJSONText++-- | Serving priority of an ad, with respect to other ads. The lower the+-- priority number, the greater the priority with which it is served.+data DeliverySchedulePriority+    = AdPriority01+      -- ^ @AD_PRIORITY_01@+    | AdPriority02+      -- ^ @AD_PRIORITY_02@+    | AdPriority03+      -- ^ @AD_PRIORITY_03@+    | AdPriority04+      -- ^ @AD_PRIORITY_04@+    | AdPriority05+      -- ^ @AD_PRIORITY_05@+    | AdPriority06+      -- ^ @AD_PRIORITY_06@+    | AdPriority07+      -- ^ @AD_PRIORITY_07@+    | AdPriority08+      -- ^ @AD_PRIORITY_08@+    | AdPriority09+      -- ^ @AD_PRIORITY_09@+    | AdPriority10+      -- ^ @AD_PRIORITY_10@+    | AdPriority11+      -- ^ @AD_PRIORITY_11@+    | AdPriority12+      -- ^ @AD_PRIORITY_12@+    | AdPriority13+      -- ^ @AD_PRIORITY_13@+    | AdPriority14+      -- ^ @AD_PRIORITY_14@+    | AdPriority15+      -- ^ @AD_PRIORITY_15@+    | AdPriority16+      -- ^ @AD_PRIORITY_16@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable DeliverySchedulePriority++instance FromHttpApiData DeliverySchedulePriority where+    parseQueryParam = \case+        "AD_PRIORITY_01" -> Right AdPriority01+        "AD_PRIORITY_02" -> Right AdPriority02+        "AD_PRIORITY_03" -> Right AdPriority03+        "AD_PRIORITY_04" -> Right AdPriority04+        "AD_PRIORITY_05" -> Right AdPriority05+        "AD_PRIORITY_06" -> Right AdPriority06+        "AD_PRIORITY_07" -> Right AdPriority07+        "AD_PRIORITY_08" -> Right AdPriority08+        "AD_PRIORITY_09" -> Right AdPriority09+        "AD_PRIORITY_10" -> Right AdPriority10+        "AD_PRIORITY_11" -> Right AdPriority11+        "AD_PRIORITY_12" -> Right AdPriority12+        "AD_PRIORITY_13" -> Right AdPriority13+        "AD_PRIORITY_14" -> Right AdPriority14+        "AD_PRIORITY_15" -> Right AdPriority15+        "AD_PRIORITY_16" -> Right AdPriority16+        x -> Left ("Unable to parse DeliverySchedulePriority from: " <> x)++instance ToHttpApiData DeliverySchedulePriority where+    toQueryParam = \case+        AdPriority01 -> "AD_PRIORITY_01"+        AdPriority02 -> "AD_PRIORITY_02"+        AdPriority03 -> "AD_PRIORITY_03"+        AdPriority04 -> "AD_PRIORITY_04"+        AdPriority05 -> "AD_PRIORITY_05"+        AdPriority06 -> "AD_PRIORITY_06"+        AdPriority07 -> "AD_PRIORITY_07"+        AdPriority08 -> "AD_PRIORITY_08"+        AdPriority09 -> "AD_PRIORITY_09"+        AdPriority10 -> "AD_PRIORITY_10"+        AdPriority11 -> "AD_PRIORITY_11"+        AdPriority12 -> "AD_PRIORITY_12"+        AdPriority13 -> "AD_PRIORITY_13"+        AdPriority14 -> "AD_PRIORITY_14"+        AdPriority15 -> "AD_PRIORITY_15"+        AdPriority16 -> "AD_PRIORITY_16"++instance FromJSON DeliverySchedulePriority where+    parseJSON = parseJSONText "DeliverySchedulePriority"++instance ToJSON DeliverySchedulePriority where+    toJSON = toJSONText++-- | Select only floodlight activities with the specified floodlight activity+-- group type.+data FloodlightActivitiesListFloodlightActivityGroupType+    = FALFAGTCounter+      -- ^ @COUNTER@+    | FALFAGTSale+      -- ^ @SALE@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FloodlightActivitiesListFloodlightActivityGroupType++instance FromHttpApiData FloodlightActivitiesListFloodlightActivityGroupType where+    parseQueryParam = \case+        "COUNTER" -> Right FALFAGTCounter+        "SALE" -> Right FALFAGTSale+        x -> Left ("Unable to parse FloodlightActivitiesListFloodlightActivityGroupType from: " <> x)++instance ToHttpApiData FloodlightActivitiesListFloodlightActivityGroupType where+    toQueryParam = \case+        FALFAGTCounter -> "COUNTER"+        FALFAGTSale -> "SALE"++instance FromJSON FloodlightActivitiesListFloodlightActivityGroupType where+    parseJSON = parseJSONText "FloodlightActivitiesListFloodlightActivityGroupType"++instance ToJSON FloodlightActivitiesListFloodlightActivityGroupType where+    toJSON = toJSONText++-- | Source application where creative was authored. Presently, only DBM+-- authored creatives will have this field set. Applicable to all creative+-- types.+data CreativeAuthoringSource+    = CreativeAuthoringSourceDBm+      -- ^ @CREATIVE_AUTHORING_SOURCE_DBM@+    | CreativeAuthoringSourceDcm+      -- ^ @CREATIVE_AUTHORING_SOURCE_DCM@+    | CreativeAuthoringSourceStudio+      -- ^ @CREATIVE_AUTHORING_SOURCE_STUDIO@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeAuthoringSource++instance FromHttpApiData CreativeAuthoringSource where+    parseQueryParam = \case+        "CREATIVE_AUTHORING_SOURCE_DBM" -> Right CreativeAuthoringSourceDBm+        "CREATIVE_AUTHORING_SOURCE_DCM" -> Right CreativeAuthoringSourceDcm+        "CREATIVE_AUTHORING_SOURCE_STUDIO" -> Right CreativeAuthoringSourceStudio+        x -> Left ("Unable to parse CreativeAuthoringSource from: " <> x)++instance ToHttpApiData CreativeAuthoringSource where+    toQueryParam = \case+        CreativeAuthoringSourceDBm -> "CREATIVE_AUTHORING_SOURCE_DBM"+        CreativeAuthoringSourceDcm -> "CREATIVE_AUTHORING_SOURCE_DCM"+        CreativeAuthoringSourceStudio -> "CREATIVE_AUTHORING_SOURCE_STUDIO"++instance FromJSON CreativeAuthoringSource where+    parseJSON = parseJSONText "CreativeAuthoringSource"++instance ToJSON CreativeAuthoringSource where+    toJSON = toJSONText++data FloodlightConfigurationStandardVariableTypesItem+    = Num+      -- ^ @NUM@+    | Ord+      -- ^ @ORD@+    | Tran+      -- ^ @TRAN@+    | U+      -- ^ @U@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FloodlightConfigurationStandardVariableTypesItem++instance FromHttpApiData FloodlightConfigurationStandardVariableTypesItem where+    parseQueryParam = \case+        "NUM" -> Right Num+        "ORD" -> Right Ord+        "TRAN" -> Right Tran+        "U" -> Right U+        x -> Left ("Unable to parse FloodlightConfigurationStandardVariableTypesItem from: " <> x)++instance ToHttpApiData FloodlightConfigurationStandardVariableTypesItem where+    toQueryParam = \case+        Num -> "NUM"+        Ord -> "ORD"+        Tran -> "TRAN"+        U -> "U"++instance FromJSON FloodlightConfigurationStandardVariableTypesItem where+    parseJSON = parseJSONText "FloodlightConfigurationStandardVariableTypesItem"++instance ToJSON FloodlightConfigurationStandardVariableTypesItem where+    toJSON = toJSONText++-- | Payment source for this placement. This is a required field that is+-- read-only after insertion.+data PlacementPaymentSource+    = PPSPlacementAgencyPaid+      -- ^ @PLACEMENT_AGENCY_PAID@+    | PPSPlacementPublisherPaid+      -- ^ @PLACEMENT_PUBLISHER_PAID@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PlacementPaymentSource++instance FromHttpApiData PlacementPaymentSource where+    parseQueryParam = \case+        "PLACEMENT_AGENCY_PAID" -> Right PPSPlacementAgencyPaid+        "PLACEMENT_PUBLISHER_PAID" -> Right PPSPlacementPublisherPaid+        x -> Left ("Unable to parse PlacementPaymentSource from: " <> x)++instance ToHttpApiData PlacementPaymentSource where+    toQueryParam = \case+        PPSPlacementAgencyPaid -> "PLACEMENT_AGENCY_PAID"+        PPSPlacementPublisherPaid -> "PLACEMENT_PUBLISHER_PAID"++instance FromJSON PlacementPaymentSource where+    parseJSON = parseJSONText "PlacementPaymentSource"++instance ToJSON PlacementPaymentSource where+    toJSON = toJSONText++-- | Order of sorted results, default is \'DESCENDING\'.+data ReportsFilesListSortOrder+    = RFLSOAscending+      -- ^ @ASCENDING@+      -- Ascending order.+    | RFLSODescending+      -- ^ @DESCENDING@+      -- Descending order.+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ReportsFilesListSortOrder++instance FromHttpApiData ReportsFilesListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right RFLSOAscending+        "DESCENDING" -> Right RFLSODescending+        x -> Left ("Unable to parse ReportsFilesListSortOrder from: " <> x)++instance ToHttpApiData ReportsFilesListSortOrder where+    toQueryParam = \case+        RFLSOAscending -> "ASCENDING"+        RFLSODescending -> "DESCENDING"++instance FromJSON ReportsFilesListSortOrder where+    parseJSON = parseJSONText "ReportsFilesListSortOrder"++instance ToJSON ReportsFilesListSortOrder where+    toJSON = toJSONText++-- | Field by which to sort the list.+data InventoryItemsListSortField+    = IILSFID+      -- ^ @ID@+    | IILSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable InventoryItemsListSortField++instance FromHttpApiData InventoryItemsListSortField where+    parseQueryParam = \case+        "ID" -> Right IILSFID+        "NAME" -> Right IILSFName+        x -> Left ("Unable to parse InventoryItemsListSortField from: " <> x)++instance ToHttpApiData InventoryItemsListSortField where+    toQueryParam = \case+        IILSFID -> "ID"+        IILSFName -> "NAME"++instance FromJSON InventoryItemsListSortField where+    parseJSON = parseJSONText "InventoryItemsListSortField"++instance ToJSON InventoryItemsListSortField where+    toJSON = toJSONText++-- | Event tag type. Can be used to specify whether to use a third-party+-- pixel, a third-party JavaScript URL, or a third-party click-through URL+-- for either impression or click tracking. This is a required field.+data EventTagType+    = ETTClickThroughEventTag+      -- ^ @CLICK_THROUGH_EVENT_TAG@+    | ETTImpressionImageEventTag+      -- ^ @IMPRESSION_IMAGE_EVENT_TAG@+    | ETTImpressionJavascriptEventTag+      -- ^ @IMPRESSION_JAVASCRIPT_EVENT_TAG@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable EventTagType++instance FromHttpApiData EventTagType where+    parseQueryParam = \case+        "CLICK_THROUGH_EVENT_TAG" -> Right ETTClickThroughEventTag+        "IMPRESSION_IMAGE_EVENT_TAG" -> Right ETTImpressionImageEventTag+        "IMPRESSION_JAVASCRIPT_EVENT_TAG" -> Right ETTImpressionJavascriptEventTag+        x -> Left ("Unable to parse EventTagType from: " <> x)++instance ToHttpApiData EventTagType where+    toQueryParam = \case+        ETTClickThroughEventTag -> "CLICK_THROUGH_EVENT_TAG"+        ETTImpressionImageEventTag -> "IMPRESSION_IMAGE_EVENT_TAG"+        ETTImpressionJavascriptEventTag -> "IMPRESSION_JAVASCRIPT_EVENT_TAG"++instance FromJSON EventTagType where+    parseJSON = parseJSONText "EventTagType"++instance ToJSON EventTagType where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data CreativesListSortOrder+    = CAscending+      -- ^ @ASCENDING@+    | CDescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativesListSortOrder++instance FromHttpApiData CreativesListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right CAscending+        "DESCENDING" -> Right CDescending+        x -> Left ("Unable to parse CreativesListSortOrder from: " <> x)++instance ToHttpApiData CreativesListSortOrder where+    toQueryParam = \case+        CAscending -> "ASCENDING"+        CDescending -> "DESCENDING"++instance FromJSON CreativesListSortOrder where+    parseJSON = parseJSONText "CreativesListSortOrder"++instance ToJSON CreativesListSortOrder where+    toJSON = toJSONText++-- | Select only inventory items with this type.+data InventoryItemsListType+    = PlanningPlacementTypeCredit+      -- ^ @PLANNING_PLACEMENT_TYPE_CREDIT@+    | PlanningPlacementTypeRegular+      -- ^ @PLANNING_PLACEMENT_TYPE_REGULAR@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable InventoryItemsListType++instance FromHttpApiData InventoryItemsListType where+    parseQueryParam = \case+        "PLANNING_PLACEMENT_TYPE_CREDIT" -> Right PlanningPlacementTypeCredit+        "PLANNING_PLACEMENT_TYPE_REGULAR" -> Right PlanningPlacementTypeRegular+        x -> Left ("Unable to parse InventoryItemsListType from: " <> x)++instance ToHttpApiData InventoryItemsListType where+    toQueryParam = \case+        PlanningPlacementTypeCredit -> "PLANNING_PLACEMENT_TYPE_CREDIT"+        PlanningPlacementTypeRegular -> "PLANNING_PLACEMENT_TYPE_REGULAR"++instance FromJSON InventoryItemsListType where+    parseJSON = parseJSONText "InventoryItemsListType"++instance ToJSON InventoryItemsListType where+    toJSON = toJSONText++-- | Popup window position either centered or at specific coordinate.+data PopupWindowPropertiesPositionType+    = Center+      -- ^ @CENTER@+    | Coordinates+      -- ^ @COORDINATES@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PopupWindowPropertiesPositionType++instance FromHttpApiData PopupWindowPropertiesPositionType where+    parseQueryParam = \case+        "CENTER" -> Right Center+        "COORDINATES" -> Right Coordinates+        x -> Left ("Unable to parse PopupWindowPropertiesPositionType from: " <> x)++instance ToHttpApiData PopupWindowPropertiesPositionType where+    toQueryParam = \case+        Center -> "CENTER"+        Coordinates -> "COORDINATES"++instance FromJSON PopupWindowPropertiesPositionType where+    parseJSON = parseJSONText "PopupWindowPropertiesPositionType"++instance ToJSON PopupWindowPropertiesPositionType where+    toJSON = toJSONText++-- | Directory site contact role.+data DirectorySiteContactRole+    = Admin+      -- ^ @ADMIN@+    | Edit+      -- ^ @EDIT@+    | View+      -- ^ @VIEW@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable DirectorySiteContactRole++instance FromHttpApiData DirectorySiteContactRole where+    parseQueryParam = \case+        "ADMIN" -> Right Admin+        "EDIT" -> Right Edit+        "VIEW" -> Right View+        x -> Left ("Unable to parse DirectorySiteContactRole from: " <> x)++instance ToHttpApiData DirectorySiteContactRole where+    toQueryParam = \case+        Admin -> "ADMIN"+        Edit -> "EDIT"+        View -> "VIEW"++instance FromJSON DirectorySiteContactRole where+    parseJSON = parseJSONText "DirectorySiteContactRole"++instance ToJSON DirectorySiteContactRole where+    toJSON = toJSONText++-- | Option specifying how keywords are embedded in ad tags. This setting can+-- be used to specify whether keyword placeholders are inserted in+-- placement tags for this site. Publishers can then add keywords to those+-- placeholders.+data TagSettingKeywordOption+    = GenerateSeparateTagForEachKeyword+      -- ^ @GENERATE_SEPARATE_TAG_FOR_EACH_KEYWORD@+    | Ignore+      -- ^ @IGNORE@+    | PlaceholderWithListOfKeywords+      -- ^ @PLACEHOLDER_WITH_LIST_OF_KEYWORDS@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable TagSettingKeywordOption++instance FromHttpApiData TagSettingKeywordOption where+    parseQueryParam = \case+        "GENERATE_SEPARATE_TAG_FOR_EACH_KEYWORD" -> Right GenerateSeparateTagForEachKeyword+        "IGNORE" -> Right Ignore+        "PLACEHOLDER_WITH_LIST_OF_KEYWORDS" -> Right PlaceholderWithListOfKeywords+        x -> Left ("Unable to parse TagSettingKeywordOption from: " <> x)++instance ToHttpApiData TagSettingKeywordOption where+    toQueryParam = \case+        GenerateSeparateTagForEachKeyword -> "GENERATE_SEPARATE_TAG_FOR_EACH_KEYWORD"+        Ignore -> "IGNORE"+        PlaceholderWithListOfKeywords -> "PLACEHOLDER_WITH_LIST_OF_KEYWORDS"++instance FromJSON TagSettingKeywordOption where+    parseJSON = parseJSONText "TagSettingKeywordOption"++instance ToJSON TagSettingKeywordOption where+    toJSON = toJSONText++-- | Authoring tool for HTML5 banner creatives. This is a read-only field.+-- Applicable to the following creative types: HTML5_BANNER.+data CreativeAuthoringTool+    = Ninja+      -- ^ @NINJA@+    | Swiffy+      -- ^ @SWIFFY@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeAuthoringTool++instance FromHttpApiData CreativeAuthoringTool where+    parseQueryParam = \case+        "NINJA" -> Right Ninja+        "SWIFFY" -> Right Swiffy+        x -> Left ("Unable to parse CreativeAuthoringTool from: " <> x)++instance ToHttpApiData CreativeAuthoringTool where+    toQueryParam = \case+        Ninja -> "NINJA"+        Swiffy -> "SWIFFY"++instance FromJSON CreativeAuthoringTool where+    parseJSON = parseJSONText "CreativeAuthoringTool"++instance ToJSON CreativeAuthoringTool where+    toJSON = toJSONText++-- | Type of this contact.+data OrderContactContactType+    = PlanningOrderContactBuyerBillingContact+      -- ^ @PLANNING_ORDER_CONTACT_BUYER_BILLING_CONTACT@+    | PlanningOrderContactBuyerContact+      -- ^ @PLANNING_ORDER_CONTACT_BUYER_CONTACT@+    | PlanningOrderContactSellerContact+      -- ^ @PLANNING_ORDER_CONTACT_SELLER_CONTACT@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable OrderContactContactType++instance FromHttpApiData OrderContactContactType where+    parseQueryParam = \case+        "PLANNING_ORDER_CONTACT_BUYER_BILLING_CONTACT" -> Right PlanningOrderContactBuyerBillingContact+        "PLANNING_ORDER_CONTACT_BUYER_CONTACT" -> Right PlanningOrderContactBuyerContact+        "PLANNING_ORDER_CONTACT_SELLER_CONTACT" -> Right PlanningOrderContactSellerContact+        x -> Left ("Unable to parse OrderContactContactType from: " <> x)++instance ToHttpApiData OrderContactContactType where+    toQueryParam = \case+        PlanningOrderContactBuyerBillingContact -> "PLANNING_ORDER_CONTACT_BUYER_BILLING_CONTACT"+        PlanningOrderContactBuyerContact -> "PLANNING_ORDER_CONTACT_BUYER_CONTACT"+        PlanningOrderContactSellerContact -> "PLANNING_ORDER_CONTACT_SELLER_CONTACT"++instance FromJSON OrderContactContactType where+    parseJSON = parseJSONText "OrderContactContactType"++instance ToJSON OrderContactContactType where+    toJSON = toJSONText++-- | Type of asset to upload. This is a required field. IMAGE is solely used+-- for IMAGE creatives. Other image assets should use HTML_IMAGE.+data CreativeAssetIdType+    = CAITFlash+      -- ^ @FLASH@+    | CAITHTML+      -- ^ @HTML@+    | CAITHTMLImage+      -- ^ @HTML_IMAGE@+    | CAITImage+      -- ^ @IMAGE@+    | CAITVideo+      -- ^ @VIDEO@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeAssetIdType++instance FromHttpApiData CreativeAssetIdType where+    parseQueryParam = \case+        "FLASH" -> Right CAITFlash+        "HTML" -> Right CAITHTML+        "HTML_IMAGE" -> Right CAITHTMLImage+        "IMAGE" -> Right CAITImage+        "VIDEO" -> Right CAITVideo+        x -> Left ("Unable to parse CreativeAssetIdType from: " <> x)++instance ToHttpApiData CreativeAssetIdType where+    toQueryParam = \case+        CAITFlash -> "FLASH"+        CAITHTML -> "HTML"+        CAITHTMLImage -> "HTML_IMAGE"+        CAITImage -> "IMAGE"+        CAITVideo -> "VIDEO"++instance FromJSON CreativeAssetIdType where+    parseJSON = parseJSONText "CreativeAssetIdType"++instance ToJSON CreativeAssetIdType where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data AccountUserProFilesListSortOrder+    = AUPFLSOAscending+      -- ^ @ASCENDING@+    | AUPFLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AccountUserProFilesListSortOrder++instance FromHttpApiData AccountUserProFilesListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right AUPFLSOAscending+        "DESCENDING" -> Right AUPFLSODescending+        x -> Left ("Unable to parse AccountUserProFilesListSortOrder from: " <> x)++instance ToHttpApiData AccountUserProFilesListSortOrder where+    toQueryParam = \case+        AUPFLSOAscending -> "ASCENDING"+        AUPFLSODescending -> "DESCENDING"++instance FromJSON AccountUserProFilesListSortOrder where+    parseJSON = parseJSONText "AccountUserProFilesListSortOrder"++instance ToJSON AccountUserProFilesListSortOrder where+    toJSON = toJSONText++-- | Product from which this remarketing list was originated.+data RemarketingListListSource+    = RLLSRemarketingListSourceAdx+      -- ^ @REMARKETING_LIST_SOURCE_ADX@+    | RLLSRemarketingListSourceDBm+      -- ^ @REMARKETING_LIST_SOURCE_DBM@+    | RLLSRemarketingListSourceDfa+      -- ^ @REMARKETING_LIST_SOURCE_DFA@+    | RLLSRemarketingListSourceDfp+      -- ^ @REMARKETING_LIST_SOURCE_DFP@+    | RLLSRemarketingListSourceDmp+      -- ^ @REMARKETING_LIST_SOURCE_DMP@+    | RLLSRemarketingListSourceGa+      -- ^ @REMARKETING_LIST_SOURCE_GA@+    | RLLSRemarketingListSourceGplus+      -- ^ @REMARKETING_LIST_SOURCE_GPLUS@+    | RLLSRemarketingListSourceOther+      -- ^ @REMARKETING_LIST_SOURCE_OTHER@+    | RLLSRemarketingListSourcePlayStore+      -- ^ @REMARKETING_LIST_SOURCE_PLAY_STORE@+    | RLLSRemarketingListSourceXfp+      -- ^ @REMARKETING_LIST_SOURCE_XFP@+    | RLLSRemarketingListSourceYouTube+      -- ^ @REMARKETING_LIST_SOURCE_YOUTUBE@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable RemarketingListListSource++instance FromHttpApiData RemarketingListListSource where+    parseQueryParam = \case+        "REMARKETING_LIST_SOURCE_ADX" -> Right RLLSRemarketingListSourceAdx+        "REMARKETING_LIST_SOURCE_DBM" -> Right RLLSRemarketingListSourceDBm+        "REMARKETING_LIST_SOURCE_DFA" -> Right RLLSRemarketingListSourceDfa+        "REMARKETING_LIST_SOURCE_DFP" -> Right RLLSRemarketingListSourceDfp+        "REMARKETING_LIST_SOURCE_DMP" -> Right RLLSRemarketingListSourceDmp+        "REMARKETING_LIST_SOURCE_GA" -> Right RLLSRemarketingListSourceGa+        "REMARKETING_LIST_SOURCE_GPLUS" -> Right RLLSRemarketingListSourceGplus+        "REMARKETING_LIST_SOURCE_OTHER" -> Right RLLSRemarketingListSourceOther+        "REMARKETING_LIST_SOURCE_PLAY_STORE" -> Right RLLSRemarketingListSourcePlayStore+        "REMARKETING_LIST_SOURCE_XFP" -> Right RLLSRemarketingListSourceXfp+        "REMARKETING_LIST_SOURCE_YOUTUBE" -> Right RLLSRemarketingListSourceYouTube+        x -> Left ("Unable to parse RemarketingListListSource from: " <> x)++instance ToHttpApiData RemarketingListListSource where+    toQueryParam = \case+        RLLSRemarketingListSourceAdx -> "REMARKETING_LIST_SOURCE_ADX"+        RLLSRemarketingListSourceDBm -> "REMARKETING_LIST_SOURCE_DBM"+        RLLSRemarketingListSourceDfa -> "REMARKETING_LIST_SOURCE_DFA"+        RLLSRemarketingListSourceDfp -> "REMARKETING_LIST_SOURCE_DFP"+        RLLSRemarketingListSourceDmp -> "REMARKETING_LIST_SOURCE_DMP"+        RLLSRemarketingListSourceGa -> "REMARKETING_LIST_SOURCE_GA"+        RLLSRemarketingListSourceGplus -> "REMARKETING_LIST_SOURCE_GPLUS"+        RLLSRemarketingListSourceOther -> "REMARKETING_LIST_SOURCE_OTHER"+        RLLSRemarketingListSourcePlayStore -> "REMARKETING_LIST_SOURCE_PLAY_STORE"+        RLLSRemarketingListSourceXfp -> "REMARKETING_LIST_SOURCE_XFP"+        RLLSRemarketingListSourceYouTube -> "REMARKETING_LIST_SOURCE_YOUTUBE"++instance FromJSON RemarketingListListSource where+    parseJSON = parseJSONText "RemarketingListListSource"++instance ToJSON RemarketingListListSource where+    toJSON = toJSONText++-- | User type of the user profile. This is a read-only field that can be+-- left blank.+data AccountUserProFileUserAccessType+    = InternalAdministrator+      -- ^ @INTERNAL_ADMINISTRATOR@+    | NormalUser+      -- ^ @NORMAL_USER@+    | ReadOnlySuperUser+      -- ^ @READ_ONLY_SUPER_USER@+    | SuperUser+      -- ^ @SUPER_USER@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AccountUserProFileUserAccessType++instance FromHttpApiData AccountUserProFileUserAccessType where+    parseQueryParam = \case+        "INTERNAL_ADMINISTRATOR" -> Right InternalAdministrator+        "NORMAL_USER" -> Right NormalUser+        "READ_ONLY_SUPER_USER" -> Right ReadOnlySuperUser+        "SUPER_USER" -> Right SuperUser+        x -> Left ("Unable to parse AccountUserProFileUserAccessType from: " <> x)++instance ToHttpApiData AccountUserProFileUserAccessType where+    toQueryParam = \case+        InternalAdministrator -> "INTERNAL_ADMINISTRATOR"+        NormalUser -> "NORMAL_USER"+        ReadOnlySuperUser -> "READ_ONLY_SUPER_USER"+        SuperUser -> "SUPER_USER"++instance FromJSON AccountUserProFileUserAccessType where+    parseJSON = parseJSONText "AccountUserProFileUserAccessType"++instance ToJSON AccountUserProFileUserAccessType where+    toJSON = toJSONText++-- | Initial wait time type before making the asset visible. Applicable to+-- the following creative types: all RICH_MEDIA.+data CreativeAssetStartTimeType+    = AssetStartTimeTypeCustom+      -- ^ @ASSET_START_TIME_TYPE_CUSTOM@+    | AssetStartTimeTypeNone+      -- ^ @ASSET_START_TIME_TYPE_NONE@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeAssetStartTimeType++instance FromHttpApiData CreativeAssetStartTimeType where+    parseQueryParam = \case+        "ASSET_START_TIME_TYPE_CUSTOM" -> Right AssetStartTimeTypeCustom+        "ASSET_START_TIME_TYPE_NONE" -> Right AssetStartTimeTypeNone+        x -> Left ("Unable to parse CreativeAssetStartTimeType from: " <> x)++instance ToHttpApiData CreativeAssetStartTimeType where+    toQueryParam = \case+        AssetStartTimeTypeCustom -> "ASSET_START_TIME_TYPE_CUSTOM"+        AssetStartTimeTypeNone -> "ASSET_START_TIME_TYPE_NONE"++instance FromJSON CreativeAssetStartTimeType where+    parseJSON = parseJSONText "CreativeAssetStartTimeType"++instance ToJSON CreativeAssetStartTimeType where+    toJSON = toJSONText++-- | Audience gender of this project.+data ProjectAudienceGender+    = PlanningAudienceGenderFemale+      -- ^ @PLANNING_AUDIENCE_GENDER_FEMALE@+    | PlanningAudienceGenderMale+      -- ^ @PLANNING_AUDIENCE_GENDER_MALE@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ProjectAudienceGender++instance FromHttpApiData ProjectAudienceGender where+    parseQueryParam = \case+        "PLANNING_AUDIENCE_GENDER_FEMALE" -> Right PlanningAudienceGenderFemale+        "PLANNING_AUDIENCE_GENDER_MALE" -> Right PlanningAudienceGenderMale+        x -> Left ("Unable to parse ProjectAudienceGender from: " <> x)++instance ToHttpApiData ProjectAudienceGender where+    toQueryParam = \case+        PlanningAudienceGenderFemale -> "PLANNING_AUDIENCE_GENDER_FEMALE"+        PlanningAudienceGenderMale -> "PLANNING_AUDIENCE_GENDER_MALE"++instance FromJSON ProjectAudienceGender where+    parseJSON = parseJSONText "ProjectAudienceGender"++instance ToJSON ProjectAudienceGender where+    toJSON = toJSONText++-- | Field by which to sort the list.+data PlacementStrategiesListSortField+    = PSLSFID+      -- ^ @ID@+    | PSLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PlacementStrategiesListSortField++instance FromHttpApiData PlacementStrategiesListSortField where+    parseQueryParam = \case+        "ID" -> Right PSLSFID+        "NAME" -> Right PSLSFName+        x -> Left ("Unable to parse PlacementStrategiesListSortField from: " <> x)++instance ToHttpApiData PlacementStrategiesListSortField where+    toQueryParam = \case+        PSLSFID -> "ID"+        PSLSFName -> "NAME"++instance FromJSON PlacementStrategiesListSortField where+    parseJSON = parseJSONText "PlacementStrategiesListSortField"++instance ToJSON PlacementStrategiesListSortField where+    toJSON = toJSONText++-- | Data type for the variable. This is a required field.+data UserDefinedVariableConfigurationDataType+    = Number+      -- ^ @NUMBER@+    | String+      -- ^ @STRING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable UserDefinedVariableConfigurationDataType++instance FromHttpApiData UserDefinedVariableConfigurationDataType where+    parseQueryParam = \case+        "NUMBER" -> Right Number+        "STRING" -> Right String+        x -> Left ("Unable to parse UserDefinedVariableConfigurationDataType from: " <> x)++instance ToHttpApiData UserDefinedVariableConfigurationDataType where+    toQueryParam = \case+        Number -> "NUMBER"+        String -> "STRING"++instance FromJSON UserDefinedVariableConfigurationDataType where+    parseJSON = parseJSONText "UserDefinedVariableConfigurationDataType"++instance ToJSON UserDefinedVariableConfigurationDataType where+    toJSON = toJSONText++-- | Code type used for cache busting in the generated tag.+data FloodlightActivityCacheBustingType+    = ActiveServerPage+      -- ^ @ACTIVE_SERVER_PAGE@+    | ColdFusion+      -- ^ @COLD_FUSION@+    | Javascript+      -- ^ @JAVASCRIPT@+    | Jsp+      -- ^ @JSP@+    | Php+      -- ^ @PHP@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FloodlightActivityCacheBustingType++instance FromHttpApiData FloodlightActivityCacheBustingType where+    parseQueryParam = \case+        "ACTIVE_SERVER_PAGE" -> Right ActiveServerPage+        "COLD_FUSION" -> Right ColdFusion+        "JAVASCRIPT" -> Right Javascript+        "JSP" -> Right Jsp+        "PHP" -> Right Php+        x -> Left ("Unable to parse FloodlightActivityCacheBustingType from: " <> x)++instance ToHttpApiData FloodlightActivityCacheBustingType where+    toQueryParam = \case+        ActiveServerPage -> "ACTIVE_SERVER_PAGE"+        ColdFusion -> "COLD_FUSION"+        Javascript -> "JAVASCRIPT"+        Jsp -> "JSP"+        Php -> "PHP"++instance FromJSON FloodlightActivityCacheBustingType where+    parseJSON = parseJSONText "FloodlightActivityCacheBustingType"++instance ToJSON FloodlightActivityCacheBustingType where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data CreativeGroupsListSortOrder+    = CGLSOAscending+      -- ^ @ASCENDING@+    | CGLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeGroupsListSortOrder++instance FromHttpApiData CreativeGroupsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right CGLSOAscending+        "DESCENDING" -> Right CGLSODescending+        x -> Left ("Unable to parse CreativeGroupsListSortOrder from: " <> x)++instance ToHttpApiData CreativeGroupsListSortOrder where+    toQueryParam = \case+        CGLSOAscending -> "ASCENDING"+        CGLSODescending -> "DESCENDING"++instance FromJSON CreativeGroupsListSortOrder where+    parseJSON = parseJSONText "CreativeGroupsListSortOrder"++instance ToJSON CreativeGroupsListSortOrder where+    toJSON = toJSONText++-- | Type of this order document+data OrderDocumentType+    = PlanningOrderTypeChangeOrder+      -- ^ @PLANNING_ORDER_TYPE_CHANGE_ORDER@+    | PlanningOrderTypeInsertionOrder+      -- ^ @PLANNING_ORDER_TYPE_INSERTION_ORDER@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable OrderDocumentType++instance FromHttpApiData OrderDocumentType where+    parseQueryParam = \case+        "PLANNING_ORDER_TYPE_CHANGE_ORDER" -> Right PlanningOrderTypeChangeOrder+        "PLANNING_ORDER_TYPE_INSERTION_ORDER" -> Right PlanningOrderTypeInsertionOrder+        x -> Left ("Unable to parse OrderDocumentType from: " <> x)++instance ToHttpApiData OrderDocumentType where+    toQueryParam = \case+        PlanningOrderTypeChangeOrder -> "PLANNING_ORDER_TYPE_CHANGE_ORDER"+        PlanningOrderTypeInsertionOrder -> "PLANNING_ORDER_TYPE_INSERTION_ORDER"++instance FromJSON OrderDocumentType where+    parseJSON = parseJSONText "OrderDocumentType"++instance ToJSON OrderDocumentType where+    toJSON = toJSONText++-- | TagData tag format of this tag.+data TagDataFormat+    = PlacementTagClickCommands+      -- ^ @PLACEMENT_TAG_CLICK_COMMANDS@+    | PlacementTagIframeIlayer+      -- ^ @PLACEMENT_TAG_IFRAME_ILAYER@+    | PlacementTagIframeJavascript+      -- ^ @PLACEMENT_TAG_IFRAME_JAVASCRIPT@+    | PlacementTagIframeJavascriptLegacy+      -- ^ @PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY@+    | PlacementTagInstreamVideoPrefetch+      -- ^ @PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH@+    | PlacementTagInstreamVideoPrefetchVast3+      -- ^ @PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3@+    | PlacementTagInternalRedirect+      -- ^ @PLACEMENT_TAG_INTERNAL_REDIRECT@+    | PlacementTagInterstitialIframeJavascript+      -- ^ @PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT@+    | PlacementTagInterstitialIframeJavascriptLegacy+      -- ^ @PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY@+    | PlacementTagInterstitialInternalRedirect+      -- ^ @PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT@+    | PlacementTagInterstitialJavascript+      -- ^ @PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT@+    | PlacementTagInterstitialJavascriptLegacy+      -- ^ @PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY@+    | PlacementTagJavascript+      -- ^ @PLACEMENT_TAG_JAVASCRIPT@+    | PlacementTagJavascriptLegacy+      -- ^ @PLACEMENT_TAG_JAVASCRIPT_LEGACY@+    | PlacementTagStandard+      -- ^ @PLACEMENT_TAG_STANDARD@+    | PlacementTagTracking+      -- ^ @PLACEMENT_TAG_TRACKING@+    | PlacementTagTrackingIframe+      -- ^ @PLACEMENT_TAG_TRACKING_IFRAME@+    | PlacementTagTrackingJavascript+      -- ^ @PLACEMENT_TAG_TRACKING_JAVASCRIPT@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable TagDataFormat++instance FromHttpApiData TagDataFormat where+    parseQueryParam = \case+        "PLACEMENT_TAG_CLICK_COMMANDS" -> Right PlacementTagClickCommands+        "PLACEMENT_TAG_IFRAME_ILAYER" -> Right PlacementTagIframeIlayer+        "PLACEMENT_TAG_IFRAME_JAVASCRIPT" -> Right PlacementTagIframeJavascript+        "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY" -> Right PlacementTagIframeJavascriptLegacy+        "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH" -> Right PlacementTagInstreamVideoPrefetch+        "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3" -> Right PlacementTagInstreamVideoPrefetchVast3+        "PLACEMENT_TAG_INTERNAL_REDIRECT" -> Right PlacementTagInternalRedirect+        "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT" -> Right PlacementTagInterstitialIframeJavascript+        "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY" -> Right PlacementTagInterstitialIframeJavascriptLegacy+        "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT" -> Right PlacementTagInterstitialInternalRedirect+        "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT" -> Right PlacementTagInterstitialJavascript+        "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY" -> Right PlacementTagInterstitialJavascriptLegacy+        "PLACEMENT_TAG_JAVASCRIPT" -> Right PlacementTagJavascript+        "PLACEMENT_TAG_JAVASCRIPT_LEGACY" -> Right PlacementTagJavascriptLegacy+        "PLACEMENT_TAG_STANDARD" -> Right PlacementTagStandard+        "PLACEMENT_TAG_TRACKING" -> Right PlacementTagTracking+        "PLACEMENT_TAG_TRACKING_IFRAME" -> Right PlacementTagTrackingIframe+        "PLACEMENT_TAG_TRACKING_JAVASCRIPT" -> Right PlacementTagTrackingJavascript+        x -> Left ("Unable to parse TagDataFormat from: " <> x)++instance ToHttpApiData TagDataFormat where+    toQueryParam = \case+        PlacementTagClickCommands -> "PLACEMENT_TAG_CLICK_COMMANDS"+        PlacementTagIframeIlayer -> "PLACEMENT_TAG_IFRAME_ILAYER"+        PlacementTagIframeJavascript -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT"+        PlacementTagIframeJavascriptLegacy -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY"+        PlacementTagInstreamVideoPrefetch -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH"+        PlacementTagInstreamVideoPrefetchVast3 -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3"+        PlacementTagInternalRedirect -> "PLACEMENT_TAG_INTERNAL_REDIRECT"+        PlacementTagInterstitialIframeJavascript -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT"+        PlacementTagInterstitialIframeJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY"+        PlacementTagInterstitialInternalRedirect -> "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT"+        PlacementTagInterstitialJavascript -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT"+        PlacementTagInterstitialJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY"+        PlacementTagJavascript -> "PLACEMENT_TAG_JAVASCRIPT"+        PlacementTagJavascriptLegacy -> "PLACEMENT_TAG_JAVASCRIPT_LEGACY"+        PlacementTagStandard -> "PLACEMENT_TAG_STANDARD"+        PlacementTagTracking -> "PLACEMENT_TAG_TRACKING"+        PlacementTagTrackingIframe -> "PLACEMENT_TAG_TRACKING_IFRAME"+        PlacementTagTrackingJavascript -> "PLACEMENT_TAG_TRACKING_JAVASCRIPT"++instance FromJSON TagDataFormat where+    parseJSON = parseJSONText "TagDataFormat"++instance ToJSON TagDataFormat where+    toJSON = toJSONText++-- | Maximum number of active ads allowed for the account.+data AccountActiveAdSummaryActiveAdsLimitTier+    = ActiveAdsTier100K+      -- ^ @ACTIVE_ADS_TIER_100K@+    | ActiveAdsTier200K+      -- ^ @ACTIVE_ADS_TIER_200K@+    | ActiveAdsTier300K+      -- ^ @ACTIVE_ADS_TIER_300K@+    | ActiveAdsTier40K+      -- ^ @ACTIVE_ADS_TIER_40K@+    | ActiveAdsTier75K+      -- ^ @ACTIVE_ADS_TIER_75K@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AccountActiveAdSummaryActiveAdsLimitTier++instance FromHttpApiData AccountActiveAdSummaryActiveAdsLimitTier where+    parseQueryParam = \case+        "ACTIVE_ADS_TIER_100K" -> Right ActiveAdsTier100K+        "ACTIVE_ADS_TIER_200K" -> Right ActiveAdsTier200K+        "ACTIVE_ADS_TIER_300K" -> Right ActiveAdsTier300K+        "ACTIVE_ADS_TIER_40K" -> Right ActiveAdsTier40K+        "ACTIVE_ADS_TIER_75K" -> Right ActiveAdsTier75K+        x -> Left ("Unable to parse AccountActiveAdSummaryActiveAdsLimitTier from: " <> x)++instance ToHttpApiData AccountActiveAdSummaryActiveAdsLimitTier where+    toQueryParam = \case+        ActiveAdsTier100K -> "ACTIVE_ADS_TIER_100K"+        ActiveAdsTier200K -> "ACTIVE_ADS_TIER_200K"+        ActiveAdsTier300K -> "ACTIVE_ADS_TIER_300K"+        ActiveAdsTier40K -> "ACTIVE_ADS_TIER_40K"+        ActiveAdsTier75K -> "ACTIVE_ADS_TIER_75K"++instance FromJSON AccountActiveAdSummaryActiveAdsLimitTier where+    parseJSON = parseJSONText "AccountActiveAdSummaryActiveAdsLimitTier"++instance ToJSON AccountActiveAdSummaryActiveAdsLimitTier where+    toJSON = toJSONText++-- | Rich media child asset type. This is a read-only field. Applicable to+-- the following creative types: all VPAID.+data CreativeAssetChildAssetType+    = ChildAssetTypeData+      -- ^ @CHILD_ASSET_TYPE_DATA@+    | ChildAssetTypeFlash+      -- ^ @CHILD_ASSET_TYPE_FLASH@+    | ChildAssetTypeImage+      -- ^ @CHILD_ASSET_TYPE_IMAGE@+    | ChildAssetTypeVideo+      -- ^ @CHILD_ASSET_TYPE_VIDEO@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeAssetChildAssetType++instance FromHttpApiData CreativeAssetChildAssetType where+    parseQueryParam = \case+        "CHILD_ASSET_TYPE_DATA" -> Right ChildAssetTypeData+        "CHILD_ASSET_TYPE_FLASH" -> Right ChildAssetTypeFlash+        "CHILD_ASSET_TYPE_IMAGE" -> Right ChildAssetTypeImage+        "CHILD_ASSET_TYPE_VIDEO" -> Right ChildAssetTypeVideo+        x -> Left ("Unable to parse CreativeAssetChildAssetType from: " <> x)++instance ToHttpApiData CreativeAssetChildAssetType where+    toQueryParam = \case+        ChildAssetTypeData -> "CHILD_ASSET_TYPE_DATA"+        ChildAssetTypeFlash -> "CHILD_ASSET_TYPE_FLASH"+        ChildAssetTypeImage -> "CHILD_ASSET_TYPE_IMAGE"+        ChildAssetTypeVideo -> "CHILD_ASSET_TYPE_VIDEO"++instance FromJSON CreativeAssetChildAssetType where+    parseJSON = parseJSONText "CreativeAssetChildAssetType"++instance ToJSON CreativeAssetChildAssetType where+    toJSON = toJSONText++-- | Select only placement groups belonging with this group type. A package+-- is a simple group of placements that acts as a single pricing point for+-- a group of tags. A roadblock is a group of placements that not only acts+-- as a single pricing point but also assumes that all the tags in it will+-- be served at the same time. A roadblock requires one of its assigned+-- placements to be marked as primary for reporting.+data PlacementGroupsListPlacementGroupType+    = PlacementPackage+      -- ^ @PLACEMENT_PACKAGE@+    | PlacementRoadblock+      -- ^ @PLACEMENT_ROADBLOCK@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PlacementGroupsListPlacementGroupType++instance FromHttpApiData PlacementGroupsListPlacementGroupType where+    parseQueryParam = \case+        "PLACEMENT_PACKAGE" -> Right PlacementPackage+        "PLACEMENT_ROADBLOCK" -> Right PlacementRoadblock+        x -> Left ("Unable to parse PlacementGroupsListPlacementGroupType from: " <> x)++instance ToHttpApiData PlacementGroupsListPlacementGroupType where+    toQueryParam = \case+        PlacementPackage -> "PLACEMENT_PACKAGE"+        PlacementRoadblock -> "PLACEMENT_ROADBLOCK"++instance FromJSON PlacementGroupsListPlacementGroupType where+    parseJSON = parseJSONText "PlacementGroupsListPlacementGroupType"++instance ToJSON PlacementGroupsListPlacementGroupType where+    toJSON = toJSONText++-- | Status of the filter. NONE means the user has access to none of the+-- objects. ALL means the user has access to all objects. ASSIGNED means+-- the user has access to the objects with IDs in the objectIds list.+data ObjectFilterStatus+    = OFSAll+      -- ^ @ALL@+    | OFSAssigned+      -- ^ @ASSIGNED@+    | OFSNone+      -- ^ @NONE@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ObjectFilterStatus++instance FromHttpApiData ObjectFilterStatus where+    parseQueryParam = \case+        "ALL" -> Right OFSAll+        "ASSIGNED" -> Right OFSAssigned+        "NONE" -> Right OFSNone+        x -> Left ("Unable to parse ObjectFilterStatus from: " <> x)++instance ToHttpApiData ObjectFilterStatus where+    toQueryParam = \case+        OFSAll -> "ALL"+        OFSAssigned -> "ASSIGNED"+        OFSNone -> "NONE"++instance FromJSON ObjectFilterStatus where+    parseJSON = parseJSONText "ObjectFilterStatus"++instance ToJSON ObjectFilterStatus where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data CampaignCreativeAssociationsListSortOrder+    = CCALSOAscending+      -- ^ @ASCENDING@+    | CCALSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CampaignCreativeAssociationsListSortOrder++instance FromHttpApiData CampaignCreativeAssociationsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right CCALSOAscending+        "DESCENDING" -> Right CCALSODescending+        x -> Left ("Unable to parse CampaignCreativeAssociationsListSortOrder from: " <> x)++instance ToHttpApiData CampaignCreativeAssociationsListSortOrder where+    toQueryParam = \case+        CCALSOAscending -> "ASCENDING"+        CCALSODescending -> "DESCENDING"++instance FromJSON CampaignCreativeAssociationsListSortOrder where+    parseJSON = parseJSONText "CampaignCreativeAssociationsListSortOrder"++instance ToJSON CampaignCreativeAssociationsListSortOrder where+    toJSON = toJSONText++-- | Field by which to sort the list.+data FloodlightActivitiesListSortField+    = FALSFID+      -- ^ @ID@+    | FALSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FloodlightActivitiesListSortField++instance FromHttpApiData FloodlightActivitiesListSortField where+    parseQueryParam = \case+        "ID" -> Right FALSFID+        "NAME" -> Right FALSFName+        x -> Left ("Unable to parse FloodlightActivitiesListSortField from: " <> x)++instance ToHttpApiData FloodlightActivitiesListSortField where+    toQueryParam = \case+        FALSFID -> "ID"+        FALSFName -> "NAME"++instance FromJSON FloodlightActivitiesListSortField where+    parseJSON = parseJSONText "FloodlightActivitiesListSortField"++instance ToJSON FloodlightActivitiesListSortField where+    toJSON = toJSONText++-- | Select only creatives with these creative types.+data CreativesListTypes+    = CLTBrandSafeDefaultInstreamVideo+      -- ^ @BRAND_SAFE_DEFAULT_INSTREAM_VIDEO@+    | CLTCustomDisplay+      -- ^ @CUSTOM_DISPLAY@+    | CLTCustomDisplayInterstitial+      -- ^ @CUSTOM_DISPLAY_INTERSTITIAL@+    | CLTDisplay+      -- ^ @DISPLAY@+    | CLTDisplayImageGallery+      -- ^ @DISPLAY_IMAGE_GALLERY@+    | CLTDisplayRedirect+      -- ^ @DISPLAY_REDIRECT@+    | CLTFlashInpage+      -- ^ @FLASH_INPAGE@+    | CLTHTML5Banner+      -- ^ @HTML5_BANNER@+    | CLTImage+      -- ^ @IMAGE@+    | CLTInstreamVideo+      -- ^ @INSTREAM_VIDEO@+    | CLTInstreamVideoRedirect+      -- ^ @INSTREAM_VIDEO_REDIRECT@+    | CLTInternalRedirect+      -- ^ @INTERNAL_REDIRECT@+    | CLTInterstitialInternalRedirect+      -- ^ @INTERSTITIAL_INTERNAL_REDIRECT@+    | CLTRichMediaDisplayBanner+      -- ^ @RICH_MEDIA_DISPLAY_BANNER@+    | CLTRichMediaDisplayExpanding+      -- ^ @RICH_MEDIA_DISPLAY_EXPANDING@+    | CLTRichMediaDisplayInterstitial+      -- ^ @RICH_MEDIA_DISPLAY_INTERSTITIAL@+    | CLTRichMediaDisplayMultiFloatingInterstitial+      -- ^ @RICH_MEDIA_DISPLAY_MULTI_FLOATING_INTERSTITIAL@+    | CLTRichMediaImExpand+      -- ^ @RICH_MEDIA_IM_EXPAND@+    | CLTRichMediaInpageFloating+      -- ^ @RICH_MEDIA_INPAGE_FLOATING@+    | CLTRichMediaMobileInApp+      -- ^ @RICH_MEDIA_MOBILE_IN_APP@+    | CLTRichMediaPeelDown+      -- ^ @RICH_MEDIA_PEEL_DOWN@+    | CLTTrackingText+      -- ^ @TRACKING_TEXT@+    | CLTVpaidLinearVideo+      -- ^ @VPAID_LINEAR_VIDEO@+    | CLTVpaidNonLinearVideo+      -- ^ @VPAID_NON_LINEAR_VIDEO@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativesListTypes++instance FromHttpApiData CreativesListTypes where+    parseQueryParam = \case+        "BRAND_SAFE_DEFAULT_INSTREAM_VIDEO" -> Right CLTBrandSafeDefaultInstreamVideo+        "CUSTOM_DISPLAY" -> Right CLTCustomDisplay+        "CUSTOM_DISPLAY_INTERSTITIAL" -> Right CLTCustomDisplayInterstitial+        "DISPLAY" -> Right CLTDisplay+        "DISPLAY_IMAGE_GALLERY" -> Right CLTDisplayImageGallery+        "DISPLAY_REDIRECT" -> Right CLTDisplayRedirect+        "FLASH_INPAGE" -> Right CLTFlashInpage+        "HTML5_BANNER" -> Right CLTHTML5Banner+        "IMAGE" -> Right CLTImage+        "INSTREAM_VIDEO" -> Right CLTInstreamVideo+        "INSTREAM_VIDEO_REDIRECT" -> Right CLTInstreamVideoRedirect+        "INTERNAL_REDIRECT" -> Right CLTInternalRedirect+        "INTERSTITIAL_INTERNAL_REDIRECT" -> Right CLTInterstitialInternalRedirect+        "RICH_MEDIA_DISPLAY_BANNER" -> Right CLTRichMediaDisplayBanner+        "RICH_MEDIA_DISPLAY_EXPANDING" -> Right CLTRichMediaDisplayExpanding+        "RICH_MEDIA_DISPLAY_INTERSTITIAL" -> Right CLTRichMediaDisplayInterstitial+        "RICH_MEDIA_DISPLAY_MULTI_FLOATING_INTERSTITIAL" -> Right CLTRichMediaDisplayMultiFloatingInterstitial+        "RICH_MEDIA_IM_EXPAND" -> Right CLTRichMediaImExpand+        "RICH_MEDIA_INPAGE_FLOATING" -> Right CLTRichMediaInpageFloating+        "RICH_MEDIA_MOBILE_IN_APP" -> Right CLTRichMediaMobileInApp+        "RICH_MEDIA_PEEL_DOWN" -> Right CLTRichMediaPeelDown+        "TRACKING_TEXT" -> Right CLTTrackingText+        "VPAID_LINEAR_VIDEO" -> Right CLTVpaidLinearVideo+        "VPAID_NON_LINEAR_VIDEO" -> Right CLTVpaidNonLinearVideo+        x -> Left ("Unable to parse CreativesListTypes from: " <> x)++instance ToHttpApiData CreativesListTypes where+    toQueryParam = \case+        CLTBrandSafeDefaultInstreamVideo -> "BRAND_SAFE_DEFAULT_INSTREAM_VIDEO"+        CLTCustomDisplay -> "CUSTOM_DISPLAY"+        CLTCustomDisplayInterstitial -> "CUSTOM_DISPLAY_INTERSTITIAL"+        CLTDisplay -> "DISPLAY"+        CLTDisplayImageGallery -> "DISPLAY_IMAGE_GALLERY"+        CLTDisplayRedirect -> "DISPLAY_REDIRECT"+        CLTFlashInpage -> "FLASH_INPAGE"+        CLTHTML5Banner -> "HTML5_BANNER"+        CLTImage -> "IMAGE"+        CLTInstreamVideo -> "INSTREAM_VIDEO"+        CLTInstreamVideoRedirect -> "INSTREAM_VIDEO_REDIRECT"+        CLTInternalRedirect -> "INTERNAL_REDIRECT"+        CLTInterstitialInternalRedirect -> "INTERSTITIAL_INTERNAL_REDIRECT"+        CLTRichMediaDisplayBanner -> "RICH_MEDIA_DISPLAY_BANNER"+        CLTRichMediaDisplayExpanding -> "RICH_MEDIA_DISPLAY_EXPANDING"+        CLTRichMediaDisplayInterstitial -> "RICH_MEDIA_DISPLAY_INTERSTITIAL"+        CLTRichMediaDisplayMultiFloatingInterstitial -> "RICH_MEDIA_DISPLAY_MULTI_FLOATING_INTERSTITIAL"+        CLTRichMediaImExpand -> "RICH_MEDIA_IM_EXPAND"+        CLTRichMediaInpageFloating -> "RICH_MEDIA_INPAGE_FLOATING"+        CLTRichMediaMobileInApp -> "RICH_MEDIA_MOBILE_IN_APP"+        CLTRichMediaPeelDown -> "RICH_MEDIA_PEEL_DOWN"+        CLTTrackingText -> "TRACKING_TEXT"+        CLTVpaidLinearVideo -> "VPAID_LINEAR_VIDEO"+        CLTVpaidNonLinearVideo -> "VPAID_NON_LINEAR_VIDEO"++instance FromJSON CreativesListTypes where+    parseJSON = parseJSONText "CreativesListTypes"++instance ToJSON CreativesListTypes where+    toJSON = toJSONText++data DirectorySiteInpageTagFormatsItem+    = IframeJavascriptInpage+      -- ^ @IFRAME_JAVASCRIPT_INPAGE@+    | InternalRedirectInpage+      -- ^ @INTERNAL_REDIRECT_INPAGE@+    | JavascriptInpage+      -- ^ @JAVASCRIPT_INPAGE@+    | Standard+      -- ^ @STANDARD@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable DirectorySiteInpageTagFormatsItem++instance FromHttpApiData DirectorySiteInpageTagFormatsItem where+    parseQueryParam = \case+        "IFRAME_JAVASCRIPT_INPAGE" -> Right IframeJavascriptInpage+        "INTERNAL_REDIRECT_INPAGE" -> Right InternalRedirectInpage+        "JAVASCRIPT_INPAGE" -> Right JavascriptInpage+        "STANDARD" -> Right Standard+        x -> Left ("Unable to parse DirectorySiteInpageTagFormatsItem from: " <> x)++instance ToHttpApiData DirectorySiteInpageTagFormatsItem where+    toQueryParam = \case+        IframeJavascriptInpage -> "IFRAME_JAVASCRIPT_INPAGE"+        InternalRedirectInpage -> "INTERNAL_REDIRECT_INPAGE"+        JavascriptInpage -> "JAVASCRIPT_INPAGE"+        Standard -> "STANDARD"++instance FromJSON DirectorySiteInpageTagFormatsItem where+    parseJSON = parseJSONText "DirectorySiteInpageTagFormatsItem"++instance ToJSON DirectorySiteInpageTagFormatsItem where+    toJSON = toJSONText++-- | Window mode options for flash assets. Applicable to the following+-- creative types: FLASH_INPAGE, RICH_MEDIA_DISPLAY_EXPANDING,+-- RICH_MEDIA_IM_EXPAND, RICH_MEDIA_DISPLAY_BANNER, and+-- RICH_MEDIA_INPAGE_FLOATING.+data CreativeAssetWindowMode+    = Opaque+      -- ^ @OPAQUE@+    | Transparent+      -- ^ @TRANSPARENT@+    | Window+      -- ^ @WINDOW@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeAssetWindowMode++instance FromHttpApiData CreativeAssetWindowMode where+    parseQueryParam = \case+        "OPAQUE" -> Right Opaque+        "TRANSPARENT" -> Right Transparent+        "WINDOW" -> Right Window+        x -> Left ("Unable to parse CreativeAssetWindowMode from: " <> x)++instance ToHttpApiData CreativeAssetWindowMode where+    toQueryParam = \case+        Opaque -> "OPAQUE"+        Transparent -> "TRANSPARENT"+        Window -> "WINDOW"++instance FromJSON CreativeAssetWindowMode where+    parseJSON = parseJSONText "CreativeAssetWindowMode"++instance ToJSON CreativeAssetWindowMode where+    toJSON = toJSONText++-- | Possible alignments for an asset. This is a read-only field. Applicable+-- to the following creative types:+-- RICH_MEDIA_DISPLAY_MULTI_FLOATING_INTERSTITIAL.+data CreativeAssetAlignment+    = AlignmentBottom+      -- ^ @ALIGNMENT_BOTTOM@+    | AlignmentLeft+      -- ^ @ALIGNMENT_LEFT@+    | AlignmentRight+      -- ^ @ALIGNMENT_RIGHT@+    | AlignmentTop+      -- ^ @ALIGNMENT_TOP@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeAssetAlignment++instance FromHttpApiData CreativeAssetAlignment where+    parseQueryParam = \case+        "ALIGNMENT_BOTTOM" -> Right AlignmentBottom+        "ALIGNMENT_LEFT" -> Right AlignmentLeft+        "ALIGNMENT_RIGHT" -> Right AlignmentRight+        "ALIGNMENT_TOP" -> Right AlignmentTop+        x -> Left ("Unable to parse CreativeAssetAlignment from: " <> x)++instance ToHttpApiData CreativeAssetAlignment where+    toQueryParam = \case+        AlignmentBottom -> "ALIGNMENT_BOTTOM"+        AlignmentLeft -> "ALIGNMENT_LEFT"+        AlignmentRight -> "ALIGNMENT_RIGHT"+        AlignmentTop -> "ALIGNMENT_TOP"++instance FromJSON CreativeAssetAlignment where+    parseJSON = parseJSONText "CreativeAssetAlignment"++instance ToJSON CreativeAssetAlignment where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data RemarketingListsListSortOrder+    = RLLSOAscending+      -- ^ @ASCENDING@+    | RLLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable RemarketingListsListSortOrder++instance FromHttpApiData RemarketingListsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right RLLSOAscending+        "DESCENDING" -> Right RLLSODescending+        x -> Left ("Unable to parse RemarketingListsListSortOrder from: " <> x)++instance ToHttpApiData RemarketingListsListSortOrder where+    toQueryParam = \case+        RLLSOAscending -> "ASCENDING"+        RLLSODescending -> "DESCENDING"++instance FromJSON RemarketingListsListSortOrder where+    parseJSON = parseJSONText "RemarketingListsListSortOrder"++instance ToJSON RemarketingListsListSortOrder where+    toJSON = toJSONText++-- | Select only placement groups with these pricing types.+data PlacementGroupsListPricingTypes+    = PGLPTPricingTypeCpa+      -- ^ @PRICING_TYPE_CPA@+    | PGLPTPricingTypeCpc+      -- ^ @PRICING_TYPE_CPC@+    | PGLPTPricingTypeCpm+      -- ^ @PRICING_TYPE_CPM@+    | PGLPTPricingTypeFlatRateClicks+      -- ^ @PRICING_TYPE_FLAT_RATE_CLICKS@+    | PGLPTPricingTypeFlatRateImpressions+      -- ^ @PRICING_TYPE_FLAT_RATE_IMPRESSIONS@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PlacementGroupsListPricingTypes++instance FromHttpApiData PlacementGroupsListPricingTypes where+    parseQueryParam = \case+        "PRICING_TYPE_CPA" -> Right PGLPTPricingTypeCpa+        "PRICING_TYPE_CPC" -> Right PGLPTPricingTypeCpc+        "PRICING_TYPE_CPM" -> Right PGLPTPricingTypeCpm+        "PRICING_TYPE_FLAT_RATE_CLICKS" -> Right PGLPTPricingTypeFlatRateClicks+        "PRICING_TYPE_FLAT_RATE_IMPRESSIONS" -> Right PGLPTPricingTypeFlatRateImpressions+        x -> Left ("Unable to parse PlacementGroupsListPricingTypes from: " <> x)++instance ToHttpApiData PlacementGroupsListPricingTypes where+    toQueryParam = \case+        PGLPTPricingTypeCpa -> "PRICING_TYPE_CPA"+        PGLPTPricingTypeCpc -> "PRICING_TYPE_CPC"+        PGLPTPricingTypeCpm -> "PRICING_TYPE_CPM"+        PGLPTPricingTypeFlatRateClicks -> "PRICING_TYPE_FLAT_RATE_CLICKS"+        PGLPTPricingTypeFlatRateImpressions -> "PRICING_TYPE_FLAT_RATE_IMPRESSIONS"++instance FromJSON PlacementGroupsListPricingTypes where+    parseJSON = parseJSONText "PlacementGroupsListPricingTypes"++instance ToJSON PlacementGroupsListPricingTypes where+    toJSON = toJSONText++-- | Type of the object of this dynamic targeting key. This is a required+-- field.+data DynamicTargetingKeysDeleteObjectType+    = DTKDOTObjectAd+      -- ^ @OBJECT_AD@+    | DTKDOTObjectAdvertiser+      -- ^ @OBJECT_ADVERTISER@+    | DTKDOTObjectCreative+      -- ^ @OBJECT_CREATIVE@+    | DTKDOTObjectPlacement+      -- ^ @OBJECT_PLACEMENT@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable DynamicTargetingKeysDeleteObjectType++instance FromHttpApiData DynamicTargetingKeysDeleteObjectType where+    parseQueryParam = \case+        "OBJECT_AD" -> Right DTKDOTObjectAd+        "OBJECT_ADVERTISER" -> Right DTKDOTObjectAdvertiser+        "OBJECT_CREATIVE" -> Right DTKDOTObjectCreative+        "OBJECT_PLACEMENT" -> Right DTKDOTObjectPlacement+        x -> Left ("Unable to parse DynamicTargetingKeysDeleteObjectType from: " <> x)++instance ToHttpApiData DynamicTargetingKeysDeleteObjectType where+    toQueryParam = \case+        DTKDOTObjectAd -> "OBJECT_AD"+        DTKDOTObjectAdvertiser -> "OBJECT_ADVERTISER"+        DTKDOTObjectCreative -> "OBJECT_CREATIVE"+        DTKDOTObjectPlacement -> "OBJECT_PLACEMENT"++instance FromJSON DynamicTargetingKeysDeleteObjectType where+    parseJSON = parseJSONText "DynamicTargetingKeysDeleteObjectType"++instance ToJSON DynamicTargetingKeysDeleteObjectType where+    toJSON = toJSONText++-- | Maximum number of active ads allowed for this account.+data AccountActiveAdsLimitTier+    = AAALTActiveAdsTier100K+      -- ^ @ACTIVE_ADS_TIER_100K@+    | AAALTActiveAdsTier200K+      -- ^ @ACTIVE_ADS_TIER_200K@+    | AAALTActiveAdsTier300K+      -- ^ @ACTIVE_ADS_TIER_300K@+    | AAALTActiveAdsTier40K+      -- ^ @ACTIVE_ADS_TIER_40K@+    | AAALTActiveAdsTier75K+      -- ^ @ACTIVE_ADS_TIER_75K@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AccountActiveAdsLimitTier++instance FromHttpApiData AccountActiveAdsLimitTier where+    parseQueryParam = \case+        "ACTIVE_ADS_TIER_100K" -> Right AAALTActiveAdsTier100K+        "ACTIVE_ADS_TIER_200K" -> Right AAALTActiveAdsTier200K+        "ACTIVE_ADS_TIER_300K" -> Right AAALTActiveAdsTier300K+        "ACTIVE_ADS_TIER_40K" -> Right AAALTActiveAdsTier40K+        "ACTIVE_ADS_TIER_75K" -> Right AAALTActiveAdsTier75K+        x -> Left ("Unable to parse AccountActiveAdsLimitTier from: " <> x)++instance ToHttpApiData AccountActiveAdsLimitTier where+    toQueryParam = \case+        AAALTActiveAdsTier100K -> "ACTIVE_ADS_TIER_100K"+        AAALTActiveAdsTier200K -> "ACTIVE_ADS_TIER_200K"+        AAALTActiveAdsTier300K -> "ACTIVE_ADS_TIER_300K"+        AAALTActiveAdsTier40K -> "ACTIVE_ADS_TIER_40K"+        AAALTActiveAdsTier75K -> "ACTIVE_ADS_TIER_75K"++instance FromJSON AccountActiveAdsLimitTier where+    parseJSON = parseJSONText "AccountActiveAdsLimitTier"++instance ToJSON AccountActiveAdsLimitTier where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data AccountsListSortOrder+    = AAscending+      -- ^ @ASCENDING@+    | ADescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AccountsListSortOrder++instance FromHttpApiData AccountsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right AAscending+        "DESCENDING" -> Right ADescending+        x -> Left ("Unable to parse AccountsListSortOrder from: " <> x)++instance ToHttpApiData AccountsListSortOrder where+    toQueryParam = \case+        AAscending -> "ASCENDING"+        ADescending -> "DESCENDING"++instance FromJSON AccountsListSortOrder where+    parseJSON = parseJSONText "AccountsListSortOrder"++instance ToJSON AccountsListSortOrder where+    toJSON = toJSONText++-- | Field by which to sort the list.+data SubAccountsListSortField+    = SALSFID+      -- ^ @ID@+    | SALSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable SubAccountsListSortField++instance FromHttpApiData SubAccountsListSortField where+    parseQueryParam = \case+        "ID" -> Right SALSFID+        "NAME" -> Right SALSFName+        x -> Left ("Unable to parse SubAccountsListSortField from: " <> x)++instance ToHttpApiData SubAccountsListSortField where+    toQueryParam = \case+        SALSFID -> "ID"+        SALSFName -> "NAME"++instance FromJSON SubAccountsListSortField where+    parseJSON = parseJSONText "SubAccountsListSortField"++instance ToJSON SubAccountsListSortField where+    toJSON = toJSONText++-- | Field by which to sort the list.+data AdsListSortField+    = ALSFID+      -- ^ @ID@+    | ALSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AdsListSortField++instance FromHttpApiData AdsListSortField where+    parseQueryParam = \case+        "ID" -> Right ALSFID+        "NAME" -> Right ALSFName+        x -> Left ("Unable to parse AdsListSortField from: " <> x)++instance ToHttpApiData AdsListSortField where+    toQueryParam = \case+        ALSFID -> "ID"+        ALSFName -> "NAME"++instance FromJSON AdsListSortField where+    parseJSON = parseJSONText "AdsListSortField"++instance ToJSON AdsListSortField where+    toJSON = toJSONText++-- | Field by which to sort the list.+data ProjectsListSortField+    = PID+      -- ^ @ID@+    | PName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ProjectsListSortField++instance FromHttpApiData ProjectsListSortField where+    parseQueryParam = \case+        "ID" -> Right PID+        "NAME" -> Right PName+        x -> Left ("Unable to parse ProjectsListSortField from: " <> x)++instance ToHttpApiData ProjectsListSortField where+    toQueryParam = \case+        PID -> "ID"+        PName -> "NAME"++instance FromJSON ProjectsListSortField where+    parseJSON = parseJSONText "ProjectsListSortField"++instance ToJSON ProjectsListSortField where+    toJSON = toJSONText++-- | Select only ads with these types.+data AdsListType+    = AdServingClickTracker+      -- ^ @AD_SERVING_CLICK_TRACKER@+    | AdServingDefaultAd+      -- ^ @AD_SERVING_DEFAULT_AD@+    | AdServingStandardAd+      -- ^ @AD_SERVING_STANDARD_AD@+    | AdServingTracking+      -- ^ @AD_SERVING_TRACKING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AdsListType++instance FromHttpApiData AdsListType where+    parseQueryParam = \case+        "AD_SERVING_CLICK_TRACKER" -> Right AdServingClickTracker+        "AD_SERVING_DEFAULT_AD" -> Right AdServingDefaultAd+        "AD_SERVING_STANDARD_AD" -> Right AdServingStandardAd+        "AD_SERVING_TRACKING" -> Right AdServingTracking+        x -> Left ("Unable to parse AdsListType from: " <> x)++instance ToHttpApiData AdsListType where+    toQueryParam = \case+        AdServingClickTracker -> "AD_SERVING_CLICK_TRACKER"+        AdServingDefaultAd -> "AD_SERVING_DEFAULT_AD"+        AdServingStandardAd -> "AD_SERVING_STANDARD_AD"+        AdServingTracking -> "AD_SERVING_TRACKING"++instance FromJSON AdsListType where+    parseJSON = parseJSONText "AdsListType"++instance ToJSON AdsListType where+    toJSON = toJSONText++-- | Optimization model for this configuration.+data CreativeOptimizationConfigurationOptimizationModel+    = Click+      -- ^ @CLICK@+    | PostClick+      -- ^ @POST_CLICK@+    | PostClickAndImpression+      -- ^ @POST_CLICK_AND_IMPRESSION@+    | PostImpression+      -- ^ @POST_IMPRESSION@+    | VideoCompletion+      -- ^ @VIDEO_COMPLETION@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeOptimizationConfigurationOptimizationModel++instance FromHttpApiData CreativeOptimizationConfigurationOptimizationModel where+    parseQueryParam = \case+        "CLICK" -> Right Click+        "POST_CLICK" -> Right PostClick+        "POST_CLICK_AND_IMPRESSION" -> Right PostClickAndImpression+        "POST_IMPRESSION" -> Right PostImpression+        "VIDEO_COMPLETION" -> Right VideoCompletion+        x -> Left ("Unable to parse CreativeOptimizationConfigurationOptimizationModel from: " <> x)++instance ToHttpApiData CreativeOptimizationConfigurationOptimizationModel where+    toQueryParam = \case+        Click -> "CLICK"+        PostClick -> "POST_CLICK"+        PostClickAndImpression -> "POST_CLICK_AND_IMPRESSION"+        PostImpression -> "POST_IMPRESSION"+        VideoCompletion -> "VIDEO_COMPLETION"++instance FromJSON CreativeOptimizationConfigurationOptimizationModel where+    parseJSON = parseJSONText "CreativeOptimizationConfigurationOptimizationModel"++instance ToJSON CreativeOptimizationConfigurationOptimizationModel where+    toJSON = toJSONText++-- | Administrative level required to enable this account permission.+data AccountPermissionLevel+    = Administrator+      -- ^ @ADMINISTRATOR@+    | User+      -- ^ @USER@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AccountPermissionLevel++instance FromHttpApiData AccountPermissionLevel where+    parseQueryParam = \case+        "ADMINISTRATOR" -> Right Administrator+        "USER" -> Right User+        x -> Left ("Unable to parse AccountPermissionLevel from: " <> x)++instance ToHttpApiData AccountPermissionLevel where+    toQueryParam = \case+        Administrator -> "ADMINISTRATOR"+        User -> "USER"++instance FromJSON AccountPermissionLevel where+    parseJSON = parseJSONText "AccountPermissionLevel"++instance ToJSON AccountPermissionLevel where+    toJSON = toJSONText++-- | List population term type determines the applicable fields in this+-- object. If left unset or set to CUSTOM_VARIABLE_TERM, then variableName,+-- variableFriendlyName, operator, value, and negation are applicable. If+-- set to LIST_MEMBERSHIP_TERM then remarketingListId and contains are+-- applicable. If set to REFERRER_TERM then operator, value, and negation+-- are applicable.+data ListPopulationTermType+    = CustomVariableTerm+      -- ^ @CUSTOM_VARIABLE_TERM@+    | ListMembershipTerm+      -- ^ @LIST_MEMBERSHIP_TERM@+    | ReferrerTerm+      -- ^ @REFERRER_TERM@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ListPopulationTermType++instance FromHttpApiData ListPopulationTermType where+    parseQueryParam = \case+        "CUSTOM_VARIABLE_TERM" -> Right CustomVariableTerm+        "LIST_MEMBERSHIP_TERM" -> Right ListMembershipTerm+        "REFERRER_TERM" -> Right ReferrerTerm+        x -> Left ("Unable to parse ListPopulationTermType from: " <> x)++instance ToHttpApiData ListPopulationTermType where+    toQueryParam = \case+        CustomVariableTerm -> "CUSTOM_VARIABLE_TERM"+        ListMembershipTerm -> "LIST_MEMBERSHIP_TERM"+        ReferrerTerm -> "REFERRER_TERM"++instance FromJSON ListPopulationTermType where+    parseJSON = parseJSONText "ListPopulationTermType"++instance ToJSON ListPopulationTermType where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data AdvertiserGroupsListSortOrder+    = AGLSOAscending+      -- ^ @ASCENDING@+    | AGLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AdvertiserGroupsListSortOrder++instance FromHttpApiData AdvertiserGroupsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right AGLSOAscending+        "DESCENDING" -> Right AGLSODescending+        x -> Left ("Unable to parse AdvertiserGroupsListSortOrder from: " <> x)++instance ToHttpApiData AdvertiserGroupsListSortOrder where+    toQueryParam = \case+        AGLSOAscending -> "ASCENDING"+        AGLSODescending -> "DESCENDING"++instance FromJSON AdvertiserGroupsListSortOrder where+    parseJSON = parseJSONText "AdvertiserGroupsListSortOrder"++instance ToJSON AdvertiserGroupsListSortOrder where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data CreativeFieldValuesListSortOrder+    = CFVLSOAscending+      -- ^ @ASCENDING@+    | CFVLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeFieldValuesListSortOrder++instance FromHttpApiData CreativeFieldValuesListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right CFVLSOAscending+        "DESCENDING" -> Right CFVLSODescending+        x -> Left ("Unable to parse CreativeFieldValuesListSortOrder from: " <> x)++instance ToHttpApiData CreativeFieldValuesListSortOrder where+    toQueryParam = \case+        CFVLSOAscending -> "ASCENDING"+        CFVLSODescending -> "DESCENDING"++instance FromJSON CreativeFieldValuesListSortOrder where+    parseJSON = parseJSONText "CreativeFieldValuesListSortOrder"++instance ToJSON CreativeFieldValuesListSortOrder where+    toJSON = toJSONText++-- | An optional sort order for the dimension column.+data SortedDimensionSortOrder+    = SDSOAscending+      -- ^ @ASCENDING@+    | SDSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable SortedDimensionSortOrder++instance FromHttpApiData SortedDimensionSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right SDSOAscending+        "DESCENDING" -> Right SDSODescending+        x -> Left ("Unable to parse SortedDimensionSortOrder from: " <> x)++instance ToHttpApiData SortedDimensionSortOrder where+    toQueryParam = \case+        SDSOAscending -> "ASCENDING"+        SDSODescending -> "DESCENDING"++instance FromJSON SortedDimensionSortOrder where+    parseJSON = parseJSONText "SortedDimensionSortOrder"++instance ToJSON SortedDimensionSortOrder where+    toJSON = toJSONText++-- | The field by which to sort the list.+data FilesListSortField+    = FLSFID+      -- ^ @ID@+      -- Sort by file ID.+    | FLSFLastModifiedTime+      -- ^ @LAST_MODIFIED_TIME@+      -- Sort by \'lastmodifiedAt\' field.+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FilesListSortField++instance FromHttpApiData FilesListSortField where+    parseQueryParam = \case+        "ID" -> Right FLSFID+        "LAST_MODIFIED_TIME" -> Right FLSFLastModifiedTime+        x -> Left ("Unable to parse FilesListSortField from: " <> x)++instance ToHttpApiData FilesListSortField where+    toQueryParam = \case+        FLSFID -> "ID"+        FLSFLastModifiedTime -> "LAST_MODIFIED_TIME"++instance FromJSON FilesListSortField where+    parseJSON = parseJSONText "FilesListSortField"++instance ToJSON FilesListSortField where+    toJSON = toJSONText++data DirectorySiteInterstitialTagFormatsItem+    = IframeJavascriptInterstitial+      -- ^ @IFRAME_JAVASCRIPT_INTERSTITIAL@+    | InternalRedirectInterstitial+      -- ^ @INTERNAL_REDIRECT_INTERSTITIAL@+    | JavascriptInterstitial+      -- ^ @JAVASCRIPT_INTERSTITIAL@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable DirectorySiteInterstitialTagFormatsItem++instance FromHttpApiData DirectorySiteInterstitialTagFormatsItem where+    parseQueryParam = \case+        "IFRAME_JAVASCRIPT_INTERSTITIAL" -> Right IframeJavascriptInterstitial+        "INTERNAL_REDIRECT_INTERSTITIAL" -> Right InternalRedirectInterstitial+        "JAVASCRIPT_INTERSTITIAL" -> Right JavascriptInterstitial+        x -> Left ("Unable to parse DirectorySiteInterstitialTagFormatsItem from: " <> x)++instance ToHttpApiData DirectorySiteInterstitialTagFormatsItem where+    toQueryParam = \case+        IframeJavascriptInterstitial -> "IFRAME_JAVASCRIPT_INTERSTITIAL"+        InternalRedirectInterstitial -> "INTERNAL_REDIRECT_INTERSTITIAL"+        JavascriptInterstitial -> "JAVASCRIPT_INTERSTITIAL"++instance FromJSON DirectorySiteInterstitialTagFormatsItem where+    parseJSON = parseJSONText "DirectorySiteInterstitialTagFormatsItem"++instance ToJSON DirectorySiteInterstitialTagFormatsItem where+    toJSON = toJSONText++-- | Field by which to sort the list.+data EventTagsListSortField+    = ETLSFID+      -- ^ @ID@+    | ETLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable EventTagsListSortField++instance FromHttpApiData EventTagsListSortField where+    parseQueryParam = \case+        "ID" -> Right ETLSFID+        "NAME" -> Right ETLSFName+        x -> Left ("Unable to parse EventTagsListSortField from: " <> x)++instance ToHttpApiData EventTagsListSortField where+    toQueryParam = \case+        ETLSFID -> "ID"+        ETLSFName -> "NAME"++instance FromJSON EventTagsListSortField where+    parseJSON = parseJSONText "EventTagsListSortField"++instance ToJSON EventTagsListSortField where+    toJSON = toJSONText++-- | Type of inventory item.+data InventoryItemType+    = IITPlanningPlacementTypeCredit+      -- ^ @PLANNING_PLACEMENT_TYPE_CREDIT@+    | IITPlanningPlacementTypeRegular+      -- ^ @PLANNING_PLACEMENT_TYPE_REGULAR@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable InventoryItemType++instance FromHttpApiData InventoryItemType where+    parseQueryParam = \case+        "PLANNING_PLACEMENT_TYPE_CREDIT" -> Right IITPlanningPlacementTypeCredit+        "PLANNING_PLACEMENT_TYPE_REGULAR" -> Right IITPlanningPlacementTypeRegular+        x -> Left ("Unable to parse InventoryItemType from: " <> x)++instance ToHttpApiData InventoryItemType where+    toQueryParam = \case+        IITPlanningPlacementTypeCredit -> "PLANNING_PLACEMENT_TYPE_CREDIT"+        IITPlanningPlacementTypeRegular -> "PLANNING_PLACEMENT_TYPE_REGULAR"++instance FromJSON InventoryItemType where+    parseJSON = parseJSONText "InventoryItemType"++instance ToJSON InventoryItemType where+    toJSON = toJSONText++-- | Offset top unit for an asset. This is a read-only field if the asset+-- displayType is ASSET_DISPLAY_TYPE_OVERLAY. Applicable to the following+-- creative types: all RICH_MEDIA.+data CreativeAssetPositionTopUnit+    = CAPTUOffSetUnitPercent+      -- ^ @OFFSET_UNIT_PERCENT@+    | CAPTUOffSetUnitPixel+      -- ^ @OFFSET_UNIT_PIXEL@+    | CAPTUOffSetUnitPixelFromCenter+      -- ^ @OFFSET_UNIT_PIXEL_FROM_CENTER@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeAssetPositionTopUnit++instance FromHttpApiData CreativeAssetPositionTopUnit where+    parseQueryParam = \case+        "OFFSET_UNIT_PERCENT" -> Right CAPTUOffSetUnitPercent+        "OFFSET_UNIT_PIXEL" -> Right CAPTUOffSetUnitPixel+        "OFFSET_UNIT_PIXEL_FROM_CENTER" -> Right CAPTUOffSetUnitPixelFromCenter+        x -> Left ("Unable to parse CreativeAssetPositionTopUnit from: " <> x)++instance ToHttpApiData CreativeAssetPositionTopUnit where+    toQueryParam = \case+        CAPTUOffSetUnitPercent -> "OFFSET_UNIT_PERCENT"+        CAPTUOffSetUnitPixel -> "OFFSET_UNIT_PIXEL"+        CAPTUOffSetUnitPixelFromCenter -> "OFFSET_UNIT_PIXEL_FROM_CENTER"++instance FromJSON CreativeAssetPositionTopUnit where+    parseJSON = parseJSONText "CreativeAssetPositionTopUnit"++instance ToJSON CreativeAssetPositionTopUnit where+    toJSON = toJSONText++-- | Type of the associated floodlight activity group. This is a read-only+-- field.+data FloodlightActivityFloodlightActivityGroupType+    = FAFAGTCounter+      -- ^ @COUNTER@+    | FAFAGTSale+      -- ^ @SALE@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FloodlightActivityFloodlightActivityGroupType++instance FromHttpApiData FloodlightActivityFloodlightActivityGroupType where+    parseQueryParam = \case+        "COUNTER" -> Right FAFAGTCounter+        "SALE" -> Right FAFAGTSale+        x -> Left ("Unable to parse FloodlightActivityFloodlightActivityGroupType from: " <> x)++instance ToHttpApiData FloodlightActivityFloodlightActivityGroupType where+    toQueryParam = \case+        FAFAGTCounter -> "COUNTER"+        FAFAGTSale -> "SALE"++instance FromJSON FloodlightActivityFloodlightActivityGroupType where+    parseJSON = parseJSONText "FloodlightActivityFloodlightActivityGroupType"++instance ToJSON FloodlightActivityFloodlightActivityGroupType where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data DirectorySiteContactsListSortOrder+    = DSCLSOAscending+      -- ^ @ASCENDING@+    | DSCLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable DirectorySiteContactsListSortOrder++instance FromHttpApiData DirectorySiteContactsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right DSCLSOAscending+        "DESCENDING" -> Right DSCLSODescending+        x -> Left ("Unable to parse DirectorySiteContactsListSortOrder from: " <> x)++instance ToHttpApiData DirectorySiteContactsListSortOrder where+    toQueryParam = \case+        DSCLSOAscending -> "ASCENDING"+        DSCLSODescending -> "DESCENDING"++instance FromJSON DirectorySiteContactsListSortOrder where+    parseJSON = parseJSONText "DirectorySiteContactsListSortOrder"++instance ToJSON DirectorySiteContactsListSortOrder where+    toJSON = toJSONText++-- | Group type of this inventory item if it represents a placement group. Is+-- null otherwise. There are two type of placement groups:+-- PLANNING_PLACEMENT_GROUP_TYPE_PACKAGE is a simple group of inventory+-- items that acts as a single pricing point for a group of tags.+-- PLANNING_PLACEMENT_GROUP_TYPE_ROADBLOCK is a group of inventory items+-- that not only acts as a single pricing point, but also assumes that all+-- the tags in it will be served at the same time. A roadblock requires one+-- of its assigned inventory items to be marked as primary.+data PricingGroupType+    = PlanningPlacementGroupTypePackage+      -- ^ @PLANNING_PLACEMENT_GROUP_TYPE_PACKAGE@+    | PlanningPlacementGroupTypeRoadblock+      -- ^ @PLANNING_PLACEMENT_GROUP_TYPE_ROADBLOCK@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PricingGroupType++instance FromHttpApiData PricingGroupType where+    parseQueryParam = \case+        "PLANNING_PLACEMENT_GROUP_TYPE_PACKAGE" -> Right PlanningPlacementGroupTypePackage+        "PLANNING_PLACEMENT_GROUP_TYPE_ROADBLOCK" -> Right PlanningPlacementGroupTypeRoadblock+        x -> Left ("Unable to parse PricingGroupType from: " <> x)++instance ToHttpApiData PricingGroupType where+    toQueryParam = \case+        PlanningPlacementGroupTypePackage -> "PLANNING_PLACEMENT_GROUP_TYPE_PACKAGE"+        PlanningPlacementGroupTypeRoadblock -> "PLANNING_PLACEMENT_GROUP_TYPE_ROADBLOCK"++instance FromJSON PricingGroupType where+    parseJSON = parseJSONText "PricingGroupType"++instance ToJSON PricingGroupType where+    toJSON = toJSONText++-- | Select only ads with the specified creativeType.+data AdsListCreativeType+    = ALCTBrandSafeDefaultInstreamVideo+      -- ^ @BRAND_SAFE_DEFAULT_INSTREAM_VIDEO@+    | ALCTCustomDisplay+      -- ^ @CUSTOM_DISPLAY@+    | ALCTCustomDisplayInterstitial+      -- ^ @CUSTOM_DISPLAY_INTERSTITIAL@+    | ALCTDisplay+      -- ^ @DISPLAY@+    | ALCTDisplayImageGallery+      -- ^ @DISPLAY_IMAGE_GALLERY@+    | ALCTDisplayRedirect+      -- ^ @DISPLAY_REDIRECT@+    | ALCTFlashInpage+      -- ^ @FLASH_INPAGE@+    | ALCTHTML5Banner+      -- ^ @HTML5_BANNER@+    | ALCTImage+      -- ^ @IMAGE@+    | ALCTInstreamVideo+      -- ^ @INSTREAM_VIDEO@+    | ALCTInstreamVideoRedirect+      -- ^ @INSTREAM_VIDEO_REDIRECT@+    | ALCTInternalRedirect+      -- ^ @INTERNAL_REDIRECT@+    | ALCTInterstitialInternalRedirect+      -- ^ @INTERSTITIAL_INTERNAL_REDIRECT@+    | ALCTRichMediaDisplayBanner+      -- ^ @RICH_MEDIA_DISPLAY_BANNER@+    | ALCTRichMediaDisplayExpanding+      -- ^ @RICH_MEDIA_DISPLAY_EXPANDING@+    | ALCTRichMediaDisplayInterstitial+      -- ^ @RICH_MEDIA_DISPLAY_INTERSTITIAL@+    | ALCTRichMediaDisplayMultiFloatingInterstitial+      -- ^ @RICH_MEDIA_DISPLAY_MULTI_FLOATING_INTERSTITIAL@+    | ALCTRichMediaImExpand+      -- ^ @RICH_MEDIA_IM_EXPAND@+    | ALCTRichMediaInpageFloating+      -- ^ @RICH_MEDIA_INPAGE_FLOATING@+    | ALCTRichMediaMobileInApp+      -- ^ @RICH_MEDIA_MOBILE_IN_APP@+    | ALCTRichMediaPeelDown+      -- ^ @RICH_MEDIA_PEEL_DOWN@+    | ALCTTrackingText+      -- ^ @TRACKING_TEXT@+    | ALCTVpaidLinearVideo+      -- ^ @VPAID_LINEAR_VIDEO@+    | ALCTVpaidNonLinearVideo+      -- ^ @VPAID_NON_LINEAR_VIDEO@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AdsListCreativeType++instance FromHttpApiData AdsListCreativeType where+    parseQueryParam = \case+        "BRAND_SAFE_DEFAULT_INSTREAM_VIDEO" -> Right ALCTBrandSafeDefaultInstreamVideo+        "CUSTOM_DISPLAY" -> Right ALCTCustomDisplay+        "CUSTOM_DISPLAY_INTERSTITIAL" -> Right ALCTCustomDisplayInterstitial+        "DISPLAY" -> Right ALCTDisplay+        "DISPLAY_IMAGE_GALLERY" -> Right ALCTDisplayImageGallery+        "DISPLAY_REDIRECT" -> Right ALCTDisplayRedirect+        "FLASH_INPAGE" -> Right ALCTFlashInpage+        "HTML5_BANNER" -> Right ALCTHTML5Banner+        "IMAGE" -> Right ALCTImage+        "INSTREAM_VIDEO" -> Right ALCTInstreamVideo+        "INSTREAM_VIDEO_REDIRECT" -> Right ALCTInstreamVideoRedirect+        "INTERNAL_REDIRECT" -> Right ALCTInternalRedirect+        "INTERSTITIAL_INTERNAL_REDIRECT" -> Right ALCTInterstitialInternalRedirect+        "RICH_MEDIA_DISPLAY_BANNER" -> Right ALCTRichMediaDisplayBanner+        "RICH_MEDIA_DISPLAY_EXPANDING" -> Right ALCTRichMediaDisplayExpanding+        "RICH_MEDIA_DISPLAY_INTERSTITIAL" -> Right ALCTRichMediaDisplayInterstitial+        "RICH_MEDIA_DISPLAY_MULTI_FLOATING_INTERSTITIAL" -> Right ALCTRichMediaDisplayMultiFloatingInterstitial+        "RICH_MEDIA_IM_EXPAND" -> Right ALCTRichMediaImExpand+        "RICH_MEDIA_INPAGE_FLOATING" -> Right ALCTRichMediaInpageFloating+        "RICH_MEDIA_MOBILE_IN_APP" -> Right ALCTRichMediaMobileInApp+        "RICH_MEDIA_PEEL_DOWN" -> Right ALCTRichMediaPeelDown+        "TRACKING_TEXT" -> Right ALCTTrackingText+        "VPAID_LINEAR_VIDEO" -> Right ALCTVpaidLinearVideo+        "VPAID_NON_LINEAR_VIDEO" -> Right ALCTVpaidNonLinearVideo+        x -> Left ("Unable to parse AdsListCreativeType from: " <> x)++instance ToHttpApiData AdsListCreativeType where+    toQueryParam = \case+        ALCTBrandSafeDefaultInstreamVideo -> "BRAND_SAFE_DEFAULT_INSTREAM_VIDEO"+        ALCTCustomDisplay -> "CUSTOM_DISPLAY"+        ALCTCustomDisplayInterstitial -> "CUSTOM_DISPLAY_INTERSTITIAL"+        ALCTDisplay -> "DISPLAY"+        ALCTDisplayImageGallery -> "DISPLAY_IMAGE_GALLERY"+        ALCTDisplayRedirect -> "DISPLAY_REDIRECT"+        ALCTFlashInpage -> "FLASH_INPAGE"+        ALCTHTML5Banner -> "HTML5_BANNER"+        ALCTImage -> "IMAGE"+        ALCTInstreamVideo -> "INSTREAM_VIDEO"+        ALCTInstreamVideoRedirect -> "INSTREAM_VIDEO_REDIRECT"+        ALCTInternalRedirect -> "INTERNAL_REDIRECT"+        ALCTInterstitialInternalRedirect -> "INTERSTITIAL_INTERNAL_REDIRECT"+        ALCTRichMediaDisplayBanner -> "RICH_MEDIA_DISPLAY_BANNER"+        ALCTRichMediaDisplayExpanding -> "RICH_MEDIA_DISPLAY_EXPANDING"+        ALCTRichMediaDisplayInterstitial -> "RICH_MEDIA_DISPLAY_INTERSTITIAL"+        ALCTRichMediaDisplayMultiFloatingInterstitial -> "RICH_MEDIA_DISPLAY_MULTI_FLOATING_INTERSTITIAL"+        ALCTRichMediaImExpand -> "RICH_MEDIA_IM_EXPAND"+        ALCTRichMediaInpageFloating -> "RICH_MEDIA_INPAGE_FLOATING"+        ALCTRichMediaMobileInApp -> "RICH_MEDIA_MOBILE_IN_APP"+        ALCTRichMediaPeelDown -> "RICH_MEDIA_PEEL_DOWN"+        ALCTTrackingText -> "TRACKING_TEXT"+        ALCTVpaidLinearVideo -> "VPAID_LINEAR_VIDEO"+        ALCTVpaidNonLinearVideo -> "VPAID_NON_LINEAR_VIDEO"++instance FromJSON AdsListCreativeType where+    parseJSON = parseJSONText "AdsListCreativeType"++instance ToJSON AdsListCreativeType where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data FloodlightActivityGroupsListSortOrder+    = FAGLSOAscending+      -- ^ @ASCENDING@+    | FAGLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FloodlightActivityGroupsListSortOrder++instance FromHttpApiData FloodlightActivityGroupsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right FAGLSOAscending+        "DESCENDING" -> Right FAGLSODescending+        x -> Left ("Unable to parse FloodlightActivityGroupsListSortOrder from: " <> x)++instance ToHttpApiData FloodlightActivityGroupsListSortOrder where+    toQueryParam = \case+        FAGLSOAscending -> "ASCENDING"+        FAGLSODescending -> "DESCENDING"++instance FromJSON FloodlightActivityGroupsListSortOrder where+    parseJSON = parseJSONText "FloodlightActivityGroupsListSortOrder"++instance ToJSON FloodlightActivityGroupsListSortOrder where+    toJSON = toJSONText++-- | Type of creative rotation. Can be used to specify whether to use+-- sequential or random rotation.+data CreativeRotationType+    = CreativeRotationTypeRandom+      -- ^ @CREATIVE_ROTATION_TYPE_RANDOM@+    | CreativeRotationTypeSequential+      -- ^ @CREATIVE_ROTATION_TYPE_SEQUENTIAL@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeRotationType++instance FromHttpApiData CreativeRotationType where+    parseQueryParam = \case+        "CREATIVE_ROTATION_TYPE_RANDOM" -> Right CreativeRotationTypeRandom+        "CREATIVE_ROTATION_TYPE_SEQUENTIAL" -> Right CreativeRotationTypeSequential+        x -> Left ("Unable to parse CreativeRotationType from: " <> x)++instance ToHttpApiData CreativeRotationType where+    toQueryParam = \case+        CreativeRotationTypeRandom -> "CREATIVE_ROTATION_TYPE_RANDOM"+        CreativeRotationTypeSequential -> "CREATIVE_ROTATION_TYPE_SEQUENTIAL"++instance FromJSON CreativeRotationType where+    parseJSON = parseJSONText "CreativeRotationType"++instance ToJSON CreativeRotationType where+    toJSON = toJSONText++-- | Field by which to sort the list.+data OrdersListSortField+    = OLSFID+      -- ^ @ID@+    | OLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable OrdersListSortField++instance FromHttpApiData OrdersListSortField where+    parseQueryParam = \case+        "ID" -> Right OLSFID+        "NAME" -> Right OLSFName+        x -> Left ("Unable to parse OrdersListSortField from: " <> x)++instance ToHttpApiData OrdersListSortField where+    toQueryParam = \case+        OLSFID -> "ID"+        OLSFName -> "NAME"++instance FromJSON OrdersListSortField where+    parseJSON = parseJSONText "OrdersListSortField"++instance ToJSON OrdersListSortField where+    toJSON = toJSONText++-- | Field by which to sort the list.+data PlacementGroupsListSortField+    = PGLSFID+      -- ^ @ID@+    | PGLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PlacementGroupsListSortField++instance FromHttpApiData PlacementGroupsListSortField where+    parseQueryParam = \case+        "ID" -> Right PGLSFID+        "NAME" -> Right PGLSFName+        x -> Left ("Unable to parse PlacementGroupsListSortField from: " <> x)++instance ToHttpApiData PlacementGroupsListSortField where+    toQueryParam = \case+        PGLSFID -> "ID"+        PGLSFName -> "NAME"++instance FromJSON PlacementGroupsListSortField where+    parseJSON = parseJSONText "PlacementGroupsListSortField"++instance ToJSON PlacementGroupsListSortField where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data DirectorySitesListSortOrder+    = DSLSOAscending+      -- ^ @ASCENDING@+    | DSLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable DirectorySitesListSortOrder++instance FromHttpApiData DirectorySitesListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right DSLSOAscending+        "DESCENDING" -> Right DSLSODescending+        x -> Left ("Unable to parse DirectorySitesListSortOrder from: " <> x)++instance ToHttpApiData DirectorySitesListSortOrder where+    toQueryParam = \case+        DSLSOAscending -> "ASCENDING"+        DSLSODescending -> "DESCENDING"++instance FromJSON DirectorySitesListSortOrder where+    parseJSON = parseJSONText "DirectorySitesListSortOrder"++instance ToJSON DirectorySitesListSortOrder where+    toJSON = toJSONText++data CreativeAssetDetectedFeaturesItem+    = CADFIApplicationCache+      -- ^ @APPLICATION_CACHE@+    | CADFIAudio+      -- ^ @AUDIO@+    | CADFICanvas+      -- ^ @CANVAS@+    | CADFICanvasText+      -- ^ @CANVAS_TEXT@+    | CADFICssAnimations+      -- ^ @CSS_ANIMATIONS@+    | CADFICssBackgRoundSize+      -- ^ @CSS_BACKGROUND_SIZE@+    | CADFICssBOrderImage+      -- ^ @CSS_BORDER_IMAGE@+    | CADFICssBOrderRadius+      -- ^ @CSS_BORDER_RADIUS@+    | CADFICssBoxShadow+      -- ^ @CSS_BOX_SHADOW@+    | CADFICssColumns+      -- ^ @CSS_COLUMNS@+    | CADFICssFlexBox+      -- ^ @CSS_FLEX_BOX@+    | CADFICssFontFace+      -- ^ @CSS_FONT_FACE@+    | CADFICssGeneratedContent+      -- ^ @CSS_GENERATED_CONTENT@+    | CADFICssGradients+      -- ^ @CSS_GRADIENTS@+    | CADFICssHsla+      -- ^ @CSS_HSLA@+    | CADFICssMultipleBgs+      -- ^ @CSS_MULTIPLE_BGS@+    | CADFICssOpacity+      -- ^ @CSS_OPACITY@+    | CADFICssReflections+      -- ^ @CSS_REFLECTIONS@+    | CADFICssRgba+      -- ^ @CSS_RGBA@+    | CADFICssTextShadow+      -- ^ @CSS_TEXT_SHADOW@+    | CADFICssTransforms+      -- ^ @CSS_TRANSFORMS@+    | CADFICssTRANSFORMS3D+      -- ^ @CSS_TRANSFORMS3D@+    | CADFICssTransitions+      -- ^ @CSS_TRANSITIONS@+    | CADFIDragAndDrop+      -- ^ @DRAG_AND_DROP@+    | CADFIGeoLocation+      -- ^ @GEO_LOCATION@+    | CADFIHashChange+      -- ^ @HASH_CHANGE@+    | CADFIHistory+      -- ^ @HISTORY@+    | CADFIIndexedDB+      -- ^ @INDEXED_DB@+    | CADFIInlineSvg+      -- ^ @INLINE_SVG@+    | CADFIInputAttrAutocomplete+      -- ^ @INPUT_ATTR_AUTOCOMPLETE@+    | CADFIInputAttrAutofocus+      -- ^ @INPUT_ATTR_AUTOFOCUS@+    | CADFIInputAttrList+      -- ^ @INPUT_ATTR_LIST@+    | CADFIInputAttrMax+      -- ^ @INPUT_ATTR_MAX@+    | CADFIInputAttrMin+      -- ^ @INPUT_ATTR_MIN@+    | CADFIInputAttrMultiple+      -- ^ @INPUT_ATTR_MULTIPLE@+    | CADFIInputAttrPattern+      -- ^ @INPUT_ATTR_PATTERN@+    | CADFIInputAttrPlaceholder+      -- ^ @INPUT_ATTR_PLACEHOLDER@+    | CADFIInputAttrRequired+      -- ^ @INPUT_ATTR_REQUIRED@+    | CADFIInputAttrStep+      -- ^ @INPUT_ATTR_STEP@+    | CADFIInputTypeColor+      -- ^ @INPUT_TYPE_COLOR@+    | CADFIInputTypeDate+      -- ^ @INPUT_TYPE_DATE@+    | CADFIInputTypeDatetime+      -- ^ @INPUT_TYPE_DATETIME@+    | CADFIInputTypeDatetimeLocal+      -- ^ @INPUT_TYPE_DATETIME_LOCAL@+    | CADFIInputTypeEmail+      -- ^ @INPUT_TYPE_EMAIL@+    | CADFIInputTypeMonth+      -- ^ @INPUT_TYPE_MONTH@+    | CADFIInputTypeNumber+      -- ^ @INPUT_TYPE_NUMBER@+    | CADFIInputTypeRange+      -- ^ @INPUT_TYPE_RANGE@+    | CADFIInputTypeSearch+      -- ^ @INPUT_TYPE_SEARCH@+    | CADFIInputTypeTel+      -- ^ @INPUT_TYPE_TEL@+    | CADFIInputTypeTime+      -- ^ @INPUT_TYPE_TIME@+    | CADFIInputTypeURL+      -- ^ @INPUT_TYPE_URL@+    | CADFIInputTypeWeek+      -- ^ @INPUT_TYPE_WEEK@+    | CADFILocalStorage+      -- ^ @LOCAL_STORAGE@+    | CADFIPostMessage+      -- ^ @POST_MESSAGE@+    | CADFISessionStorage+      -- ^ @SESSION_STORAGE@+    | CADFISmil+      -- ^ @SMIL@+    | CADFISvgClipPaths+      -- ^ @SVG_CLIP_PATHS@+    | CADFISvgFeImage+      -- ^ @SVG_FE_IMAGE@+    | CADFISvgFilters+      -- ^ @SVG_FILTERS@+    | CADFISvgHref+      -- ^ @SVG_HREF@+    | CADFITouch+      -- ^ @TOUCH@+    | CADFIVideo+      -- ^ @VIDEO@+    | CADFIWebgl+      -- ^ @WEBGL@+    | CADFIWebSockets+      -- ^ @WEB_SOCKETS@+    | CADFIWebSQLDatabase+      -- ^ @WEB_SQL_DATABASE@+    | CADFIWebWorkers+      -- ^ @WEB_WORKERS@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeAssetDetectedFeaturesItem++instance FromHttpApiData CreativeAssetDetectedFeaturesItem where+    parseQueryParam = \case+        "APPLICATION_CACHE" -> Right CADFIApplicationCache+        "AUDIO" -> Right CADFIAudio+        "CANVAS" -> Right CADFICanvas+        "CANVAS_TEXT" -> Right CADFICanvasText+        "CSS_ANIMATIONS" -> Right CADFICssAnimations+        "CSS_BACKGROUND_SIZE" -> Right CADFICssBackgRoundSize+        "CSS_BORDER_IMAGE" -> Right CADFICssBOrderImage+        "CSS_BORDER_RADIUS" -> Right CADFICssBOrderRadius+        "CSS_BOX_SHADOW" -> Right CADFICssBoxShadow+        "CSS_COLUMNS" -> Right CADFICssColumns+        "CSS_FLEX_BOX" -> Right CADFICssFlexBox+        "CSS_FONT_FACE" -> Right CADFICssFontFace+        "CSS_GENERATED_CONTENT" -> Right CADFICssGeneratedContent+        "CSS_GRADIENTS" -> Right CADFICssGradients+        "CSS_HSLA" -> Right CADFICssHsla+        "CSS_MULTIPLE_BGS" -> Right CADFICssMultipleBgs+        "CSS_OPACITY" -> Right CADFICssOpacity+        "CSS_REFLECTIONS" -> Right CADFICssReflections+        "CSS_RGBA" -> Right CADFICssRgba+        "CSS_TEXT_SHADOW" -> Right CADFICssTextShadow+        "CSS_TRANSFORMS" -> Right CADFICssTransforms+        "CSS_TRANSFORMS3D" -> Right CADFICssTRANSFORMS3D+        "CSS_TRANSITIONS" -> Right CADFICssTransitions+        "DRAG_AND_DROP" -> Right CADFIDragAndDrop+        "GEO_LOCATION" -> Right CADFIGeoLocation+        "HASH_CHANGE" -> Right CADFIHashChange+        "HISTORY" -> Right CADFIHistory+        "INDEXED_DB" -> Right CADFIIndexedDB+        "INLINE_SVG" -> Right CADFIInlineSvg+        "INPUT_ATTR_AUTOCOMPLETE" -> Right CADFIInputAttrAutocomplete+        "INPUT_ATTR_AUTOFOCUS" -> Right CADFIInputAttrAutofocus+        "INPUT_ATTR_LIST" -> Right CADFIInputAttrList+        "INPUT_ATTR_MAX" -> Right CADFIInputAttrMax+        "INPUT_ATTR_MIN" -> Right CADFIInputAttrMin+        "INPUT_ATTR_MULTIPLE" -> Right CADFIInputAttrMultiple+        "INPUT_ATTR_PATTERN" -> Right CADFIInputAttrPattern+        "INPUT_ATTR_PLACEHOLDER" -> Right CADFIInputAttrPlaceholder+        "INPUT_ATTR_REQUIRED" -> Right CADFIInputAttrRequired+        "INPUT_ATTR_STEP" -> Right CADFIInputAttrStep+        "INPUT_TYPE_COLOR" -> Right CADFIInputTypeColor+        "INPUT_TYPE_DATE" -> Right CADFIInputTypeDate+        "INPUT_TYPE_DATETIME" -> Right CADFIInputTypeDatetime+        "INPUT_TYPE_DATETIME_LOCAL" -> Right CADFIInputTypeDatetimeLocal+        "INPUT_TYPE_EMAIL" -> Right CADFIInputTypeEmail+        "INPUT_TYPE_MONTH" -> Right CADFIInputTypeMonth+        "INPUT_TYPE_NUMBER" -> Right CADFIInputTypeNumber+        "INPUT_TYPE_RANGE" -> Right CADFIInputTypeRange+        "INPUT_TYPE_SEARCH" -> Right CADFIInputTypeSearch+        "INPUT_TYPE_TEL" -> Right CADFIInputTypeTel+        "INPUT_TYPE_TIME" -> Right CADFIInputTypeTime+        "INPUT_TYPE_URL" -> Right CADFIInputTypeURL+        "INPUT_TYPE_WEEK" -> Right CADFIInputTypeWeek+        "LOCAL_STORAGE" -> Right CADFILocalStorage+        "POST_MESSAGE" -> Right CADFIPostMessage+        "SESSION_STORAGE" -> Right CADFISessionStorage+        "SMIL" -> Right CADFISmil+        "SVG_CLIP_PATHS" -> Right CADFISvgClipPaths+        "SVG_FE_IMAGE" -> Right CADFISvgFeImage+        "SVG_FILTERS" -> Right CADFISvgFilters+        "SVG_HREF" -> Right CADFISvgHref+        "TOUCH" -> Right CADFITouch+        "VIDEO" -> Right CADFIVideo+        "WEBGL" -> Right CADFIWebgl+        "WEB_SOCKETS" -> Right CADFIWebSockets+        "WEB_SQL_DATABASE" -> Right CADFIWebSQLDatabase+        "WEB_WORKERS" -> Right CADFIWebWorkers+        x -> Left ("Unable to parse CreativeAssetDetectedFeaturesItem from: " <> x)++instance ToHttpApiData CreativeAssetDetectedFeaturesItem where+    toQueryParam = \case+        CADFIApplicationCache -> "APPLICATION_CACHE"+        CADFIAudio -> "AUDIO"+        CADFICanvas -> "CANVAS"+        CADFICanvasText -> "CANVAS_TEXT"+        CADFICssAnimations -> "CSS_ANIMATIONS"+        CADFICssBackgRoundSize -> "CSS_BACKGROUND_SIZE"+        CADFICssBOrderImage -> "CSS_BORDER_IMAGE"+        CADFICssBOrderRadius -> "CSS_BORDER_RADIUS"+        CADFICssBoxShadow -> "CSS_BOX_SHADOW"+        CADFICssColumns -> "CSS_COLUMNS"+        CADFICssFlexBox -> "CSS_FLEX_BOX"+        CADFICssFontFace -> "CSS_FONT_FACE"+        CADFICssGeneratedContent -> "CSS_GENERATED_CONTENT"+        CADFICssGradients -> "CSS_GRADIENTS"+        CADFICssHsla -> "CSS_HSLA"+        CADFICssMultipleBgs -> "CSS_MULTIPLE_BGS"+        CADFICssOpacity -> "CSS_OPACITY"+        CADFICssReflections -> "CSS_REFLECTIONS"+        CADFICssRgba -> "CSS_RGBA"+        CADFICssTextShadow -> "CSS_TEXT_SHADOW"+        CADFICssTransforms -> "CSS_TRANSFORMS"+        CADFICssTRANSFORMS3D -> "CSS_TRANSFORMS3D"+        CADFICssTransitions -> "CSS_TRANSITIONS"+        CADFIDragAndDrop -> "DRAG_AND_DROP"+        CADFIGeoLocation -> "GEO_LOCATION"+        CADFIHashChange -> "HASH_CHANGE"+        CADFIHistory -> "HISTORY"+        CADFIIndexedDB -> "INDEXED_DB"+        CADFIInlineSvg -> "INLINE_SVG"+        CADFIInputAttrAutocomplete -> "INPUT_ATTR_AUTOCOMPLETE"+        CADFIInputAttrAutofocus -> "INPUT_ATTR_AUTOFOCUS"+        CADFIInputAttrList -> "INPUT_ATTR_LIST"+        CADFIInputAttrMax -> "INPUT_ATTR_MAX"+        CADFIInputAttrMin -> "INPUT_ATTR_MIN"+        CADFIInputAttrMultiple -> "INPUT_ATTR_MULTIPLE"+        CADFIInputAttrPattern -> "INPUT_ATTR_PATTERN"+        CADFIInputAttrPlaceholder -> "INPUT_ATTR_PLACEHOLDER"+        CADFIInputAttrRequired -> "INPUT_ATTR_REQUIRED"+        CADFIInputAttrStep -> "INPUT_ATTR_STEP"+        CADFIInputTypeColor -> "INPUT_TYPE_COLOR"+        CADFIInputTypeDate -> "INPUT_TYPE_DATE"+        CADFIInputTypeDatetime -> "INPUT_TYPE_DATETIME"+        CADFIInputTypeDatetimeLocal -> "INPUT_TYPE_DATETIME_LOCAL"+        CADFIInputTypeEmail -> "INPUT_TYPE_EMAIL"+        CADFIInputTypeMonth -> "INPUT_TYPE_MONTH"+        CADFIInputTypeNumber -> "INPUT_TYPE_NUMBER"+        CADFIInputTypeRange -> "INPUT_TYPE_RANGE"+        CADFIInputTypeSearch -> "INPUT_TYPE_SEARCH"+        CADFIInputTypeTel -> "INPUT_TYPE_TEL"+        CADFIInputTypeTime -> "INPUT_TYPE_TIME"+        CADFIInputTypeURL -> "INPUT_TYPE_URL"+        CADFIInputTypeWeek -> "INPUT_TYPE_WEEK"+        CADFILocalStorage -> "LOCAL_STORAGE"+        CADFIPostMessage -> "POST_MESSAGE"+        CADFISessionStorage -> "SESSION_STORAGE"+        CADFISmil -> "SMIL"+        CADFISvgClipPaths -> "SVG_CLIP_PATHS"+        CADFISvgFeImage -> "SVG_FE_IMAGE"+        CADFISvgFilters -> "SVG_FILTERS"+        CADFISvgHref -> "SVG_HREF"+        CADFITouch -> "TOUCH"+        CADFIVideo -> "VIDEO"+        CADFIWebgl -> "WEBGL"+        CADFIWebSockets -> "WEB_SOCKETS"+        CADFIWebSQLDatabase -> "WEB_SQL_DATABASE"+        CADFIWebWorkers -> "WEB_WORKERS"++instance FromJSON CreativeAssetDetectedFeaturesItem where+    parseJSON = parseJSONText "CreativeAssetDetectedFeaturesItem"++instance ToJSON CreativeAssetDetectedFeaturesItem where+    toJSON = toJSONText++-- | Type of the floodlight activity group. This is a required field that is+-- read-only after insertion.+data FloodlightActivityGroupType+    = FAGTCounter+      -- ^ @COUNTER@+    | FAGTSale+      -- ^ @SALE@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FloodlightActivityGroupType++instance FromHttpApiData FloodlightActivityGroupType where+    parseQueryParam = \case+        "COUNTER" -> Right FAGTCounter+        "SALE" -> Right FAGTSale+        x -> Left ("Unable to parse FloodlightActivityGroupType from: " <> x)++instance ToHttpApiData FloodlightActivityGroupType where+    toQueryParam = \case+        FAGTCounter -> "COUNTER"+        FAGTSale -> "SALE"++instance FromJSON FloodlightActivityGroupType where+    parseJSON = parseJSONText "FloodlightActivityGroupType"++instance ToJSON FloodlightActivityGroupType where+    toJSON = toJSONText++-- | Directory site contact type.+data DirectorySiteContactType+    = DSCTBilling+      -- ^ @BILLING@+    | DSCTOther+      -- ^ @OTHER@+    | DSCTSales+      -- ^ @SALES@+    | DSCTTechnical+      -- ^ @TECHNICAL@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable DirectorySiteContactType++instance FromHttpApiData DirectorySiteContactType where+    parseQueryParam = \case+        "BILLING" -> Right DSCTBilling+        "OTHER" -> Right DSCTOther+        "SALES" -> Right DSCTSales+        "TECHNICAL" -> Right DSCTTechnical+        x -> Left ("Unable to parse DirectorySiteContactType from: " <> x)++instance ToHttpApiData DirectorySiteContactType where+    toQueryParam = \case+        DSCTBilling -> "BILLING"+        DSCTOther -> "OTHER"+        DSCTSales -> "SALES"+        DSCTTechnical -> "TECHNICAL"++instance FromJSON DirectorySiteContactType where+    parseJSON = parseJSONText "DirectorySiteContactType"++instance ToJSON DirectorySiteContactType where+    toJSON = toJSONText++-- | Tag formats to generate for these placements.+data PlacementsGeneratetagsTagFormats+    = PGTFPlacementTagClickCommands+      -- ^ @PLACEMENT_TAG_CLICK_COMMANDS@+    | PGTFPlacementTagIframeIlayer+      -- ^ @PLACEMENT_TAG_IFRAME_ILAYER@+    | PGTFPlacementTagIframeJavascript+      -- ^ @PLACEMENT_TAG_IFRAME_JAVASCRIPT@+    | PGTFPlacementTagIframeJavascriptLegacy+      -- ^ @PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY@+    | PGTFPlacementTagInstreamVideoPrefetch+      -- ^ @PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH@+    | PGTFPlacementTagInstreamVideoPrefetchVast3+      -- ^ @PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3@+    | PGTFPlacementTagInternalRedirect+      -- ^ @PLACEMENT_TAG_INTERNAL_REDIRECT@+    | PGTFPlacementTagInterstitialIframeJavascript+      -- ^ @PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT@+    | PGTFPlacementTagInterstitialIframeJavascriptLegacy+      -- ^ @PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY@+    | PGTFPlacementTagInterstitialInternalRedirect+      -- ^ @PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT@+    | PGTFPlacementTagInterstitialJavascript+      -- ^ @PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT@+    | PGTFPlacementTagInterstitialJavascriptLegacy+      -- ^ @PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY@+    | PGTFPlacementTagJavascript+      -- ^ @PLACEMENT_TAG_JAVASCRIPT@+    | PGTFPlacementTagJavascriptLegacy+      -- ^ @PLACEMENT_TAG_JAVASCRIPT_LEGACY@+    | PGTFPlacementTagStandard+      -- ^ @PLACEMENT_TAG_STANDARD@+    | PGTFPlacementTagTracking+      -- ^ @PLACEMENT_TAG_TRACKING@+    | PGTFPlacementTagTrackingIframe+      -- ^ @PLACEMENT_TAG_TRACKING_IFRAME@+    | PGTFPlacementTagTrackingJavascript+      -- ^ @PLACEMENT_TAG_TRACKING_JAVASCRIPT@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PlacementsGeneratetagsTagFormats++instance FromHttpApiData PlacementsGeneratetagsTagFormats where+    parseQueryParam = \case+        "PLACEMENT_TAG_CLICK_COMMANDS" -> Right PGTFPlacementTagClickCommands+        "PLACEMENT_TAG_IFRAME_ILAYER" -> Right PGTFPlacementTagIframeIlayer+        "PLACEMENT_TAG_IFRAME_JAVASCRIPT" -> Right PGTFPlacementTagIframeJavascript+        "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY" -> Right PGTFPlacementTagIframeJavascriptLegacy+        "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH" -> Right PGTFPlacementTagInstreamVideoPrefetch+        "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3" -> Right PGTFPlacementTagInstreamVideoPrefetchVast3+        "PLACEMENT_TAG_INTERNAL_REDIRECT" -> Right PGTFPlacementTagInternalRedirect+        "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT" -> Right PGTFPlacementTagInterstitialIframeJavascript+        "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY" -> Right PGTFPlacementTagInterstitialIframeJavascriptLegacy+        "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT" -> Right PGTFPlacementTagInterstitialInternalRedirect+        "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT" -> Right PGTFPlacementTagInterstitialJavascript+        "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY" -> Right PGTFPlacementTagInterstitialJavascriptLegacy+        "PLACEMENT_TAG_JAVASCRIPT" -> Right PGTFPlacementTagJavascript+        "PLACEMENT_TAG_JAVASCRIPT_LEGACY" -> Right PGTFPlacementTagJavascriptLegacy+        "PLACEMENT_TAG_STANDARD" -> Right PGTFPlacementTagStandard+        "PLACEMENT_TAG_TRACKING" -> Right PGTFPlacementTagTracking+        "PLACEMENT_TAG_TRACKING_IFRAME" -> Right PGTFPlacementTagTrackingIframe+        "PLACEMENT_TAG_TRACKING_JAVASCRIPT" -> Right PGTFPlacementTagTrackingJavascript+        x -> Left ("Unable to parse PlacementsGeneratetagsTagFormats from: " <> x)++instance ToHttpApiData PlacementsGeneratetagsTagFormats where+    toQueryParam = \case+        PGTFPlacementTagClickCommands -> "PLACEMENT_TAG_CLICK_COMMANDS"+        PGTFPlacementTagIframeIlayer -> "PLACEMENT_TAG_IFRAME_ILAYER"+        PGTFPlacementTagIframeJavascript -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT"+        PGTFPlacementTagIframeJavascriptLegacy -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY"+        PGTFPlacementTagInstreamVideoPrefetch -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH"+        PGTFPlacementTagInstreamVideoPrefetchVast3 -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3"+        PGTFPlacementTagInternalRedirect -> "PLACEMENT_TAG_INTERNAL_REDIRECT"+        PGTFPlacementTagInterstitialIframeJavascript -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT"+        PGTFPlacementTagInterstitialIframeJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY"+        PGTFPlacementTagInterstitialInternalRedirect -> "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT"+        PGTFPlacementTagInterstitialJavascript -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT"+        PGTFPlacementTagInterstitialJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY"+        PGTFPlacementTagJavascript -> "PLACEMENT_TAG_JAVASCRIPT"+        PGTFPlacementTagJavascriptLegacy -> "PLACEMENT_TAG_JAVASCRIPT_LEGACY"+        PGTFPlacementTagStandard -> "PLACEMENT_TAG_STANDARD"+        PGTFPlacementTagTracking -> "PLACEMENT_TAG_TRACKING"+        PGTFPlacementTagTrackingIframe -> "PLACEMENT_TAG_TRACKING_IFRAME"+        PGTFPlacementTagTrackingJavascript -> "PLACEMENT_TAG_TRACKING_JAVASCRIPT"++instance FromJSON PlacementsGeneratetagsTagFormats where+    parseJSON = parseJSONText "PlacementsGeneratetagsTagFormats"++instance ToJSON PlacementsGeneratetagsTagFormats where+    toJSON = toJSONText++-- | Field by which to sort the list.+data AccountUserProFilesListSortField+    = AUPFLSFID+      -- ^ @ID@+    | AUPFLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AccountUserProFilesListSortField++instance FromHttpApiData AccountUserProFilesListSortField where+    parseQueryParam = \case+        "ID" -> Right AUPFLSFID+        "NAME" -> Right AUPFLSFName+        x -> Left ("Unable to parse AccountUserProFilesListSortField from: " <> x)++instance ToHttpApiData AccountUserProFilesListSortField where+    toQueryParam = \case+        AUPFLSFID -> "ID"+        AUPFLSFName -> "NAME"++instance FromJSON AccountUserProFilesListSortField where+    parseJSON = parseJSONText "AccountUserProFilesListSortField"++instance ToJSON AccountUserProFilesListSortField where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data InventoryItemsListSortOrder+    = IILSOAscending+      -- ^ @ASCENDING@+    | IILSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable InventoryItemsListSortOrder++instance FromHttpApiData InventoryItemsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right IILSOAscending+        "DESCENDING" -> Right IILSODescending+        x -> Left ("Unable to parse InventoryItemsListSortOrder from: " <> x)++instance ToHttpApiData InventoryItemsListSortOrder where+    toQueryParam = \case+        IILSOAscending -> "ASCENDING"+        IILSODescending -> "DESCENDING"++instance FromJSON InventoryItemsListSortOrder where+    parseJSON = parseJSONText "InventoryItemsListSortOrder"++instance ToJSON InventoryItemsListSortOrder where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data PlacementStrategiesListSortOrder+    = PSLSOAscending+      -- ^ @ASCENDING@+    | PSLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PlacementStrategiesListSortOrder++instance FromHttpApiData PlacementStrategiesListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right PSLSOAscending+        "DESCENDING" -> Right PSLSODescending+        x -> Left ("Unable to parse PlacementStrategiesListSortOrder from: " <> x)++instance ToHttpApiData PlacementStrategiesListSortOrder where+    toQueryParam = \case+        PSLSOAscending -> "ASCENDING"+        PSLSODescending -> "DESCENDING"++instance FromJSON PlacementStrategiesListSortOrder where+    parseJSON = parseJSONText "PlacementStrategiesListSortOrder"++instance ToJSON PlacementStrategiesListSortOrder where+    toJSON = toJSONText++-- | The field by which to sort the list.+data ReportsFilesListSortField+    = RFLSFID+      -- ^ @ID@+      -- Sort by file ID.+    | RFLSFLastModifiedTime+      -- ^ @LAST_MODIFIED_TIME@+      -- Sort by \'lastmodifiedAt\' field.+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ReportsFilesListSortField++instance FromHttpApiData ReportsFilesListSortField where+    parseQueryParam = \case+        "ID" -> Right RFLSFID+        "LAST_MODIFIED_TIME" -> Right RFLSFLastModifiedTime+        x -> Left ("Unable to parse ReportsFilesListSortField from: " <> x)++instance ToHttpApiData ReportsFilesListSortField where+    toQueryParam = \case+        RFLSFID -> "ID"+        RFLSFLastModifiedTime -> "LAST_MODIFIED_TIME"++instance FromJSON ReportsFilesListSortField where+    parseJSON = parseJSONText "ReportsFilesListSortField"++instance ToJSON ReportsFilesListSortField where+    toJSON = toJSONText++-- | Field by which to sort the list.+data CreativesListSortField+    = CID+      -- ^ @ID@+    | CName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativesListSortField++instance FromHttpApiData CreativesListSortField where+    parseQueryParam = \case+        "ID" -> Right CID+        "NAME" -> Right CName+        x -> Left ("Unable to parse CreativesListSortField from: " <> x)++instance ToHttpApiData CreativesListSortField where+    toQueryParam = \case+        CID -> "ID"+        CName -> "NAME"++instance FromJSON CreativesListSortField where+    parseJSON = parseJSONText "CreativesListSortField"++instance ToJSON CreativesListSortField where+    toJSON = toJSONText++data DayPartTargetingDaysOfWeekItem+    = DPTDOWIFriday+      -- ^ @FRIDAY@+    | DPTDOWIMonday+      -- ^ @MONDAY@+    | DPTDOWISaturday+      -- ^ @SATURDAY@+    | DPTDOWISunday+      -- ^ @SUNDAY@+    | DPTDOWIThursday+      -- ^ @THURSDAY@+    | DPTDOWITuesday+      -- ^ @TUESDAY@+    | DPTDOWIWednesday+      -- ^ @WEDNESDAY@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable DayPartTargetingDaysOfWeekItem++instance FromHttpApiData DayPartTargetingDaysOfWeekItem where+    parseQueryParam = \case+        "FRIDAY" -> Right DPTDOWIFriday+        "MONDAY" -> Right DPTDOWIMonday+        "SATURDAY" -> Right DPTDOWISaturday+        "SUNDAY" -> Right DPTDOWISunday+        "THURSDAY" -> Right DPTDOWIThursday+        "TUESDAY" -> Right DPTDOWITuesday+        "WEDNESDAY" -> Right DPTDOWIWednesday+        x -> Left ("Unable to parse DayPartTargetingDaysOfWeekItem from: " <> x)++instance ToHttpApiData DayPartTargetingDaysOfWeekItem where+    toQueryParam = \case+        DPTDOWIFriday -> "FRIDAY"+        DPTDOWIMonday -> "MONDAY"+        DPTDOWISaturday -> "SATURDAY"+        DPTDOWISunday -> "SUNDAY"+        DPTDOWIThursday -> "THURSDAY"+        DPTDOWITuesday -> "TUESDAY"+        DPTDOWIWednesday -> "WEDNESDAY"++instance FromJSON DayPartTargetingDaysOfWeekItem where+    parseJSON = parseJSONText "DayPartTargetingDaysOfWeekItem"++instance ToJSON DayPartTargetingDaysOfWeekItem where+    toJSON = toJSONText++-- | Strategy for calculating weights. Used with+-- CREATIVE_ROTATION_TYPE_RANDOM.+data CreativeRotationWeightCalculationStrategy+    = WeightStrategyCustom+      -- ^ @WEIGHT_STRATEGY_CUSTOM@+    | WeightStrategyEqual+      -- ^ @WEIGHT_STRATEGY_EQUAL@+    | WeightStrategyHighestCtr+      -- ^ @WEIGHT_STRATEGY_HIGHEST_CTR@+    | WeightStrategyOptimized+      -- ^ @WEIGHT_STRATEGY_OPTIMIZED@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeRotationWeightCalculationStrategy++instance FromHttpApiData CreativeRotationWeightCalculationStrategy where+    parseQueryParam = \case+        "WEIGHT_STRATEGY_CUSTOM" -> Right WeightStrategyCustom+        "WEIGHT_STRATEGY_EQUAL" -> Right WeightStrategyEqual+        "WEIGHT_STRATEGY_HIGHEST_CTR" -> Right WeightStrategyHighestCtr+        "WEIGHT_STRATEGY_OPTIMIZED" -> Right WeightStrategyOptimized+        x -> Left ("Unable to parse CreativeRotationWeightCalculationStrategy from: " <> x)++instance ToHttpApiData CreativeRotationWeightCalculationStrategy where+    toQueryParam = \case+        WeightStrategyCustom -> "WEIGHT_STRATEGY_CUSTOM"+        WeightStrategyEqual -> "WEIGHT_STRATEGY_EQUAL"+        WeightStrategyHighestCtr -> "WEIGHT_STRATEGY_HIGHEST_CTR"+        WeightStrategyOptimized -> "WEIGHT_STRATEGY_OPTIMIZED"++instance FromJSON CreativeRotationWeightCalculationStrategy where+    parseJSON = parseJSONText "CreativeRotationWeightCalculationStrategy"++instance ToJSON CreativeRotationWeightCalculationStrategy where+    toJSON = toJSONText++-- | The scope that defines which results are returned, default is \'MINE\'.+data FilesListScope+    = FLSAll+      -- ^ @ALL@+      -- All files in account.+    | FLSMine+      -- ^ @MINE@+      -- My files.+    | FLSSharedWithMe+      -- ^ @SHARED_WITH_ME@+      -- Files shared with me.+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FilesListScope++instance FromHttpApiData FilesListScope where+    parseQueryParam = \case+        "ALL" -> Right FLSAll+        "MINE" -> Right FLSMine+        "SHARED_WITH_ME" -> Right FLSSharedWithMe+        x -> Left ("Unable to parse FilesListScope from: " <> x)++instance ToHttpApiData FilesListScope where+    toQueryParam = \case+        FLSAll -> "ALL"+        FLSMine -> "MINE"+        FLSSharedWithMe -> "SHARED_WITH_ME"++instance FromJSON FilesListScope where+    parseJSON = parseJSONText "FilesListScope"++instance ToJSON FilesListScope where+    toJSON = toJSONText++-- | Field by which to sort the list.+data ContentCategoriesListSortField+    = CCLSFID+      -- ^ @ID@+    | CCLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ContentCategoriesListSortField++instance FromHttpApiData ContentCategoriesListSortField where+    parseQueryParam = \case+        "ID" -> Right CCLSFID+        "NAME" -> Right CCLSFName+        x -> Left ("Unable to parse ContentCategoriesListSortField from: " <> x)++instance ToHttpApiData ContentCategoriesListSortField where+    toQueryParam = \case+        CCLSFID -> "ID"+        CCLSFName -> "NAME"++instance FromJSON ContentCategoriesListSortField where+    parseJSON = parseJSONText "ContentCategoriesListSortField"++instance ToJSON ContentCategoriesListSortField where+    toJSON = toJSONText++-- | Audience age group of this project.+data ProjectAudienceAgeGroup+    = PlanningAudienceAge1824+      -- ^ @PLANNING_AUDIENCE_AGE_18_24@+    | PlanningAudienceAge2534+      -- ^ @PLANNING_AUDIENCE_AGE_25_34@+    | PlanningAudienceAge3544+      -- ^ @PLANNING_AUDIENCE_AGE_35_44@+    | PlanningAudienceAge4554+      -- ^ @PLANNING_AUDIENCE_AGE_45_54@+    | PlanningAudienceAge5564+      -- ^ @PLANNING_AUDIENCE_AGE_55_64@+    | PlanningAudienceAge65OrMore+      -- ^ @PLANNING_AUDIENCE_AGE_65_OR_MORE@+    | PlanningAudienceAgeUnknown+      -- ^ @PLANNING_AUDIENCE_AGE_UNKNOWN@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ProjectAudienceAgeGroup++instance FromHttpApiData ProjectAudienceAgeGroup where+    parseQueryParam = \case+        "PLANNING_AUDIENCE_AGE_18_24" -> Right PlanningAudienceAge1824+        "PLANNING_AUDIENCE_AGE_25_34" -> Right PlanningAudienceAge2534+        "PLANNING_AUDIENCE_AGE_35_44" -> Right PlanningAudienceAge3544+        "PLANNING_AUDIENCE_AGE_45_54" -> Right PlanningAudienceAge4554+        "PLANNING_AUDIENCE_AGE_55_64" -> Right PlanningAudienceAge5564+        "PLANNING_AUDIENCE_AGE_65_OR_MORE" -> Right PlanningAudienceAge65OrMore+        "PLANNING_AUDIENCE_AGE_UNKNOWN" -> Right PlanningAudienceAgeUnknown+        x -> Left ("Unable to parse ProjectAudienceAgeGroup from: " <> x)++instance ToHttpApiData ProjectAudienceAgeGroup where+    toQueryParam = \case+        PlanningAudienceAge1824 -> "PLANNING_AUDIENCE_AGE_18_24"+        PlanningAudienceAge2534 -> "PLANNING_AUDIENCE_AGE_25_34"+        PlanningAudienceAge3544 -> "PLANNING_AUDIENCE_AGE_35_44"+        PlanningAudienceAge4554 -> "PLANNING_AUDIENCE_AGE_45_54"+        PlanningAudienceAge5564 -> "PLANNING_AUDIENCE_AGE_55_64"+        PlanningAudienceAge65OrMore -> "PLANNING_AUDIENCE_AGE_65_OR_MORE"+        PlanningAudienceAgeUnknown -> "PLANNING_AUDIENCE_AGE_UNKNOWN"++instance FromJSON ProjectAudienceAgeGroup where+    parseJSON = parseJSONText "ProjectAudienceAgeGroup"++instance ToJSON ProjectAudienceAgeGroup where+    toJSON = toJSONText++-- | Type of ad. This is a required field on insertion. Note that default ads+-- (AD_SERVING_DEFAULT_AD) cannot be created directly (see Creative+-- resource).+data AdType+    = ATAdServingClickTracker+      -- ^ @AD_SERVING_CLICK_TRACKER@+    | ATAdServingDefaultAd+      -- ^ @AD_SERVING_DEFAULT_AD@+    | ATAdServingStandardAd+      -- ^ @AD_SERVING_STANDARD_AD@+    | ATAdServingTracking+      -- ^ @AD_SERVING_TRACKING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AdType++instance FromHttpApiData AdType where+    parseQueryParam = \case+        "AD_SERVING_CLICK_TRACKER" -> Right ATAdServingClickTracker+        "AD_SERVING_DEFAULT_AD" -> Right ATAdServingDefaultAd+        "AD_SERVING_STANDARD_AD" -> Right ATAdServingStandardAd+        "AD_SERVING_TRACKING" -> Right ATAdServingTracking+        x -> Left ("Unable to parse AdType from: " <> x)++instance ToHttpApiData AdType where+    toQueryParam = \case+        ATAdServingClickTracker -> "AD_SERVING_CLICK_TRACKER"+        ATAdServingDefaultAd -> "AD_SERVING_DEFAULT_AD"+        ATAdServingStandardAd -> "AD_SERVING_STANDARD_AD"+        ATAdServingTracking -> "AD_SERVING_TRACKING"++instance FromJSON AdType where+    parseJSON = parseJSONText "AdType"++instance ToJSON AdType where+    toJSON = toJSONText++-- | Select only change logs with the specified action.+data ChangeLogsListAction+    = ActionAdd+      -- ^ @ACTION_ADD@+    | ActionAssign+      -- ^ @ACTION_ASSIGN@+    | ActionAssociate+      -- ^ @ACTION_ASSOCIATE@+    | ActionCreate+      -- ^ @ACTION_CREATE@+    | ActionDelete+      -- ^ @ACTION_DELETE@+    | ActionDisable+      -- ^ @ACTION_DISABLE@+    | ActionEmailTags+      -- ^ @ACTION_EMAIL_TAGS@+    | ActionEnable+      -- ^ @ACTION_ENABLE@+    | ActionLink+      -- ^ @ACTION_LINK@+    | ActionMarkAsDefault+      -- ^ @ACTION_MARK_AS_DEFAULT@+    | ActionPush+      -- ^ @ACTION_PUSH@+    | ActionRemove+      -- ^ @ACTION_REMOVE@+    | ActionSend+      -- ^ @ACTION_SEND@+    | ActionShare+      -- ^ @ACTION_SHARE@+    | ActionUnassign+      -- ^ @ACTION_UNASSIGN@+    | ActionUnlink+      -- ^ @ACTION_UNLINK@+    | ActionUpdate+      -- ^ @ACTION_UPDATE@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ChangeLogsListAction++instance FromHttpApiData ChangeLogsListAction where+    parseQueryParam = \case+        "ACTION_ADD" -> Right ActionAdd+        "ACTION_ASSIGN" -> Right ActionAssign+        "ACTION_ASSOCIATE" -> Right ActionAssociate+        "ACTION_CREATE" -> Right ActionCreate+        "ACTION_DELETE" -> Right ActionDelete+        "ACTION_DISABLE" -> Right ActionDisable+        "ACTION_EMAIL_TAGS" -> Right ActionEmailTags+        "ACTION_ENABLE" -> Right ActionEnable+        "ACTION_LINK" -> Right ActionLink+        "ACTION_MARK_AS_DEFAULT" -> Right ActionMarkAsDefault+        "ACTION_PUSH" -> Right ActionPush+        "ACTION_REMOVE" -> Right ActionRemove+        "ACTION_SEND" -> Right ActionSend+        "ACTION_SHARE" -> Right ActionShare+        "ACTION_UNASSIGN" -> Right ActionUnassign+        "ACTION_UNLINK" -> Right ActionUnlink+        "ACTION_UPDATE" -> Right ActionUpdate+        x -> Left ("Unable to parse ChangeLogsListAction from: " <> x)++instance ToHttpApiData ChangeLogsListAction where+    toQueryParam = \case+        ActionAdd -> "ACTION_ADD"+        ActionAssign -> "ACTION_ASSIGN"+        ActionAssociate -> "ACTION_ASSOCIATE"+        ActionCreate -> "ACTION_CREATE"+        ActionDelete -> "ACTION_DELETE"+        ActionDisable -> "ACTION_DISABLE"+        ActionEmailTags -> "ACTION_EMAIL_TAGS"+        ActionEnable -> "ACTION_ENABLE"+        ActionLink -> "ACTION_LINK"+        ActionMarkAsDefault -> "ACTION_MARK_AS_DEFAULT"+        ActionPush -> "ACTION_PUSH"+        ActionRemove -> "ACTION_REMOVE"+        ActionSend -> "ACTION_SEND"+        ActionShare -> "ACTION_SHARE"+        ActionUnassign -> "ACTION_UNASSIGN"+        ActionUnlink -> "ACTION_UNLINK"+        ActionUpdate -> "ACTION_UPDATE"++instance FromJSON ChangeLogsListAction where+    parseJSON = parseJSONText "ChangeLogsListAction"++instance ToJSON ChangeLogsListAction where+    toJSON = toJSONText++-- | Type of artwork used for the creative. This is a read-only field.+-- Applicable to the following creative types: all RICH_MEDIA, and all+-- VPAID.+data CreativeArtworkType+    = CATArtworkTypeFlash+      -- ^ @ARTWORK_TYPE_FLASH@+    | CATArtworkTypeHTML5+      -- ^ @ARTWORK_TYPE_HTML5@+    | CATArtworkTypeImage+      -- ^ @ARTWORK_TYPE_IMAGE@+    | CATArtworkTypeMixed+      -- ^ @ARTWORK_TYPE_MIXED@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeArtworkType++instance FromHttpApiData CreativeArtworkType where+    parseQueryParam = \case+        "ARTWORK_TYPE_FLASH" -> Right CATArtworkTypeFlash+        "ARTWORK_TYPE_HTML5" -> Right CATArtworkTypeHTML5+        "ARTWORK_TYPE_IMAGE" -> Right CATArtworkTypeImage+        "ARTWORK_TYPE_MIXED" -> Right CATArtworkTypeMixed+        x -> Left ("Unable to parse CreativeArtworkType from: " <> x)++instance ToHttpApiData CreativeArtworkType where+    toQueryParam = \case+        CATArtworkTypeFlash -> "ARTWORK_TYPE_FLASH"+        CATArtworkTypeHTML5 -> "ARTWORK_TYPE_HTML5"+        CATArtworkTypeImage -> "ARTWORK_TYPE_IMAGE"+        CATArtworkTypeMixed -> "ARTWORK_TYPE_MIXED"++instance FromJSON CreativeArtworkType where+    parseJSON = parseJSONText "CreativeArtworkType"++instance ToJSON CreativeArtworkType where+    toJSON = toJSONText++-- | Third-party placement status.+data PlacementStatus+    = AcknowledgeAcceptance+      -- ^ @ACKNOWLEDGE_ACCEPTANCE@+    | AcknowledgeRejection+      -- ^ @ACKNOWLEDGE_REJECTION@+    | Draft+      -- ^ @DRAFT@+    | PaymentAccepted+      -- ^ @PAYMENT_ACCEPTED@+    | PaymentRejected+      -- ^ @PAYMENT_REJECTED@+    | PendingReview+      -- ^ @PENDING_REVIEW@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PlacementStatus++instance FromHttpApiData PlacementStatus where+    parseQueryParam = \case+        "ACKNOWLEDGE_ACCEPTANCE" -> Right AcknowledgeAcceptance+        "ACKNOWLEDGE_REJECTION" -> Right AcknowledgeRejection+        "DRAFT" -> Right Draft+        "PAYMENT_ACCEPTED" -> Right PaymentAccepted+        "PAYMENT_REJECTED" -> Right PaymentRejected+        "PENDING_REVIEW" -> Right PendingReview+        x -> Left ("Unable to parse PlacementStatus from: " <> x)++instance ToHttpApiData PlacementStatus where+    toQueryParam = \case+        AcknowledgeAcceptance -> "ACKNOWLEDGE_ACCEPTANCE"+        AcknowledgeRejection -> "ACKNOWLEDGE_REJECTION"+        Draft -> "DRAFT"+        PaymentAccepted -> "PAYMENT_ACCEPTED"+        PaymentRejected -> "PAYMENT_REJECTED"+        PendingReview -> "PENDING_REVIEW"++instance FromJSON PlacementStatus where+    parseJSON = parseJSONText "PlacementStatus"++instance ToJSON PlacementStatus where+    toJSON = toJSONText++-- | Enum to define for \"MONTHLY\" scheduled reports whether reports should+-- be repeated on the same day of the month as \"startDate\" or the same+-- day of the week of the month. Example: If \'startDate\' is Monday, April+-- 2nd 2012 (2012-04-02), \"DAY_OF_MONTH\" would run subsequent reports on+-- the 2nd of every Month, and \"WEEK_OF_MONTH\" would run subsequent+-- reports on the first Monday of the month.+data ReportScheduleRunsOnDayOfMonth+    = DayOfMonth+      -- ^ @DAY_OF_MONTH@+    | WeekOfMonth+      -- ^ @WEEK_OF_MONTH@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ReportScheduleRunsOnDayOfMonth++instance FromHttpApiData ReportScheduleRunsOnDayOfMonth where+    parseQueryParam = \case+        "DAY_OF_MONTH" -> Right DayOfMonth+        "WEEK_OF_MONTH" -> Right WeekOfMonth+        x -> Left ("Unable to parse ReportScheduleRunsOnDayOfMonth from: " <> x)++instance ToHttpApiData ReportScheduleRunsOnDayOfMonth where+    toQueryParam = \case+        DayOfMonth -> "DAY_OF_MONTH"+        WeekOfMonth -> "WEEK_OF_MONTH"++instance FromJSON ReportScheduleRunsOnDayOfMonth where+    parseJSON = parseJSONText "ReportScheduleRunsOnDayOfMonth"++instance ToJSON ReportScheduleRunsOnDayOfMonth where+    toJSON = toJSONText++data FloodlightActivityUserDefinedVariableTypesItem+    = FAUDVTIU1+      -- ^ @U1@+    | FAUDVTIU10+      -- ^ @U10@+    | FAUDVTIU11+      -- ^ @U11@+    | FAUDVTIU12+      -- ^ @U12@+    | FAUDVTIU13+      -- ^ @U13@+    | FAUDVTIU14+      -- ^ @U14@+    | FAUDVTIU15+      -- ^ @U15@+    | FAUDVTIU16+      -- ^ @U16@+    | FAUDVTIU17+      -- ^ @U17@+    | FAUDVTIU18+      -- ^ @U18@+    | FAUDVTIU19+      -- ^ @U19@+    | FAUDVTIU2+      -- ^ @U2@+    | FAUDVTIU20+      -- ^ @U20@+    | FAUDVTIU3+      -- ^ @U3@+    | FAUDVTIU4+      -- ^ @U4@+    | FAUDVTIU5+      -- ^ @U5@+    | FAUDVTIU6+      -- ^ @U6@+    | FAUDVTIU7+      -- ^ @U7@+    | FAUDVTIU8+      -- ^ @U8@+    | FAUDVTIU9+      -- ^ @U9@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FloodlightActivityUserDefinedVariableTypesItem++instance FromHttpApiData FloodlightActivityUserDefinedVariableTypesItem where+    parseQueryParam = \case+        "U1" -> Right FAUDVTIU1+        "U10" -> Right FAUDVTIU10+        "U11" -> Right FAUDVTIU11+        "U12" -> Right FAUDVTIU12+        "U13" -> Right FAUDVTIU13+        "U14" -> Right FAUDVTIU14+        "U15" -> Right FAUDVTIU15+        "U16" -> Right FAUDVTIU16+        "U17" -> Right FAUDVTIU17+        "U18" -> Right FAUDVTIU18+        "U19" -> Right FAUDVTIU19+        "U2" -> Right FAUDVTIU2+        "U20" -> Right FAUDVTIU20+        "U3" -> Right FAUDVTIU3+        "U4" -> Right FAUDVTIU4+        "U5" -> Right FAUDVTIU5+        "U6" -> Right FAUDVTIU6+        "U7" -> Right FAUDVTIU7+        "U8" -> Right FAUDVTIU8+        "U9" -> Right FAUDVTIU9+        x -> Left ("Unable to parse FloodlightActivityUserDefinedVariableTypesItem from: " <> x)++instance ToHttpApiData FloodlightActivityUserDefinedVariableTypesItem where+    toQueryParam = \case+        FAUDVTIU1 -> "U1"+        FAUDVTIU10 -> "U10"+        FAUDVTIU11 -> "U11"+        FAUDVTIU12 -> "U12"+        FAUDVTIU13 -> "U13"+        FAUDVTIU14 -> "U14"+        FAUDVTIU15 -> "U15"+        FAUDVTIU16 -> "U16"+        FAUDVTIU17 -> "U17"+        FAUDVTIU18 -> "U18"+        FAUDVTIU19 -> "U19"+        FAUDVTIU2 -> "U2"+        FAUDVTIU20 -> "U20"+        FAUDVTIU3 -> "U3"+        FAUDVTIU4 -> "U4"+        FAUDVTIU5 -> "U5"+        FAUDVTIU6 -> "U6"+        FAUDVTIU7 -> "U7"+        FAUDVTIU8 -> "U8"+        FAUDVTIU9 -> "U9"++instance FromJSON FloodlightActivityUserDefinedVariableTypesItem where+    parseJSON = parseJSONText "FloodlightActivityUserDefinedVariableTypesItem"++instance ToJSON FloodlightActivityUserDefinedVariableTypesItem where+    toJSON = toJSONText++-- | Site filter type for this event tag. If no type is specified then the+-- event tag will be applied to all sites.+data EventTagSiteFilterType+    = BlackList+      -- ^ @BLACKLIST@+    | WhiteList+      -- ^ @WHITELIST@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable EventTagSiteFilterType++instance FromHttpApiData EventTagSiteFilterType where+    parseQueryParam = \case+        "BLACKLIST" -> Right BlackList+        "WHITELIST" -> Right WhiteList+        x -> Left ("Unable to parse EventTagSiteFilterType from: " <> x)++instance ToHttpApiData EventTagSiteFilterType where+    toQueryParam = \case+        BlackList -> "BLACKLIST"+        WhiteList -> "WHITELIST"++instance FromJSON EventTagSiteFilterType where+    parseJSON = parseJSONText "EventTagSiteFilterType"++instance ToJSON EventTagSiteFilterType where+    toJSON = toJSONText++-- | The output format of the report. If not specified, default format is+-- \"CSV\". Note that the actual format in the completed report file might+-- differ if for instance the report\'s size exceeds the format\'s+-- capabilities. \"CSV\" will then be the fallback format.+data ReportFormat+    = RFCSV+      -- ^ @CSV@+    | RFExcel+      -- ^ @EXCEL@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ReportFormat++instance FromHttpApiData ReportFormat where+    parseQueryParam = \case+        "CSV" -> Right RFCSV+        "EXCEL" -> Right RFExcel+        x -> Left ("Unable to parse ReportFormat from: " <> x)++instance ToHttpApiData ReportFormat where+    toQueryParam = \case+        RFCSV -> "CSV"+        RFExcel -> "EXCEL"++instance FromJSON ReportFormat where+    parseJSON = parseJSONText "ReportFormat"++instance ToJSON ReportFormat where+    toJSON = toJSONText++-- | Type of this placement group. A package is a simple group of placements+-- that acts as a single pricing point for a group of tags. A roadblock is+-- a group of placements that not only acts as a single pricing point, but+-- also assumes that all the tags in it will be served at the same time. A+-- roadblock requires one of its assigned placements to be marked as+-- primary for reporting. This field is required on insertion.+data PlacementGroupPlacementGroupType+    = PGPGTPlacementPackage+      -- ^ @PLACEMENT_PACKAGE@+    | PGPGTPlacementRoadblock+      -- ^ @PLACEMENT_ROADBLOCK@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PlacementGroupPlacementGroupType++instance FromHttpApiData PlacementGroupPlacementGroupType where+    parseQueryParam = \case+        "PLACEMENT_PACKAGE" -> Right PGPGTPlacementPackage+        "PLACEMENT_ROADBLOCK" -> Right PGPGTPlacementRoadblock+        x -> Left ("Unable to parse PlacementGroupPlacementGroupType from: " <> x)++instance ToHttpApiData PlacementGroupPlacementGroupType where+    toQueryParam = \case+        PGPGTPlacementPackage -> "PLACEMENT_PACKAGE"+        PGPGTPlacementRoadblock -> "PLACEMENT_ROADBLOCK"++instance FromJSON PlacementGroupPlacementGroupType where+    parseJSON = parseJSONText "PlacementGroupPlacementGroupType"++instance ToJSON PlacementGroupPlacementGroupType where+    toJSON = toJSONText++-- | Pricing type of this inventory item.+data PricingPricingType+    = PlanningPlacementPricingTypeClicks+      -- ^ @PLANNING_PLACEMENT_PRICING_TYPE_CLICKS@+    | PlanningPlacementPricingTypeCpa+      -- ^ @PLANNING_PLACEMENT_PRICING_TYPE_CPA@+    | PlanningPlacementPricingTypeCpc+      -- ^ @PLANNING_PLACEMENT_PRICING_TYPE_CPC@+    | PlanningPlacementPricingTypeCpm+      -- ^ @PLANNING_PLACEMENT_PRICING_TYPE_CPM@+    | PlanningPlacementPricingTypeFlatRateClicks+      -- ^ @PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_CLICKS@+    | PlanningPlacementPricingTypeFlatRateImpressions+      -- ^ @PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_IMPRESSIONS@+    | PlanningPlacementPricingTypeImpressions+      -- ^ @PLANNING_PLACEMENT_PRICING_TYPE_IMPRESSIONS@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PricingPricingType++instance FromHttpApiData PricingPricingType where+    parseQueryParam = \case+        "PLANNING_PLACEMENT_PRICING_TYPE_CLICKS" -> Right PlanningPlacementPricingTypeClicks+        "PLANNING_PLACEMENT_PRICING_TYPE_CPA" -> Right PlanningPlacementPricingTypeCpa+        "PLANNING_PLACEMENT_PRICING_TYPE_CPC" -> Right PlanningPlacementPricingTypeCpc+        "PLANNING_PLACEMENT_PRICING_TYPE_CPM" -> Right PlanningPlacementPricingTypeCpm+        "PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_CLICKS" -> Right PlanningPlacementPricingTypeFlatRateClicks+        "PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_IMPRESSIONS" -> Right PlanningPlacementPricingTypeFlatRateImpressions+        "PLANNING_PLACEMENT_PRICING_TYPE_IMPRESSIONS" -> Right PlanningPlacementPricingTypeImpressions+        x -> Left ("Unable to parse PricingPricingType from: " <> x)++instance ToHttpApiData PricingPricingType where+    toQueryParam = \case+        PlanningPlacementPricingTypeClicks -> "PLANNING_PLACEMENT_PRICING_TYPE_CLICKS"+        PlanningPlacementPricingTypeCpa -> "PLANNING_PLACEMENT_PRICING_TYPE_CPA"+        PlanningPlacementPricingTypeCpc -> "PLANNING_PLACEMENT_PRICING_TYPE_CPC"+        PlanningPlacementPricingTypeCpm -> "PLANNING_PLACEMENT_PRICING_TYPE_CPM"+        PlanningPlacementPricingTypeFlatRateClicks -> "PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_CLICKS"+        PlanningPlacementPricingTypeFlatRateImpressions -> "PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_IMPRESSIONS"+        PlanningPlacementPricingTypeImpressions -> "PLANNING_PLACEMENT_PRICING_TYPE_IMPRESSIONS"++instance FromJSON PricingPricingType where+    parseJSON = parseJSONText "PricingPricingType"++instance ToJSON PricingPricingType where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data SubAccountsListSortOrder+    = SALSOAscending+      -- ^ @ASCENDING@+    | SALSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable SubAccountsListSortOrder++instance FromHttpApiData SubAccountsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right SALSOAscending+        "DESCENDING" -> Right SALSODescending+        x -> Left ("Unable to parse SubAccountsListSortOrder from: " <> x)++instance ToHttpApiData SubAccountsListSortOrder where+    toQueryParam = \case+        SALSOAscending -> "ASCENDING"+        SALSODescending -> "DESCENDING"++instance FromJSON SubAccountsListSortOrder where+    parseJSON = parseJSONText "SubAccountsListSortOrder"++instance ToJSON SubAccountsListSortOrder where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data AdsListSortOrder+    = ADSAscending+      -- ^ @ASCENDING@+    | ADSDescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AdsListSortOrder++instance FromHttpApiData AdsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right ADSAscending+        "DESCENDING" -> Right ADSDescending+        x -> Left ("Unable to parse AdsListSortOrder from: " <> x)++instance ToHttpApiData AdsListSortOrder where+    toQueryParam = \case+        ADSAscending -> "ASCENDING"+        ADSDescending -> "DESCENDING"++instance FromJSON AdsListSortOrder where+    parseJSON = parseJSONText "AdsListSortOrder"++instance ToJSON AdsListSortOrder where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data ProjectsListSortOrder+    = PLSOAscending+      -- ^ @ASCENDING@+    | PLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ProjectsListSortOrder++instance FromHttpApiData ProjectsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right PLSOAscending+        "DESCENDING" -> Right PLSODescending+        x -> Left ("Unable to parse ProjectsListSortOrder from: " <> x)++instance ToHttpApiData ProjectsListSortOrder where+    toQueryParam = \case+        PLSOAscending -> "ASCENDING"+        PLSODescending -> "DESCENDING"++instance FromJSON ProjectsListSortOrder where+    parseJSON = parseJSONText "ProjectsListSortOrder"++instance ToJSON ProjectsListSortOrder where+    toJSON = toJSONText++-- | Field by which to sort the list.+data RemarketingListsListSortField+    = RLLSFID+      -- ^ @ID@+    | RLLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable RemarketingListsListSortField++instance FromHttpApiData RemarketingListsListSortField where+    parseQueryParam = \case+        "ID" -> Right RLLSFID+        "NAME" -> Right RLLSFName+        x -> Left ("Unable to parse RemarketingListsListSortField from: " <> x)++instance ToHttpApiData RemarketingListsListSortField where+    toQueryParam = \case+        RLLSFID -> "ID"+        RLLSFName -> "NAME"++instance FromJSON RemarketingListsListSortField where+    parseJSON = parseJSONText "RemarketingListsListSortField"++instance ToJSON RemarketingListsListSortField where+    toJSON = toJSONText++data ReportScheduleRepeatsOnWeekDaysItem+    = RSROWDIFriday+      -- ^ @FRIDAY@+    | RSROWDIMonday+      -- ^ @MONDAY@+    | RSROWDISaturday+      -- ^ @SATURDAY@+    | RSROWDISunday+      -- ^ @SUNDAY@+    | RSROWDIThursday+      -- ^ @THURSDAY@+    | RSROWDITuesday+      -- ^ @TUESDAY@+    | RSROWDIWednesday+      -- ^ @WEDNESDAY@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ReportScheduleRepeatsOnWeekDaysItem++instance FromHttpApiData ReportScheduleRepeatsOnWeekDaysItem where+    parseQueryParam = \case+        "FRIDAY" -> Right RSROWDIFriday+        "MONDAY" -> Right RSROWDIMonday+        "SATURDAY" -> Right RSROWDISaturday+        "SUNDAY" -> Right RSROWDISunday+        "THURSDAY" -> Right RSROWDIThursday+        "TUESDAY" -> Right RSROWDITuesday+        "WEDNESDAY" -> Right RSROWDIWednesday+        x -> Left ("Unable to parse ReportScheduleRepeatsOnWeekDaysItem from: " <> x)++instance ToHttpApiData ReportScheduleRepeatsOnWeekDaysItem where+    toQueryParam = \case+        RSROWDIFriday -> "FRIDAY"+        RSROWDIMonday -> "MONDAY"+        RSROWDISaturday -> "SATURDAY"+        RSROWDISunday -> "SUNDAY"+        RSROWDIThursday -> "THURSDAY"+        RSROWDITuesday -> "TUESDAY"+        RSROWDIWednesday -> "WEDNESDAY"++instance FromJSON ReportScheduleRepeatsOnWeekDaysItem where+    parseJSON = parseJSONText "ReportScheduleRepeatsOnWeekDaysItem"++instance ToJSON ReportScheduleRepeatsOnWeekDaysItem where+    toJSON = toJSONText++-- | Creative group number of the creative group assignment.+data CreativeGroupAssignmentCreativeGroupNumber+    = CreativeGroupOne+      -- ^ @CREATIVE_GROUP_ONE@+    | CreativeGroupTwo+      -- ^ @CREATIVE_GROUP_TWO@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeGroupAssignmentCreativeGroupNumber++instance FromHttpApiData CreativeGroupAssignmentCreativeGroupNumber where+    parseQueryParam = \case+        "CREATIVE_GROUP_ONE" -> Right CreativeGroupOne+        "CREATIVE_GROUP_TWO" -> Right CreativeGroupTwo+        x -> Left ("Unable to parse CreativeGroupAssignmentCreativeGroupNumber from: " <> x)++instance ToHttpApiData CreativeGroupAssignmentCreativeGroupNumber where+    toQueryParam = \case+        CreativeGroupOne -> "CREATIVE_GROUP_ONE"+        CreativeGroupTwo -> "CREATIVE_GROUP_TWO"++instance FromJSON CreativeGroupAssignmentCreativeGroupNumber where+    parseJSON = parseJSONText "CreativeGroupAssignmentCreativeGroupNumber"++instance ToJSON CreativeGroupAssignmentCreativeGroupNumber where+    toJSON = toJSONText++-- | Field by which to sort the list.+data AccountsListSortField+    = AID+      -- ^ @ID@+    | AName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AccountsListSortField++instance FromHttpApiData AccountsListSortField where+    parseQueryParam = \case+        "ID" -> Right AID+        "NAME" -> Right AName+        x -> Left ("Unable to parse AccountsListSortField from: " <> x)++instance ToHttpApiData AccountsListSortField where+    toQueryParam = \case+        AID -> "ID"+        AName -> "NAME"++instance FromJSON AccountsListSortField where+    parseJSON = parseJSONText "AccountsListSortField"++instance ToJSON AccountsListSortField where+    toJSON = toJSONText++-- | Select only advertisers with the specified status.+data AdvertisersListStatus+    = Approved+      -- ^ @APPROVED@+    | OnHold+      -- ^ @ON_HOLD@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AdvertisersListStatus++instance FromHttpApiData AdvertisersListStatus where+    parseQueryParam = \case+        "APPROVED" -> Right Approved+        "ON_HOLD" -> Right OnHold+        x -> Left ("Unable to parse AdvertisersListStatus from: " <> x)++instance ToHttpApiData AdvertisersListStatus where+    toQueryParam = \case+        Approved -> "APPROVED"+        OnHold -> "ON_HOLD"++instance FromJSON AdvertisersListStatus where+    parseJSON = parseJSONText "AdvertisersListStatus"++instance ToJSON AdvertisersListStatus where+    toJSON = toJSONText++-- | Determines how the \'value\' field is matched when filtering. If not+-- specified, defaults to EXACT. If set to WILDCARD_EXPRESSION, \'*\' is+-- allowed as a placeholder for variable length character sequences, and it+-- can be escaped with a backslash. Note, only paid search dimensions+-- (\'dfa:paidSearch*\') allow a matchType other than EXACT.+data DimensionValueMatchType+    = BeginsWith+      -- ^ @BEGINS_WITH@+    | Contains+      -- ^ @CONTAINS@+    | Exact+      -- ^ @EXACT@+    | WildcardExpression+      -- ^ @WILDCARD_EXPRESSION@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable DimensionValueMatchType++instance FromHttpApiData DimensionValueMatchType where+    parseQueryParam = \case+        "BEGINS_WITH" -> Right BeginsWith+        "CONTAINS" -> Right Contains+        "EXACT" -> Right Exact+        "WILDCARD_EXPRESSION" -> Right WildcardExpression+        x -> Left ("Unable to parse DimensionValueMatchType from: " <> x)++instance ToHttpApiData DimensionValueMatchType where+    toQueryParam = \case+        BeginsWith -> "BEGINS_WITH"+        Contains -> "CONTAINS"+        Exact -> "EXACT"+        WildcardExpression -> "WILDCARD_EXPRESSION"++instance FromJSON DimensionValueMatchType where+    parseJSON = parseJSONText "DimensionValueMatchType"++instance ToJSON DimensionValueMatchType where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data PlacementGroupsListSortOrder+    = PGLSOAscending+      -- ^ @ASCENDING@+    | PGLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PlacementGroupsListSortOrder++instance FromHttpApiData PlacementGroupsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right PGLSOAscending+        "DESCENDING" -> Right PGLSODescending+        x -> Left ("Unable to parse PlacementGroupsListSortOrder from: " <> x)++instance ToHttpApiData PlacementGroupsListSortOrder where+    toQueryParam = \case+        PGLSOAscending -> "ASCENDING"+        PGLSODescending -> "DESCENDING"++instance FromJSON PlacementGroupsListSortOrder where+    parseJSON = parseJSONText "PlacementGroupsListSortOrder"++instance ToJSON PlacementGroupsListSortOrder where+    toJSON = toJSONText++-- | Compatibility of this ad. Applicable when type is AD_SERVING_DEFAULT_AD.+-- DISPLAY and DISPLAY_INTERSTITIAL refer to either rendering on desktop or+-- on mobile devices or in mobile apps for regular or interstitial ads,+-- respectively. APP and APP_INTERSTITIAL are only used for existing+-- default ads. New mobile placements must be assigned DISPLAY or+-- DISPLAY_INTERSTITIAL and default ads created for those placements will+-- be limited to those compatibility types. IN_STREAM_VIDEO refers to+-- rendering in-stream video ads developed with the VAST standard.+data AdCompatibility+    = ACApp+      -- ^ @APP@+    | ACAppInterstitial+      -- ^ @APP_INTERSTITIAL@+    | ACDisplay+      -- ^ @DISPLAY@+    | ACDisplayInterstitial+      -- ^ @DISPLAY_INTERSTITIAL@+    | ACInStreamVideo+      -- ^ @IN_STREAM_VIDEO@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AdCompatibility++instance FromHttpApiData AdCompatibility where+    parseQueryParam = \case+        "APP" -> Right ACApp+        "APP_INTERSTITIAL" -> Right ACAppInterstitial+        "DISPLAY" -> Right ACDisplay+        "DISPLAY_INTERSTITIAL" -> Right ACDisplayInterstitial+        "IN_STREAM_VIDEO" -> Right ACInStreamVideo+        x -> Left ("Unable to parse AdCompatibility from: " <> x)++instance ToHttpApiData AdCompatibility where+    toQueryParam = \case+        ACApp -> "APP"+        ACAppInterstitial -> "APP_INTERSTITIAL"+        ACDisplay -> "DISPLAY"+        ACDisplayInterstitial -> "DISPLAY_INTERSTITIAL"+        ACInStreamVideo -> "IN_STREAM_VIDEO"++instance FromJSON AdCompatibility where+    parseJSON = parseJSONText "AdCompatibility"++instance ToJSON AdCompatibility where+    toJSON = toJSONText++-- | Field by which to sort the list.+data CreativeFieldValuesListSortField+    = CFVLSFID+      -- ^ @ID@+    | CFVLSFValue+      -- ^ @VALUE@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeFieldValuesListSortField++instance FromHttpApiData CreativeFieldValuesListSortField where+    parseQueryParam = \case+        "ID" -> Right CFVLSFID+        "VALUE" -> Right CFVLSFValue+        x -> Left ("Unable to parse CreativeFieldValuesListSortField from: " <> x)++instance ToHttpApiData CreativeFieldValuesListSortField where+    toQueryParam = \case+        CFVLSFID -> "ID"+        CFVLSFValue -> "VALUE"++instance FromJSON CreativeFieldValuesListSortField where+    parseJSON = parseJSONText "CreativeFieldValuesListSortField"++instance ToJSON CreativeFieldValuesListSortField where+    toJSON = toJSONText++-- | Field by which to sort the list.+data FloodlightActivityGroupsListSortField+    = FAGLSFID+      -- ^ @ID@+    | FAGLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FloodlightActivityGroupsListSortField++instance FromHttpApiData FloodlightActivityGroupsListSortField where+    parseQueryParam = \case+        "ID" -> Right FAGLSFID+        "NAME" -> Right FAGLSFName+        x -> Left ("Unable to parse FloodlightActivityGroupsListSortField from: " <> x)++instance ToHttpApiData FloodlightActivityGroupsListSortField where+    toQueryParam = \case+        FAGLSFID -> "ID"+        FAGLSFName -> "NAME"++instance FromJSON FloodlightActivityGroupsListSortField where+    parseJSON = parseJSONText "FloodlightActivityGroupsListSortField"++instance ToJSON FloodlightActivityGroupsListSortField where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data OrdersListSortOrder+    = OLSOAscending+      -- ^ @ASCENDING@+    | OLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable OrdersListSortOrder++instance FromHttpApiData OrdersListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right OLSOAscending+        "DESCENDING" -> Right OLSODescending+        x -> Left ("Unable to parse OrdersListSortOrder from: " <> x)++instance ToHttpApiData OrdersListSortOrder where+    toQueryParam = \case+        OLSOAscending -> "ASCENDING"+        OLSODescending -> "DESCENDING"++instance FromJSON OrdersListSortOrder where+    parseJSON = parseJSONText "OrdersListSortOrder"++instance ToJSON OrdersListSortOrder where+    toJSON = toJSONText++-- | Profile for this account. This is a read-only field that can be left+-- blank.+data AccountAccountProFile+    = AccountProFileBasic+      -- ^ @ACCOUNT_PROFILE_BASIC@+    | AccountProFileStandard+      -- ^ @ACCOUNT_PROFILE_STANDARD@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AccountAccountProFile++instance FromHttpApiData AccountAccountProFile where+    parseQueryParam = \case+        "ACCOUNT_PROFILE_BASIC" -> Right AccountProFileBasic+        "ACCOUNT_PROFILE_STANDARD" -> Right AccountProFileStandard+        x -> Left ("Unable to parse AccountAccountProFile from: " <> x)++instance ToHttpApiData AccountAccountProFile where+    toQueryParam = \case+        AccountProFileBasic -> "ACCOUNT_PROFILE_BASIC"+        AccountProFileStandard -> "ACCOUNT_PROFILE_STANDARD"++instance FromJSON AccountAccountProFile where+    parseJSON = parseJSONText "AccountAccountProFile"++instance ToJSON AccountAccountProFile where+    toJSON = toJSONText++-- | Type of this creative.This is a required field. Applicable to all+-- creative types.+data CreativeType+    = CTBrandSafeDefaultInstreamVideo+      -- ^ @BRAND_SAFE_DEFAULT_INSTREAM_VIDEO@+    | CTCustomDisplay+      -- ^ @CUSTOM_DISPLAY@+    | CTCustomDisplayInterstitial+      -- ^ @CUSTOM_DISPLAY_INTERSTITIAL@+    | CTDisplay+      -- ^ @DISPLAY@+    | CTDisplayImageGallery+      -- ^ @DISPLAY_IMAGE_GALLERY@+    | CTDisplayRedirect+      -- ^ @DISPLAY_REDIRECT@+    | CTFlashInpage+      -- ^ @FLASH_INPAGE@+    | CTHTML5Banner+      -- ^ @HTML5_BANNER@+    | CTImage+      -- ^ @IMAGE@+    | CTInstreamVideo+      -- ^ @INSTREAM_VIDEO@+    | CTInstreamVideoRedirect+      -- ^ @INSTREAM_VIDEO_REDIRECT@+    | CTInternalRedirect+      -- ^ @INTERNAL_REDIRECT@+    | CTInterstitialInternalRedirect+      -- ^ @INTERSTITIAL_INTERNAL_REDIRECT@+    | CTRichMediaDisplayBanner+      -- ^ @RICH_MEDIA_DISPLAY_BANNER@+    | CTRichMediaDisplayExpanding+      -- ^ @RICH_MEDIA_DISPLAY_EXPANDING@+    | CTRichMediaDisplayInterstitial+      -- ^ @RICH_MEDIA_DISPLAY_INTERSTITIAL@+    | CTRichMediaDisplayMultiFloatingInterstitial+      -- ^ @RICH_MEDIA_DISPLAY_MULTI_FLOATING_INTERSTITIAL@+    | CTRichMediaImExpand+      -- ^ @RICH_MEDIA_IM_EXPAND@+    | CTRichMediaInpageFloating+      -- ^ @RICH_MEDIA_INPAGE_FLOATING@+    | CTRichMediaMobileInApp+      -- ^ @RICH_MEDIA_MOBILE_IN_APP@+    | CTRichMediaPeelDown+      -- ^ @RICH_MEDIA_PEEL_DOWN@+    | CTTrackingText+      -- ^ @TRACKING_TEXT@+    | CTVpaidLinearVideo+      -- ^ @VPAID_LINEAR_VIDEO@+    | CTVpaidNonLinearVideo+      -- ^ @VPAID_NON_LINEAR_VIDEO@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeType++instance FromHttpApiData CreativeType where+    parseQueryParam = \case+        "BRAND_SAFE_DEFAULT_INSTREAM_VIDEO" -> Right CTBrandSafeDefaultInstreamVideo+        "CUSTOM_DISPLAY" -> Right CTCustomDisplay+        "CUSTOM_DISPLAY_INTERSTITIAL" -> Right CTCustomDisplayInterstitial+        "DISPLAY" -> Right CTDisplay+        "DISPLAY_IMAGE_GALLERY" -> Right CTDisplayImageGallery+        "DISPLAY_REDIRECT" -> Right CTDisplayRedirect+        "FLASH_INPAGE" -> Right CTFlashInpage+        "HTML5_BANNER" -> Right CTHTML5Banner+        "IMAGE" -> Right CTImage+        "INSTREAM_VIDEO" -> Right CTInstreamVideo+        "INSTREAM_VIDEO_REDIRECT" -> Right CTInstreamVideoRedirect+        "INTERNAL_REDIRECT" -> Right CTInternalRedirect+        "INTERSTITIAL_INTERNAL_REDIRECT" -> Right CTInterstitialInternalRedirect+        "RICH_MEDIA_DISPLAY_BANNER" -> Right CTRichMediaDisplayBanner+        "RICH_MEDIA_DISPLAY_EXPANDING" -> Right CTRichMediaDisplayExpanding+        "RICH_MEDIA_DISPLAY_INTERSTITIAL" -> Right CTRichMediaDisplayInterstitial+        "RICH_MEDIA_DISPLAY_MULTI_FLOATING_INTERSTITIAL" -> Right CTRichMediaDisplayMultiFloatingInterstitial+        "RICH_MEDIA_IM_EXPAND" -> Right CTRichMediaImExpand+        "RICH_MEDIA_INPAGE_FLOATING" -> Right CTRichMediaInpageFloating+        "RICH_MEDIA_MOBILE_IN_APP" -> Right CTRichMediaMobileInApp+        "RICH_MEDIA_PEEL_DOWN" -> Right CTRichMediaPeelDown+        "TRACKING_TEXT" -> Right CTTrackingText+        "VPAID_LINEAR_VIDEO" -> Right CTVpaidLinearVideo+        "VPAID_NON_LINEAR_VIDEO" -> Right CTVpaidNonLinearVideo+        x -> Left ("Unable to parse CreativeType from: " <> x)++instance ToHttpApiData CreativeType where+    toQueryParam = \case+        CTBrandSafeDefaultInstreamVideo -> "BRAND_SAFE_DEFAULT_INSTREAM_VIDEO"+        CTCustomDisplay -> "CUSTOM_DISPLAY"+        CTCustomDisplayInterstitial -> "CUSTOM_DISPLAY_INTERSTITIAL"+        CTDisplay -> "DISPLAY"+        CTDisplayImageGallery -> "DISPLAY_IMAGE_GALLERY"+        CTDisplayRedirect -> "DISPLAY_REDIRECT"+        CTFlashInpage -> "FLASH_INPAGE"+        CTHTML5Banner -> "HTML5_BANNER"+        CTImage -> "IMAGE"+        CTInstreamVideo -> "INSTREAM_VIDEO"+        CTInstreamVideoRedirect -> "INSTREAM_VIDEO_REDIRECT"+        CTInternalRedirect -> "INTERNAL_REDIRECT"+        CTInterstitialInternalRedirect -> "INTERSTITIAL_INTERNAL_REDIRECT"+        CTRichMediaDisplayBanner -> "RICH_MEDIA_DISPLAY_BANNER"+        CTRichMediaDisplayExpanding -> "RICH_MEDIA_DISPLAY_EXPANDING"+        CTRichMediaDisplayInterstitial -> "RICH_MEDIA_DISPLAY_INTERSTITIAL"+        CTRichMediaDisplayMultiFloatingInterstitial -> "RICH_MEDIA_DISPLAY_MULTI_FLOATING_INTERSTITIAL"+        CTRichMediaImExpand -> "RICH_MEDIA_IM_EXPAND"+        CTRichMediaInpageFloating -> "RICH_MEDIA_INPAGE_FLOATING"+        CTRichMediaMobileInApp -> "RICH_MEDIA_MOBILE_IN_APP"+        CTRichMediaPeelDown -> "RICH_MEDIA_PEEL_DOWN"+        CTTrackingText -> "TRACKING_TEXT"+        CTVpaidLinearVideo -> "VPAID_LINEAR_VIDEO"+        CTVpaidNonLinearVideo -> "VPAID_NON_LINEAR_VIDEO"++instance FromJSON CreativeType where+    parseJSON = parseJSONText "CreativeType"++instance ToJSON CreativeType where+    toJSON = toJSONText++-- | Order of sorted results, default is \'DESCENDING\'.+data FilesListSortOrder+    = FLSOAscending+      -- ^ @ASCENDING@+      -- Ascending order.+    | FLSODescending+      -- ^ @DESCENDING@+      -- Descending order.+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FilesListSortOrder++instance FromHttpApiData FilesListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right FLSOAscending+        "DESCENDING" -> Right FLSODescending+        x -> Left ("Unable to parse FilesListSortOrder from: " <> x)++instance ToHttpApiData FilesListSortOrder where+    toQueryParam = \case+        FLSOAscending -> "ASCENDING"+        FLSODescending -> "DESCENDING"++instance FromJSON FilesListSortOrder where+    parseJSON = parseJSONText "FilesListSortOrder"++instance ToJSON FilesListSortOrder where+    toJSON = toJSONText++-- | Field by which to sort the list.+data AdvertiserGroupsListSortField+    = AGLSFID+      -- ^ @ID@+    | AGLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AdvertiserGroupsListSortField++instance FromHttpApiData AdvertiserGroupsListSortField where+    parseQueryParam = \case+        "ID" -> Right AGLSFID+        "NAME" -> Right AGLSFName+        x -> Left ("Unable to parse AdvertiserGroupsListSortField from: " <> x)++instance ToHttpApiData AdvertiserGroupsListSortField where+    toQueryParam = \case+        AGLSFID -> "ID"+        AGLSFName -> "NAME"++instance FromJSON AdvertiserGroupsListSortField where+    parseJSON = parseJSONText "AdvertiserGroupsListSortField"++instance ToJSON AdvertiserGroupsListSortField where+    toJSON = toJSONText++-- | Type of browser window for which the backup image of the flash creative+-- can be displayed.+data TargetWindowTargetWindowOption+    = CurrentWindow+      -- ^ @CURRENT_WINDOW@+    | Custom+      -- ^ @CUSTOM@+    | NewWindow+      -- ^ @NEW_WINDOW@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable TargetWindowTargetWindowOption++instance FromHttpApiData TargetWindowTargetWindowOption where+    parseQueryParam = \case+        "CURRENT_WINDOW" -> Right CurrentWindow+        "CUSTOM" -> Right Custom+        "NEW_WINDOW" -> Right NewWindow+        x -> Left ("Unable to parse TargetWindowTargetWindowOption from: " <> x)++instance ToHttpApiData TargetWindowTargetWindowOption where+    toQueryParam = \case+        CurrentWindow -> "CURRENT_WINDOW"+        Custom -> "CUSTOM"+        NewWindow -> "NEW_WINDOW"++instance FromJSON TargetWindowTargetWindowOption where+    parseJSON = parseJSONText "TargetWindowTargetWindowOption"++instance ToJSON TargetWindowTargetWindowOption where+    toJSON = toJSONText++-- | Field by which to sort the list.+data DirectorySiteContactsListSortField+    = DSCLSFID+      -- ^ @ID@+    | DSCLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable DirectorySiteContactsListSortField++instance FromHttpApiData DirectorySiteContactsListSortField where+    parseQueryParam = \case+        "ID" -> Right DSCLSFID+        "NAME" -> Right DSCLSFName+        x -> Left ("Unable to parse DirectorySiteContactsListSortField from: " <> x)++instance ToHttpApiData DirectorySiteContactsListSortField where+    toQueryParam = \case+        DSCLSFID -> "ID"+        DSCLSFName -> "NAME"++instance FromJSON DirectorySiteContactsListSortField where+    parseJSON = parseJSONText "DirectorySiteContactsListSortField"++instance ToJSON DirectorySiteContactsListSortField where+    toJSON = toJSONText++-- | Select only placements with these pricing types.+data PlacementsListPricingTypes+    = PLPTPricingTypeCpa+      -- ^ @PRICING_TYPE_CPA@+    | PLPTPricingTypeCpc+      -- ^ @PRICING_TYPE_CPC@+    | PLPTPricingTypeCpm+      -- ^ @PRICING_TYPE_CPM@+    | PLPTPricingTypeFlatRateClicks+      -- ^ @PRICING_TYPE_FLAT_RATE_CLICKS@+    | PLPTPricingTypeFlatRateImpressions+      -- ^ @PRICING_TYPE_FLAT_RATE_IMPRESSIONS@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PlacementsListPricingTypes++instance FromHttpApiData PlacementsListPricingTypes where+    parseQueryParam = \case+        "PRICING_TYPE_CPA" -> Right PLPTPricingTypeCpa+        "PRICING_TYPE_CPC" -> Right PLPTPricingTypeCpc+        "PRICING_TYPE_CPM" -> Right PLPTPricingTypeCpm+        "PRICING_TYPE_FLAT_RATE_CLICKS" -> Right PLPTPricingTypeFlatRateClicks+        "PRICING_TYPE_FLAT_RATE_IMPRESSIONS" -> Right PLPTPricingTypeFlatRateImpressions+        x -> Left ("Unable to parse PlacementsListPricingTypes from: " <> x)++instance ToHttpApiData PlacementsListPricingTypes where+    toQueryParam = \case+        PLPTPricingTypeCpa -> "PRICING_TYPE_CPA"+        PLPTPricingTypeCpc -> "PRICING_TYPE_CPC"+        PLPTPricingTypeCpm -> "PRICING_TYPE_CPM"+        PLPTPricingTypeFlatRateClicks -> "PRICING_TYPE_FLAT_RATE_CLICKS"+        PLPTPricingTypeFlatRateImpressions -> "PRICING_TYPE_FLAT_RATE_IMPRESSIONS"++instance FromJSON PlacementsListPricingTypes where+    parseJSON = parseJSONText "PlacementsListPricingTypes"++instance ToJSON PlacementsListPricingTypes where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data EventTagsListSortOrder+    = ETLSOAscending+      -- ^ @ASCENDING@+    | ETLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable EventTagsListSortOrder++instance FromHttpApiData EventTagsListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right ETLSOAscending+        "DESCENDING" -> Right ETLSODescending+        x -> Left ("Unable to parse EventTagsListSortOrder from: " <> x)++instance ToHttpApiData EventTagsListSortOrder where+    toQueryParam = \case+        ETLSOAscending -> "ASCENDING"+        ETLSODescending -> "DESCENDING"++instance FromJSON EventTagsListSortOrder where+    parseJSON = parseJSONText "EventTagsListSortOrder"++instance ToJSON EventTagsListSortOrder where+    toJSON = toJSONText++-- | Describes whether the encrypted cookie was received from ad serving (the+-- %m macro) or from Data Transfer.+data EncryptionInfoEncryptionSource+    = AdServing+      -- ^ @AD_SERVING@+    | DataTransfer+      -- ^ @DATA_TRANSFER@+    | EncryptionScopeUnknown+      -- ^ @ENCRYPTION_SCOPE_UNKNOWN@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable EncryptionInfoEncryptionSource++instance FromHttpApiData EncryptionInfoEncryptionSource where+    parseQueryParam = \case+        "AD_SERVING" -> Right AdServing+        "DATA_TRANSFER" -> Right DataTransfer+        "ENCRYPTION_SCOPE_UNKNOWN" -> Right EncryptionScopeUnknown+        x -> Left ("Unable to parse EncryptionInfoEncryptionSource from: " <> x)++instance ToHttpApiData EncryptionInfoEncryptionSource where+    toQueryParam = \case+        AdServing -> "AD_SERVING"+        DataTransfer -> "DATA_TRANSFER"+        EncryptionScopeUnknown -> "ENCRYPTION_SCOPE_UNKNOWN"++instance FromJSON EncryptionInfoEncryptionSource where+    parseJSON = parseJSONText "EncryptionInfoEncryptionSource"++instance ToJSON EncryptionInfoEncryptionSource where+    toJSON = toJSONText++-- | Field by which to sort the list.+data DirectorySitesListSortField+    = DSLSFID+      -- ^ @ID@+    | DSLSFName+      -- ^ @NAME@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable DirectorySitesListSortField++instance FromHttpApiData DirectorySitesListSortField where+    parseQueryParam = \case+        "ID" -> Right DSLSFID+        "NAME" -> Right DSLSFName+        x -> Left ("Unable to parse DirectorySitesListSortField from: " <> x)++instance ToHttpApiData DirectorySitesListSortField where+    toQueryParam = \case+        DSLSFID -> "ID"+        DSLSFName -> "NAME"++instance FromJSON DirectorySitesListSortField where+    parseJSON = parseJSONText "DirectorySitesListSortField"++instance ToJSON DirectorySitesListSortField where+    toJSON = toJSONText++-- | The dimension option.+data ReportCrossDimensionReachCriteriaDimension+    = RCDRCDAdvertiser+      -- ^ @ADVERTISER@+    | RCDRCDCampaign+      -- ^ @CAMPAIGN@+    | RCDRCDSiteByAdvertiser+      -- ^ @SITE_BY_ADVERTISER@+    | RCDRCDSiteByCampaign+      -- ^ @SITE_BY_CAMPAIGN@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ReportCrossDimensionReachCriteriaDimension++instance FromHttpApiData ReportCrossDimensionReachCriteriaDimension where+    parseQueryParam = \case+        "ADVERTISER" -> Right RCDRCDAdvertiser+        "CAMPAIGN" -> Right RCDRCDCampaign+        "SITE_BY_ADVERTISER" -> Right RCDRCDSiteByAdvertiser+        "SITE_BY_CAMPAIGN" -> Right RCDRCDSiteByCampaign+        x -> Left ("Unable to parse ReportCrossDimensionReachCriteriaDimension from: " <> x)++instance ToHttpApiData ReportCrossDimensionReachCriteriaDimension where+    toQueryParam = \case+        RCDRCDAdvertiser -> "ADVERTISER"+        RCDRCDCampaign -> "CAMPAIGN"+        RCDRCDSiteByAdvertiser -> "SITE_BY_ADVERTISER"+        RCDRCDSiteByCampaign -> "SITE_BY_CAMPAIGN"++instance FromJSON ReportCrossDimensionReachCriteriaDimension where+    parseJSON = parseJSONText "ReportCrossDimensionReachCriteriaDimension"++instance ToJSON ReportCrossDimensionReachCriteriaDimension where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data SitesListSortOrder+    = SLSOAscending+      -- ^ @ASCENDING@+    | SLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable SitesListSortOrder++instance FromHttpApiData SitesListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right SLSOAscending+        "DESCENDING" -> Right SLSODescending+        x -> Left ("Unable to parse SitesListSortOrder from: " <> x)++instance ToHttpApiData SitesListSortOrder where+    toQueryParam = \case+        SLSOAscending -> "ASCENDING"+        SLSODescending -> "DESCENDING"++instance FromJSON SitesListSortOrder where+    parseJSON = parseJSONText "SitesListSortOrder"++instance ToJSON SitesListSortOrder where+    toJSON = toJSONText++data PlacementTagFormatsItem+    = PTFIPlacementTagClickCommands+      -- ^ @PLACEMENT_TAG_CLICK_COMMANDS@+    | PTFIPlacementTagIframeIlayer+      -- ^ @PLACEMENT_TAG_IFRAME_ILAYER@+    | PTFIPlacementTagIframeJavascript+      -- ^ @PLACEMENT_TAG_IFRAME_JAVASCRIPT@+    | PTFIPlacementTagIframeJavascriptLegacy+      -- ^ @PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY@+    | PTFIPlacementTagInstreamVideoPrefetch+      -- ^ @PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH@+    | PTFIPlacementTagInstreamVideoPrefetchVast3+      -- ^ @PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3@+    | PTFIPlacementTagInternalRedirect+      -- ^ @PLACEMENT_TAG_INTERNAL_REDIRECT@+    | PTFIPlacementTagInterstitialIframeJavascript+      -- ^ @PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT@+    | PTFIPlacementTagInterstitialIframeJavascriptLegacy+      -- ^ @PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY@+    | PTFIPlacementTagInterstitialInternalRedirect+      -- ^ @PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT@+    | PTFIPlacementTagInterstitialJavascript+      -- ^ @PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT@+    | PTFIPlacementTagInterstitialJavascriptLegacy+      -- ^ @PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY@+    | PTFIPlacementTagJavascript+      -- ^ @PLACEMENT_TAG_JAVASCRIPT@+    | PTFIPlacementTagJavascriptLegacy+      -- ^ @PLACEMENT_TAG_JAVASCRIPT_LEGACY@+    | PTFIPlacementTagStandard+      -- ^ @PLACEMENT_TAG_STANDARD@+    | PTFIPlacementTagTracking+      -- ^ @PLACEMENT_TAG_TRACKING@+    | PTFIPlacementTagTrackingIframe+      -- ^ @PLACEMENT_TAG_TRACKING_IFRAME@+    | PTFIPlacementTagTrackingJavascript+      -- ^ @PLACEMENT_TAG_TRACKING_JAVASCRIPT@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PlacementTagFormatsItem++instance FromHttpApiData PlacementTagFormatsItem where+    parseQueryParam = \case+        "PLACEMENT_TAG_CLICK_COMMANDS" -> Right PTFIPlacementTagClickCommands+        "PLACEMENT_TAG_IFRAME_ILAYER" -> Right PTFIPlacementTagIframeIlayer+        "PLACEMENT_TAG_IFRAME_JAVASCRIPT" -> Right PTFIPlacementTagIframeJavascript+        "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY" -> Right PTFIPlacementTagIframeJavascriptLegacy+        "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH" -> Right PTFIPlacementTagInstreamVideoPrefetch+        "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3" -> Right PTFIPlacementTagInstreamVideoPrefetchVast3+        "PLACEMENT_TAG_INTERNAL_REDIRECT" -> Right PTFIPlacementTagInternalRedirect+        "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT" -> Right PTFIPlacementTagInterstitialIframeJavascript+        "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY" -> Right PTFIPlacementTagInterstitialIframeJavascriptLegacy+        "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT" -> Right PTFIPlacementTagInterstitialInternalRedirect+        "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT" -> Right PTFIPlacementTagInterstitialJavascript+        "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY" -> Right PTFIPlacementTagInterstitialJavascriptLegacy+        "PLACEMENT_TAG_JAVASCRIPT" -> Right PTFIPlacementTagJavascript+        "PLACEMENT_TAG_JAVASCRIPT_LEGACY" -> Right PTFIPlacementTagJavascriptLegacy+        "PLACEMENT_TAG_STANDARD" -> Right PTFIPlacementTagStandard+        "PLACEMENT_TAG_TRACKING" -> Right PTFIPlacementTagTracking+        "PLACEMENT_TAG_TRACKING_IFRAME" -> Right PTFIPlacementTagTrackingIframe+        "PLACEMENT_TAG_TRACKING_JAVASCRIPT" -> Right PTFIPlacementTagTrackingJavascript+        x -> Left ("Unable to parse PlacementTagFormatsItem from: " <> x)++instance ToHttpApiData PlacementTagFormatsItem where+    toQueryParam = \case+        PTFIPlacementTagClickCommands -> "PLACEMENT_TAG_CLICK_COMMANDS"+        PTFIPlacementTagIframeIlayer -> "PLACEMENT_TAG_IFRAME_ILAYER"+        PTFIPlacementTagIframeJavascript -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT"+        PTFIPlacementTagIframeJavascriptLegacy -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY"+        PTFIPlacementTagInstreamVideoPrefetch -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH"+        PTFIPlacementTagInstreamVideoPrefetchVast3 -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3"+        PTFIPlacementTagInternalRedirect -> "PLACEMENT_TAG_INTERNAL_REDIRECT"+        PTFIPlacementTagInterstitialIframeJavascript -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT"+        PTFIPlacementTagInterstitialIframeJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY"+        PTFIPlacementTagInterstitialInternalRedirect -> "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT"+        PTFIPlacementTagInterstitialJavascript -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT"+        PTFIPlacementTagInterstitialJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY"+        PTFIPlacementTagJavascript -> "PLACEMENT_TAG_JAVASCRIPT"+        PTFIPlacementTagJavascriptLegacy -> "PLACEMENT_TAG_JAVASCRIPT_LEGACY"+        PTFIPlacementTagStandard -> "PLACEMENT_TAG_STANDARD"+        PTFIPlacementTagTracking -> "PLACEMENT_TAG_TRACKING"+        PTFIPlacementTagTrackingIframe -> "PLACEMENT_TAG_TRACKING_IFRAME"+        PTFIPlacementTagTrackingJavascript -> "PLACEMENT_TAG_TRACKING_JAVASCRIPT"++instance FromJSON PlacementTagFormatsItem where+    parseJSON = parseJSONText "PlacementTagFormatsItem"++instance ToJSON PlacementTagFormatsItem where+    toJSON = toJSONText++-- | Type of the object of this dynamic targeting key. This is a required+-- field.+data DynamicTargetingKeyObjectType+    = DTKOTObjectAd+      -- ^ @OBJECT_AD@+    | DTKOTObjectAdvertiser+      -- ^ @OBJECT_ADVERTISER@+    | DTKOTObjectCreative+      -- ^ @OBJECT_CREATIVE@+    | DTKOTObjectPlacement+      -- ^ @OBJECT_PLACEMENT@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable DynamicTargetingKeyObjectType++instance FromHttpApiData DynamicTargetingKeyObjectType where+    parseQueryParam = \case+        "OBJECT_AD" -> Right DTKOTObjectAd+        "OBJECT_ADVERTISER" -> Right DTKOTObjectAdvertiser+        "OBJECT_CREATIVE" -> Right DTKOTObjectCreative+        "OBJECT_PLACEMENT" -> Right DTKOTObjectPlacement+        x -> Left ("Unable to parse DynamicTargetingKeyObjectType from: " <> x)++instance ToHttpApiData DynamicTargetingKeyObjectType where+    toQueryParam = \case+        DTKOTObjectAd -> "OBJECT_AD"+        DTKOTObjectAdvertiser -> "OBJECT_ADVERTISER"+        DTKOTObjectCreative -> "OBJECT_CREATIVE"+        DTKOTObjectPlacement -> "OBJECT_PLACEMENT"++instance FromJSON DynamicTargetingKeyObjectType where+    parseJSON = parseJSONText "DynamicTargetingKeyObjectType"++instance ToJSON DynamicTargetingKeyObjectType where+    toJSON = toJSONText++-- | The type of the report.+data ReportType+    = RTCrossDimensionReach+      -- ^ @CROSS_DIMENSION_REACH@+    | RTFloodlight+      -- ^ @FLOODLIGHT@+    | RTPathToConversion+      -- ^ @PATH_TO_CONVERSION@+    | RTReach+      -- ^ @REACH@+    | RTStandard+      -- ^ @STANDARD@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ReportType++instance FromHttpApiData ReportType where+    parseQueryParam = \case+        "CROSS_DIMENSION_REACH" -> Right RTCrossDimensionReach+        "FLOODLIGHT" -> Right RTFloodlight+        "PATH_TO_CONVERSION" -> Right RTPathToConversion+        "REACH" -> Right RTReach+        "STANDARD" -> Right RTStandard+        x -> Left ("Unable to parse ReportType from: " <> x)++instance ToHttpApiData ReportType where+    toQueryParam = \case+        RTCrossDimensionReach -> "CROSS_DIMENSION_REACH"+        RTFloodlight -> "FLOODLIGHT"+        RTPathToConversion -> "PATH_TO_CONVERSION"+        RTReach -> "REACH"+        RTStandard -> "STANDARD"++instance FromJSON ReportType where+    parseJSON = parseJSONText "ReportType"++instance ToJSON ReportType where+    toJSON = toJSONText++data CreativeAssetMetadataWarnedValidationRulesItem+    = ADMobReferenced+      -- ^ @ADMOB_REFERENCED@+    | AssetFormatUnsupportedDcm+      -- ^ @ASSET_FORMAT_UNSUPPORTED_DCM@+    | AssetInvalid+      -- ^ @ASSET_INVALID@+    | ClickTagHardCoded+      -- ^ @CLICK_TAG_HARD_CODED@+    | ClickTagInvalid+      -- ^ @CLICK_TAG_INVALID@+    | ClickTagInGwd+      -- ^ @CLICK_TAG_IN_GWD@+    | ClickTagMissing+      -- ^ @CLICK_TAG_MISSING@+    | ClickTagMoreThanOne+      -- ^ @CLICK_TAG_MORE_THAN_ONE@+    | ClickTagNonTopLevel+      -- ^ @CLICK_TAG_NON_TOP_LEVEL@+    | ComponentUnsupportedDcm+      -- ^ @COMPONENT_UNSUPPORTED_DCM@+    | EnablerUnsupportedMethodDcm+      -- ^ @ENABLER_UNSUPPORTED_METHOD_DCM@+    | ExternalFileReferenced+      -- ^ @EXTERNAL_FILE_REFERENCED@+    | FileDetailEmpty+      -- ^ @FILE_DETAIL_EMPTY@+    | FileTypeInvalid+      -- ^ @FILE_TYPE_INVALID@+    | GwdPropertiesInvalid+      -- ^ @GWD_PROPERTIES_INVALID@+    | HTML5FeatureUnsupported+      -- ^ @HTML5_FEATURE_UNSUPPORTED@+    | LinkedFileNotFound+      -- ^ @LINKED_FILE_NOT_FOUND@+    | MaxFlashVersion11+      -- ^ @MAX_FLASH_VERSION_11@+    | MraidReferenced+      -- ^ @MRAID_REFERENCED@+    | NotSSLCompliant+      -- ^ @NOT_SSL_COMPLIANT@+    | OrphanedAsset+      -- ^ @ORPHANED_ASSET@+    | PrimaryHTMLMissing+      -- ^ @PRIMARY_HTML_MISSING@+    | SvgInvalid+      -- ^ @SVG_INVALID@+    | ZipInvalid+      -- ^ @ZIP_INVALID@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeAssetMetadataWarnedValidationRulesItem++instance FromHttpApiData CreativeAssetMetadataWarnedValidationRulesItem where+    parseQueryParam = \case+        "ADMOB_REFERENCED" -> Right ADMobReferenced+        "ASSET_FORMAT_UNSUPPORTED_DCM" -> Right AssetFormatUnsupportedDcm+        "ASSET_INVALID" -> Right AssetInvalid+        "CLICK_TAG_HARD_CODED" -> Right ClickTagHardCoded+        "CLICK_TAG_INVALID" -> Right ClickTagInvalid+        "CLICK_TAG_IN_GWD" -> Right ClickTagInGwd+        "CLICK_TAG_MISSING" -> Right ClickTagMissing+        "CLICK_TAG_MORE_THAN_ONE" -> Right ClickTagMoreThanOne+        "CLICK_TAG_NON_TOP_LEVEL" -> Right ClickTagNonTopLevel+        "COMPONENT_UNSUPPORTED_DCM" -> Right ComponentUnsupportedDcm+        "ENABLER_UNSUPPORTED_METHOD_DCM" -> Right EnablerUnsupportedMethodDcm+        "EXTERNAL_FILE_REFERENCED" -> Right ExternalFileReferenced+        "FILE_DETAIL_EMPTY" -> Right FileDetailEmpty+        "FILE_TYPE_INVALID" -> Right FileTypeInvalid+        "GWD_PROPERTIES_INVALID" -> Right GwdPropertiesInvalid+        "HTML5_FEATURE_UNSUPPORTED" -> Right HTML5FeatureUnsupported+        "LINKED_FILE_NOT_FOUND" -> Right LinkedFileNotFound+        "MAX_FLASH_VERSION_11" -> Right MaxFlashVersion11+        "MRAID_REFERENCED" -> Right MraidReferenced+        "NOT_SSL_COMPLIANT" -> Right NotSSLCompliant+        "ORPHANED_ASSET" -> Right OrphanedAsset+        "PRIMARY_HTML_MISSING" -> Right PrimaryHTMLMissing+        "SVG_INVALID" -> Right SvgInvalid+        "ZIP_INVALID" -> Right ZipInvalid+        x -> Left ("Unable to parse CreativeAssetMetadataWarnedValidationRulesItem from: " <> x)++instance ToHttpApiData CreativeAssetMetadataWarnedValidationRulesItem where+    toQueryParam = \case+        ADMobReferenced -> "ADMOB_REFERENCED"+        AssetFormatUnsupportedDcm -> "ASSET_FORMAT_UNSUPPORTED_DCM"+        AssetInvalid -> "ASSET_INVALID"+        ClickTagHardCoded -> "CLICK_TAG_HARD_CODED"+        ClickTagInvalid -> "CLICK_TAG_INVALID"+        ClickTagInGwd -> "CLICK_TAG_IN_GWD"+        ClickTagMissing -> "CLICK_TAG_MISSING"+        ClickTagMoreThanOne -> "CLICK_TAG_MORE_THAN_ONE"+        ClickTagNonTopLevel -> "CLICK_TAG_NON_TOP_LEVEL"+        ComponentUnsupportedDcm -> "COMPONENT_UNSUPPORTED_DCM"+        EnablerUnsupportedMethodDcm -> "ENABLER_UNSUPPORTED_METHOD_DCM"+        ExternalFileReferenced -> "EXTERNAL_FILE_REFERENCED"+        FileDetailEmpty -> "FILE_DETAIL_EMPTY"+        FileTypeInvalid -> "FILE_TYPE_INVALID"+        GwdPropertiesInvalid -> "GWD_PROPERTIES_INVALID"+        HTML5FeatureUnsupported -> "HTML5_FEATURE_UNSUPPORTED"+        LinkedFileNotFound -> "LINKED_FILE_NOT_FOUND"+        MaxFlashVersion11 -> "MAX_FLASH_VERSION_11"+        MraidReferenced -> "MRAID_REFERENCED"+        NotSSLCompliant -> "NOT_SSL_COMPLIANT"+        OrphanedAsset -> "ORPHANED_ASSET"+        PrimaryHTMLMissing -> "PRIMARY_HTML_MISSING"+        SvgInvalid -> "SVG_INVALID"+        ZipInvalid -> "ZIP_INVALID"++instance FromJSON CreativeAssetMetadataWarnedValidationRulesItem where+    parseJSON = parseJSONText "CreativeAssetMetadataWarnedValidationRulesItem"++instance ToJSON CreativeAssetMetadataWarnedValidationRulesItem where+    toJSON = toJSONText++-- | Payment source type of this ad slot.+data AdSlotPaymentSourceType+    = PlanningPaymentSourceTypeAgencyPaid+      -- ^ @PLANNING_PAYMENT_SOURCE_TYPE_AGENCY_PAID@+    | PlanningPaymentSourceTypePublisherPaid+      -- ^ @PLANNING_PAYMENT_SOURCE_TYPE_PUBLISHER_PAID@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AdSlotPaymentSourceType++instance FromHttpApiData AdSlotPaymentSourceType where+    parseQueryParam = \case+        "PLANNING_PAYMENT_SOURCE_TYPE_AGENCY_PAID" -> Right PlanningPaymentSourceTypeAgencyPaid+        "PLANNING_PAYMENT_SOURCE_TYPE_PUBLISHER_PAID" -> Right PlanningPaymentSourceTypePublisherPaid+        x -> Left ("Unable to parse AdSlotPaymentSourceType from: " <> x)++instance ToHttpApiData AdSlotPaymentSourceType where+    toQueryParam = \case+        PlanningPaymentSourceTypeAgencyPaid -> "PLANNING_PAYMENT_SOURCE_TYPE_AGENCY_PAID"+        PlanningPaymentSourceTypePublisherPaid -> "PLANNING_PAYMENT_SOURCE_TYPE_PUBLISHER_PAID"++instance FromJSON AdSlotPaymentSourceType where+    parseJSON = parseJSONText "AdSlotPaymentSourceType"++instance ToJSON AdSlotPaymentSourceType where+    toJSON = toJSONText++data AccountPermissionAccountProFilesItem+    = APAPFIAccountProFileBasic+      -- ^ @ACCOUNT_PROFILE_BASIC@+    | APAPFIAccountProFileStandard+      -- ^ @ACCOUNT_PROFILE_STANDARD@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AccountPermissionAccountProFilesItem++instance FromHttpApiData AccountPermissionAccountProFilesItem where+    parseQueryParam = \case+        "ACCOUNT_PROFILE_BASIC" -> Right APAPFIAccountProFileBasic+        "ACCOUNT_PROFILE_STANDARD" -> Right APAPFIAccountProFileStandard+        x -> Left ("Unable to parse AccountPermissionAccountProFilesItem from: " <> x)++instance ToHttpApiData AccountPermissionAccountProFilesItem where+    toQueryParam = \case+        APAPFIAccountProFileBasic -> "ACCOUNT_PROFILE_BASIC"+        APAPFIAccountProFileStandard -> "ACCOUNT_PROFILE_STANDARD"++instance FromJSON AccountPermissionAccountProFilesItem where+    parseJSON = parseJSONText "AccountPermissionAccountProFilesItem"++instance ToJSON AccountPermissionAccountProFilesItem where+    toJSON = toJSONText++-- | Type of the event. This is a read-only field.+data CreativeCustomEventAdvertiserCustomEventType+    = AdvertiserEventCounter+      -- ^ @ADVERTISER_EVENT_COUNTER@+    | AdvertiserEventExit+      -- ^ @ADVERTISER_EVENT_EXIT@+    | AdvertiserEventTimer+      -- ^ @ADVERTISER_EVENT_TIMER@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeCustomEventAdvertiserCustomEventType++instance FromHttpApiData CreativeCustomEventAdvertiserCustomEventType where+    parseQueryParam = \case+        "ADVERTISER_EVENT_COUNTER" -> Right AdvertiserEventCounter+        "ADVERTISER_EVENT_EXIT" -> Right AdvertiserEventExit+        "ADVERTISER_EVENT_TIMER" -> Right AdvertiserEventTimer+        x -> Left ("Unable to parse CreativeCustomEventAdvertiserCustomEventType from: " <> x)++instance ToHttpApiData CreativeCustomEventAdvertiserCustomEventType where+    toQueryParam = \case+        AdvertiserEventCounter -> "ADVERTISER_EVENT_COUNTER"+        AdvertiserEventExit -> "ADVERTISER_EVENT_EXIT"+        AdvertiserEventTimer -> "ADVERTISER_EVENT_TIMER"++instance FromJSON CreativeCustomEventAdvertiserCustomEventType where+    parseJSON = parseJSONText "CreativeCustomEventAdvertiserCustomEventType"++instance ToJSON CreativeCustomEventAdvertiserCustomEventType where+    toJSON = toJSONText++-- | Select only change logs with the specified object type.+data ChangeLogsListObjectType+    = CLLOTObjectAccount+      -- ^ @OBJECT_ACCOUNT@+    | CLLOTObjectAccountBillingFeature+      -- ^ @OBJECT_ACCOUNT_BILLING_FEATURE@+    | CLLOTObjectAd+      -- ^ @OBJECT_AD@+    | CLLOTObjectAdvertiser+      -- ^ @OBJECT_ADVERTISER@+    | CLLOTObjectAdvertiserGroup+      -- ^ @OBJECT_ADVERTISER_GROUP@+    | CLLOTObjectBillingAccountGroup+      -- ^ @OBJECT_BILLING_ACCOUNT_GROUP@+    | CLLOTObjectBillingFeature+      -- ^ @OBJECT_BILLING_FEATURE@+    | CLLOTObjectBillingMinimumFee+      -- ^ @OBJECT_BILLING_MINIMUM_FEE@+    | CLLOTObjectBillingProFile+      -- ^ @OBJECT_BILLING_PROFILE@+    | CLLOTObjectCampaign+      -- ^ @OBJECT_CAMPAIGN@+    | CLLOTObjectContentCategory+      -- ^ @OBJECT_CONTENT_CATEGORY@+    | CLLOTObjectCreative+      -- ^ @OBJECT_CREATIVE@+    | CLLOTObjectCreativeAsset+      -- ^ @OBJECT_CREATIVE_ASSET@+    | CLLOTObjectCreativeBundle+      -- ^ @OBJECT_CREATIVE_BUNDLE@+    | CLLOTObjectCreativeField+      -- ^ @OBJECT_CREATIVE_FIELD@+    | CLLOTObjectCreativeGroup+      -- ^ @OBJECT_CREATIVE_GROUP@+    | CLLOTObjectDfaSite+      -- ^ @OBJECT_DFA_SITE@+    | CLLOTObjectEventTag+      -- ^ @OBJECT_EVENT_TAG@+    | CLLOTObjectFloodlightActivityGroup+      -- ^ @OBJECT_FLOODLIGHT_ACTIVITY_GROUP@+    | CLLOTObjectFloodlightActvity+      -- ^ @OBJECT_FLOODLIGHT_ACTVITY@+    | CLLOTObjectFloodlightConfiguration+      -- ^ @OBJECT_FLOODLIGHT_CONFIGURATION@+    | CLLOTObjectInstreamCreative+      -- ^ @OBJECT_INSTREAM_CREATIVE@+    | CLLOTObjectLandingPage+      -- ^ @OBJECT_LANDING_PAGE@+    | CLLOTObjectMediaOrder+      -- ^ @OBJECT_MEDIA_ORDER@+    | CLLOTObjectPlacement+      -- ^ @OBJECT_PLACEMENT@+    | CLLOTObjectPlacementStrategy+      -- ^ @OBJECT_PLACEMENT_STRATEGY@+    | CLLOTObjectPlaystoreLink+      -- ^ @OBJECT_PLAYSTORE_LINK@+    | CLLOTObjectProvidedListClient+      -- ^ @OBJECT_PROVIDED_LIST_CLIENT@+    | CLLOTObjectRateCard+      -- ^ @OBJECT_RATE_CARD@+    | CLLOTObjectRemarketingList+      -- ^ @OBJECT_REMARKETING_LIST@+    | CLLOTObjectRichmediaCreative+      -- ^ @OBJECT_RICHMEDIA_CREATIVE@+    | CLLOTObjectSdSite+      -- ^ @OBJECT_SD_SITE@+    | CLLOTObjectSize+      -- ^ @OBJECT_SIZE@+    | CLLOTObjectSubAccount+      -- ^ @OBJECT_SUBACCOUNT@+    | CLLOTObjectUserProFile+      -- ^ @OBJECT_USER_PROFILE@+    | CLLOTObjectUserProFileFilter+      -- ^ @OBJECT_USER_PROFILE_FILTER@+    | CLLOTObjectUserRole+      -- ^ @OBJECT_USER_ROLE@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ChangeLogsListObjectType++instance FromHttpApiData ChangeLogsListObjectType where+    parseQueryParam = \case+        "OBJECT_ACCOUNT" -> Right CLLOTObjectAccount+        "OBJECT_ACCOUNT_BILLING_FEATURE" -> Right CLLOTObjectAccountBillingFeature+        "OBJECT_AD" -> Right CLLOTObjectAd+        "OBJECT_ADVERTISER" -> Right CLLOTObjectAdvertiser+        "OBJECT_ADVERTISER_GROUP" -> Right CLLOTObjectAdvertiserGroup+        "OBJECT_BILLING_ACCOUNT_GROUP" -> Right CLLOTObjectBillingAccountGroup+        "OBJECT_BILLING_FEATURE" -> Right CLLOTObjectBillingFeature+        "OBJECT_BILLING_MINIMUM_FEE" -> Right CLLOTObjectBillingMinimumFee+        "OBJECT_BILLING_PROFILE" -> Right CLLOTObjectBillingProFile+        "OBJECT_CAMPAIGN" -> Right CLLOTObjectCampaign+        "OBJECT_CONTENT_CATEGORY" -> Right CLLOTObjectContentCategory+        "OBJECT_CREATIVE" -> Right CLLOTObjectCreative+        "OBJECT_CREATIVE_ASSET" -> Right CLLOTObjectCreativeAsset+        "OBJECT_CREATIVE_BUNDLE" -> Right CLLOTObjectCreativeBundle+        "OBJECT_CREATIVE_FIELD" -> Right CLLOTObjectCreativeField+        "OBJECT_CREATIVE_GROUP" -> Right CLLOTObjectCreativeGroup+        "OBJECT_DFA_SITE" -> Right CLLOTObjectDfaSite+        "OBJECT_EVENT_TAG" -> Right CLLOTObjectEventTag+        "OBJECT_FLOODLIGHT_ACTIVITY_GROUP" -> Right CLLOTObjectFloodlightActivityGroup+        "OBJECT_FLOODLIGHT_ACTVITY" -> Right CLLOTObjectFloodlightActvity+        "OBJECT_FLOODLIGHT_CONFIGURATION" -> Right CLLOTObjectFloodlightConfiguration+        "OBJECT_INSTREAM_CREATIVE" -> Right CLLOTObjectInstreamCreative+        "OBJECT_LANDING_PAGE" -> Right CLLOTObjectLandingPage+        "OBJECT_MEDIA_ORDER" -> Right CLLOTObjectMediaOrder+        "OBJECT_PLACEMENT" -> Right CLLOTObjectPlacement+        "OBJECT_PLACEMENT_STRATEGY" -> Right CLLOTObjectPlacementStrategy+        "OBJECT_PLAYSTORE_LINK" -> Right CLLOTObjectPlaystoreLink+        "OBJECT_PROVIDED_LIST_CLIENT" -> Right CLLOTObjectProvidedListClient+        "OBJECT_RATE_CARD" -> Right CLLOTObjectRateCard+        "OBJECT_REMARKETING_LIST" -> Right CLLOTObjectRemarketingList+        "OBJECT_RICHMEDIA_CREATIVE" -> Right CLLOTObjectRichmediaCreative+        "OBJECT_SD_SITE" -> Right CLLOTObjectSdSite+        "OBJECT_SIZE" -> Right CLLOTObjectSize+        "OBJECT_SUBACCOUNT" -> Right CLLOTObjectSubAccount+        "OBJECT_USER_PROFILE" -> Right CLLOTObjectUserProFile+        "OBJECT_USER_PROFILE_FILTER" -> Right CLLOTObjectUserProFileFilter+        "OBJECT_USER_ROLE" -> Right CLLOTObjectUserRole+        x -> Left ("Unable to parse ChangeLogsListObjectType from: " <> x)++instance ToHttpApiData ChangeLogsListObjectType where+    toQueryParam = \case+        CLLOTObjectAccount -> "OBJECT_ACCOUNT"+        CLLOTObjectAccountBillingFeature -> "OBJECT_ACCOUNT_BILLING_FEATURE"+        CLLOTObjectAd -> "OBJECT_AD"+        CLLOTObjectAdvertiser -> "OBJECT_ADVERTISER"+        CLLOTObjectAdvertiserGroup -> "OBJECT_ADVERTISER_GROUP"+        CLLOTObjectBillingAccountGroup -> "OBJECT_BILLING_ACCOUNT_GROUP"+        CLLOTObjectBillingFeature -> "OBJECT_BILLING_FEATURE"+        CLLOTObjectBillingMinimumFee -> "OBJECT_BILLING_MINIMUM_FEE"+        CLLOTObjectBillingProFile -> "OBJECT_BILLING_PROFILE"+        CLLOTObjectCampaign -> "OBJECT_CAMPAIGN"+        CLLOTObjectContentCategory -> "OBJECT_CONTENT_CATEGORY"+        CLLOTObjectCreative -> "OBJECT_CREATIVE"+        CLLOTObjectCreativeAsset -> "OBJECT_CREATIVE_ASSET"+        CLLOTObjectCreativeBundle -> "OBJECT_CREATIVE_BUNDLE"+        CLLOTObjectCreativeField -> "OBJECT_CREATIVE_FIELD"+        CLLOTObjectCreativeGroup -> "OBJECT_CREATIVE_GROUP"+        CLLOTObjectDfaSite -> "OBJECT_DFA_SITE"+        CLLOTObjectEventTag -> "OBJECT_EVENT_TAG"+        CLLOTObjectFloodlightActivityGroup -> "OBJECT_FLOODLIGHT_ACTIVITY_GROUP"+        CLLOTObjectFloodlightActvity -> "OBJECT_FLOODLIGHT_ACTVITY"+        CLLOTObjectFloodlightConfiguration -> "OBJECT_FLOODLIGHT_CONFIGURATION"+        CLLOTObjectInstreamCreative -> "OBJECT_INSTREAM_CREATIVE"+        CLLOTObjectLandingPage -> "OBJECT_LANDING_PAGE"+        CLLOTObjectMediaOrder -> "OBJECT_MEDIA_ORDER"+        CLLOTObjectPlacement -> "OBJECT_PLACEMENT"+        CLLOTObjectPlacementStrategy -> "OBJECT_PLACEMENT_STRATEGY"+        CLLOTObjectPlaystoreLink -> "OBJECT_PLAYSTORE_LINK"+        CLLOTObjectProvidedListClient -> "OBJECT_PROVIDED_LIST_CLIENT"+        CLLOTObjectRateCard -> "OBJECT_RATE_CARD"+        CLLOTObjectRemarketingList -> "OBJECT_REMARKETING_LIST"+        CLLOTObjectRichmediaCreative -> "OBJECT_RICHMEDIA_CREATIVE"+        CLLOTObjectSdSite -> "OBJECT_SD_SITE"+        CLLOTObjectSize -> "OBJECT_SIZE"+        CLLOTObjectSubAccount -> "OBJECT_SUBACCOUNT"+        CLLOTObjectUserProFile -> "OBJECT_USER_PROFILE"+        CLLOTObjectUserProFileFilter -> "OBJECT_USER_PROFILE_FILTER"+        CLLOTObjectUserRole -> "OBJECT_USER_ROLE"++instance FromJSON ChangeLogsListObjectType where+    parseJSON = parseJSONText "ChangeLogsListObjectType"++instance ToJSON ChangeLogsListObjectType where+    toJSON = toJSONText++-- | Cap cost type of this inventory item.+data PricingCapCostType+    = PlanningPlacementCapCostTypeCumulative+      -- ^ @PLANNING_PLACEMENT_CAP_COST_TYPE_CUMULATIVE@+    | PlanningPlacementCapCostTypeMonthly+      -- ^ @PLANNING_PLACEMENT_CAP_COST_TYPE_MONTHLY@+    | PlanningPlacementCapCostTypeNone+      -- ^ @PLANNING_PLACEMENT_CAP_COST_TYPE_NONE@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable PricingCapCostType++instance FromHttpApiData PricingCapCostType where+    parseQueryParam = \case+        "PLANNING_PLACEMENT_CAP_COST_TYPE_CUMULATIVE" -> Right PlanningPlacementCapCostTypeCumulative+        "PLANNING_PLACEMENT_CAP_COST_TYPE_MONTHLY" -> Right PlanningPlacementCapCostTypeMonthly+        "PLANNING_PLACEMENT_CAP_COST_TYPE_NONE" -> Right PlanningPlacementCapCostTypeNone+        x -> Left ("Unable to parse PricingCapCostType from: " <> x)++instance ToHttpApiData PricingCapCostType where+    toQueryParam = \case+        PlanningPlacementCapCostTypeCumulative -> "PLANNING_PLACEMENT_CAP_COST_TYPE_CUMULATIVE"+        PlanningPlacementCapCostTypeMonthly -> "PLANNING_PLACEMENT_CAP_COST_TYPE_MONTHLY"+        PlanningPlacementCapCostTypeNone -> "PLANNING_PLACEMENT_CAP_COST_TYPE_NONE"++instance FromJSON PricingCapCostType where+    parseJSON = parseJSONText "PricingCapCostType"++instance ToJSON PricingCapCostType where+    toJSON = toJSONText++-- | Type of rich media asset. This is a read-only field. Applicable to the+-- following creative types: all RICH_MEDIA.+data CreativeAssetDisplayType+    = AssetDisplayTypeExpanding+      -- ^ @ASSET_DISPLAY_TYPE_EXPANDING@+    | AssetDisplayTypeFlashInFlash+      -- ^ @ASSET_DISPLAY_TYPE_FLASH_IN_FLASH@+    | AssetDisplayTypeFlashInFlashExpanding+      -- ^ @ASSET_DISPLAY_TYPE_FLASH_IN_FLASH_EXPANDING@+    | AssetDisplayTypeFloating+      -- ^ @ASSET_DISPLAY_TYPE_FLOATING@+    | AssetDisplayTypeInpage+      -- ^ @ASSET_DISPLAY_TYPE_INPAGE@+    | AssetDisplayTypeOverlay+      -- ^ @ASSET_DISPLAY_TYPE_OVERLAY@+    | AssetDisplayTypePeelDown+      -- ^ @ASSET_DISPLAY_TYPE_PEEL_DOWN@+    | AssetDisplayTypeVpaidLinear+      -- ^ @ASSET_DISPLAY_TYPE_VPAID_LINEAR@+    | AssetDisplayTypeVpaidNonLinear+      -- ^ @ASSET_DISPLAY_TYPE_VPAID_NON_LINEAR@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable CreativeAssetDisplayType++instance FromHttpApiData CreativeAssetDisplayType where+    parseQueryParam = \case+        "ASSET_DISPLAY_TYPE_EXPANDING" -> Right AssetDisplayTypeExpanding+        "ASSET_DISPLAY_TYPE_FLASH_IN_FLASH" -> Right AssetDisplayTypeFlashInFlash+        "ASSET_DISPLAY_TYPE_FLASH_IN_FLASH_EXPANDING" -> Right AssetDisplayTypeFlashInFlashExpanding+        "ASSET_DISPLAY_TYPE_FLOATING" -> Right AssetDisplayTypeFloating+        "ASSET_DISPLAY_TYPE_INPAGE" -> Right AssetDisplayTypeInpage+        "ASSET_DISPLAY_TYPE_OVERLAY" -> Right AssetDisplayTypeOverlay+        "ASSET_DISPLAY_TYPE_PEEL_DOWN" -> Right AssetDisplayTypePeelDown+        "ASSET_DISPLAY_TYPE_VPAID_LINEAR" -> Right AssetDisplayTypeVpaidLinear+        "ASSET_DISPLAY_TYPE_VPAID_NON_LINEAR" -> Right AssetDisplayTypeVpaidNonLinear+        x -> Left ("Unable to parse CreativeAssetDisplayType from: " <> x)++instance ToHttpApiData CreativeAssetDisplayType where+    toQueryParam = \case+        AssetDisplayTypeExpanding -> "ASSET_DISPLAY_TYPE_EXPANDING"+        AssetDisplayTypeFlashInFlash -> "ASSET_DISPLAY_TYPE_FLASH_IN_FLASH"+        AssetDisplayTypeFlashInFlashExpanding -> "ASSET_DISPLAY_TYPE_FLASH_IN_FLASH_EXPANDING"+        AssetDisplayTypeFloating -> "ASSET_DISPLAY_TYPE_FLOATING"+        AssetDisplayTypeInpage -> "ASSET_DISPLAY_TYPE_INPAGE"+        AssetDisplayTypeOverlay -> "ASSET_DISPLAY_TYPE_OVERLAY"+        AssetDisplayTypePeelDown -> "ASSET_DISPLAY_TYPE_PEEL_DOWN"+        AssetDisplayTypeVpaidLinear -> "ASSET_DISPLAY_TYPE_VPAID_LINEAR"+        AssetDisplayTypeVpaidNonLinear -> "ASSET_DISPLAY_TYPE_VPAID_NON_LINEAR"++instance FromJSON CreativeAssetDisplayType where+    parseJSON = parseJSONText "CreativeAssetDisplayType"++instance ToJSON CreativeAssetDisplayType where+    toJSON = toJSONText++-- | Counting method for conversions for this floodlight activity. This is a+-- required field.+data FloodlightActivityCountingMethod+    = ItemsSoldCounting+      -- ^ @ITEMS_SOLD_COUNTING@+    | SessionCounting+      -- ^ @SESSION_COUNTING@+    | StandardCounting+      -- ^ @STANDARD_COUNTING@+    | TransactionsCounting+      -- ^ @TRANSACTIONS_COUNTING@+    | UniqueCounting+      -- ^ @UNIQUE_COUNTING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable FloodlightActivityCountingMethod++instance FromHttpApiData FloodlightActivityCountingMethod where+    parseQueryParam = \case+        "ITEMS_SOLD_COUNTING" -> Right ItemsSoldCounting+        "SESSION_COUNTING" -> Right SessionCounting+        "STANDARD_COUNTING" -> Right StandardCounting+        "TRANSACTIONS_COUNTING" -> Right TransactionsCounting+        "UNIQUE_COUNTING" -> Right UniqueCounting+        x -> Left ("Unable to parse FloodlightActivityCountingMethod from: " <> x)++instance ToHttpApiData FloodlightActivityCountingMethod where+    toQueryParam = \case+        ItemsSoldCounting -> "ITEMS_SOLD_COUNTING"+        SessionCounting -> "SESSION_COUNTING"+        StandardCounting -> "STANDARD_COUNTING"+        TransactionsCounting -> "TRANSACTIONS_COUNTING"+        UniqueCounting -> "UNIQUE_COUNTING"++instance FromJSON FloodlightActivityCountingMethod where+    parseJSON = parseJSONText "FloodlightActivityCountingMethod"++instance ToJSON FloodlightActivityCountingMethod where+    toJSON = toJSONText++-- | Order of sorted results, default is ASCENDING.+data ContentCategoriesListSortOrder+    = CCLSOAscending+      -- ^ @ASCENDING@+    | CCLSODescending+      -- ^ @DESCENDING@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable ContentCategoriesListSortOrder++instance FromHttpApiData ContentCategoriesListSortOrder where+    parseQueryParam = \case+        "ASCENDING" -> Right CCLSOAscending+        "DESCENDING" -> Right CCLSODescending+        x -> Left ("Unable to parse ContentCategoriesListSortOrder from: " <> x)++instance ToHttpApiData ContentCategoriesListSortOrder where+    toQueryParam = \case+        CCLSOAscending -> "ASCENDING"+        CCLSODescending -> "DESCENDING"++instance FromJSON ContentCategoriesListSortOrder where+    parseJSON = parseJSONText "ContentCategoriesListSortOrder"++instance ToJSON ContentCategoriesListSortOrder where+    toJSON = toJSONText++-- | Status of this advertiser.+data AdvertiserStatus+    = ASApproved+      -- ^ @APPROVED@+    | ASOnHold+      -- ^ @ON_HOLD@+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AdvertiserStatus++instance FromHttpApiData AdvertiserStatus where+    parseQueryParam = \case+        "APPROVED" -> Right ASApproved+        "ON_HOLD" -> Right ASOnHold+        x -> Left ("Unable to parse AdvertiserStatus from: " <> x)++instance ToHttpApiData AdvertiserStatus where+    toQueryParam = \case         ASApproved -> "APPROVED"         ASOnHold -> "ON_HOLD"
gen/Network/Google/Resource/DFAReporting/AccountActiveAdSummaries/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.AccountActiveAdSummaries.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'AccountActiveAdSummariesGet' request conforms to. type AccountActiveAdSummariesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "accountActiveAdSummaries" :>@@ -55,7 +55,7 @@ -- | Gets the account\'s active ad summary by account ID. -- -- /See:/ 'accountActiveAdSummariesGet' smart constructor.-data AccountActiveAdSummariesGet = AccountActiveAdSummariesGet+data AccountActiveAdSummariesGet = AccountActiveAdSummariesGet'     { _aaasgProFileId        :: !(Textual Int64)     , _aaasgSummaryAccountId :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'aaasgSummaryAccountId'     -> AccountActiveAdSummariesGet accountActiveAdSummariesGet pAaasgProFileId_ pAaasgSummaryAccountId_ =-    AccountActiveAdSummariesGet+    AccountActiveAdSummariesGet'     { _aaasgProFileId = _Coerce # pAaasgProFileId_     , _aaasgSummaryAccountId = _Coerce # pAaasgSummaryAccountId_     }@@ -95,7 +95,9 @@          where         type Rs AccountActiveAdSummariesGet =              AccountActiveAdSummary-        requestClient AccountActiveAdSummariesGet{..}+        type Scopes AccountActiveAdSummariesGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AccountActiveAdSummariesGet'{..}           = go _aaasgProFileId _aaasgSummaryAccountId               (Just AltJSON)               dFAReportingService
gen/Network/Google/Resource/DFAReporting/AccountPermissionGroups/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.AccountPermissionGroups.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'AccountPermissionGroupsGet' request conforms to. type AccountPermissionGroupsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "accountPermissionGroups" :>@@ -55,7 +55,7 @@ -- | Gets one account permission group by ID. -- -- /See:/ 'accountPermissionGroupsGet' smart constructor.-data AccountPermissionGroupsGet = AccountPermissionGroupsGet+data AccountPermissionGroupsGet = AccountPermissionGroupsGet'     { _apggProFileId :: !(Textual Int64)     , _apggId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'apggId'     -> AccountPermissionGroupsGet accountPermissionGroupsGet pApggProFileId_ pApggId_ =-    AccountPermissionGroupsGet+    AccountPermissionGroupsGet'     { _apggProFileId = _Coerce # pApggProFileId_     , _apggId = _Coerce # pApggId_     }@@ -93,7 +93,9 @@          where         type Rs AccountPermissionGroupsGet =              AccountPermissionGroup-        requestClient AccountPermissionGroupsGet{..}+        type Scopes AccountPermissionGroupsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AccountPermissionGroupsGet'{..}           = go _apggProFileId _apggId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/AccountPermissionGroups/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.AccountPermissionGroups.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -43,7 +43,7 @@ -- 'AccountPermissionGroupsList' request conforms to. type AccountPermissionGroupsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "accountPermissionGroups" :>@@ -53,7 +53,7 @@ -- | Retrieves the list of account permission groups. -- -- /See:/ 'accountPermissionGroupsList' smart constructor.-newtype AccountPermissionGroupsList = AccountPermissionGroupsList+newtype AccountPermissionGroupsList = AccountPermissionGroupsList'     { _apglProFileId :: Textual Int64     } deriving (Eq,Show,Data,Typeable,Generic) @@ -66,7 +66,7 @@     :: Int64 -- ^ 'apglProFileId'     -> AccountPermissionGroupsList accountPermissionGroupsList pApglProFileId_ =-    AccountPermissionGroupsList+    AccountPermissionGroupsList'     { _apglProFileId = _Coerce # pApglProFileId_     } @@ -81,7 +81,9 @@          where         type Rs AccountPermissionGroupsList =              AccountPermissionGroupsListResponse-        requestClient AccountPermissionGroupsList{..}+        type Scopes AccountPermissionGroupsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AccountPermissionGroupsList'{..}           = go _apglProFileId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/AccountPermissions/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.AccountPermissions.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'AccountPermissionsGet' request conforms to. type AccountPermissionsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "accountPermissions" :>@@ -55,7 +55,7 @@ -- | Gets one account permission by ID. -- -- /See:/ 'accountPermissionsGet' smart constructor.-data AccountPermissionsGet = AccountPermissionsGet+data AccountPermissionsGet = AccountPermissionsGet'     { _apgProFileId :: !(Textual Int64)     , _apgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'apgId'     -> AccountPermissionsGet accountPermissionsGet pApgProFileId_ pApgId_ =-    AccountPermissionsGet+    AccountPermissionsGet'     { _apgProFileId = _Coerce # pApgProFileId_     , _apgId = _Coerce # pApgId_     }@@ -90,7 +90,9 @@  instance GoogleRequest AccountPermissionsGet where         type Rs AccountPermissionsGet = AccountPermission-        requestClient AccountPermissionsGet{..}+        type Scopes AccountPermissionsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AccountPermissionsGet'{..}           = go _apgProFileId _apgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/AccountPermissions/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.AccountPermissions.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -43,7 +43,7 @@ -- 'AccountPermissionsList' request conforms to. type AccountPermissionsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "accountPermissions" :>@@ -53,7 +53,7 @@ -- | Retrieves the list of account permissions. -- -- /See:/ 'accountPermissionsList' smart constructor.-newtype AccountPermissionsList = AccountPermissionsList+newtype AccountPermissionsList = AccountPermissionsList'     { _aplProFileId :: Textual Int64     } deriving (Eq,Show,Data,Typeable,Generic) @@ -66,7 +66,7 @@     :: Int64 -- ^ 'aplProFileId'     -> AccountPermissionsList accountPermissionsList pAplProFileId_ =-    AccountPermissionsList+    AccountPermissionsList'     { _aplProFileId = _Coerce # pAplProFileId_     } @@ -79,7 +79,9 @@ instance GoogleRequest AccountPermissionsList where         type Rs AccountPermissionsList =              AccountPermissionsListResponse-        requestClient AccountPermissionsList{..}+        type Scopes AccountPermissionsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AccountPermissionsList'{..}           = go _aplProFileId (Just AltJSON) dFAReportingService           where go                   = buildClient
gen/Network/Google/Resource/DFAReporting/AccountUserProFiles/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.AccountUserProFiles.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'AccountUserProFilesGet' request conforms to. type AccountUserProFilesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "accountUserProfiles" :>@@ -55,7 +55,7 @@ -- | Gets one account user profile by ID. -- -- /See:/ 'accountUserProFilesGet' smart constructor.-data AccountUserProFilesGet = AccountUserProFilesGet+data AccountUserProFilesGet = AccountUserProFilesGet'     { _aupfgProFileId :: !(Textual Int64)     , _aupfgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'aupfgId'     -> AccountUserProFilesGet accountUserProFilesGet pAupfgProFileId_ pAupfgId_ =-    AccountUserProFilesGet+    AccountUserProFilesGet'     { _aupfgProFileId = _Coerce # pAupfgProFileId_     , _aupfgId = _Coerce # pAupfgId_     }@@ -91,7 +91,9 @@  instance GoogleRequest AccountUserProFilesGet where         type Rs AccountUserProFilesGet = AccountUserProFile-        requestClient AccountUserProFilesGet{..}+        type Scopes AccountUserProFilesGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AccountUserProFilesGet'{..}           = go _aupfgProFileId _aupfgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/AccountUserProFiles/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.AccountUserProFiles.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'AccountUserProFilesInsert' request conforms to. type AccountUserProFilesInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "accountUserProfiles" :>@@ -55,7 +55,7 @@ -- | Inserts a new account user profile. -- -- /See:/ 'accountUserProFilesInsert' smart constructor.-data AccountUserProFilesInsert = AccountUserProFilesInsert+data AccountUserProFilesInsert = AccountUserProFilesInsert'     { _aupfiProFileId :: !(Textual Int64)     , _aupfiPayload   :: !AccountUserProFile     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> AccountUserProFile -- ^ 'aupfiPayload'     -> AccountUserProFilesInsert accountUserProFilesInsert pAupfiProFileId_ pAupfiPayload_ =-    AccountUserProFilesInsert+    AccountUserProFilesInsert'     { _aupfiProFileId = _Coerce # pAupfiProFileId_     , _aupfiPayload = pAupfiPayload_     }@@ -93,7 +93,9 @@          where         type Rs AccountUserProFilesInsert =              AccountUserProFile-        requestClient AccountUserProFilesInsert{..}+        type Scopes AccountUserProFilesInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AccountUserProFilesInsert'{..}           = go _aupfiProFileId (Just AltJSON) _aupfiPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/AccountUserProFiles/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.AccountUserProFiles.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -52,7 +52,7 @@ -- 'AccountUserProFilesList' request conforms to. type AccountUserProFilesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "accountUserProfiles" :>@@ -75,7 +75,7 @@ -- | Retrieves a list of account user profiles, possibly filtered. -- -- /See:/ 'accountUserProFilesList' smart constructor.-data AccountUserProFilesList = AccountUserProFilesList+data AccountUserProFilesList = AccountUserProFilesList'     { _aupflUserRoleId   :: !(Maybe (Textual Int64))     , _aupflSearchString :: !(Maybe Text)     , _aupflIds          :: !(Maybe [Textual Int64])@@ -115,7 +115,7 @@     :: Int64 -- ^ 'aupflProFileId'     -> AccountUserProFilesList accountUserProFilesList pAupflProFileId_ =-    AccountUserProFilesList+    AccountUserProFilesList'     { _aupflUserRoleId = Nothing     , _aupflSearchString = Nothing     , _aupflIds = Nothing@@ -201,7 +201,9 @@ instance GoogleRequest AccountUserProFilesList where         type Rs AccountUserProFilesList =              AccountUserProFilesListResponse-        requestClient AccountUserProFilesList{..}+        type Scopes AccountUserProFilesList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AccountUserProFilesList'{..}           = go _aupflProFileId _aupflUserRoleId               _aupflSearchString               (_aupflIds ^. _Default)
gen/Network/Google/Resource/DFAReporting/AccountUserProFiles/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.AccountUserProFiles.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -46,7 +46,7 @@ -- 'AccountUserProFilesPatch' request conforms to. type AccountUserProFilesPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "accountUserProfiles" :>@@ -59,7 +59,7 @@ -- semantics. -- -- /See:/ 'accountUserProFilesPatch' smart constructor.-data AccountUserProFilesPatch = AccountUserProFilesPatch+data AccountUserProFilesPatch = AccountUserProFilesPatch'     { _aupfpProFileId :: !(Textual Int64)     , _aupfpPayload   :: !AccountUserProFile     , _aupfpId        :: !(Textual Int64)@@ -80,7 +80,7 @@     -> Int64 -- ^ 'aupfpId'     -> AccountUserProFilesPatch accountUserProFilesPatch pAupfpProFileId_ pAupfpPayload_ pAupfpId_ =-    AccountUserProFilesPatch+    AccountUserProFilesPatch'     { _aupfpProFileId = _Coerce # pAupfpProFileId_     , _aupfpPayload = pAupfpPayload_     , _aupfpId = _Coerce # pAupfpId_@@ -105,7 +105,9 @@  instance GoogleRequest AccountUserProFilesPatch where         type Rs AccountUserProFilesPatch = AccountUserProFile-        requestClient AccountUserProFilesPatch{..}+        type Scopes AccountUserProFilesPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AccountUserProFilesPatch'{..}           = go _aupfpProFileId (Just _aupfpId) (Just AltJSON)               _aupfpPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/AccountUserProFiles/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.AccountUserProFiles.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'AccountUserProFilesUpdate' request conforms to. type AccountUserProFilesUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "accountUserProfiles" :>@@ -55,7 +55,7 @@ -- | Updates an existing account user profile. -- -- /See:/ 'accountUserProFilesUpdate' smart constructor.-data AccountUserProFilesUpdate = AccountUserProFilesUpdate+data AccountUserProFilesUpdate = AccountUserProFilesUpdate'     { _aupfuProFileId :: !(Textual Int64)     , _aupfuPayload   :: !AccountUserProFile     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> AccountUserProFile -- ^ 'aupfuPayload'     -> AccountUserProFilesUpdate accountUserProFilesUpdate pAupfuProFileId_ pAupfuPayload_ =-    AccountUserProFilesUpdate+    AccountUserProFilesUpdate'     { _aupfuProFileId = _Coerce # pAupfuProFileId_     , _aupfuPayload = pAupfuPayload_     }@@ -93,7 +93,9 @@          where         type Rs AccountUserProFilesUpdate =              AccountUserProFile-        requestClient AccountUserProFilesUpdate{..}+        type Scopes AccountUserProFilesUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AccountUserProFilesUpdate'{..}           = go _aupfuProFileId (Just AltJSON) _aupfuPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Accounts/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Accounts.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'AccountsGet' request conforms to. type AccountsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "accounts" :>@@ -54,7 +54,7 @@ -- | Gets one account by ID. -- -- /See:/ 'accountsGet' smart constructor.-data AccountsGet = AccountsGet+data AccountsGet = AccountsGet'     { _aggProFileId :: !(Textual Int64)     , _aggId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'aggId'     -> AccountsGet accountsGet pAggProFileId_ pAggId_ =-    AccountsGet+    AccountsGet'     { _aggProFileId = _Coerce # pAggProFileId_     , _aggId = _Coerce # pAggId_     }@@ -89,7 +89,9 @@  instance GoogleRequest AccountsGet where         type Rs AccountsGet = Account-        requestClient AccountsGet{..}+        type Scopes AccountsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AccountsGet'{..}           = go _aggProFileId _aggId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Accounts/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Accounts.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -50,7 +50,7 @@ -- 'AccountsList' request conforms to. type AccountsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "accounts" :>@@ -67,7 +67,7 @@ -- | Retrieves the list of accounts, possibly filtered. -- -- /See:/ 'accountsList' smart constructor.-data AccountsList = AccountsList+data AccountsList = AccountsList'     { _accSearchString :: !(Maybe Text)     , _accIds          :: !(Maybe [Textual Int64])     , _accProFileId    :: !(Textual Int64)@@ -101,7 +101,7 @@     :: Int64 -- ^ 'accProFileId'     -> AccountsList accountsList pAccProFileId_ =-    AccountsList+    AccountsList'     { _accSearchString = Nothing     , _accIds = Nothing     , _accProFileId = _Coerce # pAccProFileId_@@ -166,7 +166,9 @@  instance GoogleRequest AccountsList where         type Rs AccountsList = AccountsListResponse-        requestClient AccountsList{..}+        type Scopes AccountsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AccountsList'{..}           = go _accProFileId _accSearchString               (_accIds ^. _Default)               _accSortOrder
gen/Network/Google/Resource/DFAReporting/Accounts/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Accounts.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'AccountsPatch' request conforms to. type AccountsPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "accounts" :>@@ -56,7 +56,7 @@ -- | Updates an existing account. This method supports patch semantics. -- -- /See:/ 'accountsPatch' smart constructor.-data AccountsPatch = AccountsPatch+data AccountsPatch = AccountsPatch'     { _appProFileId :: !(Textual Int64)     , _appPayload   :: !Account     , _appId        :: !(Textual Int64)@@ -77,7 +77,7 @@     -> Int64 -- ^ 'appId'     -> AccountsPatch accountsPatch pAppProFileId_ pAppPayload_ pAppId_ =-    AccountsPatch+    AccountsPatch'     { _appProFileId = _Coerce # pAppProFileId_     , _appPayload = pAppPayload_     , _appId = _Coerce # pAppId_@@ -101,7 +101,9 @@  instance GoogleRequest AccountsPatch where         type Rs AccountsPatch = Account-        requestClient AccountsPatch{..}+        type Scopes AccountsPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AccountsPatch'{..}           = go _appProFileId (Just _appId) (Just AltJSON)               _appPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/Accounts/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Accounts.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'AccountsUpdate' request conforms to. type AccountsUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "accounts" :>@@ -54,7 +54,7 @@ -- | Updates an existing account. -- -- /See:/ 'accountsUpdate' smart constructor.-data AccountsUpdate = AccountsUpdate+data AccountsUpdate = AccountsUpdate'     { _auuProFileId :: !(Textual Int64)     , _auuPayload   :: !Account     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Account -- ^ 'auuPayload'     -> AccountsUpdate accountsUpdate pAuuProFileId_ pAuuPayload_ =-    AccountsUpdate+    AccountsUpdate'     { _auuProFileId = _Coerce # pAuuProFileId_     , _auuPayload = pAuuPayload_     }@@ -89,7 +89,9 @@  instance GoogleRequest AccountsUpdate where         type Rs AccountsUpdate = Account-        requestClient AccountsUpdate{..}+        type Scopes AccountsUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AccountsUpdate'{..}           = go _auuProFileId (Just AltJSON) _auuPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Ads/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Ads.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'AdsGet' request conforms to. type AdsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "ads" :>@@ -54,7 +54,7 @@ -- | Gets one ad by ID. -- -- /See:/ 'adsGet' smart constructor.-data AdsGet = AdsGet+data AdsGet = AdsGet'     { _adsProFileId :: !(Textual Int64)     , _adsId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'adsId'     -> AdsGet adsGet pAdsProFileId_ pAdsId_ =-    AdsGet+    AdsGet'     { _adsProFileId = _Coerce # pAdsProFileId_     , _adsId = _Coerce # pAdsId_     }@@ -89,7 +89,9 @@  instance GoogleRequest AdsGet where         type Rs AdsGet = Ad-        requestClient AdsGet{..}+        type Scopes AdsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AdsGet'{..}           = go _adsProFileId _adsId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Ads/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Ads.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'AdsInsert' request conforms to. type AdsInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "ads" :>@@ -54,7 +54,7 @@ -- | Inserts a new ad. -- -- /See:/ 'adsInsert' smart constructor.-data AdsInsert = AdsInsert+data AdsInsert = AdsInsert'     { _aiProFileId :: !(Textual Int64)     , _aiPayload   :: !Ad     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Ad -- ^ 'aiPayload'     -> AdsInsert adsInsert pAiProFileId_ pAiPayload_ =-    AdsInsert+    AdsInsert'     { _aiProFileId = _Coerce # pAiProFileId_     , _aiPayload = pAiPayload_     }@@ -89,7 +89,9 @@  instance GoogleRequest AdsInsert where         type Rs AdsInsert = Ad-        requestClient AdsInsert{..}+        type Scopes AdsInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AdsInsert'{..}           = go _aiProFileId (Just AltJSON) _aiPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Ads/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Ads.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -67,7 +67,7 @@ -- 'AdsList' request conforms to. type AdsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "ads" :>@@ -130,7 +130,7 @@ -- | Retrieves a list of ads, possibly filtered. -- -- /See:/ 'adsList' smart constructor.-data AdsList = AdsList+data AdsList = AdsList'     { _alRemarketingListIds                   :: !(Maybe [Textual Int64])     , _alLandingPageIds                       :: !(Maybe [Textual Int64])     , _alCreativeIds                          :: !(Maybe [Textual Int64])@@ -215,7 +215,7 @@     :: Int64 -- ^ 'alProFileId'     -> AdsList adsList pAlProFileId_ =-    AdsList+    AdsList'     { _alRemarketingListIds = Nothing     , _alLandingPageIds = Nothing     , _alCreativeIds = Nothing@@ -389,7 +389,7 @@       (\ s a -> s{_alDynamicClickTracker = a})  -- | Select default ads with the specified compatibility. Applicable when--- type is AD_SERVING_DEFAULT_AD. WEB and WEB_INTERSTITIAL refer to+-- type is AD_SERVING_DEFAULT_AD. DISPLAY and DISPLAY_INTERSTITIAL refer to -- rendering either on desktop or on mobile devices for regular or -- interstitial ads, respectively. APP and APP_INTERSTITIAL are for -- rendering in mobile apps. IN_STREAM_VIDEO refers to rendering an@@ -420,7 +420,9 @@  instance GoogleRequest AdsList where         type Rs AdsList = AdsListResponse-        requestClient AdsList{..}+        type Scopes AdsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AdsList'{..}           = go _alProFileId (_alRemarketingListIds ^. _Default)               (_alLandingPageIds ^. _Default)               (_alCreativeIds ^. _Default)
gen/Network/Google/Resource/DFAReporting/Ads/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Ads.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'AdsPatch' request conforms to. type AdsPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "ads" :>@@ -56,7 +56,7 @@ -- | Updates an existing ad. This method supports patch semantics. -- -- /See:/ 'adsPatch' smart constructor.-data AdsPatch = AdsPatch+data AdsPatch = AdsPatch'     { _adsdProFileId :: !(Textual Int64)     , _adsdPayload   :: !Ad     , _adsdId        :: !(Textual Int64)@@ -77,7 +77,7 @@     -> Int64 -- ^ 'adsdId'     -> AdsPatch adsPatch pAdsdProFileId_ pAdsdPayload_ pAdsdId_ =-    AdsPatch+    AdsPatch'     { _adsdProFileId = _Coerce # pAdsdProFileId_     , _adsdPayload = pAdsdPayload_     , _adsdId = _Coerce # pAdsdId_@@ -102,7 +102,9 @@  instance GoogleRequest AdsPatch where         type Rs AdsPatch = Ad-        requestClient AdsPatch{..}+        type Scopes AdsPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AdsPatch'{..}           = go _adsdProFileId (Just _adsdId) (Just AltJSON)               _adsdPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/Ads/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Ads.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'AdsUpdate' request conforms to. type AdsUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "ads" :>@@ -54,7 +54,7 @@ -- | Updates an existing ad. -- -- /See:/ 'adsUpdate' smart constructor.-data AdsUpdate = AdsUpdate+data AdsUpdate = AdsUpdate'     { _aProFileId :: !(Textual Int64)     , _aPayload   :: !Ad     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Ad -- ^ 'aPayload'     -> AdsUpdate adsUpdate pAProFileId_ pAPayload_ =-    AdsUpdate+    AdsUpdate'     { _aProFileId = _Coerce # pAProFileId_     , _aPayload = pAPayload_     }@@ -88,7 +88,9 @@  instance GoogleRequest AdsUpdate where         type Rs AdsUpdate = Ad-        requestClient AdsUpdate{..}+        type Scopes AdsUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AdsUpdate'{..}           = go _aProFileId (Just AltJSON) _aPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Delete.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.AdvertiserGroups.Delete--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'AdvertiserGroupsDelete' request conforms to. type AdvertiserGroupsDeleteResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "advertiserGroups" :>@@ -54,7 +54,7 @@ -- | Deletes an existing advertiser group. -- -- /See:/ 'advertiserGroupsDelete' smart constructor.-data AdvertiserGroupsDelete = AdvertiserGroupsDelete+data AdvertiserGroupsDelete = AdvertiserGroupsDelete'     { _agdProFileId :: !(Textual Int64)     , _agdId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'agdId'     -> AdvertiserGroupsDelete advertiserGroupsDelete pAgdProFileId_ pAgdId_ =-    AdvertiserGroupsDelete+    AdvertiserGroupsDelete'     { _agdProFileId = _Coerce # pAgdProFileId_     , _agdId = _Coerce # pAgdId_     }@@ -89,7 +89,9 @@  instance GoogleRequest AdvertiserGroupsDelete where         type Rs AdvertiserGroupsDelete = ()-        requestClient AdvertiserGroupsDelete{..}+        type Scopes AdvertiserGroupsDelete =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AdvertiserGroupsDelete'{..}           = go _agdProFileId _agdId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.AdvertiserGroups.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'AdvertiserGroupsGet' request conforms to. type AdvertiserGroupsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "advertiserGroups" :>@@ -55,7 +55,7 @@ -- | Gets one advertiser group by ID. -- -- /See:/ 'advertiserGroupsGet' smart constructor.-data AdvertiserGroupsGet = AdvertiserGroupsGet+data AdvertiserGroupsGet = AdvertiserGroupsGet'     { _agggProFileId :: !(Textual Int64)     , _agggId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'agggId'     -> AdvertiserGroupsGet advertiserGroupsGet pAgggProFileId_ pAgggId_ =-    AdvertiserGroupsGet+    AdvertiserGroupsGet'     { _agggProFileId = _Coerce # pAgggProFileId_     , _agggId = _Coerce # pAgggId_     }@@ -91,7 +91,9 @@  instance GoogleRequest AdvertiserGroupsGet where         type Rs AdvertiserGroupsGet = AdvertiserGroup-        requestClient AdvertiserGroupsGet{..}+        type Scopes AdvertiserGroupsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AdvertiserGroupsGet'{..}           = go _agggProFileId _agggId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.AdvertiserGroups.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'AdvertiserGroupsInsert' request conforms to. type AdvertiserGroupsInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "advertiserGroups" :>@@ -55,7 +55,7 @@ -- | Inserts a new advertiser group. -- -- /See:/ 'advertiserGroupsInsert' smart constructor.-data AdvertiserGroupsInsert = AdvertiserGroupsInsert+data AdvertiserGroupsInsert = AdvertiserGroupsInsert'     { _agiProFileId :: !(Textual Int64)     , _agiPayload   :: !AdvertiserGroup     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> AdvertiserGroup -- ^ 'agiPayload'     -> AdvertiserGroupsInsert advertiserGroupsInsert pAgiProFileId_ pAgiPayload_ =-    AdvertiserGroupsInsert+    AdvertiserGroupsInsert'     { _agiProFileId = _Coerce # pAgiProFileId_     , _agiPayload = pAgiPayload_     }@@ -90,7 +90,9 @@  instance GoogleRequest AdvertiserGroupsInsert where         type Rs AdvertiserGroupsInsert = AdvertiserGroup-        requestClient AdvertiserGroupsInsert{..}+        type Scopes AdvertiserGroupsInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AdvertiserGroupsInsert'{..}           = go _agiProFileId (Just AltJSON) _agiPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.AdvertiserGroups.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -49,7 +49,7 @@ -- 'AdvertiserGroupsList' request conforms to. type AdvertiserGroupsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "advertiserGroups" :>@@ -67,7 +67,7 @@ -- | Retrieves a list of advertiser groups, possibly filtered. -- -- /See:/ 'advertiserGroupsList' smart constructor.-data AdvertiserGroupsList = AdvertiserGroupsList+data AdvertiserGroupsList = AdvertiserGroupsList'     { _aglSearchString :: !(Maybe Text)     , _aglIds          :: !(Maybe [Textual Int64])     , _aglProFileId    :: !(Textual Int64)@@ -98,7 +98,7 @@     :: Int64 -- ^ 'aglProFileId'     -> AdvertiserGroupsList advertiserGroupsList pAglProFileId_ =-    AdvertiserGroupsList+    AdvertiserGroupsList'     { _aglSearchString = Nothing     , _aglIds = Nothing     , _aglProFileId = _Coerce # pAglProFileId_@@ -158,7 +158,9 @@ instance GoogleRequest AdvertiserGroupsList where         type Rs AdvertiserGroupsList =              AdvertiserGroupsListResponse-        requestClient AdvertiserGroupsList{..}+        type Scopes AdvertiserGroupsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AdvertiserGroupsList'{..}           = go _aglProFileId _aglSearchString               (_aglIds ^. _Default)               _aglSortOrder
gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.AdvertiserGroups.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -46,7 +46,7 @@ -- 'AdvertiserGroupsPatch' request conforms to. type AdvertiserGroupsPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "advertiserGroups" :>@@ -59,7 +59,7 @@ -- semantics. -- -- /See:/ 'advertiserGroupsPatch' smart constructor.-data AdvertiserGroupsPatch = AdvertiserGroupsPatch+data AdvertiserGroupsPatch = AdvertiserGroupsPatch'     { _agpProFileId :: !(Textual Int64)     , _agpPayload   :: !AdvertiserGroup     , _agpId        :: !(Textual Int64)@@ -80,7 +80,7 @@     -> Int64 -- ^ 'agpId'     -> AdvertiserGroupsPatch advertiserGroupsPatch pAgpProFileId_ pAgpPayload_ pAgpId_ =-    AdvertiserGroupsPatch+    AdvertiserGroupsPatch'     { _agpProFileId = _Coerce # pAgpProFileId_     , _agpPayload = pAgpPayload_     , _agpId = _Coerce # pAgpId_@@ -104,7 +104,9 @@  instance GoogleRequest AdvertiserGroupsPatch where         type Rs AdvertiserGroupsPatch = AdvertiserGroup-        requestClient AdvertiserGroupsPatch{..}+        type Scopes AdvertiserGroupsPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AdvertiserGroupsPatch'{..}           = go _agpProFileId (Just _agpId) (Just AltJSON)               _agpPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.AdvertiserGroups.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'AdvertiserGroupsUpdate' request conforms to. type AdvertiserGroupsUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "advertiserGroups" :>@@ -55,7 +55,7 @@ -- | Updates an existing advertiser group. -- -- /See:/ 'advertiserGroupsUpdate' smart constructor.-data AdvertiserGroupsUpdate = AdvertiserGroupsUpdate+data AdvertiserGroupsUpdate = AdvertiserGroupsUpdate'     { _aguProFileId :: !(Textual Int64)     , _aguPayload   :: !AdvertiserGroup     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> AdvertiserGroup -- ^ 'aguPayload'     -> AdvertiserGroupsUpdate advertiserGroupsUpdate pAguProFileId_ pAguPayload_ =-    AdvertiserGroupsUpdate+    AdvertiserGroupsUpdate'     { _aguProFileId = _Coerce # pAguProFileId_     , _aguPayload = pAguPayload_     }@@ -90,7 +90,9 @@  instance GoogleRequest AdvertiserGroupsUpdate where         type Rs AdvertiserGroupsUpdate = AdvertiserGroup-        requestClient AdvertiserGroupsUpdate{..}+        type Scopes AdvertiserGroupsUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AdvertiserGroupsUpdate'{..}           = go _aguProFileId (Just AltJSON) _aguPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Advertisers/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Advertisers.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'AdvertisersGet' request conforms to. type AdvertisersGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "advertisers" :>@@ -54,7 +54,7 @@ -- | Gets one advertiser by ID. -- -- /See:/ 'advertisersGet' smart constructor.-data AdvertisersGet = AdvertisersGet+data AdvertisersGet = AdvertisersGet'     { _advProFileId :: !(Textual Int64)     , _advId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'advId'     -> AdvertisersGet advertisersGet pAdvProFileId_ pAdvId_ =-    AdvertisersGet+    AdvertisersGet'     { _advProFileId = _Coerce # pAdvProFileId_     , _advId = _Coerce # pAdvId_     }@@ -89,7 +89,9 @@  instance GoogleRequest AdvertisersGet where         type Rs AdvertisersGet = Advertiser-        requestClient AdvertisersGet{..}+        type Scopes AdvertisersGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AdvertisersGet'{..}           = go _advProFileId _advId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Advertisers/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Advertisers.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'AdvertisersInsert' request conforms to. type AdvertisersInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "advertisers" :>@@ -54,7 +54,7 @@ -- | Inserts a new advertiser. -- -- /See:/ 'advertisersInsert' smart constructor.-data AdvertisersInsert = AdvertisersInsert+data AdvertisersInsert = AdvertisersInsert'     { _aiiProFileId :: !(Textual Int64)     , _aiiPayload   :: !Advertiser     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Advertiser -- ^ 'aiiPayload'     -> AdvertisersInsert advertisersInsert pAiiProFileId_ pAiiPayload_ =-    AdvertisersInsert+    AdvertisersInsert'     { _aiiProFileId = _Coerce # pAiiProFileId_     , _aiiPayload = pAiiPayload_     }@@ -89,7 +89,9 @@  instance GoogleRequest AdvertisersInsert where         type Rs AdvertisersInsert = Advertiser-        requestClient AdvertisersInsert{..}+        type Scopes AdvertisersInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AdvertisersInsert'{..}           = go _aiiProFileId (Just AltJSON) _aiiPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Advertisers/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Advertisers.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -55,7 +55,7 @@ -- 'AdvertisersList' request conforms to. type AdvertisersListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "advertisers" :>@@ -81,7 +81,7 @@ -- | Retrieves a list of advertisers, possibly filtered. -- -- /See:/ 'advertisersList' smart constructor.-data AdvertisersList = AdvertisersList+data AdvertisersList = AdvertisersList'     { _allStatus                              :: !(Maybe AdvertisersListStatus)     , _allOnlyParent                          :: !(Maybe Bool)     , _allSearchString                        :: !(Maybe Text)@@ -130,7 +130,7 @@     :: Int64 -- ^ 'allProFileId'     -> AdvertisersList advertisersList pAllProFileId_ =-    AdvertisersList+    AdvertisersList'     { _allStatus = Nothing     , _allOnlyParent = Nothing     , _allSearchString = Nothing@@ -236,7 +236,9 @@  instance GoogleRequest AdvertisersList where         type Rs AdvertisersList = AdvertisersListResponse-        requestClient AdvertisersList{..}+        type Scopes AdvertisersList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AdvertisersList'{..}           = go _allProFileId _allStatus _allOnlyParent               _allSearchString               (_allIds ^. _Default)
gen/Network/Google/Resource/DFAReporting/Advertisers/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Advertisers.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'AdvertisersPatch' request conforms to. type AdvertisersPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "advertisers" :>@@ -57,7 +57,7 @@ -- | Updates an existing advertiser. This method supports patch semantics. -- -- /See:/ 'advertisersPatch' smart constructor.-data AdvertisersPatch = AdvertisersPatch+data AdvertisersPatch = AdvertisersPatch'     { _apProFileId :: !(Textual Int64)     , _apPayload   :: !Advertiser     , _apId        :: !(Textual Int64)@@ -78,7 +78,7 @@     -> Int64 -- ^ 'apId'     -> AdvertisersPatch advertisersPatch pApProFileId_ pApPayload_ pApId_ =-    AdvertisersPatch+    AdvertisersPatch'     { _apProFileId = _Coerce # pApProFileId_     , _apPayload = pApPayload_     , _apId = _Coerce # pApId_@@ -101,7 +101,9 @@  instance GoogleRequest AdvertisersPatch where         type Rs AdvertisersPatch = Advertiser-        requestClient AdvertisersPatch{..}+        type Scopes AdvertisersPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AdvertisersPatch'{..}           = go _apProFileId (Just _apId) (Just AltJSON)               _apPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/Advertisers/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Advertisers.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'AdvertisersUpdate' request conforms to. type AdvertisersUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "advertisers" :>@@ -54,7 +54,7 @@ -- | Updates an existing advertiser. -- -- /See:/ 'advertisersUpdate' smart constructor.-data AdvertisersUpdate = AdvertisersUpdate+data AdvertisersUpdate = AdvertisersUpdate'     { _auProFileId :: !(Textual Int64)     , _auPayload   :: !Advertiser     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Advertiser -- ^ 'auPayload'     -> AdvertisersUpdate advertisersUpdate pAuProFileId_ pAuPayload_ =-    AdvertisersUpdate+    AdvertisersUpdate'     { _auProFileId = _Coerce # pAuProFileId_     , _auPayload = pAuPayload_     }@@ -89,7 +89,9 @@  instance GoogleRequest AdvertisersUpdate where         type Rs AdvertisersUpdate = Advertiser-        requestClient AdvertisersUpdate{..}+        type Scopes AdvertisersUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient AdvertisersUpdate'{..}           = go _auProFileId (Just AltJSON) _auPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Browsers/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Browsers.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -43,7 +43,7 @@ -- 'BrowsersList' request conforms to. type BrowsersListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "browsers" :>@@ -53,7 +53,7 @@ -- | Retrieves a list of browsers. -- -- /See:/ 'browsersList' smart constructor.-newtype BrowsersList = BrowsersList+newtype BrowsersList = BrowsersList'     { _blProFileId :: Textual Int64     } deriving (Eq,Show,Data,Typeable,Generic) @@ -66,7 +66,7 @@     :: Int64 -- ^ 'blProFileId'     -> BrowsersList browsersList pBlProFileId_ =-    BrowsersList+    BrowsersList'     { _blProFileId = _Coerce # pBlProFileId_     } @@ -78,7 +78,9 @@  instance GoogleRequest BrowsersList where         type Rs BrowsersList = BrowsersListResponse-        requestClient BrowsersList{..}+        type Scopes BrowsersList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient BrowsersList'{..}           = go _blProFileId (Just AltJSON) dFAReportingService           where go                   = buildClient (Proxy :: Proxy BrowsersListResource)
gen/Network/Google/Resource/DFAReporting/CampaignCreativeAssociations/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -47,7 +47,7 @@ -- 'CampaignCreativeAssociationsInsert' request conforms to. type CampaignCreativeAssociationsInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "campaigns" :>@@ -62,7 +62,7 @@ -- a default ad does not exist already. -- -- /See:/ 'campaignCreativeAssociationsInsert' smart constructor.-data CampaignCreativeAssociationsInsert = CampaignCreativeAssociationsInsert+data CampaignCreativeAssociationsInsert = CampaignCreativeAssociationsInsert'     { _ccaiCampaignId :: !(Textual Int64)     , _ccaiProFileId  :: !(Textual Int64)     , _ccaiPayload    :: !CampaignCreativeAssociation@@ -83,7 +83,7 @@     -> CampaignCreativeAssociation -- ^ 'ccaiPayload'     -> CampaignCreativeAssociationsInsert campaignCreativeAssociationsInsert pCcaiCampaignId_ pCcaiProFileId_ pCcaiPayload_ =-    CampaignCreativeAssociationsInsert+    CampaignCreativeAssociationsInsert'     { _ccaiCampaignId = _Coerce # pCcaiCampaignId_     , _ccaiProFileId = _Coerce # pCcaiProFileId_     , _ccaiPayload = pCcaiPayload_@@ -112,7 +112,9 @@          CampaignCreativeAssociationsInsert where         type Rs CampaignCreativeAssociationsInsert =              CampaignCreativeAssociation-        requestClient CampaignCreativeAssociationsInsert{..}+        type Scopes CampaignCreativeAssociationsInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CampaignCreativeAssociationsInsert'{..}           = go _ccaiProFileId _ccaiCampaignId (Just AltJSON)               _ccaiPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/CampaignCreativeAssociations/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CampaignCreativeAssociations.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -48,7 +48,7 @@ -- 'CampaignCreativeAssociationsList' request conforms to. type CampaignCreativeAssociationsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "campaigns" :>@@ -66,7 +66,7 @@ -- campaign. -- -- /See:/ 'campaignCreativeAssociationsList' smart constructor.-data CampaignCreativeAssociationsList = CampaignCreativeAssociationsList+data CampaignCreativeAssociationsList = CampaignCreativeAssociationsList'     { _ccalCampaignId :: !(Textual Int64)     , _ccalProFileId  :: !(Textual Int64)     , _ccalSortOrder  :: !(Maybe CampaignCreativeAssociationsListSortOrder)@@ -92,7 +92,7 @@     -> Int64 -- ^ 'ccalProFileId'     -> CampaignCreativeAssociationsList campaignCreativeAssociationsList pCcalCampaignId_ pCcalProFileId_ =-    CampaignCreativeAssociationsList+    CampaignCreativeAssociationsList'     { _ccalCampaignId = _Coerce # pCcalCampaignId_     , _ccalProFileId = _Coerce # pCcalProFileId_     , _ccalSortOrder = Nothing@@ -137,7 +137,9 @@          CampaignCreativeAssociationsList where         type Rs CampaignCreativeAssociationsList =              CampaignCreativeAssociationsListResponse-        requestClient CampaignCreativeAssociationsList{..}+        type Scopes CampaignCreativeAssociationsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CampaignCreativeAssociationsList'{..}           = go _ccalProFileId _ccalCampaignId _ccalSortOrder               _ccalPageToken               _ccalMaxResults
gen/Network/Google/Resource/DFAReporting/Campaigns/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Campaigns.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'CampaignsGet' request conforms to. type CampaignsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "campaigns" :>@@ -54,7 +54,7 @@ -- | Gets one campaign by ID. -- -- /See:/ 'campaignsGet' smart constructor.-data CampaignsGet = CampaignsGet+data CampaignsGet = CampaignsGet'     { _cggProFileId :: !(Textual Int64)     , _cggId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'cggId'     -> CampaignsGet campaignsGet pCggProFileId_ pCggId_ =-    CampaignsGet+    CampaignsGet'     { _cggProFileId = _Coerce # pCggProFileId_     , _cggId = _Coerce # pCggId_     }@@ -89,7 +89,9 @@  instance GoogleRequest CampaignsGet where         type Rs CampaignsGet = Campaign-        requestClient CampaignsGet{..}+        type Scopes CampaignsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CampaignsGet'{..}           = go _cggProFileId _cggId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Campaigns/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Campaigns.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -46,7 +46,7 @@ -- 'CampaignsInsert' request conforms to. type CampaignsInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "campaigns" :>@@ -58,7 +58,7 @@ -- | Inserts a new campaign. -- -- /See:/ 'campaignsInsert' smart constructor.-data CampaignsInsert = CampaignsInsert+data CampaignsInsert = CampaignsInsert'     { _camProFileId              :: !(Textual Int64)     , _camPayload                :: !Campaign     , _camDefaultLandingPageURL  :: !Text@@ -83,7 +83,7 @@     -> Text -- ^ 'camDefaultLandingPageName'     -> CampaignsInsert campaignsInsert pCamProFileId_ pCamPayload_ pCamDefaultLandingPageURL_ pCamDefaultLandingPageName_ =-    CampaignsInsert+    CampaignsInsert'     { _camProFileId = _Coerce # pCamProFileId_     , _camPayload = pCamPayload_     , _camDefaultLandingPageURL = pCamDefaultLandingPageURL_@@ -116,7 +116,9 @@  instance GoogleRequest CampaignsInsert where         type Rs CampaignsInsert = Campaign-        requestClient CampaignsInsert{..}+        type Scopes CampaignsInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CampaignsInsert'{..}           = go _camProFileId (Just _camDefaultLandingPageName)               (Just _camDefaultLandingPageURL)               (Just AltJSON)
gen/Network/Google/Resource/DFAReporting/Campaigns/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Campaigns.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -56,7 +56,7 @@ -- 'CampaignsList' request conforms to. type CampaignsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "campaigns" :>@@ -81,7 +81,7 @@ -- | Retrieves a list of campaigns, possibly filtered. -- -- /See:/ 'campaignsList' smart constructor.-data CampaignsList = CampaignsList+data CampaignsList = CampaignsList'     { _clExcludedIds                    :: !(Maybe [Textual Int64])     , _clSearchString                   :: !(Maybe Text)     , _clIds                            :: !(Maybe [Textual Int64])@@ -133,7 +133,7 @@     :: Int64 -- ^ 'clProFileId'     -> CampaignsList campaignsList pClProFileId_ =-    CampaignsList+    CampaignsList'     { _clExcludedIds = Nothing     , _clSearchString = Nothing     , _clIds = Nothing@@ -248,7 +248,9 @@  instance GoogleRequest CampaignsList where         type Rs CampaignsList = CampaignsListResponse-        requestClient CampaignsList{..}+        type Scopes CampaignsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CampaignsList'{..}           = go _clProFileId (_clExcludedIds ^. _Default)               _clSearchString               (_clIds ^. _Default)
gen/Network/Google/Resource/DFAReporting/Campaigns/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Campaigns.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'CampaignsPatch' request conforms to. type CampaignsPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "campaigns" :>@@ -56,7 +56,7 @@ -- | Updates an existing campaign. This method supports patch semantics. -- -- /See:/ 'campaignsPatch' smart constructor.-data CampaignsPatch = CampaignsPatch+data CampaignsPatch = CampaignsPatch'     { _cpProFileId :: !(Textual Int64)     , _cpPayload   :: !Campaign     , _cpId        :: !(Textual Int64)@@ -77,7 +77,7 @@     -> Int64 -- ^ 'cpId'     -> CampaignsPatch campaignsPatch pCpProFileId_ pCpPayload_ pCpId_ =-    CampaignsPatch+    CampaignsPatch'     { _cpProFileId = _Coerce # pCpProFileId_     , _cpPayload = pCpPayload_     , _cpId = _Coerce # pCpId_@@ -100,7 +100,9 @@  instance GoogleRequest CampaignsPatch where         type Rs CampaignsPatch = Campaign-        requestClient CampaignsPatch{..}+        type Scopes CampaignsPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CampaignsPatch'{..}           = go _cpProFileId (Just _cpId) (Just AltJSON)               _cpPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/Campaigns/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Campaigns.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'CampaignsUpdate' request conforms to. type CampaignsUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "campaigns" :>@@ -54,7 +54,7 @@ -- | Updates an existing campaign. -- -- /See:/ 'campaignsUpdate' smart constructor.-data CampaignsUpdate = CampaignsUpdate+data CampaignsUpdate = CampaignsUpdate'     { _cuProFileId :: !(Textual Int64)     , _cuPayload   :: !Campaign     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Campaign -- ^ 'cuPayload'     -> CampaignsUpdate campaignsUpdate pCuProFileId_ pCuPayload_ =-    CampaignsUpdate+    CampaignsUpdate'     { _cuProFileId = _Coerce # pCuProFileId_     , _cuPayload = pCuPayload_     }@@ -89,7 +89,9 @@  instance GoogleRequest CampaignsUpdate where         type Rs CampaignsUpdate = Campaign-        requestClient CampaignsUpdate{..}+        type Scopes CampaignsUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CampaignsUpdate'{..}           = go _cuProFileId (Just AltJSON) _cuPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/ChangeLogs/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.ChangeLogs.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'ChangeLogsGet' request conforms to. type ChangeLogsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "changeLogs" :>@@ -54,7 +54,7 @@ -- | Gets one change log by ID. -- -- /See:/ 'changeLogsGet' smart constructor.-data ChangeLogsGet = ChangeLogsGet+data ChangeLogsGet = ChangeLogsGet'     { _clgProFileId :: !(Textual Int64)     , _clgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'clgId'     -> ChangeLogsGet changeLogsGet pClgProFileId_ pClgId_ =-    ChangeLogsGet+    ChangeLogsGet'     { _clgProFileId = _Coerce # pClgProFileId_     , _clgId = _Coerce # pClgId_     }@@ -89,7 +89,9 @@  instance GoogleRequest ChangeLogsGet where         type Rs ChangeLogsGet = ChangeLog-        requestClient ChangeLogsGet{..}+        type Scopes ChangeLogsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient ChangeLogsGet'{..}           = go _clgProFileId _clgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/ChangeLogs/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.ChangeLogs.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -53,7 +53,7 @@ -- 'ChangeLogsList' request conforms to. type ChangeLogsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "changeLogs" :>@@ -73,7 +73,7 @@ -- | Retrieves a list of change logs. -- -- /See:/ 'changeLogsList' smart constructor.-data ChangeLogsList = ChangeLogsList+data ChangeLogsList = ChangeLogsList'     { _cllUserProFileIds :: !(Maybe [Textual Int64])     , _cllObjectType     :: !(Maybe ChangeLogsListObjectType)     , _cllSearchString   :: !(Maybe Text)@@ -116,7 +116,7 @@     :: Int64 -- ^ 'cllProFileId'     -> ChangeLogsList changeLogsList pCllProFileId_ =-    ChangeLogsList+    ChangeLogsList'     { _cllUserProFileIds = Nothing     , _cllObjectType = Nothing     , _cllSearchString = Nothing@@ -213,7 +213,9 @@  instance GoogleRequest ChangeLogsList where         type Rs ChangeLogsList = ChangeLogsListResponse-        requestClient ChangeLogsList{..}+        type Scopes ChangeLogsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient ChangeLogsList'{..}           = go _cllProFileId (_cllUserProFileIds ^. _Default)               _cllObjectType               _cllSearchString
gen/Network/Google/Resource/DFAReporting/Cities/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Cities.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -47,7 +47,7 @@ -- 'CitiesList' request conforms to. type CitiesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "cities" :>@@ -61,7 +61,7 @@ -- | Retrieves a list of cities, possibly filtered. -- -- /See:/ 'citiesList' smart constructor.-data CitiesList = CitiesList+data CitiesList = CitiesList'     { _citRegionDartIds  :: !(Maybe [Textual Int64])     , _citProFileId      :: !(Textual Int64)     , _citNamePrefix     :: !(Maybe Text)@@ -86,7 +86,7 @@     :: Int64 -- ^ 'citProFileId'     -> CitiesList citiesList pCitProFileId_ =-    CitiesList+    CitiesList'     { _citRegionDartIds = Nothing     , _citProFileId = _Coerce # pCitProFileId_     , _citNamePrefix = Nothing@@ -131,7 +131,9 @@  instance GoogleRequest CitiesList where         type Rs CitiesList = CitiesListResponse-        requestClient CitiesList{..}+        type Scopes CitiesList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CitiesList'{..}           = go _citProFileId (_citRegionDartIds ^. _Default)               _citNamePrefix               (_citCountryDartIds ^. _Default)
gen/Network/Google/Resource/DFAReporting/ConnectionTypes/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.ConnectionTypes.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'ConnectionTypesGet' request conforms to. type ConnectionTypesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "connectionTypes" :>@@ -55,7 +55,7 @@ -- | Gets one connection type by ID. -- -- /See:/ 'connectionTypesGet' smart constructor.-data ConnectionTypesGet = ConnectionTypesGet+data ConnectionTypesGet = ConnectionTypesGet'     { _ctgProFileId :: !(Textual Int64)     , _ctgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'ctgId'     -> ConnectionTypesGet connectionTypesGet pCtgProFileId_ pCtgId_ =-    ConnectionTypesGet+    ConnectionTypesGet'     { _ctgProFileId = _Coerce # pCtgProFileId_     , _ctgId = _Coerce # pCtgId_     }@@ -90,7 +90,9 @@  instance GoogleRequest ConnectionTypesGet where         type Rs ConnectionTypesGet = ConnectionType-        requestClient ConnectionTypesGet{..}+        type Scopes ConnectionTypesGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient ConnectionTypesGet'{..}           = go _ctgProFileId _ctgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/ConnectionTypes/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.ConnectionTypes.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -43,7 +43,7 @@ -- 'ConnectionTypesList' request conforms to. type ConnectionTypesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "connectionTypes" :>@@ -53,7 +53,7 @@ -- | Retrieves a list of connection types. -- -- /See:/ 'connectionTypesList' smart constructor.-newtype ConnectionTypesList = ConnectionTypesList+newtype ConnectionTypesList = ConnectionTypesList'     { _ctlProFileId :: Textual Int64     } deriving (Eq,Show,Data,Typeable,Generic) @@ -66,7 +66,7 @@     :: Int64 -- ^ 'ctlProFileId'     -> ConnectionTypesList connectionTypesList pCtlProFileId_ =-    ConnectionTypesList+    ConnectionTypesList'     { _ctlProFileId = _Coerce # pCtlProFileId_     } @@ -79,7 +79,9 @@ instance GoogleRequest ConnectionTypesList where         type Rs ConnectionTypesList =              ConnectionTypesListResponse-        requestClient ConnectionTypesList{..}+        type Scopes ConnectionTypesList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient ConnectionTypesList'{..}           = go _ctlProFileId (Just AltJSON) dFAReportingService           where go                   = buildClient
gen/Network/Google/Resource/DFAReporting/ContentCategories/Delete.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.ContentCategories.Delete--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'ContentCategoriesDelete' request conforms to. type ContentCategoriesDeleteResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "contentCategories" :>@@ -54,7 +54,7 @@ -- | Deletes an existing content category. -- -- /See:/ 'contentCategoriesDelete' smart constructor.-data ContentCategoriesDelete = ContentCategoriesDelete+data ContentCategoriesDelete = ContentCategoriesDelete'     { _ccdProFileId :: !(Textual Int64)     , _ccdId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'ccdId'     -> ContentCategoriesDelete contentCategoriesDelete pCcdProFileId_ pCcdId_ =-    ContentCategoriesDelete+    ContentCategoriesDelete'     { _ccdProFileId = _Coerce # pCcdProFileId_     , _ccdId = _Coerce # pCcdId_     }@@ -89,7 +89,9 @@  instance GoogleRequest ContentCategoriesDelete where         type Rs ContentCategoriesDelete = ()-        requestClient ContentCategoriesDelete{..}+        type Scopes ContentCategoriesDelete =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient ContentCategoriesDelete'{..}           = go _ccdProFileId _ccdId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/ContentCategories/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.ContentCategories.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'ContentCategoriesGet' request conforms to. type ContentCategoriesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "contentCategories" :>@@ -55,7 +55,7 @@ -- | Gets one content category by ID. -- -- /See:/ 'contentCategoriesGet' smart constructor.-data ContentCategoriesGet = ContentCategoriesGet+data ContentCategoriesGet = ContentCategoriesGet'     { _ccgProFileId :: !(Textual Int64)     , _ccgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'ccgId'     -> ContentCategoriesGet contentCategoriesGet pCcgProFileId_ pCcgId_ =-    ContentCategoriesGet+    ContentCategoriesGet'     { _ccgProFileId = _Coerce # pCcgProFileId_     , _ccgId = _Coerce # pCcgId_     }@@ -90,7 +90,9 @@  instance GoogleRequest ContentCategoriesGet where         type Rs ContentCategoriesGet = ContentCategory-        requestClient ContentCategoriesGet{..}+        type Scopes ContentCategoriesGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient ContentCategoriesGet'{..}           = go _ccgProFileId _ccgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/ContentCategories/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.ContentCategories.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'ContentCategoriesInsert' request conforms to. type ContentCategoriesInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "contentCategories" :>@@ -55,7 +55,7 @@ -- | Inserts a new content category. -- -- /See:/ 'contentCategoriesInsert' smart constructor.-data ContentCategoriesInsert = ContentCategoriesInsert+data ContentCategoriesInsert = ContentCategoriesInsert'     { _cciProFileId :: !(Textual Int64)     , _cciPayload   :: !ContentCategory     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> ContentCategory -- ^ 'cciPayload'     -> ContentCategoriesInsert contentCategoriesInsert pCciProFileId_ pCciPayload_ =-    ContentCategoriesInsert+    ContentCategoriesInsert'     { _cciProFileId = _Coerce # pCciProFileId_     , _cciPayload = pCciPayload_     }@@ -90,7 +90,9 @@  instance GoogleRequest ContentCategoriesInsert where         type Rs ContentCategoriesInsert = ContentCategory-        requestClient ContentCategoriesInsert{..}+        type Scopes ContentCategoriesInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient ContentCategoriesInsert'{..}           = go _cciProFileId (Just AltJSON) _cciPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/ContentCategories/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.ContentCategories.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -49,7 +49,7 @@ -- 'ContentCategoriesList' request conforms to. type ContentCategoriesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "contentCategories" :>@@ -67,7 +67,7 @@ -- | Retrieves a list of content categories, possibly filtered. -- -- /See:/ 'contentCategoriesList' smart constructor.-data ContentCategoriesList = ContentCategoriesList+data ContentCategoriesList = ContentCategoriesList'     { _cclSearchString :: !(Maybe Text)     , _cclIds          :: !(Maybe [Textual Int64])     , _cclProFileId    :: !(Textual Int64)@@ -98,7 +98,7 @@     :: Int64 -- ^ 'cclProFileId'     -> ContentCategoriesList contentCategoriesList pCclProFileId_ =-    ContentCategoriesList+    ContentCategoriesList'     { _cclSearchString = Nothing     , _cclIds = Nothing     , _cclProFileId = _Coerce # pCclProFileId_@@ -158,7 +158,9 @@ instance GoogleRequest ContentCategoriesList where         type Rs ContentCategoriesList =              ContentCategoriesListResponse-        requestClient ContentCategoriesList{..}+        type Scopes ContentCategoriesList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient ContentCategoriesList'{..}           = go _cclProFileId _cclSearchString               (_cclIds ^. _Default)               _cclSortOrder
gen/Network/Google/Resource/DFAReporting/ContentCategories/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.ContentCategories.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -46,7 +46,7 @@ -- 'ContentCategoriesPatch' request conforms to. type ContentCategoriesPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "contentCategories" :>@@ -59,7 +59,7 @@ -- semantics. -- -- /See:/ 'contentCategoriesPatch' smart constructor.-data ContentCategoriesPatch = ContentCategoriesPatch+data ContentCategoriesPatch = ContentCategoriesPatch'     { _ccpProFileId :: !(Textual Int64)     , _ccpPayload   :: !ContentCategory     , _ccpId        :: !(Textual Int64)@@ -80,7 +80,7 @@     -> Int64 -- ^ 'ccpId'     -> ContentCategoriesPatch contentCategoriesPatch pCcpProFileId_ pCcpPayload_ pCcpId_ =-    ContentCategoriesPatch+    ContentCategoriesPatch'     { _ccpProFileId = _Coerce # pCcpProFileId_     , _ccpPayload = pCcpPayload_     , _ccpId = _Coerce # pCcpId_@@ -104,7 +104,9 @@  instance GoogleRequest ContentCategoriesPatch where         type Rs ContentCategoriesPatch = ContentCategory-        requestClient ContentCategoriesPatch{..}+        type Scopes ContentCategoriesPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient ContentCategoriesPatch'{..}           = go _ccpProFileId (Just _ccpId) (Just AltJSON)               _ccpPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/ContentCategories/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.ContentCategories.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'ContentCategoriesUpdate' request conforms to. type ContentCategoriesUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "contentCategories" :>@@ -55,7 +55,7 @@ -- | Updates an existing content category. -- -- /See:/ 'contentCategoriesUpdate' smart constructor.-data ContentCategoriesUpdate = ContentCategoriesUpdate+data ContentCategoriesUpdate = ContentCategoriesUpdate'     { _ccuProFileId :: !(Textual Int64)     , _ccuPayload   :: !ContentCategory     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> ContentCategory -- ^ 'ccuPayload'     -> ContentCategoriesUpdate contentCategoriesUpdate pCcuProFileId_ pCcuPayload_ =-    ContentCategoriesUpdate+    ContentCategoriesUpdate'     { _ccuProFileId = _Coerce # pCcuProFileId_     , _ccuPayload = pCcuPayload_     }@@ -90,7 +90,9 @@  instance GoogleRequest ContentCategoriesUpdate where         type Rs ContentCategoriesUpdate = ContentCategory-        requestClient ContentCategoriesUpdate{..}+        type Scopes ContentCategoriesUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient ContentCategoriesUpdate'{..}           = go _ccuProFileId (Just AltJSON) _ccuPayload               dFAReportingService           where go
+ gen/Network/Google/Resource/DFAReporting/Conversions/Batchinsert.hs view
@@ -0,0 +1,103 @@+{-# 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.DFAReporting.Conversions.Batchinsert+-- 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 conversions.+--+-- /See:/ <https://developers.google.com/doubleclick-advertisers/reporting/ DCM/DFA Reporting And Trafficking API Reference> for @dfareporting.conversions.batchinsert@.+module Network.Google.Resource.DFAReporting.Conversions.Batchinsert+    (+    -- * REST Resource+      ConversionsBatchinsertResource++    -- * Creating a Request+    , conversionsBatchinsert+    , ConversionsBatchinsert++    -- * Request Lenses+    , cbProFileId+    , cbPayload+    ) where++import           Network.Google.DFAReporting.Types+import           Network.Google.Prelude++-- | A resource alias for @dfareporting.conversions.batchinsert@ method which the+-- 'ConversionsBatchinsert' request conforms to.+type ConversionsBatchinsertResource =+     "dfareporting" :>+       "v2.5" :>+         "userprofiles" :>+           Capture "profileId" (Textual Int64) :>+             "conversions" :>+               "batchinsert" :>+                 QueryParam "alt" AltJSON :>+                   ReqBody '[JSON] ConversionsBatchInsertRequest :>+                     Post '[JSON] ConversionsBatchInsertResponse++-- | Inserts conversions.+--+-- /See:/ 'conversionsBatchinsert' smart constructor.+data ConversionsBatchinsert = ConversionsBatchinsert'+    { _cbProFileId :: !(Textual Int64)+    , _cbPayload   :: !ConversionsBatchInsertRequest+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'ConversionsBatchinsert' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cbProFileId'+--+-- * 'cbPayload'+conversionsBatchinsert+    :: Int64 -- ^ 'cbProFileId'+    -> ConversionsBatchInsertRequest -- ^ 'cbPayload'+    -> ConversionsBatchinsert+conversionsBatchinsert pCbProFileId_ pCbPayload_ =+    ConversionsBatchinsert'+    { _cbProFileId = _Coerce # pCbProFileId_+    , _cbPayload = pCbPayload_+    }++-- | User profile ID associated with this request.+cbProFileId :: Lens' ConversionsBatchinsert Int64+cbProFileId+  = lens _cbProFileId (\ s a -> s{_cbProFileId = a}) .+      _Coerce++-- | Multipart request metadata.+cbPayload :: Lens' ConversionsBatchinsert ConversionsBatchInsertRequest+cbPayload+  = lens _cbPayload (\ s a -> s{_cbPayload = a})++instance GoogleRequest ConversionsBatchinsert where+        type Rs ConversionsBatchinsert =+             ConversionsBatchInsertResponse+        type Scopes ConversionsBatchinsert =+             '["https://www.googleapis.com/auth/ddmconversions"]+        requestClient ConversionsBatchinsert'{..}+          = go _cbProFileId (Just AltJSON) _cbPayload+              dFAReportingService+          where go+                  = buildClient+                      (Proxy :: Proxy ConversionsBatchinsertResource)+                      mempty
gen/Network/Google/Resource/DFAReporting/Countries/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Countries.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'CountriesGet' request conforms to. type CountriesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "countries" :>@@ -54,7 +54,7 @@ -- | Gets one country by ID. -- -- /See:/ 'countriesGet' smart constructor.-data CountriesGet = CountriesGet+data CountriesGet = CountriesGet'     { _cgProFileId :: !(Textual Int64)     , _cgDartId    :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'cgDartId'     -> CountriesGet countriesGet pCgProFileId_ pCgDartId_ =-    CountriesGet+    CountriesGet'     { _cgProFileId = _Coerce # pCgProFileId_     , _cgDartId = _Coerce # pCgDartId_     }@@ -90,7 +90,9 @@  instance GoogleRequest CountriesGet where         type Rs CountriesGet = Country-        requestClient CountriesGet{..}+        type Scopes CountriesGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CountriesGet'{..}           = go _cgProFileId _cgDartId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Countries/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Countries.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -43,7 +43,7 @@ -- 'CountriesList' request conforms to. type CountriesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "countries" :>@@ -53,7 +53,7 @@ -- | Retrieves a list of countries. -- -- /See:/ 'countriesList' smart constructor.-newtype CountriesList = CountriesList+newtype CountriesList = CountriesList'     { _couProFileId :: Textual Int64     } deriving (Eq,Show,Data,Typeable,Generic) @@ -66,7 +66,7 @@     :: Int64 -- ^ 'couProFileId'     -> CountriesList countriesList pCouProFileId_ =-    CountriesList+    CountriesList'     { _couProFileId = _Coerce # pCouProFileId_     } @@ -78,7 +78,9 @@  instance GoogleRequest CountriesList where         type Rs CountriesList = CountriesListResponse-        requestClient CountriesList{..}+        type Scopes CountriesList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CountriesList'{..}           = go _couProFileId (Just AltJSON) dFAReportingService           where go                   = buildClient (Proxy :: Proxy CountriesListResource)
gen/Network/Google/Resource/DFAReporting/CreativeAssets/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CreativeAssets.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'CreativeAssetsInsert' request conforms to. type CreativeAssetsInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creativeAssets" :>@@ -57,22 +57,21 @@        :<|>        "upload" :>          "dfareporting" :>-           "v2.2" :>+           "v2.5" :>              "userprofiles" :>                Capture "profileId" (Textual Int64) :>                  "creativeAssets" :>                    Capture "advertiserId" (Textual Int64) :>                      "creativeAssets" :>                        QueryParam "alt" AltJSON :>-                         QueryParam "uploadType" AltMedia :>-                           MultipartRelated '[JSON] CreativeAssetMetadata-                             RequestBody-                             :> Post '[JSON] CreativeAssetMetadata+                         QueryParam "uploadType" Multipart :>+                           MultipartRelated '[JSON] CreativeAssetMetadata :>+                             Post '[JSON] CreativeAssetMetadata  -- | Inserts a new creative asset. -- -- /See:/ 'creativeAssetsInsert' smart constructor.-data CreativeAssetsInsert = CreativeAssetsInsert+data CreativeAssetsInsert = CreativeAssetsInsert'     { _caiAdvertiserId :: !(Textual Int64)     , _caiProFileId    :: !(Textual Int64)     , _caiPayload      :: !CreativeAssetMetadata@@ -93,7 +92,7 @@     -> CreativeAssetMetadata -- ^ 'caiPayload'     -> CreativeAssetsInsert creativeAssetsInsert pCaiAdvertiserId_ pCaiProFileId_ pCaiPayload_ =-    CreativeAssetsInsert+    CreativeAssetsInsert'     { _caiAdvertiserId = _Coerce # pCaiAdvertiserId_     , _caiProFileId = _Coerce # pCaiProFileId_     , _caiPayload = pCaiPayload_@@ -119,7 +118,9 @@  instance GoogleRequest CreativeAssetsInsert where         type Rs CreativeAssetsInsert = CreativeAssetMetadata-        requestClient CreativeAssetsInsert{..}+        type Scopes CreativeAssetsInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativeAssetsInsert'{..}           = go _caiProFileId _caiAdvertiserId (Just AltJSON)               _caiPayload               dFAReportingService@@ -132,10 +133,12 @@          (MediaUpload CreativeAssetsInsert) where         type Rs (MediaUpload CreativeAssetsInsert) =              CreativeAssetMetadata+        type Scopes (MediaUpload CreativeAssetsInsert) =+             Scopes CreativeAssetsInsert         requestClient-          (MediaUpload CreativeAssetsInsert{..} body)+          (MediaUpload CreativeAssetsInsert'{..} body)           = go _caiProFileId _caiAdvertiserId (Just AltJSON)-              (Just AltMedia)+              (Just Multipart)               _caiPayload               body               dFAReportingService
gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Delete.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CreativeFieldValues.Delete--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'CreativeFieldValuesDelete' request conforms to. type CreativeFieldValuesDeleteResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creativeFields" :>@@ -57,7 +57,7 @@ -- | Deletes an existing creative field value. -- -- /See:/ 'creativeFieldValuesDelete' smart constructor.-data CreativeFieldValuesDelete = CreativeFieldValuesDelete+data CreativeFieldValuesDelete = CreativeFieldValuesDelete'     { _cfvdCreativeFieldId :: !(Textual Int64)     , _cfvdProFileId       :: !(Textual Int64)     , _cfvdId              :: !(Textual Int64)@@ -78,7 +78,7 @@     -> Int64 -- ^ 'cfvdId'     -> CreativeFieldValuesDelete creativeFieldValuesDelete pCfvdCreativeFieldId_ pCfvdProFileId_ pCfvdId_ =-    CreativeFieldValuesDelete+    CreativeFieldValuesDelete'     { _cfvdCreativeFieldId = _Coerce # pCfvdCreativeFieldId_     , _cfvdProFileId = _Coerce # pCfvdProFileId_     , _cfvdId = _Coerce # pCfvdId_@@ -106,7 +106,9 @@ instance GoogleRequest CreativeFieldValuesDelete          where         type Rs CreativeFieldValuesDelete = ()-        requestClient CreativeFieldValuesDelete{..}+        type Scopes CreativeFieldValuesDelete =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativeFieldValuesDelete'{..}           = go _cfvdProFileId _cfvdCreativeFieldId _cfvdId               (Just AltJSON)               dFAReportingService
gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CreativeFieldValues.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'CreativeFieldValuesGet' request conforms to. type CreativeFieldValuesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creativeFields" :>@@ -58,7 +58,7 @@ -- | Gets one creative field value by ID. -- -- /See:/ 'creativeFieldValuesGet' smart constructor.-data CreativeFieldValuesGet = CreativeFieldValuesGet+data CreativeFieldValuesGet = CreativeFieldValuesGet'     { _cfvgCreativeFieldId :: !(Textual Int64)     , _cfvgProFileId       :: !(Textual Int64)     , _cfvgId              :: !(Textual Int64)@@ -79,7 +79,7 @@     -> Int64 -- ^ 'cfvgId'     -> CreativeFieldValuesGet creativeFieldValuesGet pCfvgCreativeFieldId_ pCfvgProFileId_ pCfvgId_ =-    CreativeFieldValuesGet+    CreativeFieldValuesGet'     { _cfvgCreativeFieldId = _Coerce # pCfvgCreativeFieldId_     , _cfvgProFileId = _Coerce # pCfvgProFileId_     , _cfvgId = _Coerce # pCfvgId_@@ -106,7 +106,9 @@  instance GoogleRequest CreativeFieldValuesGet where         type Rs CreativeFieldValuesGet = CreativeFieldValue-        requestClient CreativeFieldValuesGet{..}+        type Scopes CreativeFieldValuesGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativeFieldValuesGet'{..}           = go _cfvgProFileId _cfvgCreativeFieldId _cfvgId               (Just AltJSON)               dFAReportingService
gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CreativeFieldValues.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'CreativeFieldValuesInsert' request conforms to. type CreativeFieldValuesInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creativeFields" :>@@ -58,7 +58,7 @@ -- | Inserts a new creative field value. -- -- /See:/ 'creativeFieldValuesInsert' smart constructor.-data CreativeFieldValuesInsert = CreativeFieldValuesInsert+data CreativeFieldValuesInsert = CreativeFieldValuesInsert'     { _cfviCreativeFieldId :: !(Textual Int64)     , _cfviProFileId       :: !(Textual Int64)     , _cfviPayload         :: !CreativeFieldValue@@ -79,7 +79,7 @@     -> CreativeFieldValue -- ^ 'cfviPayload'     -> CreativeFieldValuesInsert creativeFieldValuesInsert pCfviCreativeFieldId_ pCfviProFileId_ pCfviPayload_ =-    CreativeFieldValuesInsert+    CreativeFieldValuesInsert'     { _cfviCreativeFieldId = _Coerce # pCfviCreativeFieldId_     , _cfviProFileId = _Coerce # pCfviProFileId_     , _cfviPayload = pCfviPayload_@@ -108,7 +108,9 @@          where         type Rs CreativeFieldValuesInsert =              CreativeFieldValue-        requestClient CreativeFieldValuesInsert{..}+        type Scopes CreativeFieldValuesInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativeFieldValuesInsert'{..}           = go _cfviProFileId _cfviCreativeFieldId               (Just AltJSON)               _cfviPayload
gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CreativeFieldValues.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -50,7 +50,7 @@ -- 'CreativeFieldValuesList' request conforms to. type CreativeFieldValuesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creativeFields" :>@@ -72,7 +72,7 @@ -- | Retrieves a list of creative field values, possibly filtered. -- -- /See:/ 'creativeFieldValuesList' smart constructor.-data CreativeFieldValuesList = CreativeFieldValuesList+data CreativeFieldValuesList = CreativeFieldValuesList'     { _cfvlCreativeFieldId :: !(Textual Int64)     , _cfvlSearchString    :: !(Maybe Text)     , _cfvlIds             :: !(Maybe [Textual Int64])@@ -107,7 +107,7 @@     -> Int64 -- ^ 'cfvlProFileId'     -> CreativeFieldValuesList creativeFieldValuesList pCfvlCreativeFieldId_ pCfvlProFileId_ =-    CreativeFieldValuesList+    CreativeFieldValuesList'     { _cfvlCreativeFieldId = _Coerce # pCfvlCreativeFieldId_     , _cfvlSearchString = Nothing     , _cfvlIds = Nothing@@ -173,7 +173,9 @@ instance GoogleRequest CreativeFieldValuesList where         type Rs CreativeFieldValuesList =              CreativeFieldValuesListResponse-        requestClient CreativeFieldValuesList{..}+        type Scopes CreativeFieldValuesList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativeFieldValuesList'{..}           = go _cfvlProFileId _cfvlCreativeFieldId               _cfvlSearchString               (_cfvlIds ^. _Default)
gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CreativeFieldValues.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -47,7 +47,7 @@ -- 'CreativeFieldValuesPatch' request conforms to. type CreativeFieldValuesPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creativeFields" :>@@ -62,7 +62,7 @@ -- semantics. -- -- /See:/ 'creativeFieldValuesPatch' smart constructor.-data CreativeFieldValuesPatch = CreativeFieldValuesPatch+data CreativeFieldValuesPatch = CreativeFieldValuesPatch'     { _cfvpCreativeFieldId :: !(Textual Int64)     , _cfvpProFileId       :: !(Textual Int64)     , _cfvpPayload         :: !CreativeFieldValue@@ -87,7 +87,7 @@     -> Int64 -- ^ 'cfvpId'     -> CreativeFieldValuesPatch creativeFieldValuesPatch pCfvpCreativeFieldId_ pCfvpProFileId_ pCfvpPayload_ pCfvpId_ =-    CreativeFieldValuesPatch+    CreativeFieldValuesPatch'     { _cfvpCreativeFieldId = _Coerce # pCfvpCreativeFieldId_     , _cfvpProFileId = _Coerce # pCfvpProFileId_     , _cfvpPayload = pCfvpPayload_@@ -120,7 +120,9 @@  instance GoogleRequest CreativeFieldValuesPatch where         type Rs CreativeFieldValuesPatch = CreativeFieldValue-        requestClient CreativeFieldValuesPatch{..}+        type Scopes CreativeFieldValuesPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativeFieldValuesPatch'{..}           = go _cfvpProFileId _cfvpCreativeFieldId               (Just _cfvpId)               (Just AltJSON)
gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CreativeFieldValues.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'CreativeFieldValuesUpdate' request conforms to. type CreativeFieldValuesUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creativeFields" :>@@ -58,7 +58,7 @@ -- | Updates an existing creative field value. -- -- /See:/ 'creativeFieldValuesUpdate' smart constructor.-data CreativeFieldValuesUpdate = CreativeFieldValuesUpdate+data CreativeFieldValuesUpdate = CreativeFieldValuesUpdate'     { _cfvuCreativeFieldId :: !(Textual Int64)     , _cfvuProFileId       :: !(Textual Int64)     , _cfvuPayload         :: !CreativeFieldValue@@ -79,7 +79,7 @@     -> CreativeFieldValue -- ^ 'cfvuPayload'     -> CreativeFieldValuesUpdate creativeFieldValuesUpdate pCfvuCreativeFieldId_ pCfvuProFileId_ pCfvuPayload_ =-    CreativeFieldValuesUpdate+    CreativeFieldValuesUpdate'     { _cfvuCreativeFieldId = _Coerce # pCfvuCreativeFieldId_     , _cfvuProFileId = _Coerce # pCfvuProFileId_     , _cfvuPayload = pCfvuPayload_@@ -108,7 +108,9 @@          where         type Rs CreativeFieldValuesUpdate =              CreativeFieldValue-        requestClient CreativeFieldValuesUpdate{..}+        type Scopes CreativeFieldValuesUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativeFieldValuesUpdate'{..}           = go _cfvuProFileId _cfvuCreativeFieldId               (Just AltJSON)               _cfvuPayload
gen/Network/Google/Resource/DFAReporting/CreativeFields/Delete.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CreativeFields.Delete--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'CreativeFieldsDelete' request conforms to. type CreativeFieldsDeleteResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creativeFields" :>@@ -54,7 +54,7 @@ -- | Deletes an existing creative field. -- -- /See:/ 'creativeFieldsDelete' smart constructor.-data CreativeFieldsDelete = CreativeFieldsDelete+data CreativeFieldsDelete = CreativeFieldsDelete'     { _cfdProFileId :: !(Textual Int64)     , _cfdId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'cfdId'     -> CreativeFieldsDelete creativeFieldsDelete pCfdProFileId_ pCfdId_ =-    CreativeFieldsDelete+    CreativeFieldsDelete'     { _cfdProFileId = _Coerce # pCfdProFileId_     , _cfdId = _Coerce # pCfdId_     }@@ -89,7 +89,9 @@  instance GoogleRequest CreativeFieldsDelete where         type Rs CreativeFieldsDelete = ()-        requestClient CreativeFieldsDelete{..}+        type Scopes CreativeFieldsDelete =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativeFieldsDelete'{..}           = go _cfdProFileId _cfdId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/CreativeFields/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CreativeFields.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'CreativeFieldsGet' request conforms to. type CreativeFieldsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creativeFields" :>@@ -54,7 +54,7 @@ -- | Gets one creative field by ID. -- -- /See:/ 'creativeFieldsGet' smart constructor.-data CreativeFieldsGet = CreativeFieldsGet+data CreativeFieldsGet = CreativeFieldsGet'     { _cfgProFileId :: !(Textual Int64)     , _cfgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'cfgId'     -> CreativeFieldsGet creativeFieldsGet pCfgProFileId_ pCfgId_ =-    CreativeFieldsGet+    CreativeFieldsGet'     { _cfgProFileId = _Coerce # pCfgProFileId_     , _cfgId = _Coerce # pCfgId_     }@@ -89,7 +89,9 @@  instance GoogleRequest CreativeFieldsGet where         type Rs CreativeFieldsGet = CreativeField-        requestClient CreativeFieldsGet{..}+        type Scopes CreativeFieldsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativeFieldsGet'{..}           = go _cfgProFileId _cfgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/CreativeFields/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CreativeFields.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'CreativeFieldsInsert' request conforms to. type CreativeFieldsInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creativeFields" :>@@ -55,7 +55,7 @@ -- | Inserts a new creative field. -- -- /See:/ 'creativeFieldsInsert' smart constructor.-data CreativeFieldsInsert = CreativeFieldsInsert+data CreativeFieldsInsert = CreativeFieldsInsert'     { _cfiProFileId :: !(Textual Int64)     , _cfiPayload   :: !CreativeField     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> CreativeField -- ^ 'cfiPayload'     -> CreativeFieldsInsert creativeFieldsInsert pCfiProFileId_ pCfiPayload_ =-    CreativeFieldsInsert+    CreativeFieldsInsert'     { _cfiProFileId = _Coerce # pCfiProFileId_     , _cfiPayload = pCfiPayload_     }@@ -90,7 +90,9 @@  instance GoogleRequest CreativeFieldsInsert where         type Rs CreativeFieldsInsert = CreativeField-        requestClient CreativeFieldsInsert{..}+        type Scopes CreativeFieldsInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativeFieldsInsert'{..}           = go _cfiProFileId (Just AltJSON) _cfiPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/CreativeFields/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CreativeFields.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -50,7 +50,7 @@ -- 'CreativeFieldsList' request conforms to. type CreativeFieldsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creativeFields" :>@@ -67,7 +67,7 @@ -- | Retrieves a list of creative fields, possibly filtered. -- -- /See:/ 'creativeFieldsList' smart constructor.-data CreativeFieldsList = CreativeFieldsList+data CreativeFieldsList = CreativeFieldsList'     { _cflSearchString  :: !(Maybe Text)     , _cflIds           :: !(Maybe [Textual Int64])     , _cflProFileId     :: !(Textual Int64)@@ -101,7 +101,7 @@     :: Int64 -- ^ 'cflProFileId'     -> CreativeFieldsList creativeFieldsList pCflProFileId_ =-    CreativeFieldsList+    CreativeFieldsList'     { _cflSearchString = Nothing     , _cflIds = Nothing     , _cflProFileId = _Coerce # pCflProFileId_@@ -170,7 +170,9 @@ instance GoogleRequest CreativeFieldsList where         type Rs CreativeFieldsList =              CreativeFieldsListResponse-        requestClient CreativeFieldsList{..}+        type Scopes CreativeFieldsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativeFieldsList'{..}           = go _cflProFileId _cflSearchString               (_cflIds ^. _Default)               _cflSortOrder
gen/Network/Google/Resource/DFAReporting/CreativeFields/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CreativeFields.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -46,7 +46,7 @@ -- 'CreativeFieldsPatch' request conforms to. type CreativeFieldsPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creativeFields" :>@@ -59,7 +59,7 @@ -- semantics. -- -- /See:/ 'creativeFieldsPatch' smart constructor.-data CreativeFieldsPatch = CreativeFieldsPatch+data CreativeFieldsPatch = CreativeFieldsPatch'     { _cfpProFileId :: !(Textual Int64)     , _cfpPayload   :: !CreativeField     , _cfpId        :: !(Textual Int64)@@ -80,7 +80,7 @@     -> Int64 -- ^ 'cfpId'     -> CreativeFieldsPatch creativeFieldsPatch pCfpProFileId_ pCfpPayload_ pCfpId_ =-    CreativeFieldsPatch+    CreativeFieldsPatch'     { _cfpProFileId = _Coerce # pCfpProFileId_     , _cfpPayload = pCfpPayload_     , _cfpId = _Coerce # pCfpId_@@ -104,7 +104,9 @@  instance GoogleRequest CreativeFieldsPatch where         type Rs CreativeFieldsPatch = CreativeField-        requestClient CreativeFieldsPatch{..}+        type Scopes CreativeFieldsPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativeFieldsPatch'{..}           = go _cfpProFileId (Just _cfpId) (Just AltJSON)               _cfpPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/CreativeFields/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CreativeFields.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'CreativeFieldsUpdate' request conforms to. type CreativeFieldsUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creativeFields" :>@@ -55,7 +55,7 @@ -- | Updates an existing creative field. -- -- /See:/ 'creativeFieldsUpdate' smart constructor.-data CreativeFieldsUpdate = CreativeFieldsUpdate+data CreativeFieldsUpdate = CreativeFieldsUpdate'     { _cfuProFileId :: !(Textual Int64)     , _cfuPayload   :: !CreativeField     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> CreativeField -- ^ 'cfuPayload'     -> CreativeFieldsUpdate creativeFieldsUpdate pCfuProFileId_ pCfuPayload_ =-    CreativeFieldsUpdate+    CreativeFieldsUpdate'     { _cfuProFileId = _Coerce # pCfuProFileId_     , _cfuPayload = pCfuPayload_     }@@ -90,7 +90,9 @@  instance GoogleRequest CreativeFieldsUpdate where         type Rs CreativeFieldsUpdate = CreativeField-        requestClient CreativeFieldsUpdate{..}+        type Scopes CreativeFieldsUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativeFieldsUpdate'{..}           = go _cfuProFileId (Just AltJSON) _cfuPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/CreativeGroups/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CreativeGroups.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'CreativeGroupsGet' request conforms to. type CreativeGroupsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creativeGroups" :>@@ -54,7 +54,7 @@ -- | Gets one creative group by ID. -- -- /See:/ 'creativeGroupsGet' smart constructor.-data CreativeGroupsGet = CreativeGroupsGet+data CreativeGroupsGet = CreativeGroupsGet'     { _cgggProFileId :: !(Textual Int64)     , _cgggId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'cgggId'     -> CreativeGroupsGet creativeGroupsGet pCgggProFileId_ pCgggId_ =-    CreativeGroupsGet+    CreativeGroupsGet'     { _cgggProFileId = _Coerce # pCgggProFileId_     , _cgggId = _Coerce # pCgggId_     }@@ -90,7 +90,9 @@  instance GoogleRequest CreativeGroupsGet where         type Rs CreativeGroupsGet = CreativeGroup-        requestClient CreativeGroupsGet{..}+        type Scopes CreativeGroupsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativeGroupsGet'{..}           = go _cgggProFileId _cgggId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/CreativeGroups/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CreativeGroups.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'CreativeGroupsInsert' request conforms to. type CreativeGroupsInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creativeGroups" :>@@ -55,7 +55,7 @@ -- | Inserts a new creative group. -- -- /See:/ 'creativeGroupsInsert' smart constructor.-data CreativeGroupsInsert = CreativeGroupsInsert+data CreativeGroupsInsert = CreativeGroupsInsert'     { _cgiProFileId :: !(Textual Int64)     , _cgiPayload   :: !CreativeGroup     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> CreativeGroup -- ^ 'cgiPayload'     -> CreativeGroupsInsert creativeGroupsInsert pCgiProFileId_ pCgiPayload_ =-    CreativeGroupsInsert+    CreativeGroupsInsert'     { _cgiProFileId = _Coerce # pCgiProFileId_     , _cgiPayload = pCgiPayload_     }@@ -90,7 +90,9 @@  instance GoogleRequest CreativeGroupsInsert where         type Rs CreativeGroupsInsert = CreativeGroup-        requestClient CreativeGroupsInsert{..}+        type Scopes CreativeGroupsInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativeGroupsInsert'{..}           = go _cgiProFileId (Just AltJSON) _cgiPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/CreativeGroups/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CreativeGroups.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -51,7 +51,7 @@ -- 'CreativeGroupsList' request conforms to. type CreativeGroupsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creativeGroups" :>@@ -69,7 +69,7 @@ -- | Retrieves a list of creative groups, possibly filtered. -- -- /See:/ 'creativeGroupsList' smart constructor.-data CreativeGroupsList = CreativeGroupsList+data CreativeGroupsList = CreativeGroupsList'     { _cglSearchString  :: !(Maybe Text)     , _cglIds           :: !(Maybe [Textual Int64])     , _cglProFileId     :: !(Textual Int64)@@ -106,7 +106,7 @@     :: Int64 -- ^ 'cglProFileId'     -> CreativeGroupsList creativeGroupsList pCglProFileId_ =-    CreativeGroupsList+    CreativeGroupsList'     { _cglSearchString = Nothing     , _cglIds = Nothing     , _cglProFileId = _Coerce # pCglProFileId_@@ -183,7 +183,9 @@ instance GoogleRequest CreativeGroupsList where         type Rs CreativeGroupsList =              CreativeGroupsListResponse-        requestClient CreativeGroupsList{..}+        type Scopes CreativeGroupsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativeGroupsList'{..}           = go _cglProFileId _cglSearchString               (_cglIds ^. _Default)               _cglSortOrder
gen/Network/Google/Resource/DFAReporting/CreativeGroups/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CreativeGroups.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -46,7 +46,7 @@ -- 'CreativeGroupsPatch' request conforms to. type CreativeGroupsPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creativeGroups" :>@@ -59,7 +59,7 @@ -- semantics. -- -- /See:/ 'creativeGroupsPatch' smart constructor.-data CreativeGroupsPatch = CreativeGroupsPatch+data CreativeGroupsPatch = CreativeGroupsPatch'     { _cgpProFileId :: !(Textual Int64)     , _cgpPayload   :: !CreativeGroup     , _cgpId        :: !(Textual Int64)@@ -80,7 +80,7 @@     -> Int64 -- ^ 'cgpId'     -> CreativeGroupsPatch creativeGroupsPatch pCgpProFileId_ pCgpPayload_ pCgpId_ =-    CreativeGroupsPatch+    CreativeGroupsPatch'     { _cgpProFileId = _Coerce # pCgpProFileId_     , _cgpPayload = pCgpPayload_     , _cgpId = _Coerce # pCgpId_@@ -104,7 +104,9 @@  instance GoogleRequest CreativeGroupsPatch where         type Rs CreativeGroupsPatch = CreativeGroup-        requestClient CreativeGroupsPatch{..}+        type Scopes CreativeGroupsPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativeGroupsPatch'{..}           = go _cgpProFileId (Just _cgpId) (Just AltJSON)               _cgpPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/CreativeGroups/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.CreativeGroups.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'CreativeGroupsUpdate' request conforms to. type CreativeGroupsUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creativeGroups" :>@@ -55,7 +55,7 @@ -- | Updates an existing creative group. -- -- /See:/ 'creativeGroupsUpdate' smart constructor.-data CreativeGroupsUpdate = CreativeGroupsUpdate+data CreativeGroupsUpdate = CreativeGroupsUpdate'     { _cguProFileId :: !(Textual Int64)     , _cguPayload   :: !CreativeGroup     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> CreativeGroup -- ^ 'cguPayload'     -> CreativeGroupsUpdate creativeGroupsUpdate pCguProFileId_ pCguPayload_ =-    CreativeGroupsUpdate+    CreativeGroupsUpdate'     { _cguProFileId = _Coerce # pCguProFileId_     , _cguPayload = pCguPayload_     }@@ -90,7 +90,9 @@  instance GoogleRequest CreativeGroupsUpdate where         type Rs CreativeGroupsUpdate = CreativeGroup-        requestClient CreativeGroupsUpdate{..}+        type Scopes CreativeGroupsUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativeGroupsUpdate'{..}           = go _cguProFileId (Just AltJSON) _cguPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Creatives/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Creatives.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'CreativesGet' request conforms to. type CreativesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creatives" :>@@ -54,7 +54,7 @@ -- | Gets one creative by ID. -- -- /See:/ 'creativesGet' smart constructor.-data CreativesGet = CreativesGet+data CreativesGet = CreativesGet'     { _ccProFileId :: !(Textual Int64)     , _ccId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'ccId'     -> CreativesGet creativesGet pCcProFileId_ pCcId_ =-    CreativesGet+    CreativesGet'     { _ccProFileId = _Coerce # pCcProFileId_     , _ccId = _Coerce # pCcId_     }@@ -88,7 +88,9 @@  instance GoogleRequest CreativesGet where         type Rs CreativesGet = Creative-        requestClient CreativesGet{..}+        type Scopes CreativesGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativesGet'{..}           = go _ccProFileId _ccId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Creatives/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Creatives.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'CreativesInsert' request conforms to. type CreativesInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creatives" :>@@ -54,7 +54,7 @@ -- | Inserts a new creative. -- -- /See:/ 'creativesInsert' smart constructor.-data CreativesInsert = CreativesInsert+data CreativesInsert = CreativesInsert'     { _ciProFileId :: !(Textual Int64)     , _ciPayload   :: !Creative     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Creative -- ^ 'ciPayload'     -> CreativesInsert creativesInsert pCiProFileId_ pCiPayload_ =-    CreativesInsert+    CreativesInsert'     { _ciProFileId = _Coerce # pCiProFileId_     , _ciPayload = pCiPayload_     }@@ -89,7 +89,9 @@  instance GoogleRequest CreativesInsert where         type Rs CreativesInsert = Creative-        requestClient CreativesInsert{..}+        type Scopes CreativesInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativesInsert'{..}           = go _ciProFileId (Just AltJSON) _ciPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Creatives/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Creatives.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -59,7 +59,7 @@ -- 'CreativesList' request conforms to. type CreativesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creatives" :>@@ -94,7 +94,7 @@ -- | Retrieves a list of creatives, possibly filtered. -- -- /See:/ 'creativesList' smart constructor.-data CreativesList = CreativesList+data CreativesList = CreativesList'     { _cRenderingIds         :: !(Maybe [Textual Int64])     , _cAdvertiserId         :: !(Maybe (Textual Int64))     , _cSearchString         :: !(Maybe Text)@@ -155,7 +155,7 @@     :: Int64 -- ^ 'cProFileId'     -> CreativesList creativesList pCProFileId_ =-    CreativesList+    CreativesList'     { _cRenderingIds = Nothing     , _cAdvertiserId = Nothing     , _cSearchString = Nothing@@ -290,7 +290,9 @@  instance GoogleRequest CreativesList where         type Rs CreativesList = CreativesListResponse-        requestClient CreativesList{..}+        type Scopes CreativesList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativesList'{..}           = go _cProFileId (_cRenderingIds ^. _Default)               _cAdvertiserId               _cSearchString
gen/Network/Google/Resource/DFAReporting/Creatives/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Creatives.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'CreativesPatch' request conforms to. type CreativesPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creatives" :>@@ -56,7 +56,7 @@ -- | Updates an existing creative. This method supports patch semantics. -- -- /See:/ 'creativesPatch' smart constructor.-data CreativesPatch = CreativesPatch+data CreativesPatch = CreativesPatch'     { _cppProFileId :: !(Textual Int64)     , _cppPayload   :: !Creative     , _cppId        :: !(Textual Int64)@@ -77,7 +77,7 @@     -> Int64 -- ^ 'cppId'     -> CreativesPatch creativesPatch pCppProFileId_ pCppPayload_ pCppId_ =-    CreativesPatch+    CreativesPatch'     { _cppProFileId = _Coerce # pCppProFileId_     , _cppPayload = pCppPayload_     , _cppId = _Coerce # pCppId_@@ -101,7 +101,9 @@  instance GoogleRequest CreativesPatch where         type Rs CreativesPatch = Creative-        requestClient CreativesPatch{..}+        type Scopes CreativesPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativesPatch'{..}           = go _cppProFileId (Just _cppId) (Just AltJSON)               _cppPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/Creatives/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Creatives.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'CreativesUpdate' request conforms to. type CreativesUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "creatives" :>@@ -54,7 +54,7 @@ -- | Updates an existing creative. -- -- /See:/ 'creativesUpdate' smart constructor.-data CreativesUpdate = CreativesUpdate+data CreativesUpdate = CreativesUpdate'     { _creProFileId :: !(Textual Int64)     , _crePayload   :: !Creative     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Creative -- ^ 'crePayload'     -> CreativesUpdate creativesUpdate pCreProFileId_ pCrePayload_ =-    CreativesUpdate+    CreativesUpdate'     { _creProFileId = _Coerce # pCreProFileId_     , _crePayload = pCrePayload_     }@@ -89,7 +89,9 @@  instance GoogleRequest CreativesUpdate where         type Rs CreativesUpdate = Creative-        requestClient CreativesUpdate{..}+        type Scopes CreativesUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient CreativesUpdate'{..}           = go _creProFileId (Just AltJSON) _crePayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/DimensionValues/Query.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.DimensionValues.Query--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -46,7 +46,7 @@ -- 'DimensionValuesQuery' request conforms to. type DimensionValuesQueryResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "dimensionvalues" :>@@ -60,7 +60,7 @@ -- | Retrieves list of report dimension values for a list of filters. -- -- /See:/ 'dimensionValuesQuery' smart constructor.-data DimensionValuesQuery = DimensionValuesQuery+data DimensionValuesQuery = DimensionValuesQuery'     { _dvqProFileId  :: !(Textual Int64)     , _dvqPayload    :: !DimensionValueRequest     , _dvqPageToken  :: !(Maybe Text)@@ -83,7 +83,7 @@     -> DimensionValueRequest -- ^ 'dvqPayload'     -> DimensionValuesQuery dimensionValuesQuery pDvqProFileId_ pDvqPayload_ =-    DimensionValuesQuery+    DimensionValuesQuery'     { _dvqProFileId = _Coerce # pDvqProFileId_     , _dvqPayload = pDvqPayload_     , _dvqPageToken = Nothing@@ -115,7 +115,9 @@  instance GoogleRequest DimensionValuesQuery where         type Rs DimensionValuesQuery = DimensionValueList-        requestClient DimensionValuesQuery{..}+        type Scopes DimensionValuesQuery =+             '["https://www.googleapis.com/auth/dfareporting"]+        requestClient DimensionValuesQuery'{..}           = go _dvqProFileId _dvqPageToken _dvqMaxResults               (Just AltJSON)               _dvqPayload
gen/Network/Google/Resource/DFAReporting/DirectorySiteContacts/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.DirectorySiteContacts.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'DirectorySiteContactsGet' request conforms to. type DirectorySiteContactsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "directorySiteContacts" :>@@ -55,7 +55,7 @@ -- | Gets one directory site contact by ID. -- -- /See:/ 'directorySiteContactsGet' smart constructor.-data DirectorySiteContactsGet = DirectorySiteContactsGet+data DirectorySiteContactsGet = DirectorySiteContactsGet'     { _dscgProFileId :: !(Textual Int64)     , _dscgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'dscgId'     -> DirectorySiteContactsGet directorySiteContactsGet pDscgProFileId_ pDscgId_ =-    DirectorySiteContactsGet+    DirectorySiteContactsGet'     { _dscgProFileId = _Coerce # pDscgProFileId_     , _dscgId = _Coerce # pDscgId_     }@@ -92,7 +92,9 @@ instance GoogleRequest DirectorySiteContactsGet where         type Rs DirectorySiteContactsGet =              DirectorySiteContact-        requestClient DirectorySiteContactsGet{..}+        type Scopes DirectorySiteContactsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient DirectorySiteContactsGet'{..}           = go _dscgProFileId _dscgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/DirectorySiteContacts/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.DirectorySiteContacts.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -50,7 +50,7 @@ -- 'DirectorySiteContactsList' request conforms to. type DirectorySiteContactsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "directorySiteContacts" :>@@ -71,7 +71,7 @@ -- | Retrieves a list of directory site contacts, possibly filtered. -- -- /See:/ 'directorySiteContactsList' smart constructor.-data DirectorySiteContactsList = DirectorySiteContactsList+data DirectorySiteContactsList = DirectorySiteContactsList'     { _dsclSearchString     :: !(Maybe Text)     , _dsclIds              :: !(Maybe [Textual Int64])     , _dsclProFileId        :: !(Textual Int64)@@ -105,7 +105,7 @@     :: Int64 -- ^ 'dsclProFileId'     -> DirectorySiteContactsList directorySiteContactsList pDsclProFileId_ =-    DirectorySiteContactsList+    DirectorySiteContactsList'     { _dsclSearchString = Nothing     , _dsclIds = Nothing     , _dsclProFileId = _Coerce # pDsclProFileId_@@ -181,7 +181,9 @@          where         type Rs DirectorySiteContactsList =              DirectorySiteContactsListResponse-        requestClient DirectorySiteContactsList{..}+        type Scopes DirectorySiteContactsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient DirectorySiteContactsList'{..}           = go _dsclProFileId _dsclSearchString               (_dsclIds ^. _Default)               (_dsclDirectorySiteIds ^. _Default)
gen/Network/Google/Resource/DFAReporting/DirectorySites/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.DirectorySites.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'DirectorySitesGet' request conforms to. type DirectorySitesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "directorySites" :>@@ -54,7 +54,7 @@ -- | Gets one directory site by ID. -- -- /See:/ 'directorySitesGet' smart constructor.-data DirectorySitesGet = DirectorySitesGet+data DirectorySitesGet = DirectorySitesGet'     { _dsgProFileId :: !(Textual Int64)     , _dsgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'dsgId'     -> DirectorySitesGet directorySitesGet pDsgProFileId_ pDsgId_ =-    DirectorySitesGet+    DirectorySitesGet'     { _dsgProFileId = _Coerce # pDsgProFileId_     , _dsgId = _Coerce # pDsgId_     }@@ -89,7 +89,9 @@  instance GoogleRequest DirectorySitesGet where         type Rs DirectorySitesGet = DirectorySite-        requestClient DirectorySitesGet{..}+        type Scopes DirectorySitesGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient DirectorySitesGet'{..}           = go _dsgProFileId _dsgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/DirectorySites/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.DirectorySites.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'DirectorySitesInsert' request conforms to. type DirectorySitesInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "directorySites" :>@@ -55,7 +55,7 @@ -- | Inserts a new directory site. -- -- /See:/ 'directorySitesInsert' smart constructor.-data DirectorySitesInsert = DirectorySitesInsert+data DirectorySitesInsert = DirectorySitesInsert'     { _dsiProFileId :: !(Textual Int64)     , _dsiPayload   :: !DirectorySite     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> DirectorySite -- ^ 'dsiPayload'     -> DirectorySitesInsert directorySitesInsert pDsiProFileId_ pDsiPayload_ =-    DirectorySitesInsert+    DirectorySitesInsert'     { _dsiProFileId = _Coerce # pDsiProFileId_     , _dsiPayload = pDsiPayload_     }@@ -90,7 +90,9 @@  instance GoogleRequest DirectorySitesInsert where         type Rs DirectorySitesInsert = DirectorySite-        requestClient DirectorySitesInsert{..}+        type Scopes DirectorySitesInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient DirectorySitesInsert'{..}           = go _dsiProFileId (Just AltJSON) _dsiPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/DirectorySites/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.DirectorySites.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -56,7 +56,7 @@ -- 'DirectorySitesList' request conforms to. type DirectorySitesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "directorySites" :>@@ -84,7 +84,7 @@ -- | Retrieves a list of directory sites, possibly filtered. -- -- /See:/ 'directorySitesList' smart constructor.-data DirectorySitesList = DirectorySitesList+data DirectorySitesList = DirectorySitesList'     { _dslSearchString                   :: !(Maybe Text)     , _dslAcceptsInterstitialPlacements  :: !(Maybe Bool)     , _dslAcceptsPublisherPaidPlacements :: !(Maybe Bool)@@ -136,7 +136,7 @@     :: Int64 -- ^ 'dslProFileId'     -> DirectorySitesList directorySitesList pDslProFileId_ =-    DirectorySitesList+    DirectorySitesList'     { _dslSearchString = Nothing     , _dslAcceptsInterstitialPlacements = Nothing     , _dslAcceptsPublisherPaidPlacements = Nothing@@ -248,7 +248,9 @@ instance GoogleRequest DirectorySitesList where         type Rs DirectorySitesList =              DirectorySitesListResponse-        requestClient DirectorySitesList{..}+        type Scopes DirectorySitesList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient DirectorySitesList'{..}           = go _dslProFileId _dslSearchString               _dslAcceptsInterstitialPlacements               _dslAcceptsPublisherPaidPlacements
+ gen/Network/Google/Resource/DFAReporting/DynamicTargetingKeys/Delete.hs view
@@ -0,0 +1,134 @@+{-# 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.DFAReporting.DynamicTargetingKeys.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 dynamic targeting key.+--+-- /See:/ <https://developers.google.com/doubleclick-advertisers/reporting/ DCM/DFA Reporting And Trafficking API Reference> for @dfareporting.dynamicTargetingKeys.delete@.+module Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete+    (+    -- * REST Resource+      DynamicTargetingKeysDeleteResource++    -- * Creating a Request+    , dynamicTargetingKeysDelete+    , DynamicTargetingKeysDelete++    -- * Request Lenses+    , dtkdObjectType+    , dtkdObjectId+    , dtkdProFileId+    , dtkdName+    ) where++import           Network.Google.DFAReporting.Types+import           Network.Google.Prelude++-- | A resource alias for @dfareporting.dynamicTargetingKeys.delete@ method which the+-- 'DynamicTargetingKeysDelete' request conforms to.+type DynamicTargetingKeysDeleteResource =+     "dfareporting" :>+       "v2.5" :>+         "userprofiles" :>+           Capture "profileId" (Textual Int64) :>+             "dynamicTargetingKeys" :>+               Capture "objectId" (Textual Int64) :>+                 QueryParam "name" Text :>+                   QueryParam "objectType"+                     DynamicTargetingKeysDeleteObjectType+                     :> QueryParam "alt" AltJSON :> Delete '[JSON] ()++-- | Deletes an existing dynamic targeting key.+--+-- /See:/ 'dynamicTargetingKeysDelete' smart constructor.+data DynamicTargetingKeysDelete = DynamicTargetingKeysDelete'+    { _dtkdObjectType :: !DynamicTargetingKeysDeleteObjectType+    , _dtkdObjectId   :: !(Textual Int64)+    , _dtkdProFileId  :: !(Textual Int64)+    , _dtkdName       :: !Text+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DynamicTargetingKeysDelete' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dtkdObjectType'+--+-- * 'dtkdObjectId'+--+-- * 'dtkdProFileId'+--+-- * 'dtkdName'+dynamicTargetingKeysDelete+    :: DynamicTargetingKeysDeleteObjectType -- ^ 'dtkdObjectType'+    -> Int64 -- ^ 'dtkdObjectId'+    -> Int64 -- ^ 'dtkdProFileId'+    -> Text -- ^ 'dtkdName'+    -> DynamicTargetingKeysDelete+dynamicTargetingKeysDelete pDtkdObjectType_ pDtkdObjectId_ pDtkdProFileId_ pDtkdName_ =+    DynamicTargetingKeysDelete'+    { _dtkdObjectType = pDtkdObjectType_+    , _dtkdObjectId = _Coerce # pDtkdObjectId_+    , _dtkdProFileId = _Coerce # pDtkdProFileId_+    , _dtkdName = pDtkdName_+    }++-- | Type of the object of this dynamic targeting key. This is a required+-- field.+dtkdObjectType :: Lens' DynamicTargetingKeysDelete DynamicTargetingKeysDeleteObjectType+dtkdObjectType+  = lens _dtkdObjectType+      (\ s a -> s{_dtkdObjectType = a})++-- | ID of the object of this dynamic targeting key. This is a required+-- field.+dtkdObjectId :: Lens' DynamicTargetingKeysDelete Int64+dtkdObjectId+  = lens _dtkdObjectId (\ s a -> s{_dtkdObjectId = a})+      . _Coerce++-- | User profile ID associated with this request.+dtkdProFileId :: Lens' DynamicTargetingKeysDelete Int64+dtkdProFileId+  = lens _dtkdProFileId+      (\ s a -> s{_dtkdProFileId = a})+      . _Coerce++-- | Name of this dynamic targeting key. This is a required field. Must be+-- less than 256 characters long and cannot contain commas. All characters+-- are converted to lowercase.+dtkdName :: Lens' DynamicTargetingKeysDelete Text+dtkdName = lens _dtkdName (\ s a -> s{_dtkdName = a})++instance GoogleRequest DynamicTargetingKeysDelete+         where+        type Rs DynamicTargetingKeysDelete = ()+        type Scopes DynamicTargetingKeysDelete =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient DynamicTargetingKeysDelete'{..}+          = go _dtkdProFileId _dtkdObjectId (Just _dtkdName)+              (Just _dtkdObjectType)+              (Just AltJSON)+              dFAReportingService+          where go+                  = buildClient+                      (Proxy :: Proxy DynamicTargetingKeysDeleteResource)+                      mempty
+ gen/Network/Google/Resource/DFAReporting/DynamicTargetingKeys/Insert.hs view
@@ -0,0 +1,112 @@+{-# 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.DFAReporting.DynamicTargetingKeys.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 dynamic targeting key. Keys must be created at the+-- advertiser level before being assigned to the advertiser\'s ads,+-- creatives, or placements. There is a maximum of 1000 keys per+-- advertiser, out of which a maximum of 20 keys can be assigned per ad,+-- creative, or placement.+--+-- /See:/ <https://developers.google.com/doubleclick-advertisers/reporting/ DCM/DFA Reporting And Trafficking API Reference> for @dfareporting.dynamicTargetingKeys.insert@.+module Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert+    (+    -- * REST Resource+      DynamicTargetingKeysInsertResource++    -- * Creating a Request+    , dynamicTargetingKeysInsert+    , DynamicTargetingKeysInsert++    -- * Request Lenses+    , dtkiProFileId+    , dtkiPayload+    ) where++import           Network.Google.DFAReporting.Types+import           Network.Google.Prelude++-- | A resource alias for @dfareporting.dynamicTargetingKeys.insert@ method which the+-- 'DynamicTargetingKeysInsert' request conforms to.+type DynamicTargetingKeysInsertResource =+     "dfareporting" :>+       "v2.5" :>+         "userprofiles" :>+           Capture "profileId" (Textual Int64) :>+             "dynamicTargetingKeys" :>+               QueryParam "alt" AltJSON :>+                 ReqBody '[JSON] DynamicTargetingKey :>+                   Post '[JSON] DynamicTargetingKey++-- | Inserts a new dynamic targeting key. Keys must be created at the+-- advertiser level before being assigned to the advertiser\'s ads,+-- creatives, or placements. There is a maximum of 1000 keys per+-- advertiser, out of which a maximum of 20 keys can be assigned per ad,+-- creative, or placement.+--+-- /See:/ 'dynamicTargetingKeysInsert' smart constructor.+data DynamicTargetingKeysInsert = DynamicTargetingKeysInsert'+    { _dtkiProFileId :: !(Textual Int64)+    , _dtkiPayload   :: !DynamicTargetingKey+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DynamicTargetingKeysInsert' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dtkiProFileId'+--+-- * 'dtkiPayload'+dynamicTargetingKeysInsert+    :: Int64 -- ^ 'dtkiProFileId'+    -> DynamicTargetingKey -- ^ 'dtkiPayload'+    -> DynamicTargetingKeysInsert+dynamicTargetingKeysInsert pDtkiProFileId_ pDtkiPayload_ =+    DynamicTargetingKeysInsert'+    { _dtkiProFileId = _Coerce # pDtkiProFileId_+    , _dtkiPayload = pDtkiPayload_+    }++-- | User profile ID associated with this request.+dtkiProFileId :: Lens' DynamicTargetingKeysInsert Int64+dtkiProFileId+  = lens _dtkiProFileId+      (\ s a -> s{_dtkiProFileId = a})+      . _Coerce++-- | Multipart request metadata.+dtkiPayload :: Lens' DynamicTargetingKeysInsert DynamicTargetingKey+dtkiPayload+  = lens _dtkiPayload (\ s a -> s{_dtkiPayload = a})++instance GoogleRequest DynamicTargetingKeysInsert+         where+        type Rs DynamicTargetingKeysInsert =+             DynamicTargetingKey+        type Scopes DynamicTargetingKeysInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient DynamicTargetingKeysInsert'{..}+          = go _dtkiProFileId (Just AltJSON) _dtkiPayload+              dFAReportingService+          where go+                  = buildClient+                      (Proxy :: Proxy DynamicTargetingKeysInsertResource)+                      mempty
+ gen/Network/Google/Resource/DFAReporting/DynamicTargetingKeys/List.hs view
@@ -0,0 +1,146 @@+{-# 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.DFAReporting.DynamicTargetingKeys.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 dynamic targeting keys.+--+-- /See:/ <https://developers.google.com/doubleclick-advertisers/reporting/ DCM/DFA Reporting And Trafficking API Reference> for @dfareporting.dynamicTargetingKeys.list@.+module Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List+    (+    -- * REST Resource+      DynamicTargetingKeysListResource++    -- * Creating a Request+    , dynamicTargetingKeysList+    , DynamicTargetingKeysList++    -- * Request Lenses+    , dtklObjectType+    , dtklAdvertiserId+    , dtklObjectId+    , dtklProFileId+    , dtklNames+    ) where++import           Network.Google.DFAReporting.Types+import           Network.Google.Prelude++-- | A resource alias for @dfareporting.dynamicTargetingKeys.list@ method which the+-- 'DynamicTargetingKeysList' request conforms to.+type DynamicTargetingKeysListResource =+     "dfareporting" :>+       "v2.5" :>+         "userprofiles" :>+           Capture "profileId" (Textual Int64) :>+             "dynamicTargetingKeys" :>+               QueryParam "objectType"+                 DynamicTargetingKeysListObjectType+                 :>+                 QueryParam "advertiserId" (Textual Int64) :>+                   QueryParam "objectId" (Textual Int64) :>+                     QueryParams "names" Text :>+                       QueryParam "alt" AltJSON :>+                         Get '[JSON] DynamicTargetingKeysListResponse++-- | Retrieves a list of dynamic targeting keys.+--+-- /See:/ 'dynamicTargetingKeysList' smart constructor.+data DynamicTargetingKeysList = DynamicTargetingKeysList'+    { _dtklObjectType   :: !(Maybe DynamicTargetingKeysListObjectType)+    , _dtklAdvertiserId :: !(Maybe (Textual Int64))+    , _dtklObjectId     :: !(Maybe (Textual Int64))+    , _dtklProFileId    :: !(Textual Int64)+    , _dtklNames        :: !(Maybe [Text])+    } deriving (Eq,Show,Data,Typeable,Generic)++-- | Creates a value of 'DynamicTargetingKeysList' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dtklObjectType'+--+-- * 'dtklAdvertiserId'+--+-- * 'dtklObjectId'+--+-- * 'dtklProFileId'+--+-- * 'dtklNames'+dynamicTargetingKeysList+    :: Int64 -- ^ 'dtklProFileId'+    -> DynamicTargetingKeysList+dynamicTargetingKeysList pDtklProFileId_ =+    DynamicTargetingKeysList'+    { _dtklObjectType = Nothing+    , _dtklAdvertiserId = Nothing+    , _dtklObjectId = Nothing+    , _dtklProFileId = _Coerce # pDtklProFileId_+    , _dtklNames = Nothing+    }++-- | Select only dynamic targeting keys with this object type.+dtklObjectType :: Lens' DynamicTargetingKeysList (Maybe DynamicTargetingKeysListObjectType)+dtklObjectType+  = lens _dtklObjectType+      (\ s a -> s{_dtklObjectType = a})++-- | Select only dynamic targeting keys whose object has this advertiser ID.+dtklAdvertiserId :: Lens' DynamicTargetingKeysList (Maybe Int64)+dtklAdvertiserId+  = lens _dtklAdvertiserId+      (\ s a -> s{_dtklAdvertiserId = a})+      . mapping _Coerce++-- | Select only dynamic targeting keys with this object ID.+dtklObjectId :: Lens' DynamicTargetingKeysList (Maybe Int64)+dtklObjectId+  = lens _dtklObjectId (\ s a -> s{_dtklObjectId = a})+      . mapping _Coerce++-- | User profile ID associated with this request.+dtklProFileId :: Lens' DynamicTargetingKeysList Int64+dtklProFileId+  = lens _dtklProFileId+      (\ s a -> s{_dtklProFileId = a})+      . _Coerce++-- | Select only dynamic targeting keys exactly matching these names.+dtklNames :: Lens' DynamicTargetingKeysList [Text]+dtklNames+  = lens _dtklNames (\ s a -> s{_dtklNames = a}) .+      _Default+      . _Coerce++instance GoogleRequest DynamicTargetingKeysList where+        type Rs DynamicTargetingKeysList =+             DynamicTargetingKeysListResponse+        type Scopes DynamicTargetingKeysList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient DynamicTargetingKeysList'{..}+          = go _dtklProFileId _dtklObjectType _dtklAdvertiserId+              _dtklObjectId+              (_dtklNames ^. _Default)+              (Just AltJSON)+              dFAReportingService+          where go+                  = buildClient+                      (Proxy :: Proxy DynamicTargetingKeysListResource)+                      mempty
gen/Network/Google/Resource/DFAReporting/EventTags/Delete.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.EventTags.Delete--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'EventTagsDelete' request conforms to. type EventTagsDeleteResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "eventTags" :>@@ -54,7 +54,7 @@ -- | Deletes an existing event tag. -- -- /See:/ 'eventTagsDelete' smart constructor.-data EventTagsDelete = EventTagsDelete+data EventTagsDelete = EventTagsDelete'     { _etdProFileId :: !(Textual Int64)     , _etdId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'etdId'     -> EventTagsDelete eventTagsDelete pEtdProFileId_ pEtdId_ =-    EventTagsDelete+    EventTagsDelete'     { _etdProFileId = _Coerce # pEtdProFileId_     , _etdId = _Coerce # pEtdId_     }@@ -89,7 +89,9 @@  instance GoogleRequest EventTagsDelete where         type Rs EventTagsDelete = ()-        requestClient EventTagsDelete{..}+        type Scopes EventTagsDelete =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient EventTagsDelete'{..}           = go _etdProFileId _etdId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/EventTags/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.EventTags.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'EventTagsGet' request conforms to. type EventTagsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "eventTags" :>@@ -54,7 +54,7 @@ -- | Gets one event tag by ID. -- -- /See:/ 'eventTagsGet' smart constructor.-data EventTagsGet = EventTagsGet+data EventTagsGet = EventTagsGet'     { _etgProFileId :: !(Textual Int64)     , _etgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'etgId'     -> EventTagsGet eventTagsGet pEtgProFileId_ pEtgId_ =-    EventTagsGet+    EventTagsGet'     { _etgProFileId = _Coerce # pEtgProFileId_     , _etgId = _Coerce # pEtgId_     }@@ -89,7 +89,9 @@  instance GoogleRequest EventTagsGet where         type Rs EventTagsGet = EventTag-        requestClient EventTagsGet{..}+        type Scopes EventTagsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient EventTagsGet'{..}           = go _etgProFileId _etgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/EventTags/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.EventTags.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'EventTagsInsert' request conforms to. type EventTagsInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "eventTags" :>@@ -54,7 +54,7 @@ -- | Inserts a new event tag. -- -- /See:/ 'eventTagsInsert' smart constructor.-data EventTagsInsert = EventTagsInsert+data EventTagsInsert = EventTagsInsert'     { _etiProFileId :: !(Textual Int64)     , _etiPayload   :: !EventTag     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> EventTag -- ^ 'etiPayload'     -> EventTagsInsert eventTagsInsert pEtiProFileId_ pEtiPayload_ =-    EventTagsInsert+    EventTagsInsert'     { _etiProFileId = _Coerce # pEtiProFileId_     , _etiPayload = pEtiPayload_     }@@ -89,7 +89,9 @@  instance GoogleRequest EventTagsInsert where         type Rs EventTagsInsert = EventTag-        requestClient EventTagsInsert{..}+        type Scopes EventTagsInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient EventTagsInsert'{..}           = go _etiProFileId (Just AltJSON) _etiPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/EventTags/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.EventTags.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -53,7 +53,7 @@ -- 'EventTagsList' request conforms to. type EventTagsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "eventTags" :>@@ -76,7 +76,7 @@ -- | Retrieves a list of event tags, possibly filtered. -- -- /See:/ 'eventTagsList' smart constructor.-data EventTagsList = EventTagsList+data EventTagsList = EventTagsList'     { _etlDefinitionsOnly :: !(Maybe Bool)     , _etlEventTagTypes   :: !(Maybe [EventTagsListEventTagTypes])     , _etlEnabled         :: !(Maybe Bool)@@ -119,7 +119,7 @@     :: Int64 -- ^ 'etlProFileId'     -> EventTagsList eventTagsList pEtlProFileId_ =-    EventTagsList+    EventTagsList'     { _etlDefinitionsOnly = Nothing     , _etlEventTagTypes = Nothing     , _etlEnabled = Nothing@@ -222,7 +222,9 @@  instance GoogleRequest EventTagsList where         type Rs EventTagsList = EventTagsListResponse-        requestClient EventTagsList{..}+        type Scopes EventTagsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient EventTagsList'{..}           = go _etlProFileId _etlDefinitionsOnly               (_etlEventTagTypes ^. _Default)               _etlEnabled
gen/Network/Google/Resource/DFAReporting/EventTags/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.EventTags.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'EventTagsPatch' request conforms to. type EventTagsPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "eventTags" :>@@ -56,7 +56,7 @@ -- | Updates an existing event tag. This method supports patch semantics. -- -- /See:/ 'eventTagsPatch' smart constructor.-data EventTagsPatch = EventTagsPatch+data EventTagsPatch = EventTagsPatch'     { _etpProFileId :: !(Textual Int64)     , _etpPayload   :: !EventTag     , _etpId        :: !(Textual Int64)@@ -77,7 +77,7 @@     -> Int64 -- ^ 'etpId'     -> EventTagsPatch eventTagsPatch pEtpProFileId_ pEtpPayload_ pEtpId_ =-    EventTagsPatch+    EventTagsPatch'     { _etpProFileId = _Coerce # pEtpProFileId_     , _etpPayload = pEtpPayload_     , _etpId = _Coerce # pEtpId_@@ -101,7 +101,9 @@  instance GoogleRequest EventTagsPatch where         type Rs EventTagsPatch = EventTag-        requestClient EventTagsPatch{..}+        type Scopes EventTagsPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient EventTagsPatch'{..}           = go _etpProFileId (Just _etpId) (Just AltJSON)               _etpPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/EventTags/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.EventTags.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'EventTagsUpdate' request conforms to. type EventTagsUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "eventTags" :>@@ -54,7 +54,7 @@ -- | Updates an existing event tag. -- -- /See:/ 'eventTagsUpdate' smart constructor.-data EventTagsUpdate = EventTagsUpdate+data EventTagsUpdate = EventTagsUpdate'     { _etuProFileId :: !(Textual Int64)     , _etuPayload   :: !EventTag     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> EventTag -- ^ 'etuPayload'     -> EventTagsUpdate eventTagsUpdate pEtuProFileId_ pEtuPayload_ =-    EventTagsUpdate+    EventTagsUpdate'     { _etuProFileId = _Coerce # pEtuProFileId_     , _etuPayload = pEtuPayload_     }@@ -89,7 +89,9 @@  instance GoogleRequest EventTagsUpdate where         type Rs EventTagsUpdate = EventTag-        requestClient EventTagsUpdate{..}+        type Scopes EventTagsUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient EventTagsUpdate'{..}           = go _etuProFileId (Just AltJSON) _etuPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Files/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Files.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'FilesGet' request conforms to. type FilesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "reports" :>            Capture "reportId" (Textual Int64) :>              "files" :>@@ -52,7 +52,7 @@                  QueryParam "alt" AltJSON :> Get '[JSON] File        :<|>        "dfareporting" :>-         "v2.2" :>+         "v2.5" :>            "reports" :>              Capture "reportId" (Textual Int64) :>                "files" :>@@ -63,7 +63,7 @@ -- | Retrieves a report file by its report ID and file ID. -- -- /See:/ 'filesGet' smart constructor.-data FilesGet = FilesGet+data FilesGet = FilesGet'     { _fgReportId :: !(Textual Int64)     , _fgFileId   :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -80,7 +80,7 @@     -> Int64 -- ^ 'fgFileId'     -> FilesGet filesGet pFgReportId_ pFgFileId_ =-    FilesGet+    FilesGet'     { _fgReportId = _Coerce # pFgReportId_     , _fgFileId = _Coerce # pFgFileId_     }@@ -99,7 +99,9 @@  instance GoogleRequest FilesGet where         type Rs FilesGet = File-        requestClient FilesGet{..}+        type Scopes FilesGet =+             '["https://www.googleapis.com/auth/dfareporting"]+        requestClient FilesGet'{..}           = go _fgReportId _fgFileId (Just AltJSON)               dFAReportingService           where go :<|> _@@ -108,7 +110,9 @@  instance GoogleRequest (MediaDownload FilesGet) where         type Rs (MediaDownload FilesGet) = Stream-        requestClient (MediaDownload FilesGet{..})+        type Scopes (MediaDownload FilesGet) =+             Scopes FilesGet+        requestClient (MediaDownload FilesGet'{..})           = go _fgReportId _fgFileId (Just AltMedia)               dFAReportingService           where _ :<|> go
gen/Network/Google/Resource/DFAReporting/Files/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Files.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -48,7 +48,7 @@ -- 'FilesList' request conforms to. type FilesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "files" :>@@ -62,7 +62,7 @@ -- | Lists files for a user profile. -- -- /See:/ 'filesList' smart constructor.-data FilesList = FilesList+data FilesList = FilesList'     { _flProFileId  :: !(Textual Int64)     , _flSortOrder  :: !FilesListSortOrder     , _flScope      :: !FilesListScope@@ -90,7 +90,7 @@     :: Int64 -- ^ 'flProFileId'     -> FilesList filesList pFlProFileId_ =-    FilesList+    FilesList'     { _flProFileId = _Coerce # pFlProFileId_     , _flSortOrder = FLSODescending     , _flScope = FLSMine@@ -132,7 +132,9 @@  instance GoogleRequest FilesList where         type Rs FilesList = FileList-        requestClient FilesList{..}+        type Scopes FilesList =+             '["https://www.googleapis.com/auth/dfareporting"]+        requestClient FilesList'{..}           = go _flProFileId (Just _flSortOrder) (Just _flScope)               _flPageToken               (Just _flSortField)
gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Delete.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.FloodlightActivities.Delete--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'FloodlightActivitiesDelete' request conforms to. type FloodlightActivitiesDeleteResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "floodlightActivities" :>@@ -54,7 +54,7 @@ -- | Deletes an existing floodlight activity. -- -- /See:/ 'floodlightActivitiesDelete' smart constructor.-data FloodlightActivitiesDelete = FloodlightActivitiesDelete+data FloodlightActivitiesDelete = FloodlightActivitiesDelete'     { _fadProFileId :: !(Textual Int64)     , _fadId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'fadId'     -> FloodlightActivitiesDelete floodlightActivitiesDelete pFadProFileId_ pFadId_ =-    FloodlightActivitiesDelete+    FloodlightActivitiesDelete'     { _fadProFileId = _Coerce # pFadProFileId_     , _fadId = _Coerce # pFadId_     }@@ -90,7 +90,9 @@ instance GoogleRequest FloodlightActivitiesDelete          where         type Rs FloodlightActivitiesDelete = ()-        requestClient FloodlightActivitiesDelete{..}+        type Scopes FloodlightActivitiesDelete =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient FloodlightActivitiesDelete'{..}           = go _fadProFileId _fadId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Generatetag.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.FloodlightActivities.Generatetag--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'FloodlightActivitiesGeneratetag' request conforms to. type FloodlightActivitiesGeneratetagResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "floodlightActivities" :>@@ -56,7 +56,7 @@ -- | Generates a tag for a floodlight activity. -- -- /See:/ 'floodlightActivitiesGeneratetag' smart constructor.-data FloodlightActivitiesGeneratetag = FloodlightActivitiesGeneratetag+data FloodlightActivitiesGeneratetag = FloodlightActivitiesGeneratetag'     { _fagFloodlightActivityId :: !(Maybe (Textual Int64))     , _fagProFileId            :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     :: Int64 -- ^ 'fagProFileId'     -> FloodlightActivitiesGeneratetag floodlightActivitiesGeneratetag pFagProFileId_ =-    FloodlightActivitiesGeneratetag+    FloodlightActivitiesGeneratetag'     { _fagFloodlightActivityId = Nothing     , _fagProFileId = _Coerce # pFagProFileId_     }@@ -94,7 +94,9 @@          FloodlightActivitiesGeneratetag where         type Rs FloodlightActivitiesGeneratetag =              FloodlightActivitiesGenerateTagResponse-        requestClient FloodlightActivitiesGeneratetag{..}+        type Scopes FloodlightActivitiesGeneratetag =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient FloodlightActivitiesGeneratetag'{..}           = go _fagProFileId _fagFloodlightActivityId               (Just AltJSON)               dFAReportingService
gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.FloodlightActivities.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'FloodlightActivitiesGet' request conforms to. type FloodlightActivitiesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "floodlightActivities" :>@@ -55,7 +55,7 @@ -- | Gets one floodlight activity by ID. -- -- /See:/ 'floodlightActivitiesGet' smart constructor.-data FloodlightActivitiesGet = FloodlightActivitiesGet+data FloodlightActivitiesGet = FloodlightActivitiesGet'     { _fProFileId :: !(Textual Int64)     , _fId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'fId'     -> FloodlightActivitiesGet floodlightActivitiesGet pFProFileId_ pFId_ =-    FloodlightActivitiesGet+    FloodlightActivitiesGet'     { _fProFileId = _Coerce # pFProFileId_     , _fId = _Coerce # pFId_     }@@ -89,7 +89,9 @@  instance GoogleRequest FloodlightActivitiesGet where         type Rs FloodlightActivitiesGet = FloodlightActivity-        requestClient FloodlightActivitiesGet{..}+        type Scopes FloodlightActivitiesGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient FloodlightActivitiesGet'{..}           = go _fProFileId _fId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.FloodlightActivities.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'FloodlightActivitiesInsert' request conforms to. type FloodlightActivitiesInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "floodlightActivities" :>@@ -55,7 +55,7 @@ -- | Inserts a new floodlight activity. -- -- /See:/ 'floodlightActivitiesInsert' smart constructor.-data FloodlightActivitiesInsert = FloodlightActivitiesInsert+data FloodlightActivitiesInsert = FloodlightActivitiesInsert'     { _faiProFileId :: !(Textual Int64)     , _faiPayload   :: !FloodlightActivity     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> FloodlightActivity -- ^ 'faiPayload'     -> FloodlightActivitiesInsert floodlightActivitiesInsert pFaiProFileId_ pFaiPayload_ =-    FloodlightActivitiesInsert+    FloodlightActivitiesInsert'     { _faiProFileId = _Coerce # pFaiProFileId_     , _faiPayload = pFaiPayload_     }@@ -92,7 +92,9 @@          where         type Rs FloodlightActivitiesInsert =              FloodlightActivity-        requestClient FloodlightActivitiesInsert{..}+        type Scopes FloodlightActivitiesInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient FloodlightActivitiesInsert'{..}           = go _faiProFileId (Just AltJSON) _faiPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/FloodlightActivities/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.FloodlightActivities.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -56,7 +56,7 @@ -- 'FloodlightActivitiesList' request conforms to. type FloodlightActivitiesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "floodlightActivities" :>@@ -92,7 +92,7 @@ -- | Retrieves a list of floodlight activities, possibly filtered. -- -- /See:/ 'floodlightActivitiesList' smart constructor.-data FloodlightActivitiesList = FloodlightActivitiesList+data FloodlightActivitiesList = FloodlightActivitiesList'     { _falTagString                        :: !(Maybe Text)     , _falFloodlightActivityGroupTagString :: !(Maybe Text)     , _falFloodlightConfigurationId        :: !(Maybe (Textual Int64))@@ -144,7 +144,7 @@     :: Int64 -- ^ 'falProFileId'     -> FloodlightActivitiesList floodlightActivitiesList pFalProFileId_ =-    FloodlightActivitiesList+    FloodlightActivitiesList'     { _falTagString = Nothing     , _falFloodlightActivityGroupTagString = Nothing     , _falFloodlightConfigurationId = Nothing@@ -267,7 +267,9 @@ instance GoogleRequest FloodlightActivitiesList where         type Rs FloodlightActivitiesList =              FloodlightActivitiesListResponse-        requestClient FloodlightActivitiesList{..}+        type Scopes FloodlightActivitiesList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient FloodlightActivitiesList'{..}           = go _falProFileId _falTagString               _falFloodlightActivityGroupTagString               _falFloodlightConfigurationId
gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.FloodlightActivities.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -46,7 +46,7 @@ -- 'FloodlightActivitiesPatch' request conforms to. type FloodlightActivitiesPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "floodlightActivities" :>@@ -59,7 +59,7 @@ -- semantics. -- -- /See:/ 'floodlightActivitiesPatch' smart constructor.-data FloodlightActivitiesPatch = FloodlightActivitiesPatch+data FloodlightActivitiesPatch = FloodlightActivitiesPatch'     { _fapProFileId :: !(Textual Int64)     , _fapPayload   :: !FloodlightActivity     , _fapId        :: !(Textual Int64)@@ -80,7 +80,7 @@     -> Int64 -- ^ 'fapId'     -> FloodlightActivitiesPatch floodlightActivitiesPatch pFapProFileId_ pFapPayload_ pFapId_ =-    FloodlightActivitiesPatch+    FloodlightActivitiesPatch'     { _fapProFileId = _Coerce # pFapProFileId_     , _fapPayload = pFapPayload_     , _fapId = _Coerce # pFapId_@@ -106,7 +106,9 @@          where         type Rs FloodlightActivitiesPatch =              FloodlightActivity-        requestClient FloodlightActivitiesPatch{..}+        type Scopes FloodlightActivitiesPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient FloodlightActivitiesPatch'{..}           = go _fapProFileId (Just _fapId) (Just AltJSON)               _fapPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.FloodlightActivities.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'FloodlightActivitiesUpdate' request conforms to. type FloodlightActivitiesUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "floodlightActivities" :>@@ -55,7 +55,7 @@ -- | Updates an existing floodlight activity. -- -- /See:/ 'floodlightActivitiesUpdate' smart constructor.-data FloodlightActivitiesUpdate = FloodlightActivitiesUpdate+data FloodlightActivitiesUpdate = FloodlightActivitiesUpdate'     { _fauProFileId :: !(Textual Int64)     , _fauPayload   :: !FloodlightActivity     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> FloodlightActivity -- ^ 'fauPayload'     -> FloodlightActivitiesUpdate floodlightActivitiesUpdate pFauProFileId_ pFauPayload_ =-    FloodlightActivitiesUpdate+    FloodlightActivitiesUpdate'     { _fauProFileId = _Coerce # pFauProFileId_     , _fauPayload = pFauPayload_     }@@ -92,7 +92,9 @@          where         type Rs FloodlightActivitiesUpdate =              FloodlightActivity-        requestClient FloodlightActivitiesUpdate{..}+        type Scopes FloodlightActivitiesUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient FloodlightActivitiesUpdate'{..}           = go _fauProFileId (Just AltJSON) _fauPayload               dFAReportingService           where go
− gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Delete.hs 
@@ -1,101 +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.DFAReporting.FloodlightActivityGroups.Delete--- Copyright   : (c) 2015 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 floodlight activity group.------ /See:/ <https://developers.google.com/doubleclick-advertisers/reporting/ DCM/DFA Reporting And Trafficking API Reference> for @dfareporting.floodlightActivityGroups.delete@.-module Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete-    (-    -- * REST Resource-      FloodlightActivityGroupsDeleteResource--    -- * Creating a Request-    , floodlightActivityGroupsDelete-    , FloodlightActivityGroupsDelete--    -- * Request Lenses-    , fagdProFileId-    , fagdId-    ) where--import           Network.Google.DFAReporting.Types-import           Network.Google.Prelude---- | A resource alias for @dfareporting.floodlightActivityGroups.delete@ method which the--- 'FloodlightActivityGroupsDelete' request conforms to.-type FloodlightActivityGroupsDeleteResource =-     "dfareporting" :>-       "v2.2" :>-         "userprofiles" :>-           Capture "profileId" (Textual Int64) :>-             "floodlightActivityGroups" :>-               Capture "id" (Textual Int64) :>-                 QueryParam "alt" AltJSON :> Delete '[JSON] ()---- | Deletes an existing floodlight activity group.------ /See:/ 'floodlightActivityGroupsDelete' smart constructor.-data FloodlightActivityGroupsDelete = FloodlightActivityGroupsDelete-    { _fagdProFileId :: !(Textual Int64)-    , _fagdId        :: !(Textual Int64)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'FloodlightActivityGroupsDelete' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'fagdProFileId'------ * 'fagdId'-floodlightActivityGroupsDelete-    :: Int64 -- ^ 'fagdProFileId'-    -> Int64 -- ^ 'fagdId'-    -> FloodlightActivityGroupsDelete-floodlightActivityGroupsDelete pFagdProFileId_ pFagdId_ =-    FloodlightActivityGroupsDelete-    { _fagdProFileId = _Coerce # pFagdProFileId_-    , _fagdId = _Coerce # pFagdId_-    }---- | User profile ID associated with this request.-fagdProFileId :: Lens' FloodlightActivityGroupsDelete Int64-fagdProFileId-  = lens _fagdProFileId-      (\ s a -> s{_fagdProFileId = a})-      . _Coerce---- | Floodlight activity Group ID.-fagdId :: Lens' FloodlightActivityGroupsDelete Int64-fagdId-  = lens _fagdId (\ s a -> s{_fagdId = a}) . _Coerce--instance GoogleRequest FloodlightActivityGroupsDelete-         where-        type Rs FloodlightActivityGroupsDelete = ()-        requestClient FloodlightActivityGroupsDelete{..}-          = go _fagdProFileId _fagdId (Just AltJSON)-              dFAReportingService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy FloodlightActivityGroupsDeleteResource)-                      mempty
gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'FloodlightActivityGroupsGet' request conforms to. type FloodlightActivityGroupsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "floodlightActivityGroups" :>@@ -55,7 +55,7 @@ -- | Gets one floodlight activity group by ID. -- -- /See:/ 'floodlightActivityGroupsGet' smart constructor.-data FloodlightActivityGroupsGet = FloodlightActivityGroupsGet+data FloodlightActivityGroupsGet = FloodlightActivityGroupsGet'     { _faggProFileId :: !(Textual Int64)     , _faggId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'faggId'     -> FloodlightActivityGroupsGet floodlightActivityGroupsGet pFaggProFileId_ pFaggId_ =-    FloodlightActivityGroupsGet+    FloodlightActivityGroupsGet'     { _faggProFileId = _Coerce # pFaggProFileId_     , _faggId = _Coerce # pFaggId_     }@@ -93,7 +93,9 @@          where         type Rs FloodlightActivityGroupsGet =              FloodlightActivityGroup-        requestClient FloodlightActivityGroupsGet{..}+        type Scopes FloodlightActivityGroupsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient FloodlightActivityGroupsGet'{..}           = go _faggProFileId _faggId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'FloodlightActivityGroupsInsert' request conforms to. type FloodlightActivityGroupsInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "floodlightActivityGroups" :>@@ -55,7 +55,7 @@ -- | Inserts a new floodlight activity group. -- -- /See:/ 'floodlightActivityGroupsInsert' smart constructor.-data FloodlightActivityGroupsInsert = FloodlightActivityGroupsInsert+data FloodlightActivityGroupsInsert = FloodlightActivityGroupsInsert'     { _fagiProFileId :: !(Textual Int64)     , _fagiPayload   :: !FloodlightActivityGroup     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> FloodlightActivityGroup -- ^ 'fagiPayload'     -> FloodlightActivityGroupsInsert floodlightActivityGroupsInsert pFagiProFileId_ pFagiPayload_ =-    FloodlightActivityGroupsInsert+    FloodlightActivityGroupsInsert'     { _fagiProFileId = _Coerce # pFagiProFileId_     , _fagiPayload = pFagiPayload_     }@@ -93,7 +93,9 @@          where         type Rs FloodlightActivityGroupsInsert =              FloodlightActivityGroup-        requestClient FloodlightActivityGroupsInsert{..}+        type Scopes FloodlightActivityGroupsInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient FloodlightActivityGroupsInsert'{..}           = go _fagiProFileId (Just AltJSON) _fagiPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -52,7 +52,7 @@ -- 'FloodlightActivityGroupsList' request conforms to. type FloodlightActivityGroupsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "floodlightActivityGroups" :>@@ -79,7 +79,7 @@ -- | Retrieves a list of floodlight activity groups, possibly filtered. -- -- /See:/ 'floodlightActivityGroupsList' smart constructor.-data FloodlightActivityGroupsList = FloodlightActivityGroupsList+data FloodlightActivityGroupsList = FloodlightActivityGroupsList'     { _faglFloodlightConfigurationId :: !(Maybe (Textual Int64))     , _faglAdvertiserId              :: !(Maybe (Textual Int64))     , _faglSearchString              :: !(Maybe Text)@@ -119,7 +119,7 @@     :: Int64 -- ^ 'faglProFileId'     -> FloodlightActivityGroupsList floodlightActivityGroupsList pFaglProFileId_ =-    FloodlightActivityGroupsList+    FloodlightActivityGroupsList'     { _faglFloodlightConfigurationId = Nothing     , _faglAdvertiserId = Nothing     , _faglSearchString = Nothing@@ -213,7 +213,9 @@          where         type Rs FloodlightActivityGroupsList =              FloodlightActivityGroupsListResponse-        requestClient FloodlightActivityGroupsList{..}+        type Scopes FloodlightActivityGroupsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient FloodlightActivityGroupsList'{..}           = go _faglProFileId _faglFloodlightConfigurationId               _faglAdvertiserId               _faglSearchString
gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -46,7 +46,7 @@ -- 'FloodlightActivityGroupsPatch' request conforms to. type FloodlightActivityGroupsPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "floodlightActivityGroups" :>@@ -59,7 +59,7 @@ -- patch semantics. -- -- /See:/ 'floodlightActivityGroupsPatch' smart constructor.-data FloodlightActivityGroupsPatch = FloodlightActivityGroupsPatch+data FloodlightActivityGroupsPatch = FloodlightActivityGroupsPatch'     { _fagpProFileId :: !(Textual Int64)     , _fagpPayload   :: !FloodlightActivityGroup     , _fagpId        :: !(Textual Int64)@@ -80,7 +80,7 @@     -> Int64 -- ^ 'fagpId'     -> FloodlightActivityGroupsPatch floodlightActivityGroupsPatch pFagpProFileId_ pFagpPayload_ pFagpId_ =-    FloodlightActivityGroupsPatch+    FloodlightActivityGroupsPatch'     { _fagpProFileId = _Coerce # pFagpProFileId_     , _fagpPayload = pFagpPayload_     , _fagpId = _Coerce # pFagpId_@@ -107,7 +107,9 @@          where         type Rs FloodlightActivityGroupsPatch =              FloodlightActivityGroup-        requestClient FloodlightActivityGroupsPatch{..}+        type Scopes FloodlightActivityGroupsPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient FloodlightActivityGroupsPatch'{..}           = go _fagpProFileId (Just _fagpId) (Just AltJSON)               _fagpPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'FloodlightActivityGroupsUpdate' request conforms to. type FloodlightActivityGroupsUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "floodlightActivityGroups" :>@@ -55,7 +55,7 @@ -- | Updates an existing floodlight activity group. -- -- /See:/ 'floodlightActivityGroupsUpdate' smart constructor.-data FloodlightActivityGroupsUpdate = FloodlightActivityGroupsUpdate+data FloodlightActivityGroupsUpdate = FloodlightActivityGroupsUpdate'     { _faguProFileId :: !(Textual Int64)     , _faguPayload   :: !FloodlightActivityGroup     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> FloodlightActivityGroup -- ^ 'faguPayload'     -> FloodlightActivityGroupsUpdate floodlightActivityGroupsUpdate pFaguProFileId_ pFaguPayload_ =-    FloodlightActivityGroupsUpdate+    FloodlightActivityGroupsUpdate'     { _faguProFileId = _Coerce # pFaguProFileId_     , _faguPayload = pFaguPayload_     }@@ -93,7 +93,9 @@          where         type Rs FloodlightActivityGroupsUpdate =              FloodlightActivityGroup-        requestClient FloodlightActivityGroupsUpdate{..}+        type Scopes FloodlightActivityGroupsUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient FloodlightActivityGroupsUpdate'{..}           = go _faguProFileId (Just AltJSON) _faguPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/FloodlightConfigurations/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.FloodlightConfigurations.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'FloodlightConfigurationsGet' request conforms to. type FloodlightConfigurationsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "floodlightConfigurations" :>@@ -55,7 +55,7 @@ -- | Gets one floodlight configuration by ID. -- -- /See:/ 'floodlightConfigurationsGet' smart constructor.-data FloodlightConfigurationsGet = FloodlightConfigurationsGet+data FloodlightConfigurationsGet = FloodlightConfigurationsGet'     { _fcgProFileId :: !(Textual Int64)     , _fcgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'fcgId'     -> FloodlightConfigurationsGet floodlightConfigurationsGet pFcgProFileId_ pFcgId_ =-    FloodlightConfigurationsGet+    FloodlightConfigurationsGet'     { _fcgProFileId = _Coerce # pFcgProFileId_     , _fcgId = _Coerce # pFcgId_     }@@ -92,7 +92,9 @@          where         type Rs FloodlightConfigurationsGet =              FloodlightConfiguration-        requestClient FloodlightConfigurationsGet{..}+        type Scopes FloodlightConfigurationsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient FloodlightConfigurationsGet'{..}           = go _fcgProFileId _fcgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/FloodlightConfigurations/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.FloodlightConfigurations.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'FloodlightConfigurationsList' request conforms to. type FloodlightConfigurationsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "floodlightConfigurations" :>@@ -55,7 +55,7 @@ -- | Retrieves a list of floodlight configurations, possibly filtered. -- -- /See:/ 'floodlightConfigurationsList' smart constructor.-data FloodlightConfigurationsList = FloodlightConfigurationsList+data FloodlightConfigurationsList = FloodlightConfigurationsList'     { _fclIds       :: !(Maybe [Textual Int64])     , _fclProFileId :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     :: Int64 -- ^ 'fclProFileId'     -> FloodlightConfigurationsList floodlightConfigurationsList pFclProFileId_ =-    FloodlightConfigurationsList+    FloodlightConfigurationsList'     { _fclIds = Nothing     , _fclProFileId = _Coerce # pFclProFileId_     }@@ -93,7 +93,9 @@          where         type Rs FloodlightConfigurationsList =              FloodlightConfigurationsListResponse-        requestClient FloodlightConfigurationsList{..}+        type Scopes FloodlightConfigurationsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient FloodlightConfigurationsList'{..}           = go _fclProFileId (_fclIds ^. _Default)               (Just AltJSON)               dFAReportingService
gen/Network/Google/Resource/DFAReporting/FloodlightConfigurations/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.FloodlightConfigurations.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -46,7 +46,7 @@ -- 'FloodlightConfigurationsPatch' request conforms to. type FloodlightConfigurationsPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "floodlightConfigurations" :>@@ -59,7 +59,7 @@ -- semantics. -- -- /See:/ 'floodlightConfigurationsPatch' smart constructor.-data FloodlightConfigurationsPatch = FloodlightConfigurationsPatch+data FloodlightConfigurationsPatch = FloodlightConfigurationsPatch'     { _fcpProFileId :: !(Textual Int64)     , _fcpPayload   :: !FloodlightConfiguration     , _fcpId        :: !(Textual Int64)@@ -80,7 +80,7 @@     -> Int64 -- ^ 'fcpId'     -> FloodlightConfigurationsPatch floodlightConfigurationsPatch pFcpProFileId_ pFcpPayload_ pFcpId_ =-    FloodlightConfigurationsPatch+    FloodlightConfigurationsPatch'     { _fcpProFileId = _Coerce # pFcpProFileId_     , _fcpPayload = pFcpPayload_     , _fcpId = _Coerce # pFcpId_@@ -106,7 +106,9 @@          where         type Rs FloodlightConfigurationsPatch =              FloodlightConfiguration-        requestClient FloodlightConfigurationsPatch{..}+        type Scopes FloodlightConfigurationsPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient FloodlightConfigurationsPatch'{..}           = go _fcpProFileId (Just _fcpId) (Just AltJSON)               _fcpPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/FloodlightConfigurations/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.FloodlightConfigurations.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'FloodlightConfigurationsUpdate' request conforms to. type FloodlightConfigurationsUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "floodlightConfigurations" :>@@ -55,7 +55,7 @@ -- | Updates an existing floodlight configuration. -- -- /See:/ 'floodlightConfigurationsUpdate' smart constructor.-data FloodlightConfigurationsUpdate = FloodlightConfigurationsUpdate+data FloodlightConfigurationsUpdate = FloodlightConfigurationsUpdate'     { _fcuProFileId :: !(Textual Int64)     , _fcuPayload   :: !FloodlightConfiguration     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> FloodlightConfiguration -- ^ 'fcuPayload'     -> FloodlightConfigurationsUpdate floodlightConfigurationsUpdate pFcuProFileId_ pFcuPayload_ =-    FloodlightConfigurationsUpdate+    FloodlightConfigurationsUpdate'     { _fcuProFileId = _Coerce # pFcuProFileId_     , _fcuPayload = pFcuPayload_     }@@ -92,7 +92,9 @@          where         type Rs FloodlightConfigurationsUpdate =              FloodlightConfiguration-        requestClient FloodlightConfigurationsUpdate{..}+        type Scopes FloodlightConfigurationsUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient FloodlightConfigurationsUpdate'{..}           = go _fcuProFileId (Just AltJSON) _fcuPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/InventoryItems/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.InventoryItems.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'InventoryItemsGet' request conforms to. type InventoryItemsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "projects" :>@@ -57,7 +57,7 @@ -- | Gets one inventory item by ID. -- -- /See:/ 'inventoryItemsGet' smart constructor.-data InventoryItemsGet = InventoryItemsGet+data InventoryItemsGet = InventoryItemsGet'     { _iigProFileId :: !(Textual Int64)     , _iigId        :: !(Textual Int64)     , _iigProjectId :: !(Textual Int64)@@ -78,7 +78,7 @@     -> Int64 -- ^ 'iigProjectId'     -> InventoryItemsGet inventoryItemsGet pIigProFileId_ pIigId_ pIigProjectId_ =-    InventoryItemsGet+    InventoryItemsGet'     { _iigProFileId = _Coerce # pIigProFileId_     , _iigId = _Coerce # pIigId_     , _iigProjectId = _Coerce # pIigProjectId_@@ -103,7 +103,9 @@  instance GoogleRequest InventoryItemsGet where         type Rs InventoryItemsGet = InventoryItem-        requestClient InventoryItemsGet{..}+        type Scopes InventoryItemsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient InventoryItemsGet'{..}           = go _iigProFileId _iigProjectId _iigId               (Just AltJSON)               dFAReportingService
gen/Network/Google/Resource/DFAReporting/InventoryItems/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.InventoryItems.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -40,6 +40,7 @@     , iilPageToken     , iilProjectId     , iilSortField+    , iilType     , iilOrderId     , iilSiteId     , iilMaxResults@@ -52,7 +53,7 @@ -- 'InventoryItemsList' request conforms to. type InventoryItemsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "projects" :>@@ -63,16 +64,17 @@                        QueryParam "inPlan" Bool :>                          QueryParam "pageToken" Text :>                            QueryParam "sortField" InventoryItemsListSortField :>-                             QueryParams "orderId" (Textual Int64) :>-                               QueryParams "siteId" (Textual Int64) :>-                                 QueryParam "maxResults" (Textual Int32) :>-                                   QueryParam "alt" AltJSON :>-                                     Get '[JSON] InventoryItemsListResponse+                             QueryParam "type" InventoryItemsListType :>+                               QueryParams "orderId" (Textual Int64) :>+                                 QueryParams "siteId" (Textual Int64) :>+                                   QueryParam "maxResults" (Textual Int32) :>+                                     QueryParam "alt" AltJSON :>+                                       Get '[JSON] InventoryItemsListResponse  -- | Retrieves a list of inventory items, possibly filtered. -- -- /See:/ 'inventoryItemsList' smart constructor.-data InventoryItemsList = InventoryItemsList+data InventoryItemsList = InventoryItemsList'     { _iilIds        :: !(Maybe [Textual Int64])     , _iilProFileId  :: !(Textual Int64)     , _iilSortOrder  :: !(Maybe InventoryItemsListSortOrder)@@ -80,6 +82,7 @@     , _iilPageToken  :: !(Maybe Text)     , _iilProjectId  :: !(Textual Int64)     , _iilSortField  :: !(Maybe InventoryItemsListSortField)+    , _iilType       :: !(Maybe InventoryItemsListType)     , _iilOrderId    :: !(Maybe [Textual Int64])     , _iilSiteId     :: !(Maybe [Textual Int64])     , _iilMaxResults :: !(Maybe (Textual Int32))@@ -103,6 +106,8 @@ -- -- * 'iilSortField' --+-- * 'iilType'+-- -- * 'iilOrderId' -- -- * 'iilSiteId'@@ -113,7 +118,7 @@     -> Int64 -- ^ 'iilProjectId'     -> InventoryItemsList inventoryItemsList pIilProFileId_ pIilProjectId_ =-    InventoryItemsList+    InventoryItemsList'     { _iilIds = Nothing     , _iilProFileId = _Coerce # pIilProFileId_     , _iilSortOrder = Nothing@@ -121,6 +126,7 @@     , _iilPageToken = Nothing     , _iilProjectId = _Coerce # pIilProjectId_     , _iilSortField = Nothing+    , _iilType = Nothing     , _iilOrderId = Nothing     , _iilSiteId = Nothing     , _iilMaxResults = Nothing@@ -164,6 +170,10 @@ iilSortField   = lens _iilSortField (\ s a -> s{_iilSortField = a}) +-- | Select only inventory items with this type.+iilType :: Lens' InventoryItemsList (Maybe InventoryItemsListType)+iilType = lens _iilType (\ s a -> s{_iilType = a})+ -- | Select only inventory items that belong to specified orders. iilOrderId :: Lens' InventoryItemsList [Int64] iilOrderId@@ -188,13 +198,16 @@ instance GoogleRequest InventoryItemsList where         type Rs InventoryItemsList =              InventoryItemsListResponse-        requestClient InventoryItemsList{..}+        type Scopes InventoryItemsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient InventoryItemsList'{..}           = go _iilProFileId _iilProjectId               (_iilIds ^. _Default)               _iilSortOrder               _iilInPlan               _iilPageToken               _iilSortField+              _iilType               (_iilOrderId ^. _Default)               (_iilSiteId ^. _Default)               _iilMaxResults
gen/Network/Google/Resource/DFAReporting/LandingPages/Delete.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.LandingPages.Delete--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'LandingPagesDelete' request conforms to. type LandingPagesDeleteResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "campaigns" :>@@ -57,7 +57,7 @@ -- | Deletes an existing campaign landing page. -- -- /See:/ 'landingPagesDelete' smart constructor.-data LandingPagesDelete = LandingPagesDelete+data LandingPagesDelete = LandingPagesDelete'     { _lpdCampaignId :: !(Textual Int64)     , _lpdProFileId  :: !(Textual Int64)     , _lpdId         :: !(Textual Int64)@@ -78,7 +78,7 @@     -> Int64 -- ^ 'lpdId'     -> LandingPagesDelete landingPagesDelete pLpdCampaignId_ pLpdProFileId_ pLpdId_ =-    LandingPagesDelete+    LandingPagesDelete'     { _lpdCampaignId = _Coerce # pLpdCampaignId_     , _lpdProFileId = _Coerce # pLpdProFileId_     , _lpdId = _Coerce # pLpdId_@@ -104,7 +104,9 @@  instance GoogleRequest LandingPagesDelete where         type Rs LandingPagesDelete = ()-        requestClient LandingPagesDelete{..}+        type Scopes LandingPagesDelete =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient LandingPagesDelete'{..}           = go _lpdProFileId _lpdCampaignId _lpdId               (Just AltJSON)               dFAReportingService
gen/Network/Google/Resource/DFAReporting/LandingPages/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.LandingPages.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'LandingPagesGet' request conforms to. type LandingPagesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "campaigns" :>@@ -57,7 +57,7 @@ -- | Gets one campaign landing page by ID. -- -- /See:/ 'landingPagesGet' smart constructor.-data LandingPagesGet = LandingPagesGet+data LandingPagesGet = LandingPagesGet'     { _lpgCampaignId :: !(Textual Int64)     , _lpgProFileId  :: !(Textual Int64)     , _lpgId         :: !(Textual Int64)@@ -78,7 +78,7 @@     -> Int64 -- ^ 'lpgId'     -> LandingPagesGet landingPagesGet pLpgCampaignId_ pLpgProFileId_ pLpgId_ =-    LandingPagesGet+    LandingPagesGet'     { _lpgCampaignId = _Coerce # pLpgCampaignId_     , _lpgProFileId = _Coerce # pLpgProFileId_     , _lpgId = _Coerce # pLpgId_@@ -104,7 +104,9 @@  instance GoogleRequest LandingPagesGet where         type Rs LandingPagesGet = LandingPage-        requestClient LandingPagesGet{..}+        type Scopes LandingPagesGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient LandingPagesGet'{..}           = go _lpgProFileId _lpgCampaignId _lpgId               (Just AltJSON)               dFAReportingService
gen/Network/Google/Resource/DFAReporting/LandingPages/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.LandingPages.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'LandingPagesInsert' request conforms to. type LandingPagesInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "campaigns" :>@@ -58,7 +58,7 @@ -- | Inserts a new landing page for the specified campaign. -- -- /See:/ 'landingPagesInsert' smart constructor.-data LandingPagesInsert = LandingPagesInsert+data LandingPagesInsert = LandingPagesInsert'     { _lpiCampaignId :: !(Textual Int64)     , _lpiProFileId  :: !(Textual Int64)     , _lpiPayload    :: !LandingPage@@ -79,7 +79,7 @@     -> LandingPage -- ^ 'lpiPayload'     -> LandingPagesInsert landingPagesInsert pLpiCampaignId_ pLpiProFileId_ pLpiPayload_ =-    LandingPagesInsert+    LandingPagesInsert'     { _lpiCampaignId = _Coerce # pLpiCampaignId_     , _lpiProFileId = _Coerce # pLpiProFileId_     , _lpiPayload = pLpiPayload_@@ -105,7 +105,9 @@  instance GoogleRequest LandingPagesInsert where         type Rs LandingPagesInsert = LandingPage-        requestClient LandingPagesInsert{..}+        type Scopes LandingPagesInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient LandingPagesInsert'{..}           = go _lpiProFileId _lpiCampaignId (Just AltJSON)               _lpiPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/LandingPages/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.LandingPages.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'LandingPagesList' request conforms to. type LandingPagesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "campaigns" :>@@ -56,7 +56,7 @@ -- | Retrieves the list of landing pages for the specified campaign. -- -- /See:/ 'landingPagesList' smart constructor.-data LandingPagesList = LandingPagesList+data LandingPagesList = LandingPagesList'     { _lplCampaignId :: !(Textual Int64)     , _lplProFileId  :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -73,7 +73,7 @@     -> Int64 -- ^ 'lplProFileId'     -> LandingPagesList landingPagesList pLplCampaignId_ pLplProFileId_ =-    LandingPagesList+    LandingPagesList'     { _lplCampaignId = _Coerce # pLplCampaignId_     , _lplProFileId = _Coerce # pLplProFileId_     }@@ -93,7 +93,9 @@  instance GoogleRequest LandingPagesList where         type Rs LandingPagesList = LandingPagesListResponse-        requestClient LandingPagesList{..}+        type Scopes LandingPagesList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient LandingPagesList'{..}           = go _lplProFileId _lplCampaignId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/LandingPages/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.LandingPages.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -47,7 +47,7 @@ -- 'LandingPagesPatch' request conforms to. type LandingPagesPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "campaigns" :>@@ -62,7 +62,7 @@ -- semantics. -- -- /See:/ 'landingPagesPatch' smart constructor.-data LandingPagesPatch = LandingPagesPatch+data LandingPagesPatch = LandingPagesPatch'     { _lppCampaignId :: !(Textual Int64)     , _lppProFileId  :: !(Textual Int64)     , _lppPayload    :: !LandingPage@@ -87,7 +87,7 @@     -> Int64 -- ^ 'lppId'     -> LandingPagesPatch landingPagesPatch pLppCampaignId_ pLppProFileId_ pLppPayload_ pLppId_ =-    LandingPagesPatch+    LandingPagesPatch'     { _lppCampaignId = _Coerce # pLppCampaignId_     , _lppProFileId = _Coerce # pLppProFileId_     , _lppPayload = pLppPayload_@@ -119,7 +119,9 @@  instance GoogleRequest LandingPagesPatch where         type Rs LandingPagesPatch = LandingPage-        requestClient LandingPagesPatch{..}+        type Scopes LandingPagesPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient LandingPagesPatch'{..}           = go _lppProFileId _lppCampaignId (Just _lppId)               (Just AltJSON)               _lppPayload
gen/Network/Google/Resource/DFAReporting/LandingPages/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.LandingPages.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'LandingPagesUpdate' request conforms to. type LandingPagesUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "campaigns" :>@@ -58,7 +58,7 @@ -- | Updates an existing campaign landing page. -- -- /See:/ 'landingPagesUpdate' smart constructor.-data LandingPagesUpdate = LandingPagesUpdate+data LandingPagesUpdate = LandingPagesUpdate'     { _lpuCampaignId :: !(Textual Int64)     , _lpuProFileId  :: !(Textual Int64)     , _lpuPayload    :: !LandingPage@@ -79,7 +79,7 @@     -> LandingPage -- ^ 'lpuPayload'     -> LandingPagesUpdate landingPagesUpdate pLpuCampaignId_ pLpuProFileId_ pLpuPayload_ =-    LandingPagesUpdate+    LandingPagesUpdate'     { _lpuCampaignId = _Coerce # pLpuCampaignId_     , _lpuProFileId = _Coerce # pLpuProFileId_     , _lpuPayload = pLpuPayload_@@ -105,7 +105,9 @@  instance GoogleRequest LandingPagesUpdate where         type Rs LandingPagesUpdate = LandingPage-        requestClient LandingPagesUpdate{..}+        type Scopes LandingPagesUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient LandingPagesUpdate'{..}           = go _lpuProFileId _lpuCampaignId (Just AltJSON)               _lpuPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/Metros/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Metros.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -43,7 +43,7 @@ -- 'MetrosList' request conforms to. type MetrosListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "metros" :>@@ -53,7 +53,7 @@ -- | Retrieves a list of metros. -- -- /See:/ 'metrosList' smart constructor.-newtype MetrosList = MetrosList+newtype MetrosList = MetrosList'     { _mlProFileId :: Textual Int64     } deriving (Eq,Show,Data,Typeable,Generic) @@ -66,7 +66,7 @@     :: Int64 -- ^ 'mlProFileId'     -> MetrosList metrosList pMlProFileId_ =-    MetrosList+    MetrosList'     { _mlProFileId = _Coerce # pMlProFileId_     } @@ -78,7 +78,9 @@  instance GoogleRequest MetrosList where         type Rs MetrosList = MetrosListResponse-        requestClient MetrosList{..}+        type Scopes MetrosList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient MetrosList'{..}           = go _mlProFileId (Just AltJSON) dFAReportingService           where go                   = buildClient (Proxy :: Proxy MetrosListResource)
gen/Network/Google/Resource/DFAReporting/MobileCarriers/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.MobileCarriers.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'MobileCarriersGet' request conforms to. type MobileCarriersGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "mobileCarriers" :>@@ -54,7 +54,7 @@ -- | Gets one mobile carrier by ID. -- -- /See:/ 'mobileCarriersGet' smart constructor.-data MobileCarriersGet = MobileCarriersGet+data MobileCarriersGet = MobileCarriersGet'     { _mcgProFileId :: !(Textual Int64)     , _mcgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'mcgId'     -> MobileCarriersGet mobileCarriersGet pMcgProFileId_ pMcgId_ =-    MobileCarriersGet+    MobileCarriersGet'     { _mcgProFileId = _Coerce # pMcgProFileId_     , _mcgId = _Coerce # pMcgId_     }@@ -89,7 +89,9 @@  instance GoogleRequest MobileCarriersGet where         type Rs MobileCarriersGet = MobileCarrier-        requestClient MobileCarriersGet{..}+        type Scopes MobileCarriersGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient MobileCarriersGet'{..}           = go _mcgProFileId _mcgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/MobileCarriers/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.MobileCarriers.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -43,7 +43,7 @@ -- 'MobileCarriersList' request conforms to. type MobileCarriersListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "mobileCarriers" :>@@ -53,7 +53,7 @@ -- | Retrieves a list of mobile carriers. -- -- /See:/ 'mobileCarriersList' smart constructor.-newtype MobileCarriersList = MobileCarriersList+newtype MobileCarriersList = MobileCarriersList'     { _mclProFileId :: Textual Int64     } deriving (Eq,Show,Data,Typeable,Generic) @@ -66,7 +66,7 @@     :: Int64 -- ^ 'mclProFileId'     -> MobileCarriersList mobileCarriersList pMclProFileId_ =-    MobileCarriersList+    MobileCarriersList'     { _mclProFileId = _Coerce # pMclProFileId_     } @@ -79,7 +79,9 @@ instance GoogleRequest MobileCarriersList where         type Rs MobileCarriersList =              MobileCarriersListResponse-        requestClient MobileCarriersList{..}+        type Scopes MobileCarriersList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient MobileCarriersList'{..}           = go _mclProFileId (Just AltJSON) dFAReportingService           where go                   = buildClient
gen/Network/Google/Resource/DFAReporting/OperatingSystemVersions/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.OperatingSystemVersions.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'OperatingSystemVersionsGet' request conforms to. type OperatingSystemVersionsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "operatingSystemVersions" :>@@ -55,7 +55,7 @@ -- | Gets one operating system version by ID. -- -- /See:/ 'operatingSystemVersionsGet' smart constructor.-data OperatingSystemVersionsGet = OperatingSystemVersionsGet+data OperatingSystemVersionsGet = OperatingSystemVersionsGet'     { _osvgProFileId :: !(Textual Int64)     , _osvgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'osvgId'     -> OperatingSystemVersionsGet operatingSystemVersionsGet pOsvgProFileId_ pOsvgId_ =-    OperatingSystemVersionsGet+    OperatingSystemVersionsGet'     { _osvgProFileId = _Coerce # pOsvgProFileId_     , _osvgId = _Coerce # pOsvgId_     }@@ -93,7 +93,9 @@          where         type Rs OperatingSystemVersionsGet =              OperatingSystemVersion-        requestClient OperatingSystemVersionsGet{..}+        type Scopes OperatingSystemVersionsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient OperatingSystemVersionsGet'{..}           = go _osvgProFileId _osvgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/OperatingSystemVersions/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.OperatingSystemVersions.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -43,7 +43,7 @@ -- 'OperatingSystemVersionsList' request conforms to. type OperatingSystemVersionsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "operatingSystemVersions" :>@@ -53,7 +53,7 @@ -- | Retrieves a list of operating system versions. -- -- /See:/ 'operatingSystemVersionsList' smart constructor.-newtype OperatingSystemVersionsList = OperatingSystemVersionsList+newtype OperatingSystemVersionsList = OperatingSystemVersionsList'     { _osvlProFileId :: Textual Int64     } deriving (Eq,Show,Data,Typeable,Generic) @@ -66,7 +66,7 @@     :: Int64 -- ^ 'osvlProFileId'     -> OperatingSystemVersionsList operatingSystemVersionsList pOsvlProFileId_ =-    OperatingSystemVersionsList+    OperatingSystemVersionsList'     { _osvlProFileId = _Coerce # pOsvlProFileId_     } @@ -81,7 +81,9 @@          where         type Rs OperatingSystemVersionsList =              OperatingSystemVersionsListResponse-        requestClient OperatingSystemVersionsList{..}+        type Scopes OperatingSystemVersionsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient OperatingSystemVersionsList'{..}           = go _osvlProFileId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/OperatingSystems/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.OperatingSystems.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'OperatingSystemsGet' request conforms to. type OperatingSystemsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "operatingSystems" :>@@ -55,7 +55,7 @@ -- | Gets one operating system by DART ID. -- -- /See:/ 'operatingSystemsGet' smart constructor.-data OperatingSystemsGet = OperatingSystemsGet+data OperatingSystemsGet = OperatingSystemsGet'     { _osgProFileId :: !(Textual Int64)     , _osgDartId    :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'osgDartId'     -> OperatingSystemsGet operatingSystemsGet pOsgProFileId_ pOsgDartId_ =-    OperatingSystemsGet+    OperatingSystemsGet'     { _osgProFileId = _Coerce # pOsgProFileId_     , _osgDartId = _Coerce # pOsgDartId_     }@@ -91,7 +91,9 @@  instance GoogleRequest OperatingSystemsGet where         type Rs OperatingSystemsGet = OperatingSystem-        requestClient OperatingSystemsGet{..}+        type Scopes OperatingSystemsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient OperatingSystemsGet'{..}           = go _osgProFileId _osgDartId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/OperatingSystems/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.OperatingSystems.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -43,7 +43,7 @@ -- 'OperatingSystemsList' request conforms to. type OperatingSystemsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "operatingSystems" :>@@ -53,7 +53,7 @@ -- | Retrieves a list of operating systems. -- -- /See:/ 'operatingSystemsList' smart constructor.-newtype OperatingSystemsList = OperatingSystemsList+newtype OperatingSystemsList = OperatingSystemsList'     { _oslProFileId :: Textual Int64     } deriving (Eq,Show,Data,Typeable,Generic) @@ -66,7 +66,7 @@     :: Int64 -- ^ 'oslProFileId'     -> OperatingSystemsList operatingSystemsList pOslProFileId_ =-    OperatingSystemsList+    OperatingSystemsList'     { _oslProFileId = _Coerce # pOslProFileId_     } @@ -79,7 +79,9 @@ instance GoogleRequest OperatingSystemsList where         type Rs OperatingSystemsList =              OperatingSystemsListResponse-        requestClient OperatingSystemsList{..}+        type Scopes OperatingSystemsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient OperatingSystemsList'{..}           = go _oslProFileId (Just AltJSON) dFAReportingService           where go                   = buildClient
gen/Network/Google/Resource/DFAReporting/OrderDocuments/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.OrderDocuments.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'OrderDocumentsGet' request conforms to. type OrderDocumentsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "projects" :>@@ -57,7 +57,7 @@ -- | Gets one order document by ID. -- -- /See:/ 'orderDocumentsGet' smart constructor.-data OrderDocumentsGet = OrderDocumentsGet+data OrderDocumentsGet = OrderDocumentsGet'     { _odgProFileId :: !(Textual Int64)     , _odgId        :: !(Textual Int64)     , _odgProjectId :: !(Textual Int64)@@ -78,7 +78,7 @@     -> Int64 -- ^ 'odgProjectId'     -> OrderDocumentsGet orderDocumentsGet pOdgProFileId_ pOdgId_ pOdgProjectId_ =-    OrderDocumentsGet+    OrderDocumentsGet'     { _odgProFileId = _Coerce # pOdgProFileId_     , _odgId = _Coerce # pOdgId_     , _odgProjectId = _Coerce # pOdgProjectId_@@ -103,7 +103,9 @@  instance GoogleRequest OrderDocumentsGet where         type Rs OrderDocumentsGet = OrderDocument-        requestClient OrderDocumentsGet{..}+        type Scopes OrderDocumentsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient OrderDocumentsGet'{..}           = go _odgProFileId _odgProjectId _odgId               (Just AltJSON)               dFAReportingService
gen/Network/Google/Resource/DFAReporting/OrderDocuments/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.OrderDocuments.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -53,7 +53,7 @@ -- 'OrderDocumentsList' request conforms to. type OrderDocumentsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "projects" :>@@ -74,7 +74,7 @@ -- | Retrieves a list of order documents, possibly filtered. -- -- /See:/ 'orderDocumentsList' smart constructor.-data OrderDocumentsList = OrderDocumentsList+data OrderDocumentsList = OrderDocumentsList'     { _odlSearchString :: !(Maybe Text)     , _odlIds          :: !(Maybe [Textual Int64])     , _odlProFileId    :: !(Textual Int64)@@ -118,7 +118,7 @@     -> Int64 -- ^ 'odlProjectId'     -> OrderDocumentsList orderDocumentsList pOdlProFileId_ pOdlProjectId_ =-    OrderDocumentsList+    OrderDocumentsList'     { _odlSearchString = Nothing     , _odlIds = Nothing     , _odlProFileId = _Coerce # pOdlProFileId_@@ -208,7 +208,9 @@ instance GoogleRequest OrderDocumentsList where         type Rs OrderDocumentsList =              OrderDocumentsListResponse-        requestClient OrderDocumentsList{..}+        type Scopes OrderDocumentsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient OrderDocumentsList'{..}           = go _odlProFileId _odlProjectId _odlSearchString               (_odlIds ^. _Default)               _odlSortOrder
gen/Network/Google/Resource/DFAReporting/Orders/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Orders.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'OrdersGet' request conforms to. type OrdersGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "projects" :>@@ -57,7 +57,7 @@ -- | Gets one order by ID. -- -- /See:/ 'ordersGet' smart constructor.-data OrdersGet = OrdersGet+data OrdersGet = OrdersGet'     { _ogProFileId :: !(Textual Int64)     , _ogId        :: !(Textual Int64)     , _ogProjectId :: !(Textual Int64)@@ -78,7 +78,7 @@     -> Int64 -- ^ 'ogProjectId'     -> OrdersGet ordersGet pOgProFileId_ pOgId_ pOgProjectId_ =-    OrdersGet+    OrdersGet'     { _ogProFileId = _Coerce # pOgProFileId_     , _ogId = _Coerce # pOgId_     , _ogProjectId = _Coerce # pOgProjectId_@@ -102,7 +102,9 @@  instance GoogleRequest OrdersGet where         type Rs OrdersGet = Order-        requestClient OrdersGet{..}+        type Scopes OrdersGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient OrdersGet'{..}           = go _ogProFileId _ogProjectId _ogId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Orders/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Orders.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -51,7 +51,7 @@ -- 'OrdersList' request conforms to. type OrdersListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "projects" :>@@ -70,7 +70,7 @@ -- | Retrieves a list of orders, possibly filtered. -- -- /See:/ 'ordersList' smart constructor.-data OrdersList = OrdersList+data OrdersList = OrdersList'     { _olSearchString :: !(Maybe Text)     , _olIds          :: !(Maybe [Textual Int64])     , _olProFileId    :: !(Textual Int64)@@ -108,7 +108,7 @@     -> Int64 -- ^ 'olProjectId'     -> OrdersList ordersList pOlProFileId_ pOlProjectId_ =-    OrdersList+    OrdersList'     { _olSearchString = Nothing     , _olIds = Nothing     , _olProFileId = _Coerce # pOlProFileId_@@ -179,7 +179,9 @@  instance GoogleRequest OrdersList where         type Rs OrdersList = OrdersListResponse-        requestClient OrdersList{..}+        type Scopes OrdersList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient OrdersList'{..}           = go _olProFileId _olProjectId _olSearchString               (_olIds ^. _Default)               _olSortOrder
gen/Network/Google/Resource/DFAReporting/PlacementGroups/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.PlacementGroups.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'PlacementGroupsGet' request conforms to. type PlacementGroupsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "placementGroups" :>@@ -55,7 +55,7 @@ -- | Gets one placement group by ID. -- -- /See:/ 'placementGroupsGet' smart constructor.-data PlacementGroupsGet = PlacementGroupsGet+data PlacementGroupsGet = PlacementGroupsGet'     { _pggProFileId :: !(Textual Int64)     , _pggId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'pggId'     -> PlacementGroupsGet placementGroupsGet pPggProFileId_ pPggId_ =-    PlacementGroupsGet+    PlacementGroupsGet'     { _pggProFileId = _Coerce # pPggProFileId_     , _pggId = _Coerce # pPggId_     }@@ -90,7 +90,9 @@  instance GoogleRequest PlacementGroupsGet where         type Rs PlacementGroupsGet = PlacementGroup-        requestClient PlacementGroupsGet{..}+        type Scopes PlacementGroupsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlacementGroupsGet'{..}           = go _pggProFileId _pggId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/PlacementGroups/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.PlacementGroups.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'PlacementGroupsInsert' request conforms to. type PlacementGroupsInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "placementGroups" :>@@ -55,7 +55,7 @@ -- | Inserts a new placement group. -- -- /See:/ 'placementGroupsInsert' smart constructor.-data PlacementGroupsInsert = PlacementGroupsInsert+data PlacementGroupsInsert = PlacementGroupsInsert'     { _pgiProFileId :: !(Textual Int64)     , _pgiPayload   :: !PlacementGroup     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> PlacementGroup -- ^ 'pgiPayload'     -> PlacementGroupsInsert placementGroupsInsert pPgiProFileId_ pPgiPayload_ =-    PlacementGroupsInsert+    PlacementGroupsInsert'     { _pgiProFileId = _Coerce # pPgiProFileId_     , _pgiPayload = pPgiPayload_     }@@ -90,7 +90,9 @@  instance GoogleRequest PlacementGroupsInsert where         type Rs PlacementGroupsInsert = PlacementGroup-        requestClient PlacementGroupsInsert{..}+        type Scopes PlacementGroupsInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlacementGroupsInsert'{..}           = go _pgiProFileId (Just AltJSON) _pgiPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/PlacementGroups/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.PlacementGroups.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -62,7 +62,7 @@ -- 'PlacementGroupsList' request conforms to. type PlacementGroupsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "placementGroups" :>@@ -105,7 +105,7 @@ -- | Retrieves a list of placement groups, possibly filtered. -- -- /See:/ 'placementGroupsList' smart constructor.-data PlacementGroupsList = PlacementGroupsList+data PlacementGroupsList = PlacementGroupsList'     { _pglPlacementStrategyIds :: !(Maybe [Textual Int64])     , _pglContentCategoryIds   :: !(Maybe [Textual Int64])     , _pglMaxEndDate           :: !(Maybe Text)@@ -175,7 +175,7 @@     :: Int64 -- ^ 'pglProFileId'     -> PlacementGroupsList placementGroupsList pPglProFileId_ =-    PlacementGroupsList+    PlacementGroupsList'     { _pglPlacementStrategyIds = Nothing     , _pglContentCategoryIds = Nothing     , _pglMaxEndDate = Nothing@@ -355,7 +355,9 @@ instance GoogleRequest PlacementGroupsList where         type Rs PlacementGroupsList =              PlacementGroupsListResponse-        requestClient PlacementGroupsList{..}+        type Scopes PlacementGroupsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlacementGroupsList'{..}           = go _pglProFileId               (_pglPlacementStrategyIds ^. _Default)               (_pglContentCategoryIds ^. _Default)
gen/Network/Google/Resource/DFAReporting/PlacementGroups/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.PlacementGroups.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -46,7 +46,7 @@ -- 'PlacementGroupsPatch' request conforms to. type PlacementGroupsPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "placementGroups" :>@@ -59,7 +59,7 @@ -- semantics. -- -- /See:/ 'placementGroupsPatch' smart constructor.-data PlacementGroupsPatch = PlacementGroupsPatch+data PlacementGroupsPatch = PlacementGroupsPatch'     { _pgpProFileId :: !(Textual Int64)     , _pgpPayload   :: !PlacementGroup     , _pgpId        :: !(Textual Int64)@@ -80,7 +80,7 @@     -> Int64 -- ^ 'pgpId'     -> PlacementGroupsPatch placementGroupsPatch pPgpProFileId_ pPgpPayload_ pPgpId_ =-    PlacementGroupsPatch+    PlacementGroupsPatch'     { _pgpProFileId = _Coerce # pPgpProFileId_     , _pgpPayload = pPgpPayload_     , _pgpId = _Coerce # pPgpId_@@ -104,7 +104,9 @@  instance GoogleRequest PlacementGroupsPatch where         type Rs PlacementGroupsPatch = PlacementGroup-        requestClient PlacementGroupsPatch{..}+        type Scopes PlacementGroupsPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlacementGroupsPatch'{..}           = go _pgpProFileId (Just _pgpId) (Just AltJSON)               _pgpPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/PlacementGroups/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.PlacementGroups.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'PlacementGroupsUpdate' request conforms to. type PlacementGroupsUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "placementGroups" :>@@ -55,7 +55,7 @@ -- | Updates an existing placement group. -- -- /See:/ 'placementGroupsUpdate' smart constructor.-data PlacementGroupsUpdate = PlacementGroupsUpdate+data PlacementGroupsUpdate = PlacementGroupsUpdate'     { _pguProFileId :: !(Textual Int64)     , _pguPayload   :: !PlacementGroup     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> PlacementGroup -- ^ 'pguPayload'     -> PlacementGroupsUpdate placementGroupsUpdate pPguProFileId_ pPguPayload_ =-    PlacementGroupsUpdate+    PlacementGroupsUpdate'     { _pguProFileId = _Coerce # pPguProFileId_     , _pguPayload = pPguPayload_     }@@ -90,7 +90,9 @@  instance GoogleRequest PlacementGroupsUpdate where         type Rs PlacementGroupsUpdate = PlacementGroup-        requestClient PlacementGroupsUpdate{..}+        type Scopes PlacementGroupsUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlacementGroupsUpdate'{..}           = go _pguProFileId (Just AltJSON) _pguPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Delete.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.PlacementStrategies.Delete--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'PlacementStrategiesDelete' request conforms to. type PlacementStrategiesDeleteResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "placementStrategies" :>@@ -54,7 +54,7 @@ -- | Deletes an existing placement strategy. -- -- /See:/ 'placementStrategiesDelete' smart constructor.-data PlacementStrategiesDelete = PlacementStrategiesDelete+data PlacementStrategiesDelete = PlacementStrategiesDelete'     { _psdProFileId :: !(Textual Int64)     , _psdId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'psdId'     -> PlacementStrategiesDelete placementStrategiesDelete pPsdProFileId_ pPsdId_ =-    PlacementStrategiesDelete+    PlacementStrategiesDelete'     { _psdProFileId = _Coerce # pPsdProFileId_     , _psdId = _Coerce # pPsdId_     }@@ -90,7 +90,9 @@ instance GoogleRequest PlacementStrategiesDelete          where         type Rs PlacementStrategiesDelete = ()-        requestClient PlacementStrategiesDelete{..}+        type Scopes PlacementStrategiesDelete =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlacementStrategiesDelete'{..}           = go _psdProFileId _psdId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.PlacementStrategies.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'PlacementStrategiesGet' request conforms to. type PlacementStrategiesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "placementStrategies" :>@@ -55,7 +55,7 @@ -- | Gets one placement strategy by ID. -- -- /See:/ 'placementStrategiesGet' smart constructor.-data PlacementStrategiesGet = PlacementStrategiesGet+data PlacementStrategiesGet = PlacementStrategiesGet'     { _psgProFileId :: !(Textual Int64)     , _psgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'psgId'     -> PlacementStrategiesGet placementStrategiesGet pPsgProFileId_ pPsgId_ =-    PlacementStrategiesGet+    PlacementStrategiesGet'     { _psgProFileId = _Coerce # pPsgProFileId_     , _psgId = _Coerce # pPsgId_     }@@ -90,7 +90,9 @@  instance GoogleRequest PlacementStrategiesGet where         type Rs PlacementStrategiesGet = PlacementStrategy-        requestClient PlacementStrategiesGet{..}+        type Scopes PlacementStrategiesGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlacementStrategiesGet'{..}           = go _psgProFileId _psgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.PlacementStrategies.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'PlacementStrategiesInsert' request conforms to. type PlacementStrategiesInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "placementStrategies" :>@@ -55,7 +55,7 @@ -- | Inserts a new placement strategy. -- -- /See:/ 'placementStrategiesInsert' smart constructor.-data PlacementStrategiesInsert = PlacementStrategiesInsert+data PlacementStrategiesInsert = PlacementStrategiesInsert'     { _psiProFileId :: !(Textual Int64)     , _psiPayload   :: !PlacementStrategy     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> PlacementStrategy -- ^ 'psiPayload'     -> PlacementStrategiesInsert placementStrategiesInsert pPsiProFileId_ pPsiPayload_ =-    PlacementStrategiesInsert+    PlacementStrategiesInsert'     { _psiProFileId = _Coerce # pPsiProFileId_     , _psiPayload = pPsiPayload_     }@@ -91,7 +91,9 @@ instance GoogleRequest PlacementStrategiesInsert          where         type Rs PlacementStrategiesInsert = PlacementStrategy-        requestClient PlacementStrategiesInsert{..}+        type Scopes PlacementStrategiesInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlacementStrategiesInsert'{..}           = go _psiProFileId (Just AltJSON) _psiPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/PlacementStrategies/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.PlacementStrategies.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -49,7 +49,7 @@ -- 'PlacementStrategiesList' request conforms to. type PlacementStrategiesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "placementStrategies" :>@@ -69,7 +69,7 @@ -- | Retrieves a list of placement strategies, possibly filtered. -- -- /See:/ 'placementStrategiesList' smart constructor.-data PlacementStrategiesList = PlacementStrategiesList+data PlacementStrategiesList = PlacementStrategiesList'     { _pslSearchString :: !(Maybe Text)     , _pslIds          :: !(Maybe [Textual Int64])     , _pslProFileId    :: !(Textual Int64)@@ -100,7 +100,7 @@     :: Int64 -- ^ 'pslProFileId'     -> PlacementStrategiesList placementStrategiesList pPslProFileId_ =-    PlacementStrategiesList+    PlacementStrategiesList'     { _pslSearchString = Nothing     , _pslIds = Nothing     , _pslProFileId = _Coerce # pPslProFileId_@@ -160,7 +160,9 @@ instance GoogleRequest PlacementStrategiesList where         type Rs PlacementStrategiesList =              PlacementStrategiesListResponse-        requestClient PlacementStrategiesList{..}+        type Scopes PlacementStrategiesList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlacementStrategiesList'{..}           = go _pslProFileId _pslSearchString               (_pslIds ^. _Default)               _pslSortOrder
gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.PlacementStrategies.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -46,7 +46,7 @@ -- 'PlacementStrategiesPatch' request conforms to. type PlacementStrategiesPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "placementStrategies" :>@@ -59,7 +59,7 @@ -- semantics. -- -- /See:/ 'placementStrategiesPatch' smart constructor.-data PlacementStrategiesPatch = PlacementStrategiesPatch+data PlacementStrategiesPatch = PlacementStrategiesPatch'     { _pspProFileId :: !(Textual Int64)     , _pspPayload   :: !PlacementStrategy     , _pspId        :: !(Textual Int64)@@ -80,7 +80,7 @@     -> Int64 -- ^ 'pspId'     -> PlacementStrategiesPatch placementStrategiesPatch pPspProFileId_ pPspPayload_ pPspId_ =-    PlacementStrategiesPatch+    PlacementStrategiesPatch'     { _pspProFileId = _Coerce # pPspProFileId_     , _pspPayload = pPspPayload_     , _pspId = _Coerce # pPspId_@@ -104,7 +104,9 @@  instance GoogleRequest PlacementStrategiesPatch where         type Rs PlacementStrategiesPatch = PlacementStrategy-        requestClient PlacementStrategiesPatch{..}+        type Scopes PlacementStrategiesPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlacementStrategiesPatch'{..}           = go _pspProFileId (Just _pspId) (Just AltJSON)               _pspPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.PlacementStrategies.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'PlacementStrategiesUpdate' request conforms to. type PlacementStrategiesUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "placementStrategies" :>@@ -55,7 +55,7 @@ -- | Updates an existing placement strategy. -- -- /See:/ 'placementStrategiesUpdate' smart constructor.-data PlacementStrategiesUpdate = PlacementStrategiesUpdate+data PlacementStrategiesUpdate = PlacementStrategiesUpdate'     { _psuProFileId :: !(Textual Int64)     , _psuPayload   :: !PlacementStrategy     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> PlacementStrategy -- ^ 'psuPayload'     -> PlacementStrategiesUpdate placementStrategiesUpdate pPsuProFileId_ pPsuPayload_ =-    PlacementStrategiesUpdate+    PlacementStrategiesUpdate'     { _psuProFileId = _Coerce # pPsuProFileId_     , _psuPayload = pPsuPayload_     }@@ -91,7 +91,9 @@ instance GoogleRequest PlacementStrategiesUpdate          where         type Rs PlacementStrategiesUpdate = PlacementStrategy-        requestClient PlacementStrategiesUpdate{..}+        type Scopes PlacementStrategiesUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlacementStrategiesUpdate'{..}           = go _psuProFileId (Just AltJSON) _psuPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Placements/Generatetags.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Placements.Generatetags--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -46,7 +46,7 @@ -- 'PlacementsGeneratetags' request conforms to. type PlacementsGeneratetagsResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "placements" :>@@ -62,7 +62,7 @@ -- | Generates tags for a placement. -- -- /See:/ 'placementsGeneratetags' smart constructor.-data PlacementsGeneratetags = PlacementsGeneratetags+data PlacementsGeneratetags = PlacementsGeneratetags'     { _pgsTagFormats   :: !(Maybe [PlacementsGeneratetagsTagFormats])     , _pgsCampaignId   :: !(Maybe (Textual Int64))     , _pgsProFileId    :: !(Textual Int64)@@ -84,7 +84,7 @@     :: Int64 -- ^ 'pgsProFileId'     -> PlacementsGeneratetags placementsGeneratetags pPgsProFileId_ =-    PlacementsGeneratetags+    PlacementsGeneratetags'     { _pgsTagFormats = Nothing     , _pgsCampaignId = Nothing     , _pgsProFileId = _Coerce # pPgsProFileId_@@ -124,7 +124,9 @@ instance GoogleRequest PlacementsGeneratetags where         type Rs PlacementsGeneratetags =              PlacementsGenerateTagsResponse-        requestClient PlacementsGeneratetags{..}+        type Scopes PlacementsGeneratetags =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlacementsGeneratetags'{..}           = go _pgsProFileId (_pgsTagFormats ^. _Default)               _pgsCampaignId               (_pgsPlacementIds ^. _Default)
gen/Network/Google/Resource/DFAReporting/Placements/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Placements.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'PlacementsGet' request conforms to. type PlacementsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "placements" :>@@ -54,7 +54,7 @@ -- | Gets one placement by ID. -- -- /See:/ 'placementsGet' smart constructor.-data PlacementsGet = PlacementsGet+data PlacementsGet = PlacementsGet'     { _pgProFileId :: !(Textual Int64)     , _pgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'pgId'     -> PlacementsGet placementsGet pPgProFileId_ pPgId_ =-    PlacementsGet+    PlacementsGet'     { _pgProFileId = _Coerce # pPgProFileId_     , _pgId = _Coerce # pPgId_     }@@ -88,7 +88,9 @@  instance GoogleRequest PlacementsGet where         type Rs PlacementsGet = Placement-        requestClient PlacementsGet{..}+        type Scopes PlacementsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlacementsGet'{..}           = go _pgProFileId _pgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Placements/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Placements.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'PlacementsInsert' request conforms to. type PlacementsInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "placements" :>@@ -54,7 +54,7 @@ -- | Inserts a new placement. -- -- /See:/ 'placementsInsert' smart constructor.-data PlacementsInsert = PlacementsInsert+data PlacementsInsert = PlacementsInsert'     { _piProFileId :: !(Textual Int64)     , _piPayload   :: !Placement     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Placement -- ^ 'piPayload'     -> PlacementsInsert placementsInsert pPiProFileId_ pPiPayload_ =-    PlacementsInsert+    PlacementsInsert'     { _piProFileId = _Coerce # pPiProFileId_     , _piPayload = pPiPayload_     }@@ -89,7 +89,9 @@  instance GoogleRequest PlacementsInsert where         type Rs PlacementsInsert = Placement-        requestClient PlacementsInsert{..}+        type Scopes PlacementsInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlacementsInsert'{..}           = go _piProFileId (Just AltJSON) _piPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Placements/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Placements.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -65,7 +65,7 @@ -- 'PlacementsList' request conforms to. type PlacementsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "placements" :>@@ -119,7 +119,7 @@ -- | Retrieves a list of placements, possibly filtered. -- -- /See:/ 'placementsList' smart constructor.-data PlacementsList = PlacementsList+data PlacementsList = PlacementsList'     { _pPlacementStrategyIds :: !(Maybe [Textual Int64])     , _pContentCategoryIds   :: !(Maybe [Textual Int64])     , _pMaxEndDate           :: !(Maybe Text)@@ -198,7 +198,7 @@     :: Int64 -- ^ 'pProFileId'     -> PlacementsList placementsList pPProFileId_ =-    PlacementsList+    PlacementsList'     { _pPlacementStrategyIds = Nothing     , _pContentCategoryIds = Nothing     , _pMaxEndDate = Nothing@@ -339,10 +339,11 @@   = lens _pSortField (\ s a -> s{_pSortField = a})  -- | Select only placements that are associated with these compatibilities.--- WEB and WEB_INTERSTITIAL refer to rendering either on desktop or on--- mobile devices for regular or interstitial ads respectively. APP and--- APP_INTERSTITIAL are for rendering in mobile apps.IN_STREAM_VIDEO refers--- to rendering in in-stream video ads developed with the VAST standard.+-- DISPLAY and DISPLAY_INTERSTITIAL refer to rendering either on desktop or+-- on mobile devices for regular or interstitial ads respectively. APP and+-- APP_INTERSTITIAL are for rendering in mobile apps. IN_STREAM_VIDEO+-- refers to rendering in in-stream video ads developed with the VAST+-- standard. pCompatibilities :: Lens' PlacementsList [PlacementsListCompatibilities] pCompatibilities   = lens _pCompatibilities@@ -395,7 +396,9 @@  instance GoogleRequest PlacementsList where         type Rs PlacementsList = PlacementsListResponse-        requestClient PlacementsList{..}+        type Scopes PlacementsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlacementsList'{..}           = go _pProFileId (_pPlacementStrategyIds ^. _Default)               (_pContentCategoryIds ^. _Default)               _pMaxEndDate
gen/Network/Google/Resource/DFAReporting/Placements/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Placements.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'PlacementsPatch' request conforms to. type PlacementsPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "placements" :>@@ -56,7 +56,7 @@ -- | Updates an existing placement. This method supports patch semantics. -- -- /See:/ 'placementsPatch' smart constructor.-data PlacementsPatch = PlacementsPatch+data PlacementsPatch = PlacementsPatch'     { _ppProFileId :: !(Textual Int64)     , _ppPayload   :: !Placement     , _ppId        :: !(Textual Int64)@@ -77,7 +77,7 @@     -> Int64 -- ^ 'ppId'     -> PlacementsPatch placementsPatch pPpProFileId_ pPpPayload_ pPpId_ =-    PlacementsPatch+    PlacementsPatch'     { _ppProFileId = _Coerce # pPpProFileId_     , _ppPayload = pPpPayload_     , _ppId = _Coerce # pPpId_@@ -100,7 +100,9 @@  instance GoogleRequest PlacementsPatch where         type Rs PlacementsPatch = Placement-        requestClient PlacementsPatch{..}+        type Scopes PlacementsPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlacementsPatch'{..}           = go _ppProFileId (Just _ppId) (Just AltJSON)               _ppPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/Placements/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Placements.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'PlacementsUpdate' request conforms to. type PlacementsUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "placements" :>@@ -54,7 +54,7 @@ -- | Updates an existing placement. -- -- /See:/ 'placementsUpdate' smart constructor.-data PlacementsUpdate = PlacementsUpdate+data PlacementsUpdate = PlacementsUpdate'     { _puProFileId :: !(Textual Int64)     , _puPayload   :: !Placement     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Placement -- ^ 'puPayload'     -> PlacementsUpdate placementsUpdate pPuProFileId_ pPuPayload_ =-    PlacementsUpdate+    PlacementsUpdate'     { _puProFileId = _Coerce # pPuProFileId_     , _puPayload = pPuPayload_     }@@ -89,7 +89,9 @@  instance GoogleRequest PlacementsUpdate where         type Rs PlacementsUpdate = Placement-        requestClient PlacementsUpdate{..}+        type Scopes PlacementsUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlacementsUpdate'{..}           = go _puProFileId (Just AltJSON) _puPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/PlatformTypes/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.PlatformTypes.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'PlatformTypesGet' request conforms to. type PlatformTypesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "platformTypes" :>@@ -54,7 +54,7 @@ -- | Gets one platform type by ID. -- -- /See:/ 'platformTypesGet' smart constructor.-data PlatformTypesGet = PlatformTypesGet+data PlatformTypesGet = PlatformTypesGet'     { _ptgProFileId :: !(Textual Int64)     , _ptgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'ptgId'     -> PlatformTypesGet platformTypesGet pPtgProFileId_ pPtgId_ =-    PlatformTypesGet+    PlatformTypesGet'     { _ptgProFileId = _Coerce # pPtgProFileId_     , _ptgId = _Coerce # pPtgId_     }@@ -89,7 +89,9 @@  instance GoogleRequest PlatformTypesGet where         type Rs PlatformTypesGet = PlatformType-        requestClient PlatformTypesGet{..}+        type Scopes PlatformTypesGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlatformTypesGet'{..}           = go _ptgProFileId _ptgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/PlatformTypes/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.PlatformTypes.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -43,7 +43,7 @@ -- 'PlatformTypesList' request conforms to. type PlatformTypesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "platformTypes" :>@@ -53,7 +53,7 @@ -- | Retrieves a list of platform types. -- -- /See:/ 'platformTypesList' smart constructor.-newtype PlatformTypesList = PlatformTypesList+newtype PlatformTypesList = PlatformTypesList'     { _ptlProFileId :: Textual Int64     } deriving (Eq,Show,Data,Typeable,Generic) @@ -66,7 +66,7 @@     :: Int64 -- ^ 'ptlProFileId'     -> PlatformTypesList platformTypesList pPtlProFileId_ =-    PlatformTypesList+    PlatformTypesList'     { _ptlProFileId = _Coerce # pPtlProFileId_     } @@ -78,7 +78,9 @@  instance GoogleRequest PlatformTypesList where         type Rs PlatformTypesList = PlatformTypesListResponse-        requestClient PlatformTypesList{..}+        type Scopes PlatformTypesList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PlatformTypesList'{..}           = go _ptlProFileId (Just AltJSON) dFAReportingService           where go                   = buildClient
gen/Network/Google/Resource/DFAReporting/PostalCodes/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.PostalCodes.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'PostalCodesGet' request conforms to. type PostalCodesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "postalCodes" :>@@ -54,7 +54,7 @@ -- | Gets one postal code by ID. -- -- /See:/ 'postalCodesGet' smart constructor.-data PostalCodesGet = PostalCodesGet+data PostalCodesGet = PostalCodesGet'     { _pcgProFileId :: !(Textual Int64)     , _pcgCode      :: !Text     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Text -- ^ 'pcgCode'     -> PostalCodesGet postalCodesGet pPcgProFileId_ pPcgCode_ =-    PostalCodesGet+    PostalCodesGet'     { _pcgProFileId = _Coerce # pPcgProFileId_     , _pcgCode = pPcgCode_     }@@ -88,7 +88,9 @@  instance GoogleRequest PostalCodesGet where         type Rs PostalCodesGet = PostalCode-        requestClient PostalCodesGet{..}+        type Scopes PostalCodesGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PostalCodesGet'{..}           = go _pcgProFileId _pcgCode (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/PostalCodes/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.PostalCodes.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -43,7 +43,7 @@ -- 'PostalCodesList' request conforms to. type PostalCodesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "postalCodes" :>@@ -53,7 +53,7 @@ -- | Retrieves a list of postal codes. -- -- /See:/ 'postalCodesList' smart constructor.-newtype PostalCodesList = PostalCodesList+newtype PostalCodesList = PostalCodesList'     { _pclProFileId :: Textual Int64     } deriving (Eq,Show,Data,Typeable,Generic) @@ -66,7 +66,7 @@     :: Int64 -- ^ 'pclProFileId'     -> PostalCodesList postalCodesList pPclProFileId_ =-    PostalCodesList+    PostalCodesList'     { _pclProFileId = _Coerce # pPclProFileId_     } @@ -78,7 +78,9 @@  instance GoogleRequest PostalCodesList where         type Rs PostalCodesList = PostalCodesListResponse-        requestClient PostalCodesList{..}+        type Scopes PostalCodesList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient PostalCodesList'{..}           = go _pclProFileId (Just AltJSON) dFAReportingService           where go                   = buildClient
gen/Network/Google/Resource/DFAReporting/Projects/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Projects.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'ProjectsGet' request conforms to. type ProjectsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "projects" :>@@ -54,7 +54,7 @@ -- | Gets one project by ID. -- -- /See:/ 'projectsGet' smart constructor.-data ProjectsGet = ProjectsGet+data ProjectsGet = ProjectsGet'     { _proProFileId :: !(Textual Int64)     , _proId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'proId'     -> ProjectsGet projectsGet pProProFileId_ pProId_ =-    ProjectsGet+    ProjectsGet'     { _proProFileId = _Coerce # pProProFileId_     , _proId = _Coerce # pProId_     }@@ -89,7 +89,9 @@  instance GoogleRequest ProjectsGet where         type Rs ProjectsGet = Project-        requestClient ProjectsGet{..}+        type Scopes ProjectsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient ProjectsGet'{..}           = go _proProFileId _proId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Projects/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Projects.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -50,7 +50,7 @@ -- 'ProjectsList' request conforms to. type ProjectsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "projects" :>@@ -67,7 +67,7 @@ -- | Retrieves a list of projects, possibly filtered. -- -- /See:/ 'projectsList' smart constructor.-data ProjectsList = ProjectsList+data ProjectsList = ProjectsList'     { _plSearchString  :: !(Maybe Text)     , _plIds           :: !(Maybe [Textual Int64])     , _plProFileId     :: !(Textual Int64)@@ -101,7 +101,7 @@     :: Int64 -- ^ 'plProFileId'     -> ProjectsList projectsList pPlProFileId_ =-    ProjectsList+    ProjectsList'     { _plSearchString = Nothing     , _plIds = Nothing     , _plProFileId = _Coerce # pPlProFileId_@@ -167,7 +167,9 @@  instance GoogleRequest ProjectsList where         type Rs ProjectsList = ProjectsListResponse-        requestClient ProjectsList{..}+        type Scopes ProjectsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient ProjectsList'{..}           = go _plProFileId _plSearchString               (_plIds ^. _Default)               _plSortOrder
gen/Network/Google/Resource/DFAReporting/Regions/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Regions.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -43,7 +43,7 @@ -- 'RegionsList' request conforms to. type RegionsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "regions" :>@@ -53,7 +53,7 @@ -- | Retrieves a list of regions. -- -- /See:/ 'regionsList' smart constructor.-newtype RegionsList = RegionsList+newtype RegionsList = RegionsList'     { _rProFileId :: Textual Int64     } deriving (Eq,Show,Data,Typeable,Generic) @@ -66,7 +66,7 @@     :: Int64 -- ^ 'rProFileId'     -> RegionsList regionsList pRProFileId_ =-    RegionsList+    RegionsList'     { _rProFileId = _Coerce # pRProFileId_     } @@ -78,7 +78,9 @@  instance GoogleRequest RegionsList where         type Rs RegionsList = RegionsListResponse-        requestClient RegionsList{..}+        type Scopes RegionsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient RegionsList'{..}           = go _rProFileId (Just AltJSON) dFAReportingService           where go                   = buildClient (Proxy :: Proxy RegionsListResource)
gen/Network/Google/Resource/DFAReporting/RemarketingListShares/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.RemarketingListShares.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'RemarketingListSharesGet' request conforms to. type RemarketingListSharesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "remarketingListShares" :>@@ -55,7 +55,7 @@ -- | Gets one remarketing list share by remarketing list ID. -- -- /See:/ 'remarketingListSharesGet' smart constructor.-data RemarketingListSharesGet = RemarketingListSharesGet+data RemarketingListSharesGet = RemarketingListSharesGet'     { _rlsgProFileId         :: !(Textual Int64)     , _rlsgRemarketingListId :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'rlsgRemarketingListId'     -> RemarketingListSharesGet remarketingListSharesGet pRlsgProFileId_ pRlsgRemarketingListId_ =-    RemarketingListSharesGet+    RemarketingListSharesGet'     { _rlsgProFileId = _Coerce # pRlsgProFileId_     , _rlsgRemarketingListId = _Coerce # pRlsgRemarketingListId_     }@@ -94,7 +94,9 @@ instance GoogleRequest RemarketingListSharesGet where         type Rs RemarketingListSharesGet =              RemarketingListShare-        requestClient RemarketingListSharesGet{..}+        type Scopes RemarketingListSharesGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient RemarketingListSharesGet'{..}           = go _rlsgProFileId _rlsgRemarketingListId               (Just AltJSON)               dFAReportingService
gen/Network/Google/Resource/DFAReporting/RemarketingListShares/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.RemarketingListShares.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -46,7 +46,7 @@ -- 'RemarketingListSharesPatch' request conforms to. type RemarketingListSharesPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "remarketingListShares" :>@@ -59,7 +59,7 @@ -- semantics. -- -- /See:/ 'remarketingListSharesPatch' smart constructor.-data RemarketingListSharesPatch = RemarketingListSharesPatch+data RemarketingListSharesPatch = RemarketingListSharesPatch'     { _rlspProFileId         :: !(Textual Int64)     , _rlspPayload           :: !RemarketingListShare     , _rlspRemarketingListId :: !(Textual Int64)@@ -80,7 +80,7 @@     -> Int64 -- ^ 'rlspRemarketingListId'     -> RemarketingListSharesPatch remarketingListSharesPatch pRlspProFileId_ pRlspPayload_ pRlspRemarketingListId_ =-    RemarketingListSharesPatch+    RemarketingListSharesPatch'     { _rlspProFileId = _Coerce # pRlspProFileId_     , _rlspPayload = pRlspPayload_     , _rlspRemarketingListId = _Coerce # pRlspRemarketingListId_@@ -109,7 +109,9 @@          where         type Rs RemarketingListSharesPatch =              RemarketingListShare-        requestClient RemarketingListSharesPatch{..}+        type Scopes RemarketingListSharesPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient RemarketingListSharesPatch'{..}           = go _rlspProFileId (Just _rlspRemarketingListId)               (Just AltJSON)               _rlspPayload
gen/Network/Google/Resource/DFAReporting/RemarketingListShares/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.RemarketingListShares.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'RemarketingListSharesUpdate' request conforms to. type RemarketingListSharesUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "remarketingListShares" :>@@ -55,7 +55,7 @@ -- | Updates an existing remarketing list share. -- -- /See:/ 'remarketingListSharesUpdate' smart constructor.-data RemarketingListSharesUpdate = RemarketingListSharesUpdate+data RemarketingListSharesUpdate = RemarketingListSharesUpdate'     { _rlsuProFileId :: !(Textual Int64)     , _rlsuPayload   :: !RemarketingListShare     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> RemarketingListShare -- ^ 'rlsuPayload'     -> RemarketingListSharesUpdate remarketingListSharesUpdate pRlsuProFileId_ pRlsuPayload_ =-    RemarketingListSharesUpdate+    RemarketingListSharesUpdate'     { _rlsuProFileId = _Coerce # pRlsuProFileId_     , _rlsuPayload = pRlsuPayload_     }@@ -93,7 +93,9 @@          where         type Rs RemarketingListSharesUpdate =              RemarketingListShare-        requestClient RemarketingListSharesUpdate{..}+        type Scopes RemarketingListSharesUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient RemarketingListSharesUpdate'{..}           = go _rlsuProFileId (Just AltJSON) _rlsuPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/RemarketingLists/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.RemarketingLists.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'RemarketingListsGet' request conforms to. type RemarketingListsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "remarketingLists" :>@@ -55,7 +55,7 @@ -- | Gets one remarketing list by ID. -- -- /See:/ 'remarketingListsGet' smart constructor.-data RemarketingListsGet = RemarketingListsGet+data RemarketingListsGet = RemarketingListsGet'     { _rlgProFileId :: !(Textual Int64)     , _rlgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'rlgId'     -> RemarketingListsGet remarketingListsGet pRlgProFileId_ pRlgId_ =-    RemarketingListsGet+    RemarketingListsGet'     { _rlgProFileId = _Coerce # pRlgProFileId_     , _rlgId = _Coerce # pRlgId_     }@@ -90,7 +90,9 @@  instance GoogleRequest RemarketingListsGet where         type Rs RemarketingListsGet = RemarketingList-        requestClient RemarketingListsGet{..}+        type Scopes RemarketingListsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient RemarketingListsGet'{..}           = go _rlgProFileId _rlgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/RemarketingLists/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.RemarketingLists.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'RemarketingListsInsert' request conforms to. type RemarketingListsInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "remarketingLists" :>@@ -55,7 +55,7 @@ -- | Inserts a new remarketing list. -- -- /See:/ 'remarketingListsInsert' smart constructor.-data RemarketingListsInsert = RemarketingListsInsert+data RemarketingListsInsert = RemarketingListsInsert'     { _rliProFileId :: !(Textual Int64)     , _rliPayload   :: !RemarketingList     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> RemarketingList -- ^ 'rliPayload'     -> RemarketingListsInsert remarketingListsInsert pRliProFileId_ pRliPayload_ =-    RemarketingListsInsert+    RemarketingListsInsert'     { _rliProFileId = _Coerce # pRliProFileId_     , _rliPayload = pRliPayload_     }@@ -90,7 +90,9 @@  instance GoogleRequest RemarketingListsInsert where         type Rs RemarketingListsInsert = RemarketingList-        requestClient RemarketingListsInsert{..}+        type Scopes RemarketingListsInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient RemarketingListsInsert'{..}           = go _rliProFileId (Just AltJSON) _rliPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/RemarketingLists/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.RemarketingLists.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -51,7 +51,7 @@ -- 'RemarketingListsList' request conforms to. type RemarketingListsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "remarketingLists" :>@@ -71,7 +71,7 @@ -- | Retrieves a list of remarketing lists, possibly filtered. -- -- /See:/ 'remarketingListsList' smart constructor.-data RemarketingListsList = RemarketingListsList+data RemarketingListsList = RemarketingListsList'     { _rllFloodlightActivityId :: !(Maybe (Textual Int64))     , _rllAdvertiserId         :: !(Textual Int64)     , _rllProFileId            :: !(Textual Int64)@@ -109,7 +109,7 @@     -> Int64 -- ^ 'rllProFileId'     -> RemarketingListsList remarketingListsList pRllAdvertiserId_ pRllProFileId_ =-    RemarketingListsList+    RemarketingListsList'     { _rllFloodlightActivityId = Nothing     , _rllAdvertiserId = _Coerce # pRllAdvertiserId_     , _rllProFileId = _Coerce # pRllProFileId_@@ -182,7 +182,9 @@ instance GoogleRequest RemarketingListsList where         type Rs RemarketingListsList =              RemarketingListsListResponse-        requestClient RemarketingListsList{..}+        type Scopes RemarketingListsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient RemarketingListsList'{..}           = go _rllProFileId (Just _rllAdvertiserId)               _rllFloodlightActivityId               _rllSortOrder
gen/Network/Google/Resource/DFAReporting/RemarketingLists/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.RemarketingLists.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -46,7 +46,7 @@ -- 'RemarketingListsPatch' request conforms to. type RemarketingListsPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "remarketingLists" :>@@ -59,7 +59,7 @@ -- semantics. -- -- /See:/ 'remarketingListsPatch' smart constructor.-data RemarketingListsPatch = RemarketingListsPatch+data RemarketingListsPatch = RemarketingListsPatch'     { _rlpProFileId :: !(Textual Int64)     , _rlpPayload   :: !RemarketingList     , _rlpId        :: !(Textual Int64)@@ -80,7 +80,7 @@     -> Int64 -- ^ 'rlpId'     -> RemarketingListsPatch remarketingListsPatch pRlpProFileId_ pRlpPayload_ pRlpId_ =-    RemarketingListsPatch+    RemarketingListsPatch'     { _rlpProFileId = _Coerce # pRlpProFileId_     , _rlpPayload = pRlpPayload_     , _rlpId = _Coerce # pRlpId_@@ -104,7 +104,9 @@  instance GoogleRequest RemarketingListsPatch where         type Rs RemarketingListsPatch = RemarketingList-        requestClient RemarketingListsPatch{..}+        type Scopes RemarketingListsPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient RemarketingListsPatch'{..}           = go _rlpProFileId (Just _rlpId) (Just AltJSON)               _rlpPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/RemarketingLists/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.RemarketingLists.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'RemarketingListsUpdate' request conforms to. type RemarketingListsUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "remarketingLists" :>@@ -55,7 +55,7 @@ -- | Updates an existing remarketing list. -- -- /See:/ 'remarketingListsUpdate' smart constructor.-data RemarketingListsUpdate = RemarketingListsUpdate+data RemarketingListsUpdate = RemarketingListsUpdate'     { _rluProFileId :: !(Textual Int64)     , _rluPayload   :: !RemarketingList     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> RemarketingList -- ^ 'rluPayload'     -> RemarketingListsUpdate remarketingListsUpdate pRluProFileId_ pRluPayload_ =-    RemarketingListsUpdate+    RemarketingListsUpdate'     { _rluProFileId = _Coerce # pRluProFileId_     , _rluPayload = pRluPayload_     }@@ -90,7 +90,9 @@  instance GoogleRequest RemarketingListsUpdate where         type Rs RemarketingListsUpdate = RemarketingList-        requestClient RemarketingListsUpdate{..}+        type Scopes RemarketingListsUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient RemarketingListsUpdate'{..}           = go _rluProFileId (Just AltJSON) _rluPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Reports/CompatibleFields/Query.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Reports.CompatibleFields.Query--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -46,7 +46,7 @@ -- 'ReportsCompatibleFieldsQuery' request conforms to. type ReportsCompatibleFieldsQueryResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "reports" :>@@ -61,7 +61,7 @@ -- input report and user permissions. -- -- /See:/ 'reportsCompatibleFieldsQuery' smart constructor.-data ReportsCompatibleFieldsQuery = ReportsCompatibleFieldsQuery+data ReportsCompatibleFieldsQuery = ReportsCompatibleFieldsQuery'     { _rcfqProFileId :: !(Textual Int64)     , _rcfqPayload   :: !Report     } deriving (Eq,Show,Data,Typeable,Generic)@@ -78,7 +78,7 @@     -> Report -- ^ 'rcfqPayload'     -> ReportsCompatibleFieldsQuery reportsCompatibleFieldsQuery pRcfqProFileId_ pRcfqPayload_ =-    ReportsCompatibleFieldsQuery+    ReportsCompatibleFieldsQuery'     { _rcfqProFileId = _Coerce # pRcfqProFileId_     , _rcfqPayload = pRcfqPayload_     }@@ -99,7 +99,9 @@          where         type Rs ReportsCompatibleFieldsQuery =              CompatibleFields-        requestClient ReportsCompatibleFieldsQuery{..}+        type Scopes ReportsCompatibleFieldsQuery =+             '["https://www.googleapis.com/auth/dfareporting"]+        requestClient ReportsCompatibleFieldsQuery'{..}           = go _rcfqProFileId (Just AltJSON) _rcfqPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Reports/Delete.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Reports.Delete--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'ReportsDelete' request conforms to. type ReportsDeleteResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "reports" :>@@ -54,7 +54,7 @@ -- | Deletes a report by its ID. -- -- /See:/ 'reportsDelete' smart constructor.-data ReportsDelete = ReportsDelete+data ReportsDelete = ReportsDelete'     { _rdReportId  :: !(Textual Int64)     , _rdProFileId :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'rdProFileId'     -> ReportsDelete reportsDelete pRdReportId_ pRdProFileId_ =-    ReportsDelete+    ReportsDelete'     { _rdReportId = _Coerce # pRdReportId_     , _rdProFileId = _Coerce # pRdProFileId_     }@@ -90,7 +90,9 @@  instance GoogleRequest ReportsDelete where         type Rs ReportsDelete = ()-        requestClient ReportsDelete{..}+        type Scopes ReportsDelete =+             '["https://www.googleapis.com/auth/dfareporting"]+        requestClient ReportsDelete'{..}           = go _rdProFileId _rdReportId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Reports/Files/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Reports.Files.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'ReportsFilesGet' request conforms to. type ReportsFilesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "reports" :>@@ -55,7 +55,7 @@                      QueryParam "alt" AltJSON :> Get '[JSON] File        :<|>        "dfareporting" :>-         "v2.2" :>+         "v2.5" :>            "userprofiles" :>              Capture "profileId" (Textual Int64) :>                "reports" :>@@ -68,7 +68,7 @@ -- | Retrieves a report file. -- -- /See:/ 'reportsFilesGet' smart constructor.-data ReportsFilesGet = ReportsFilesGet+data ReportsFilesGet = ReportsFilesGet'     { _rfgReportId  :: !(Textual Int64)     , _rfgProFileId :: !(Textual Int64)     , _rfgFileId    :: !(Textual Int64)@@ -89,7 +89,7 @@     -> Int64 -- ^ 'rfgFileId'     -> ReportsFilesGet reportsFilesGet pRfgReportId_ pRfgProFileId_ pRfgFileId_ =-    ReportsFilesGet+    ReportsFilesGet'     { _rfgReportId = _Coerce # pRfgReportId_     , _rfgProFileId = _Coerce # pRfgProFileId_     , _rfgFileId = _Coerce # pRfgFileId_@@ -115,7 +115,9 @@  instance GoogleRequest ReportsFilesGet where         type Rs ReportsFilesGet = File-        requestClient ReportsFilesGet{..}+        type Scopes ReportsFilesGet =+             '["https://www.googleapis.com/auth/dfareporting"]+        requestClient ReportsFilesGet'{..}           = go _rfgProFileId _rfgReportId _rfgFileId               (Just AltJSON)               dFAReportingService@@ -127,7 +129,9 @@ instance GoogleRequest          (MediaDownload ReportsFilesGet) where         type Rs (MediaDownload ReportsFilesGet) = Stream-        requestClient (MediaDownload ReportsFilesGet{..})+        type Scopes (MediaDownload ReportsFilesGet) =+             Scopes ReportsFilesGet+        requestClient (MediaDownload ReportsFilesGet'{..})           = go _rfgProFileId _rfgReportId _rfgFileId               (Just AltMedia)               dFAReportingService
gen/Network/Google/Resource/DFAReporting/Reports/Files/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Reports.Files.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -48,7 +48,7 @@ -- 'ReportsFilesList' request conforms to. type ReportsFilesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "reports" :>@@ -63,7 +63,7 @@ -- | Lists files for a report. -- -- /See:/ 'reportsFilesList' smart constructor.-data ReportsFilesList = ReportsFilesList+data ReportsFilesList = ReportsFilesList'     { _rflReportId   :: !(Textual Int64)     , _rflProFileId  :: !(Textual Int64)     , _rflSortOrder  :: !ReportsFilesListSortOrder@@ -92,7 +92,7 @@     -> Int64 -- ^ 'rflProFileId'     -> ReportsFilesList reportsFilesList pRflReportId_ pRflProFileId_ =-    ReportsFilesList+    ReportsFilesList'     { _rflReportId = _Coerce # pRflReportId_     , _rflProFileId = _Coerce # pRflProFileId_     , _rflSortOrder = RFLSODescending@@ -137,7 +137,9 @@  instance GoogleRequest ReportsFilesList where         type Rs ReportsFilesList = FileList-        requestClient ReportsFilesList{..}+        type Scopes ReportsFilesList =+             '["https://www.googleapis.com/auth/dfareporting"]+        requestClient ReportsFilesList'{..}           = go _rflProFileId _rflReportId (Just _rflSortOrder)               _rflPageToken               (Just _rflSortField)
gen/Network/Google/Resource/DFAReporting/Reports/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Reports.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'ReportsGet' request conforms to. type ReportsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "reports" :>@@ -54,7 +54,7 @@ -- | Retrieves a report by its ID. -- -- /See:/ 'reportsGet' smart constructor.-data ReportsGet = ReportsGet+data ReportsGet = ReportsGet'     { _rgReportId  :: !(Textual Int64)     , _rgProFileId :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'rgProFileId'     -> ReportsGet reportsGet pRgReportId_ pRgProFileId_ =-    ReportsGet+    ReportsGet'     { _rgReportId = _Coerce # pRgReportId_     , _rgProFileId = _Coerce # pRgProFileId_     }@@ -90,7 +90,9 @@  instance GoogleRequest ReportsGet where         type Rs ReportsGet = Report-        requestClient ReportsGet{..}+        type Scopes ReportsGet =+             '["https://www.googleapis.com/auth/dfareporting"]+        requestClient ReportsGet'{..}           = go _rgProFileId _rgReportId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Reports/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Reports.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'ReportsInsert' request conforms to. type ReportsInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "reports" :>@@ -54,7 +54,7 @@ -- | Creates a report. -- -- /See:/ 'reportsInsert' smart constructor.-data ReportsInsert = ReportsInsert+data ReportsInsert = ReportsInsert'     { _riProFileId :: !(Textual Int64)     , _riPayload   :: !Report     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Report -- ^ 'riPayload'     -> ReportsInsert reportsInsert pRiProFileId_ pRiPayload_ =-    ReportsInsert+    ReportsInsert'     { _riProFileId = _Coerce # pRiProFileId_     , _riPayload = pRiPayload_     }@@ -89,7 +89,9 @@  instance GoogleRequest ReportsInsert where         type Rs ReportsInsert = Report-        requestClient ReportsInsert{..}+        type Scopes ReportsInsert =+             '["https://www.googleapis.com/auth/dfareporting"]+        requestClient ReportsInsert'{..}           = go _riProFileId (Just AltJSON) _riPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Reports/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Reports.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -48,7 +48,7 @@ -- 'ReportsList' request conforms to. type ReportsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "reports" :>@@ -62,7 +62,7 @@ -- | Retrieves list of reports. -- -- /See:/ 'reportsList' smart constructor.-data ReportsList = ReportsList+data ReportsList = ReportsList'     { _rlProFileId  :: !(Textual Int64)     , _rlSortOrder  :: !ReportsListSortOrder     , _rlScope      :: !ReportsListScope@@ -90,7 +90,7 @@     :: Int64 -- ^ 'rlProFileId'     -> ReportsList reportsList pRlProFileId_ =-    ReportsList+    ReportsList'     { _rlProFileId = _Coerce # pRlProFileId_     , _rlSortOrder = RLSODescending     , _rlScope = Mine@@ -132,7 +132,9 @@  instance GoogleRequest ReportsList where         type Rs ReportsList = ReportList-        requestClient ReportsList{..}+        type Scopes ReportsList =+             '["https://www.googleapis.com/auth/dfareporting"]+        requestClient ReportsList'{..}           = go _rlProFileId (Just _rlSortOrder) (Just _rlScope)               _rlPageToken               (Just _rlSortField)
gen/Network/Google/Resource/DFAReporting/Reports/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Reports.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'ReportsPatch' request conforms to. type ReportsPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "reports" :>@@ -56,7 +56,7 @@ -- | Updates a report. This method supports patch semantics. -- -- /See:/ 'reportsPatch' smart constructor.-data ReportsPatch = ReportsPatch+data ReportsPatch = ReportsPatch'     { _rpReportId  :: !(Textual Int64)     , _rpProFileId :: !(Textual Int64)     , _rpPayload   :: !Report@@ -77,7 +77,7 @@     -> Report -- ^ 'rpPayload'     -> ReportsPatch reportsPatch pRpReportId_ pRpProFileId_ pRpPayload_ =-    ReportsPatch+    ReportsPatch'     { _rpReportId = _Coerce # pRpReportId_     , _rpProFileId = _Coerce # pRpProFileId_     , _rpPayload = pRpPayload_@@ -102,7 +102,9 @@  instance GoogleRequest ReportsPatch where         type Rs ReportsPatch = Report-        requestClient ReportsPatch{..}+        type Scopes ReportsPatch =+             '["https://www.googleapis.com/auth/dfareporting"]+        requestClient ReportsPatch'{..}           = go _rpProFileId _rpReportId (Just AltJSON)               _rpPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/Reports/Run.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Reports.Run--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'ReportsRun' request conforms to. type ReportsRunResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "reports" :>@@ -57,7 +57,7 @@ -- | Runs a report. -- -- /See:/ 'reportsRun' smart constructor.-data ReportsRun = ReportsRun+data ReportsRun = ReportsRun'     { _rrSynchronous :: !(Maybe Bool)     , _rrReportId    :: !(Textual Int64)     , _rrProFileId   :: !(Textual Int64)@@ -77,7 +77,7 @@     -> Int64 -- ^ 'rrProFileId'     -> ReportsRun reportsRun pRrReportId_ pRrProFileId_ =-    ReportsRun+    ReportsRun'     { _rrSynchronous = Nothing     , _rrReportId = _Coerce # pRrReportId_     , _rrProFileId = _Coerce # pRrProFileId_@@ -103,7 +103,9 @@  instance GoogleRequest ReportsRun where         type Rs ReportsRun = File-        requestClient ReportsRun{..}+        type Scopes ReportsRun =+             '["https://www.googleapis.com/auth/dfareporting"]+        requestClient ReportsRun'{..}           = go _rrProFileId _rrReportId _rrSynchronous               (Just AltJSON)               dFAReportingService
gen/Network/Google/Resource/DFAReporting/Reports/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Reports.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'ReportsUpdate' request conforms to. type ReportsUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "reports" :>@@ -56,7 +56,7 @@ -- | Updates a report. -- -- /See:/ 'reportsUpdate' smart constructor.-data ReportsUpdate = ReportsUpdate+data ReportsUpdate = ReportsUpdate'     { _ruReportId  :: !(Textual Int64)     , _ruProFileId :: !(Textual Int64)     , _ruPayload   :: !Report@@ -77,7 +77,7 @@     -> Report -- ^ 'ruPayload'     -> ReportsUpdate reportsUpdate pRuReportId_ pRuProFileId_ pRuPayload_ =-    ReportsUpdate+    ReportsUpdate'     { _ruReportId = _Coerce # pRuReportId_     , _ruProFileId = _Coerce # pRuProFileId_     , _ruPayload = pRuPayload_@@ -102,7 +102,9 @@  instance GoogleRequest ReportsUpdate where         type Rs ReportsUpdate = Report-        requestClient ReportsUpdate{..}+        type Scopes ReportsUpdate =+             '["https://www.googleapis.com/auth/dfareporting"]+        requestClient ReportsUpdate'{..}           = go _ruProFileId _ruReportId (Just AltJSON)               _ruPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/Sites/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Sites.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'SitesGet' request conforms to. type SitesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "sites" :>@@ -54,7 +54,7 @@ -- | Gets one site by ID. -- -- /See:/ 'sitesGet' smart constructor.-data SitesGet = SitesGet+data SitesGet = SitesGet'     { _sggProFileId :: !(Textual Int64)     , _sggId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'sggId'     -> SitesGet sitesGet pSggProFileId_ pSggId_ =-    SitesGet+    SitesGet'     { _sggProFileId = _Coerce # pSggProFileId_     , _sggId = _Coerce # pSggId_     }@@ -89,7 +89,9 @@  instance GoogleRequest SitesGet where         type Rs SitesGet = Site-        requestClient SitesGet{..}+        type Scopes SitesGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient SitesGet'{..}           = go _sggProFileId _sggId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Sites/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Sites.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'SitesInsert' request conforms to. type SitesInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "sites" :>@@ -54,7 +54,7 @@ -- | Inserts a new site. -- -- /See:/ 'sitesInsert' smart constructor.-data SitesInsert = SitesInsert+data SitesInsert = SitesInsert'     { _sProFileId :: !(Textual Int64)     , _sPayload   :: !Site     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Site -- ^ 'sPayload'     -> SitesInsert sitesInsert pSProFileId_ pSPayload_ =-    SitesInsert+    SitesInsert'     { _sProFileId = _Coerce # pSProFileId_     , _sPayload = pSPayload_     }@@ -88,7 +88,9 @@  instance GoogleRequest SitesInsert where         type Rs SitesInsert = Site-        requestClient SitesInsert{..}+        type Scopes SitesInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient SitesInsert'{..}           = go _sProFileId (Just AltJSON) _sPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Sites/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Sites.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -58,7 +58,7 @@ -- 'SitesList' request conforms to. type SitesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "sites" :>@@ -87,7 +87,7 @@ -- | Retrieves a list of sites, possibly filtered. -- -- /See:/ 'sitesList' smart constructor.-data SitesList = SitesList+data SitesList = SitesList'     { _sitUnmAppedSite                   :: !(Maybe Bool)     , _sitCampaignIds                    :: !(Maybe [Textual Int64])     , _sitSearchString                   :: !(Maybe Text)@@ -145,7 +145,7 @@     :: Int64 -- ^ 'sitProFileId'     -> SitesList sitesList pSitProFileId_ =-    SitesList+    SitesList'     { _sitUnmAppedSite = Nothing     , _sitCampaignIds = Nothing     , _sitSearchString = Nothing@@ -271,7 +271,9 @@  instance GoogleRequest SitesList where         type Rs SitesList = SitesListResponse-        requestClient SitesList{..}+        type Scopes SitesList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient SitesList'{..}           = go _sitProFileId _sitUnmAppedSite               (_sitCampaignIds ^. _Default)               _sitSearchString
gen/Network/Google/Resource/DFAReporting/Sites/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Sites.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'SitesPatch' request conforms to. type SitesPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "sites" :>@@ -56,7 +56,7 @@ -- | Updates an existing site. This method supports patch semantics. -- -- /See:/ 'sitesPatch' smart constructor.-data SitesPatch = SitesPatch+data SitesPatch = SitesPatch'     { _spProFileId :: !(Textual Int64)     , _spPayload   :: !Site     , _spId        :: !(Textual Int64)@@ -77,7 +77,7 @@     -> Int64 -- ^ 'spId'     -> SitesPatch sitesPatch pSpProFileId_ pSpPayload_ pSpId_ =-    SitesPatch+    SitesPatch'     { _spProFileId = _Coerce # pSpProFileId_     , _spPayload = pSpPayload_     , _spId = _Coerce # pSpId_@@ -100,7 +100,9 @@  instance GoogleRequest SitesPatch where         type Rs SitesPatch = Site-        requestClient SitesPatch{..}+        type Scopes SitesPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient SitesPatch'{..}           = go _spProFileId (Just _spId) (Just AltJSON)               _spPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/Sites/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Sites.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'SitesUpdate' request conforms to. type SitesUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "sites" :>@@ -54,7 +54,7 @@ -- | Updates an existing site. -- -- /See:/ 'sitesUpdate' smart constructor.-data SitesUpdate = SitesUpdate+data SitesUpdate = SitesUpdate'     { _suProFileId :: !(Textual Int64)     , _suPayload   :: !Site     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Site -- ^ 'suPayload'     -> SitesUpdate sitesUpdate pSuProFileId_ pSuPayload_ =-    SitesUpdate+    SitesUpdate'     { _suProFileId = _Coerce # pSuProFileId_     , _suPayload = pSuPayload_     }@@ -89,7 +89,9 @@  instance GoogleRequest SitesUpdate where         type Rs SitesUpdate = Site-        requestClient SitesUpdate{..}+        type Scopes SitesUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient SitesUpdate'{..}           = go _suProFileId (Just AltJSON) _suPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Sizes/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Sizes.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'SizesGet' request conforms to. type SizesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "sizes" :>@@ -54,7 +54,7 @@ -- | Gets one size by ID. -- -- /See:/ 'sizesGet' smart constructor.-data SizesGet = SizesGet+data SizesGet = SizesGet'     { _sgProFileId :: !(Textual Int64)     , _sgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'sgId'     -> SizesGet sizesGet pSgProFileId_ pSgId_ =-    SizesGet+    SizesGet'     { _sgProFileId = _Coerce # pSgProFileId_     , _sgId = _Coerce # pSgId_     }@@ -88,7 +88,9 @@  instance GoogleRequest SizesGet where         type Rs SizesGet = Size-        requestClient SizesGet{..}+        type Scopes SizesGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient SizesGet'{..}           = go _sgProFileId _sgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Sizes/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Sizes.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'SizesInsert' request conforms to. type SizesInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "sizes" :>@@ -54,7 +54,7 @@ -- | Inserts a new size. -- -- /See:/ 'sizesInsert' smart constructor.-data SizesInsert = SizesInsert+data SizesInsert = SizesInsert'     { _siProFileId :: !(Textual Int64)     , _siPayload   :: !Size     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Size -- ^ 'siPayload'     -> SizesInsert sizesInsert pSiProFileId_ pSiPayload_ =-    SizesInsert+    SizesInsert'     { _siProFileId = _Coerce # pSiProFileId_     , _siPayload = pSiPayload_     }@@ -89,7 +89,9 @@  instance GoogleRequest SizesInsert where         type Rs SizesInsert = Size-        requestClient SizesInsert{..}+        type Scopes SizesInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient SizesInsert'{..}           = go _siProFileId (Just AltJSON) _siPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/Sizes/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.Sizes.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -47,7 +47,7 @@ -- 'SizesList' request conforms to. type SizesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "sizes" :>@@ -61,7 +61,7 @@ -- | Retrieves a list of sizes, possibly filtered. -- -- /See:/ 'sizesList' smart constructor.-data SizesList = SizesList+data SizesList = SizesList'     { _slHeight      :: !(Maybe (Textual Int32))     , _slIds         :: !(Maybe [Textual Int64])     , _slWidth       :: !(Maybe (Textual Int32))@@ -86,7 +86,7 @@     :: Int64 -- ^ 'slProFileId'     -> SizesList sizesList pSlProFileId_ =-    SizesList+    SizesList'     { _slHeight = Nothing     , _slIds = Nothing     , _slWidth = Nothing@@ -126,7 +126,9 @@  instance GoogleRequest SizesList where         type Rs SizesList = SizesListResponse-        requestClient SizesList{..}+        type Scopes SizesList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient SizesList'{..}           = go _slProFileId _slHeight (_slIds ^. _Default)               _slWidth               _slIabStandard
gen/Network/Google/Resource/DFAReporting/SubAccounts/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.SubAccounts.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'SubAccountsGet' request conforms to. type SubAccountsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "subaccounts" :>@@ -54,7 +54,7 @@ -- | Gets one subaccount by ID. -- -- /See:/ 'subAccountsGet' smart constructor.-data SubAccountsGet = SubAccountsGet+data SubAccountsGet = SubAccountsGet'     { _sagProFileId :: !(Textual Int64)     , _sagId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'sagId'     -> SubAccountsGet subAccountsGet pSagProFileId_ pSagId_ =-    SubAccountsGet+    SubAccountsGet'     { _sagProFileId = _Coerce # pSagProFileId_     , _sagId = _Coerce # pSagId_     }@@ -89,7 +89,9 @@  instance GoogleRequest SubAccountsGet where         type Rs SubAccountsGet = SubAccount-        requestClient SubAccountsGet{..}+        type Scopes SubAccountsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient SubAccountsGet'{..}           = go _sagProFileId _sagId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/SubAccounts/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.SubAccounts.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'SubAccountsInsert' request conforms to. type SubAccountsInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "subaccounts" :>@@ -54,7 +54,7 @@ -- | Inserts a new subaccount. -- -- /See:/ 'subAccountsInsert' smart constructor.-data SubAccountsInsert = SubAccountsInsert+data SubAccountsInsert = SubAccountsInsert'     { _saiProFileId :: !(Textual Int64)     , _saiPayload   :: !SubAccount     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> SubAccount -- ^ 'saiPayload'     -> SubAccountsInsert subAccountsInsert pSaiProFileId_ pSaiPayload_ =-    SubAccountsInsert+    SubAccountsInsert'     { _saiProFileId = _Coerce # pSaiProFileId_     , _saiPayload = pSaiPayload_     }@@ -89,7 +89,9 @@  instance GoogleRequest SubAccountsInsert where         type Rs SubAccountsInsert = SubAccount-        requestClient SubAccountsInsert{..}+        type Scopes SubAccountsInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient SubAccountsInsert'{..}           = go _saiProFileId (Just AltJSON) _saiPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/SubAccounts/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.SubAccounts.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -49,7 +49,7 @@ -- 'SubAccountsList' request conforms to. type SubAccountsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "subaccounts" :>@@ -65,7 +65,7 @@ -- | Gets a list of subaccounts, possibly filtered. -- -- /See:/ 'subAccountsList' smart constructor.-data SubAccountsList = SubAccountsList+data SubAccountsList = SubAccountsList'     { _salSearchString :: !(Maybe Text)     , _salIds          :: !(Maybe [Textual Int64])     , _salProFileId    :: !(Textual Int64)@@ -96,7 +96,7 @@     :: Int64 -- ^ 'salProFileId'     -> SubAccountsList subAccountsList pSalProFileId_ =-    SubAccountsList+    SubAccountsList'     { _salSearchString = Nothing     , _salIds = Nothing     , _salProFileId = _Coerce # pSalProFileId_@@ -154,7 +154,9 @@  instance GoogleRequest SubAccountsList where         type Rs SubAccountsList = SubAccountsListResponse-        requestClient SubAccountsList{..}+        type Scopes SubAccountsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient SubAccountsList'{..}           = go _salProFileId _salSearchString               (_salIds ^. _Default)               _salSortOrder
gen/Network/Google/Resource/DFAReporting/SubAccounts/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.SubAccounts.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'SubAccountsPatch' request conforms to. type SubAccountsPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "subaccounts" :>@@ -57,7 +57,7 @@ -- | Updates an existing subaccount. This method supports patch semantics. -- -- /See:/ 'subAccountsPatch' smart constructor.-data SubAccountsPatch = SubAccountsPatch+data SubAccountsPatch = SubAccountsPatch'     { _sapProFileId :: !(Textual Int64)     , _sapPayload   :: !SubAccount     , _sapId        :: !(Textual Int64)@@ -78,7 +78,7 @@     -> Int64 -- ^ 'sapId'     -> SubAccountsPatch subAccountsPatch pSapProFileId_ pSapPayload_ pSapId_ =-    SubAccountsPatch+    SubAccountsPatch'     { _sapProFileId = _Coerce # pSapProFileId_     , _sapPayload = pSapPayload_     , _sapId = _Coerce # pSapId_@@ -102,7 +102,9 @@  instance GoogleRequest SubAccountsPatch where         type Rs SubAccountsPatch = SubAccount-        requestClient SubAccountsPatch{..}+        type Scopes SubAccountsPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient SubAccountsPatch'{..}           = go _sapProFileId (Just _sapId) (Just AltJSON)               _sapPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/SubAccounts/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.SubAccounts.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'SubAccountsUpdate' request conforms to. type SubAccountsUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "subaccounts" :>@@ -54,7 +54,7 @@ -- | Updates an existing subaccount. -- -- /See:/ 'subAccountsUpdate' smart constructor.-data SubAccountsUpdate = SubAccountsUpdate+data SubAccountsUpdate = SubAccountsUpdate'     { _sauProFileId :: !(Textual Int64)     , _sauPayload   :: !SubAccount     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> SubAccount -- ^ 'sauPayload'     -> SubAccountsUpdate subAccountsUpdate pSauProFileId_ pSauPayload_ =-    SubAccountsUpdate+    SubAccountsUpdate'     { _sauProFileId = _Coerce # pSauProFileId_     , _sauPayload = pSauPayload_     }@@ -89,7 +89,9 @@  instance GoogleRequest SubAccountsUpdate where         type Rs SubAccountsUpdate = SubAccount-        requestClient SubAccountsUpdate{..}+        type Scopes SubAccountsUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient SubAccountsUpdate'{..}           = go _sauProFileId (Just AltJSON) _sauPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/TargetableRemarketingLists/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.TargetableRemarketingLists.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'TargetableRemarketingListsGet' request conforms to. type TargetableRemarketingListsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "targetableRemarketingLists" :>@@ -55,7 +55,7 @@ -- | Gets one remarketing list by ID. -- -- /See:/ 'targetableRemarketingListsGet' smart constructor.-data TargetableRemarketingListsGet = TargetableRemarketingListsGet+data TargetableRemarketingListsGet = TargetableRemarketingListsGet'     { _trlgProFileId :: !(Textual Int64)     , _trlgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'trlgId'     -> TargetableRemarketingListsGet targetableRemarketingListsGet pTrlgProFileId_ pTrlgId_ =-    TargetableRemarketingListsGet+    TargetableRemarketingListsGet'     { _trlgProFileId = _Coerce # pTrlgProFileId_     , _trlgId = _Coerce # pTrlgId_     }@@ -93,7 +93,9 @@          where         type Rs TargetableRemarketingListsGet =              TargetableRemarketingList-        requestClient TargetableRemarketingListsGet{..}+        type Scopes TargetableRemarketingListsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient TargetableRemarketingListsGet'{..}           = go _trlgProFileId _trlgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/TargetableRemarketingLists/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.TargetableRemarketingLists.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -50,7 +50,7 @@ -- 'TargetableRemarketingListsList' request conforms to. type TargetableRemarketingListsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "targetableRemarketingLists" :>@@ -72,7 +72,7 @@ -- | Retrieves a list of targetable remarketing lists, possibly filtered. -- -- /See:/ 'targetableRemarketingListsList' smart constructor.-data TargetableRemarketingListsList = TargetableRemarketingListsList+data TargetableRemarketingListsList = TargetableRemarketingListsList'     { _trllAdvertiserId :: !(Textual Int64)     , _trllProFileId    :: !(Textual Int64)     , _trllSortOrder    :: !(Maybe TargetableRemarketingListsListSortOrder)@@ -107,7 +107,7 @@     -> Int64 -- ^ 'trllProFileId'     -> TargetableRemarketingListsList targetableRemarketingListsList pTrllAdvertiserId_ pTrllProFileId_ =-    TargetableRemarketingListsList+    TargetableRemarketingListsList'     { _trllAdvertiserId = _Coerce # pTrllAdvertiserId_     , _trllProFileId = _Coerce # pTrllProFileId_     , _trllSortOrder = Nothing@@ -178,7 +178,9 @@          where         type Rs TargetableRemarketingListsList =              TargetableRemarketingListsListResponse-        requestClient TargetableRemarketingListsList{..}+        type Scopes TargetableRemarketingListsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient TargetableRemarketingListsList'{..}           = go _trllProFileId (Just _trllAdvertiserId)               _trllSortOrder               _trllActive
gen/Network/Google/Resource/DFAReporting/UserProFiles/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.UserProFiles.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -43,7 +43,7 @@ -- 'UserProFilesGet' request conforms to. type UserProFilesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              QueryParam "alt" AltJSON :> Get '[JSON] UserProFile@@ -51,7 +51,7 @@ -- | Gets one user profile by ID. -- -- /See:/ 'userProFilesGet' smart constructor.-newtype UserProFilesGet = UserProFilesGet+newtype UserProFilesGet = UserProFilesGet'     { _upfgProFileId :: Textual Int64     } deriving (Eq,Show,Data,Typeable,Generic) @@ -64,7 +64,7 @@     :: Int64 -- ^ 'upfgProFileId'     -> UserProFilesGet userProFilesGet pUpfgProFileId_ =-    UserProFilesGet+    UserProFilesGet'     { _upfgProFileId = _Coerce # pUpfgProFileId_     } @@ -77,7 +77,10 @@  instance GoogleRequest UserProFilesGet where         type Rs UserProFilesGet = UserProFile-        requestClient UserProFilesGet{..}+        type Scopes UserProFilesGet =+             '["https://www.googleapis.com/auth/dfareporting",+               "https://www.googleapis.com/auth/dfatrafficking"]+        requestClient UserProFilesGet'{..}           = go _upfgProFileId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/UserProFiles/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.UserProFiles.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -41,7 +41,7 @@ -- 'UserProFilesList' request conforms to. type UserProFilesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            QueryParam "alt" AltJSON :>              Get '[JSON] UserProFileList@@ -50,18 +50,21 @@ -- -- /See:/ 'userProFilesList' smart constructor. data UserProFilesList =-    UserProFilesList+    UserProFilesList'     deriving (Eq,Show,Data,Typeable,Generic)  -- | Creates a value of 'UserProFilesList' with the minimum fields required to make a request. -- userProFilesList     :: UserProFilesList-userProFilesList = UserProFilesList+userProFilesList = UserProFilesList'  instance GoogleRequest UserProFilesList where         type Rs UserProFilesList = UserProFileList-        requestClient UserProFilesList{}+        type Scopes UserProFilesList =+             '["https://www.googleapis.com/auth/dfareporting",+               "https://www.googleapis.com/auth/dfatrafficking"]+        requestClient UserProFilesList'{}           = go (Just AltJSON) dFAReportingService           where go                   = buildClient
gen/Network/Google/Resource/DFAReporting/UserRolePermissionGroups/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.UserRolePermissionGroups.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'UserRolePermissionGroupsGet' request conforms to. type UserRolePermissionGroupsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "userRolePermissionGroups" :>@@ -55,7 +55,7 @@ -- | Gets one user role permission group by ID. -- -- /See:/ 'userRolePermissionGroupsGet' smart constructor.-data UserRolePermissionGroupsGet = UserRolePermissionGroupsGet+data UserRolePermissionGroupsGet = UserRolePermissionGroupsGet'     { _urpggProFileId :: !(Textual Int64)     , _urpggId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'urpggId'     -> UserRolePermissionGroupsGet userRolePermissionGroupsGet pUrpggProFileId_ pUrpggId_ =-    UserRolePermissionGroupsGet+    UserRolePermissionGroupsGet'     { _urpggProFileId = _Coerce # pUrpggProFileId_     , _urpggId = _Coerce # pUrpggId_     }@@ -93,7 +93,9 @@          where         type Rs UserRolePermissionGroupsGet =              UserRolePermissionGroup-        requestClient UserRolePermissionGroupsGet{..}+        type Scopes UserRolePermissionGroupsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient UserRolePermissionGroupsGet'{..}           = go _urpggProFileId _urpggId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/UserRolePermissionGroups/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.UserRolePermissionGroups.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -43,7 +43,7 @@ -- 'UserRolePermissionGroupsList' request conforms to. type UserRolePermissionGroupsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "userRolePermissionGroups" :>@@ -53,7 +53,7 @@ -- | Gets a list of all supported user role permission groups. -- -- /See:/ 'userRolePermissionGroupsList' smart constructor.-newtype UserRolePermissionGroupsList = UserRolePermissionGroupsList+newtype UserRolePermissionGroupsList = UserRolePermissionGroupsList'     { _urpglProFileId :: Textual Int64     } deriving (Eq,Show,Data,Typeable,Generic) @@ -66,7 +66,7 @@     :: Int64 -- ^ 'urpglProFileId'     -> UserRolePermissionGroupsList userRolePermissionGroupsList pUrpglProFileId_ =-    UserRolePermissionGroupsList+    UserRolePermissionGroupsList'     { _urpglProFileId = _Coerce # pUrpglProFileId_     } @@ -81,7 +81,9 @@          where         type Rs UserRolePermissionGroupsList =              UserRolePermissionGroupsListResponse-        requestClient UserRolePermissionGroupsList{..}+        type Scopes UserRolePermissionGroupsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient UserRolePermissionGroupsList'{..}           = go _urpglProFileId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/UserRolePermissions/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.UserRolePermissions.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'UserRolePermissionsGet' request conforms to. type UserRolePermissionsGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "userRolePermissions" :>@@ -55,7 +55,7 @@ -- | Gets one user role permission by ID. -- -- /See:/ 'userRolePermissionsGet' smart constructor.-data UserRolePermissionsGet = UserRolePermissionsGet+data UserRolePermissionsGet = UserRolePermissionsGet'     { _uProFileId :: !(Textual Int64)     , _uId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -72,7 +72,7 @@     -> Int64 -- ^ 'uId'     -> UserRolePermissionsGet userRolePermissionsGet pUProFileId_ pUId_ =-    UserRolePermissionsGet+    UserRolePermissionsGet'     { _uProFileId = _Coerce # pUProFileId_     , _uId = _Coerce # pUId_     }@@ -89,7 +89,9 @@  instance GoogleRequest UserRolePermissionsGet where         type Rs UserRolePermissionsGet = UserRolePermission-        requestClient UserRolePermissionsGet{..}+        type Scopes UserRolePermissionsGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient UserRolePermissionsGet'{..}           = go _uProFileId _uId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/UserRolePermissions/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.UserRolePermissions.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'UserRolePermissionsList' request conforms to. type UserRolePermissionsListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "userRolePermissions" :>@@ -55,7 +55,7 @@ -- | Gets a list of user role permissions, possibly filtered. -- -- /See:/ 'userRolePermissionsList' smart constructor.-data UserRolePermissionsList = UserRolePermissionsList+data UserRolePermissionsList = UserRolePermissionsList'     { _urplIds       :: !(Maybe [Textual Int64])     , _urplProFileId :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     :: Int64 -- ^ 'urplProFileId'     -> UserRolePermissionsList userRolePermissionsList pUrplProFileId_ =-    UserRolePermissionsList+    UserRolePermissionsList'     { _urplIds = Nothing     , _urplProFileId = _Coerce # pUrplProFileId_     }@@ -92,7 +92,9 @@ instance GoogleRequest UserRolePermissionsList where         type Rs UserRolePermissionsList =              UserRolePermissionsListResponse-        requestClient UserRolePermissionsList{..}+        type Scopes UserRolePermissionsList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient UserRolePermissionsList'{..}           = go _urplProFileId (_urplIds ^. _Default)               (Just AltJSON)               dFAReportingService
gen/Network/Google/Resource/DFAReporting/UserRoles/Delete.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.UserRoles.Delete--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'UserRolesDelete' request conforms to. type UserRolesDeleteResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "userRoles" :>@@ -54,7 +54,7 @@ -- | Deletes an existing user role. -- -- /See:/ 'userRolesDelete' smart constructor.-data UserRolesDelete = UserRolesDelete+data UserRolesDelete = UserRolesDelete'     { _urdProFileId :: !(Textual Int64)     , _urdId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'urdId'     -> UserRolesDelete userRolesDelete pUrdProFileId_ pUrdId_ =-    UserRolesDelete+    UserRolesDelete'     { _urdProFileId = _Coerce # pUrdProFileId_     , _urdId = _Coerce # pUrdId_     }@@ -89,7 +89,9 @@  instance GoogleRequest UserRolesDelete where         type Rs UserRolesDelete = ()-        requestClient UserRolesDelete{..}+        type Scopes UserRolesDelete =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient UserRolesDelete'{..}           = go _urdProFileId _urdId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/UserRoles/Get.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.UserRoles.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'UserRolesGet' request conforms to. type UserRolesGetResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "userRoles" :>@@ -54,7 +54,7 @@ -- | Gets one user role by ID. -- -- /See:/ 'userRolesGet' smart constructor.-data UserRolesGet = UserRolesGet+data UserRolesGet = UserRolesGet'     { _urgProFileId :: !(Textual Int64)     , _urgId        :: !(Textual Int64)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> Int64 -- ^ 'urgId'     -> UserRolesGet userRolesGet pUrgProFileId_ pUrgId_ =-    UserRolesGet+    UserRolesGet'     { _urgProFileId = _Coerce # pUrgProFileId_     , _urgId = _Coerce # pUrgId_     }@@ -89,7 +89,9 @@  instance GoogleRequest UserRolesGet where         type Rs UserRolesGet = UserRole-        requestClient UserRolesGet{..}+        type Scopes UserRolesGet =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient UserRolesGet'{..}           = go _urgProFileId _urgId (Just AltJSON)               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/UserRoles/Insert.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.UserRoles.Insert--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'UserRolesInsert' request conforms to. type UserRolesInsertResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "userRoles" :>@@ -54,7 +54,7 @@ -- | Inserts a new user role. -- -- /See:/ 'userRolesInsert' smart constructor.-data UserRolesInsert = UserRolesInsert+data UserRolesInsert = UserRolesInsert'     { _uriProFileId :: !(Textual Int64)     , _uriPayload   :: !UserRole     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> UserRole -- ^ 'uriPayload'     -> UserRolesInsert userRolesInsert pUriProFileId_ pUriPayload_ =-    UserRolesInsert+    UserRolesInsert'     { _uriProFileId = _Coerce # pUriProFileId_     , _uriPayload = pUriPayload_     }@@ -89,7 +89,9 @@  instance GoogleRequest UserRolesInsert where         type Rs UserRolesInsert = UserRole-        requestClient UserRolesInsert{..}+        type Scopes UserRolesInsert =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient UserRolesInsert'{..}           = go _uriProFileId (Just AltJSON) _uriPayload               dFAReportingService           where go
gen/Network/Google/Resource/DFAReporting/UserRoles/List.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.UserRoles.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -51,7 +51,7 @@ -- 'UserRolesList' request conforms to. type UserRolesListResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "userRoles" :>@@ -69,7 +69,7 @@ -- | Retrieves a list of user roles, possibly filtered. -- -- /See:/ 'userRolesList' smart constructor.-data UserRolesList = UserRolesList+data UserRolesList = UserRolesList'     { _urlSearchString        :: !(Maybe Text)     , _urlIds                 :: !(Maybe [Textual Int64])     , _urlProFileId           :: !(Textual Int64)@@ -106,7 +106,7 @@     :: Int64 -- ^ 'urlProFileId'     -> UserRolesList userRolesList pUrlProFileId_ =-    UserRolesList+    UserRolesList'     { _urlSearchString = Nothing     , _urlIds = Nothing     , _urlProFileId = _Coerce # pUrlProFileId_@@ -180,7 +180,9 @@  instance GoogleRequest UserRolesList where         type Rs UserRolesList = UserRolesListResponse-        requestClient UserRolesList{..}+        type Scopes UserRolesList =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient UserRolesList'{..}           = go _urlProFileId _urlSearchString               (_urlIds ^. _Default)               _urlSortOrder
gen/Network/Google/Resource/DFAReporting/UserRoles/Patch.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.UserRoles.Patch--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -45,7 +45,7 @@ -- 'UserRolesPatch' request conforms to. type UserRolesPatchResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "userRoles" :>@@ -56,7 +56,7 @@ -- | Updates an existing user role. This method supports patch semantics. -- -- /See:/ 'userRolesPatch' smart constructor.-data UserRolesPatch = UserRolesPatch+data UserRolesPatch = UserRolesPatch'     { _urpProFileId :: !(Textual Int64)     , _urpPayload   :: !UserRole     , _urpId        :: !(Textual Int64)@@ -77,7 +77,7 @@     -> Int64 -- ^ 'urpId'     -> UserRolesPatch userRolesPatch pUrpProFileId_ pUrpPayload_ pUrpId_ =-    UserRolesPatch+    UserRolesPatch'     { _urpProFileId = _Coerce # pUrpProFileId_     , _urpPayload = pUrpPayload_     , _urpId = _Coerce # pUrpId_@@ -101,7 +101,9 @@  instance GoogleRequest UserRolesPatch where         type Rs UserRolesPatch = UserRole-        requestClient UserRolesPatch{..}+        type Scopes UserRolesPatch =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient UserRolesPatch'{..}           = go _urpProFileId (Just _urpId) (Just AltJSON)               _urpPayload               dFAReportingService
gen/Network/Google/Resource/DFAReporting/UserRoles/Update.hs view
@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.DFAReporting.UserRoles.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -44,7 +44,7 @@ -- 'UserRolesUpdate' request conforms to. type UserRolesUpdateResource =      "dfareporting" :>-       "v2.2" :>+       "v2.5" :>          "userprofiles" :>            Capture "profileId" (Textual Int64) :>              "userRoles" :>@@ -54,7 +54,7 @@ -- | Updates an existing user role. -- -- /See:/ 'userRolesUpdate' smart constructor.-data UserRolesUpdate = UserRolesUpdate+data UserRolesUpdate = UserRolesUpdate'     { _uruProFileId :: !(Textual Int64)     , _uruPayload   :: !UserRole     } deriving (Eq,Show,Data,Typeable,Generic)@@ -71,7 +71,7 @@     -> UserRole -- ^ 'uruPayload'     -> UserRolesUpdate userRolesUpdate pUruProFileId_ pUruPayload_ =-    UserRolesUpdate+    UserRolesUpdate'     { _uruProFileId = _Coerce # pUruProFileId_     , _uruPayload = pUruPayload_     }@@ -89,7 +89,9 @@  instance GoogleRequest UserRolesUpdate where         type Rs UserRolesUpdate = UserRole-        requestClient UserRolesUpdate{..}+        type Scopes UserRolesUpdate =+             '["https://www.googleapis.com/auth/dfatrafficking"]+        requestClient UserRolesUpdate'{..}           = go _uruProFileId (Just AltJSON) _uruPayload               dFAReportingService           where go
gogol-dfareporting.cabal view
@@ -1,5 +1,5 @@ name:                  gogol-dfareporting-version:               0.0.1+version:               0.1.0 synopsis:              Google DCM/DFA Reporting And Trafficking SDK. homepage:              https://github.com/brendanhay/gogol bug-reports:           https://github.com/brendanhay/gogol/issues@@ -7,19 +7,19 @@ license-file:          LICENSE author:                Brendan Hay maintainer:            Brendan Hay <brendan.g.hay@gmail.com>-copyright:             Copyright (c) 2015 Brendan Hay+copyright:             Copyright (c) 2015-2016 Brendan Hay category:              Network, Google, Cloud build-type:            Simple cabal-version:         >= 1.10 extra-source-files:    README.md  description:-    Manage your DoubleClick Campaign Manager ad campaigns and reports.+    Manages your DoubleClick Campaign Manager ad campaigns and 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 @v2.2@+    This library is compatible with version @v2.5@     of the API.  source-repository head@@ -84,6 +84,7 @@         , Network.Google.Resource.DFAReporting.ContentCategories.List         , Network.Google.Resource.DFAReporting.ContentCategories.Patch         , Network.Google.Resource.DFAReporting.ContentCategories.Update+        , Network.Google.Resource.DFAReporting.Conversions.Batchinsert         , Network.Google.Resource.DFAReporting.Countries.Get         , Network.Google.Resource.DFAReporting.Countries.List         , Network.Google.Resource.DFAReporting.CreativeAssets.Insert@@ -115,6 +116,9 @@         , Network.Google.Resource.DFAReporting.DirectorySites.Get         , Network.Google.Resource.DFAReporting.DirectorySites.Insert         , Network.Google.Resource.DFAReporting.DirectorySites.List+        , Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Delete+        , Network.Google.Resource.DFAReporting.DynamicTargetingKeys.Insert+        , Network.Google.Resource.DFAReporting.DynamicTargetingKeys.List         , Network.Google.Resource.DFAReporting.EventTags.Delete         , Network.Google.Resource.DFAReporting.EventTags.Get         , Network.Google.Resource.DFAReporting.EventTags.Insert@@ -130,7 +134,6 @@         , Network.Google.Resource.DFAReporting.FloodlightActivities.List         , Network.Google.Resource.DFAReporting.FloodlightActivities.Patch         , Network.Google.Resource.DFAReporting.FloodlightActivities.Update-        , Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Delete         , Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Get         , Network.Google.Resource.DFAReporting.FloodlightActivityGroups.Insert         , Network.Google.Resource.DFAReporting.FloodlightActivityGroups.List@@ -234,5 +237,5 @@         , Network.Google.DFAReporting.Types.Sum      build-depends:-          gogol-core == 0.0.1.*+          gogol-core == 0.1.0.*         , base       >= 4.7 && < 5