packages feed

gogol-adexchange-buyer 0.4.0 → 0.5.0

raw patch · 42 files changed

+872/−549 lines, 42 filesdep ~gogol-corePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: gogol-core

API changes (from Hackage documentation)

Files

README.md view
@@ -8,7 +8,7 @@  ## Version -`0.3.0`+`0.5.0`   ## Description
gen/Network/Google/AdExchangeBuyer/Types.hs view
@@ -759,4 +759,4 @@  -- | Manage your Ad Exchange buyer account configuration adExchangeBuyerScope :: Proxy '["https://www.googleapis.com/auth/adexchange.buyer"]-adExchangeBuyerScope = Proxy;+adExchangeBuyerScope = Proxy
gen/Network/Google/AdExchangeBuyer/Types/Product.hs view
@@ -24,7 +24,8 @@ -- associated with a deal and\/or revision number. -- -- /See:/ 'marketplaceNote' smart constructor.-data MarketplaceNote = MarketplaceNote'+data MarketplaceNote =+  MarketplaceNote'     { _mnNote                   :: !(Maybe Text)     , _mnKind                   :: !Text     , _mnTimestampMs            :: !(Maybe (Textual Int64))@@ -33,8 +34,10 @@     , _mnProposalRevisionNumber :: !(Maybe (Textual Int64))     , _mnNoteId                 :: !(Maybe Text)     , _mnCreatorRole            :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'MarketplaceNote' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -57,7 +60,7 @@ marketplaceNote     :: MarketplaceNote marketplaceNote =-    MarketplaceNote'+  MarketplaceNote'     { _mnNote = Nothing     , _mnKind = "adexchangebuyer#marketplaceNote"     , _mnTimestampMs = Nothing@@ -68,6 +71,7 @@     , _mnCreatorRole = Nothing     } + -- | The actual note to attach. (readonly, except on create) mnNote :: Lens' MarketplaceNote (Maybe Text) mnNote = lens _mnNote (\ s a -> s{_mnNote = a})@@ -144,7 +148,8 @@ -- set.) -- -- /See:/ 'creativeNATiveAd' smart constructor.-data CreativeNATiveAd = CreativeNATiveAd'+data CreativeNATiveAd =+  CreativeNATiveAd'     { _cnataImage                 :: !(Maybe CreativeNATiveAdImage)     , _cnataAppIcon               :: !(Maybe CreativeNATiveAdAppIcon)     , _cnataClickTrackingURL      :: !(Maybe Text)@@ -159,8 +164,10 @@     , _cnataAdvertiser            :: !(Maybe Text)     , _cnataStarRating            :: !(Maybe (Textual Double))     , _cnataLogo                  :: !(Maybe CreativeNATiveAdLogo)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativeNATiveAd' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -195,7 +202,7 @@ creativeNATiveAd     :: CreativeNATiveAd creativeNATiveAd =-    CreativeNATiveAd'+  CreativeNATiveAd'     { _cnataImage = Nothing     , _cnataAppIcon = Nothing     , _cnataClickTrackingURL = Nothing@@ -212,6 +219,7 @@     , _cnataLogo = Nothing     } + -- | A large image. cnataImage :: Lens' CreativeNATiveAd (Maybe CreativeNATiveAdImage) cnataImage@@ -334,11 +342,14 @@  -- -- /See:/ 'editAllOrderDealsResponse' smart constructor.-data EditAllOrderDealsResponse = EditAllOrderDealsResponse'+data EditAllOrderDealsResponse =+  EditAllOrderDealsResponse'     { _eaodrDeals               :: !(Maybe [MarketplaceDeal])     , _eaodrOrderRevisionNumber :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'EditAllOrderDealsResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -349,11 +360,10 @@ editAllOrderDealsResponse     :: EditAllOrderDealsResponse editAllOrderDealsResponse =-    EditAllOrderDealsResponse'-    { _eaodrDeals = Nothing-    , _eaodrOrderRevisionNumber = Nothing-    }+  EditAllOrderDealsResponse'+    {_eaodrDeals = Nothing, _eaodrOrderRevisionNumber = Nothing} + -- | List of all deals in the proposal after edit. eaodrDeals :: Lens' EditAllOrderDealsResponse [MarketplaceDeal] eaodrDeals@@ -386,10 +396,13 @@  -- -- /See:/ 'targetingValueDemogGenderCriteria' smart constructor.-newtype TargetingValueDemogGenderCriteria = TargetingValueDemogGenderCriteria'+newtype TargetingValueDemogGenderCriteria =+  TargetingValueDemogGenderCriteria'     { _tvdgcDemogGenderCriteriaIds :: Maybe [Text]-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'TargetingValueDemogGenderCriteria' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -398,10 +411,9 @@ targetingValueDemogGenderCriteria     :: TargetingValueDemogGenderCriteria targetingValueDemogGenderCriteria =-    TargetingValueDemogGenderCriteria'-    { _tvdgcDemogGenderCriteriaIds = Nothing-    }+  TargetingValueDemogGenderCriteria' {_tvdgcDemogGenderCriteriaIds = Nothing} + tvdgcDemogGenderCriteriaIds :: Lens' TargetingValueDemogGenderCriteria [Text] tvdgcDemogGenderCriteriaIds   = lens _tvdgcDemogGenderCriteriaIds@@ -430,12 +442,15 @@ -- to a single creative. -- -- /See:/ 'creativesList' smart constructor.-data CreativesList = CreativesList'+data CreativesList =+  CreativesList'     { _clNextPageToken :: !(Maybe Text)     , _clKind          :: !Text     , _clItems         :: !(Maybe [Creative])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativesList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -448,12 +463,13 @@ creativesList     :: CreativesList creativesList =-    CreativesList'+  CreativesList'     { _clNextPageToken = Nothing     , _clKind = "adexchangebuyer#creativesList"     , _clItems = Nothing     } + -- | Continuation token used to page through creatives. To retrieve the next -- page of results, set the next request\'s \"pageToken\" value to this. clNextPageToken :: Lens' CreativesList (Maybe Text)@@ -489,12 +505,15 @@  -- -- /See:/ 'creativeDealIdsDealStatusesItem' smart constructor.-data CreativeDealIdsDealStatusesItem = CreativeDealIdsDealStatusesItem'+data CreativeDealIdsDealStatusesItem =+  CreativeDealIdsDealStatusesItem'     { _cdidsiArcStatus     :: !(Maybe Text)     , _cdidsiWebPropertyId :: !(Maybe (Textual Int32))     , _cdidsiDealId        :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativeDealIdsDealStatusesItem' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -507,12 +526,13 @@ creativeDealIdsDealStatusesItem     :: CreativeDealIdsDealStatusesItem creativeDealIdsDealStatusesItem =-    CreativeDealIdsDealStatusesItem'+  CreativeDealIdsDealStatusesItem'     { _cdidsiArcStatus = Nothing     , _cdidsiWebPropertyId = Nothing     , _cdidsiDealId = Nothing     } + -- | ARC approval status. cdidsiArcStatus :: Lens' CreativeDealIdsDealStatusesItem (Maybe Text) cdidsiArcStatus@@ -551,13 +571,16 @@  -- -- /See:/ 'creativeServingRestrictionsItemContextsItem' smart constructor.-data CreativeServingRestrictionsItemContextsItem = CreativeServingRestrictionsItemContextsItem'+data CreativeServingRestrictionsItemContextsItem =+  CreativeServingRestrictionsItemContextsItem'     { _csriciPlatform      :: !(Maybe [Text])     , _csriciContextType   :: !(Maybe Text)     , _csriciAuctionType   :: !(Maybe [Text])     , _csriciGeoCriteriaId :: !(Maybe [Textual Int32])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativeServingRestrictionsItemContextsItem' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -572,13 +595,14 @@ creativeServingRestrictionsItemContextsItem     :: CreativeServingRestrictionsItemContextsItem creativeServingRestrictionsItemContextsItem =-    CreativeServingRestrictionsItemContextsItem'+  CreativeServingRestrictionsItemContextsItem'     { _csriciPlatform = Nothing     , _csriciContextType = Nothing     , _csriciAuctionType = Nothing     , _csriciGeoCriteriaId = Nothing     } + -- | Only set when contextType=PLATFORM. Represents the platforms this -- restriction applies to. csriciPlatform :: Lens' CreativeServingRestrictionsItemContextsItem [Text]@@ -615,7 +639,8 @@       . _Coerce  instance FromJSON-         CreativeServingRestrictionsItemContextsItem where+           CreativeServingRestrictionsItemContextsItem+         where         parseJSON           = withObject               "CreativeServingRestrictionsItemContextsItem"@@ -627,7 +652,8 @@                      <*> (o .:? "geoCriteriaId" .!= mempty))  instance ToJSON-         CreativeServingRestrictionsItemContextsItem where+           CreativeServingRestrictionsItemContextsItem+         where         toJSON           CreativeServingRestrictionsItemContextsItem'{..}           = object@@ -639,10 +665,13 @@  -- -- /See:/ 'createOrdersResponse' smart constructor.-newtype CreateOrdersResponse = CreateOrdersResponse'+newtype CreateOrdersResponse =+  CreateOrdersResponse'     { _corProposals :: Maybe [Proposal]-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreateOrdersResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -650,11 +679,9 @@ -- * 'corProposals' createOrdersResponse     :: CreateOrdersResponse-createOrdersResponse =-    CreateOrdersResponse'-    { _corProposals = Nothing-    }+createOrdersResponse = CreateOrdersResponse' {_corProposals = Nothing} + -- | The list of proposals successfully created. corProposals :: Lens' CreateOrdersResponse [Proposal] corProposals@@ -676,13 +703,16 @@  -- -- /See:/ 'accountBidderLocationItem' smart constructor.-data AccountBidderLocationItem = AccountBidderLocationItem'+data AccountBidderLocationItem =+  AccountBidderLocationItem'     { _abliURL         :: !(Maybe Text)     , _abliMaximumQps  :: !(Maybe (Textual Int32))     , _abliRegion      :: !(Maybe Text)     , _abliBidProtocol :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountBidderLocationItem' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -697,13 +727,14 @@ accountBidderLocationItem     :: AccountBidderLocationItem accountBidderLocationItem =-    AccountBidderLocationItem'+  AccountBidderLocationItem'     { _abliURL = Nothing     , _abliMaximumQps = Nothing     , _abliRegion = Nothing     , _abliBidProtocol = Nothing     } + -- | The URL to which the Ad Exchange will send bid requests. abliURL :: Lens' AccountBidderLocationItem (Maybe Text) abliURL = lens _abliURL (\ s a -> s{_abliURL = a})@@ -753,11 +784,14 @@  -- -- /See:/ 'privateData' smart constructor.-data PrivateData = PrivateData'+data PrivateData =+  PrivateData'     { _pdReferencePayload :: !(Maybe Bytes)     , _pdReferenceId      :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PrivateData' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -768,11 +802,9 @@ privateData     :: PrivateData privateData =-    PrivateData'-    { _pdReferencePayload = Nothing-    , _pdReferenceId = Nothing-    }+  PrivateData' {_pdReferencePayload = Nothing, _pdReferenceId = Nothing} + pdReferencePayload :: Lens' PrivateData (Maybe ByteString) pdReferencePayload   = lens _pdReferencePayload@@ -801,15 +833,18 @@ -- | The configuration data for Ad Exchange RTB - Budget API. -- -- /See:/ 'budget' smart constructor.-data Budget = Budget'+data Budget =+  Budget'     { _bCurrencyCode :: !(Maybe Text)     , _bKind         :: !Text     , _bBudgetAmount :: !(Maybe (Textual Int64))     , _bAccountId    :: !(Maybe (Textual Int64))     , _bId           :: !(Maybe Text)     , _bBillingId    :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Budget' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -828,7 +863,7 @@ budget     :: Budget budget =-    Budget'+  Budget'     { _bCurrencyCode = Nothing     , _bKind = "adexchangebuyer#budget"     , _bBudgetAmount = Nothing@@ -837,6 +872,7 @@     , _bBillingId = Nothing     } + -- | The currency code for the buyer. This cannot be altered here. bCurrencyCode :: Lens' Budget (Maybe Text) bCurrencyCode@@ -896,10 +932,13 @@  -- -- /See:/ 'addOrderNotesRequest' smart constructor.-newtype AddOrderNotesRequest = AddOrderNotesRequest'+newtype AddOrderNotesRequest =+  AddOrderNotesRequest'     { _aonrNotes :: Maybe [MarketplaceNote]-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AddOrderNotesRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -907,11 +946,9 @@ -- * 'aonrNotes' addOrderNotesRequest     :: AddOrderNotesRequest-addOrderNotesRequest =-    AddOrderNotesRequest'-    { _aonrNotes = Nothing-    }+addOrderNotesRequest = AddOrderNotesRequest' {_aonrNotes = Nothing} + -- | The list of notes to add. aonrNotes :: Lens' AddOrderNotesRequest [MarketplaceNote] aonrNotes@@ -931,12 +968,15 @@  -- -- /See:/ 'deliveryControlFrequencyCap' smart constructor.-data DeliveryControlFrequencyCap = DeliveryControlFrequencyCap'+data DeliveryControlFrequencyCap =+  DeliveryControlFrequencyCap'     { _dcfcMaxImpressions :: !(Maybe (Textual Int32))     , _dcfcNumTimeUnits   :: !(Maybe (Textual Int32))     , _dcfcTimeUnitType   :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeliveryControlFrequencyCap' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -949,12 +989,13 @@ deliveryControlFrequencyCap     :: DeliveryControlFrequencyCap deliveryControlFrequencyCap =-    DeliveryControlFrequencyCap'+  DeliveryControlFrequencyCap'     { _dcfcMaxImpressions = Nothing     , _dcfcNumTimeUnits = Nothing     , _dcfcTimeUnitType = Nothing     } + dcfcMaxImpressions :: Lens' DeliveryControlFrequencyCap (Maybe Int32) dcfcMaxImpressions   = lens _dcfcMaxImpressions@@ -990,11 +1031,14 @@  -- -- /See:/ 'marketplaceDealParty' smart constructor.-data MarketplaceDealParty = MarketplaceDealParty'+data MarketplaceDealParty =+  MarketplaceDealParty'     { _mdpSeller :: !(Maybe Seller)     , _mdpBuyer  :: !(Maybe Buyer)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'MarketplaceDealParty' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1005,11 +1049,9 @@ marketplaceDealParty     :: MarketplaceDealParty marketplaceDealParty =-    MarketplaceDealParty'-    { _mdpSeller = Nothing-    , _mdpBuyer = Nothing-    }+  MarketplaceDealParty' {_mdpSeller = Nothing, _mdpBuyer = Nothing} + -- | The buyer\/seller associated with the deal. One of buyer\/seller is -- specified for a deal party. mdpSeller :: Lens' MarketplaceDealParty (Maybe Seller)@@ -1037,10 +1079,13 @@  -- -- /See:/ 'getOrderNotesResponse' smart constructor.-newtype GetOrderNotesResponse = GetOrderNotesResponse'+newtype GetOrderNotesResponse =+  GetOrderNotesResponse'     { _gonrNotes :: Maybe [MarketplaceNote]-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetOrderNotesResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1048,11 +1093,9 @@ -- * 'gonrNotes' getOrderNotesResponse     :: GetOrderNotesResponse-getOrderNotesResponse =-    GetOrderNotesResponse'-    { _gonrNotes = Nothing-    }+getOrderNotesResponse = GetOrderNotesResponse' {_gonrNotes = Nothing} + -- | The list of matching notes. The notes for a proposal are ordered from -- oldest to newest. If the notes span multiple proposals, they will be -- grouped by proposal, with the notes for the most recently modified@@ -1076,10 +1119,13 @@  -- -- /See:/ 'getOrdersResponse' smart constructor.-newtype GetOrdersResponse = GetOrdersResponse'+newtype GetOrdersResponse =+  GetOrdersResponse'     { _gorProposals :: Maybe [Proposal]-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetOrdersResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1087,11 +1133,9 @@ -- * 'gorProposals' getOrdersResponse     :: GetOrdersResponse-getOrdersResponse =-    GetOrdersResponse'-    { _gorProposals = Nothing-    }+getOrdersResponse = GetOrdersResponse' {_gorProposals = Nothing} + -- | The list of matching proposals. gorProposals :: Lens' GetOrdersResponse [Proposal] gorProposals@@ -1113,11 +1157,14 @@  -- -- /See:/ 'creativeServingRestrictionsItemDisApprovalReasonsItem' smart constructor.-data CreativeServingRestrictionsItemDisApprovalReasonsItem = CreativeServingRestrictionsItemDisApprovalReasonsItem'+data CreativeServingRestrictionsItemDisApprovalReasonsItem =+  CreativeServingRestrictionsItemDisApprovalReasonsItem'     { _csridariReason  :: !(Maybe Text)     , _csridariDetails :: !(Maybe [Text])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativeServingRestrictionsItemDisApprovalReasonsItem' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1128,11 +1175,10 @@ creativeServingRestrictionsItemDisApprovalReasonsItem     :: CreativeServingRestrictionsItemDisApprovalReasonsItem creativeServingRestrictionsItemDisApprovalReasonsItem =-    CreativeServingRestrictionsItemDisApprovalReasonsItem'-    { _csridariReason = Nothing-    , _csridariDetails = Nothing-    }+  CreativeServingRestrictionsItemDisApprovalReasonsItem'+    {_csridariReason = Nothing, _csridariDetails = Nothing} + -- | The categorized reason for disapproval. csridariReason :: Lens' CreativeServingRestrictionsItemDisApprovalReasonsItem (Maybe Text) csridariReason@@ -1148,7 +1194,7 @@       . _Coerce  instance FromJSON-         CreativeServingRestrictionsItemDisApprovalReasonsItem+           CreativeServingRestrictionsItemDisApprovalReasonsItem          where         parseJSON           = withObject@@ -1159,7 +1205,7 @@                    (o .:? "reason") <*> (o .:? "details" .!= mempty))  instance ToJSON-         CreativeServingRestrictionsItemDisApprovalReasonsItem+           CreativeServingRestrictionsItemDisApprovalReasonsItem          where         toJSON           CreativeServingRestrictionsItemDisApprovalReasonsItem'{..}@@ -1172,11 +1218,14 @@ -- access to. Each entry in the feed corresponds to a single buyer account. -- -- /See:/ 'accountsList' smart constructor.-data AccountsList = AccountsList'+data AccountsList =+  AccountsList'     { _alKind  :: !Text     , _alItems :: !(Maybe [Account])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1187,11 +1236,9 @@ accountsList     :: AccountsList accountsList =-    AccountsList'-    { _alKind = "adexchangebuyer#accountsList"-    , _alItems = Nothing-    }+  AccountsList' {_alKind = "adexchangebuyer#accountsList", _alItems = Nothing} + -- | Resource type. alKind :: Lens' AccountsList Text alKind = lens _alKind (\ s a -> s{_alKind = a})@@ -1222,11 +1269,14 @@ -- {dimension_value: {id: 2, name: \'UK\'}}]} -- -- /See:/ 'dimension' smart constructor.-data Dimension = Dimension'+data Dimension =+  Dimension'     { _dDimensionValues :: !(Maybe [DimensionDimensionValue])     , _dDimensionType   :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  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:@@ -1236,12 +1286,9 @@ -- * 'dDimensionType' dimension     :: Dimension-dimension =-    Dimension'-    { _dDimensionValues = Nothing-    , _dDimensionType = Nothing-    }+dimension = Dimension' {_dDimensionValues = Nothing, _dDimensionType = Nothing} + dDimensionValues :: Lens' Dimension [DimensionDimensionValue] dDimensionValues   = lens _dDimensionValues@@ -1271,11 +1318,14 @@  -- -- /See:/ 'createOrdersRequest' smart constructor.-data CreateOrdersRequest = CreateOrdersRequest'+data CreateOrdersRequest =+  CreateOrdersRequest'     { _cProposals       :: !(Maybe [Proposal])     , _cWebPropertyCode :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreateOrdersRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1286,11 +1336,9 @@ createOrdersRequest     :: CreateOrdersRequest createOrdersRequest =-    CreateOrdersRequest'-    { _cProposals = Nothing-    , _cWebPropertyCode = Nothing-    }+  CreateOrdersRequest' {_cProposals = Nothing, _cWebPropertyCode = Nothing} + -- | The list of proposals to create. cProposals :: Lens' CreateOrdersRequest [Proposal] cProposals@@ -1321,12 +1369,15 @@  -- -- /See:/ 'creativeCorrectionsItem' smart constructor.-data CreativeCorrectionsItem = CreativeCorrectionsItem'+data CreativeCorrectionsItem =+  CreativeCorrectionsItem'     { _cciContexts :: !(Maybe [CreativeCorrectionsItemContextsItem])     , _cciReason   :: !(Maybe Text)     , _cciDetails  :: !(Maybe [Text])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativeCorrectionsItem' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1339,12 +1390,10 @@ creativeCorrectionsItem     :: CreativeCorrectionsItem creativeCorrectionsItem =-    CreativeCorrectionsItem'-    { _cciContexts = Nothing-    , _cciReason = Nothing-    , _cciDetails = Nothing-    }+  CreativeCorrectionsItem'+    {_cciContexts = Nothing, _cciReason = Nothing, _cciDetails = Nothing} + -- | All known serving contexts containing serving status information. cciContexts :: Lens' CreativeCorrectionsItem [CreativeCorrectionsItemContextsItem] cciContexts@@ -1382,11 +1431,14 @@  -- -- /See:/ 'dealTermsRubiconNonGuaranteedTerms' smart constructor.-data DealTermsRubiconNonGuaranteedTerms = DealTermsRubiconNonGuaranteedTerms'+data DealTermsRubiconNonGuaranteedTerms =+  DealTermsRubiconNonGuaranteedTerms'     { _dtrngtPriorityPrice :: !(Maybe Price)     , _dtrngtStandardPrice :: !(Maybe Price)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DealTermsRubiconNonGuaranteedTerms' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1397,11 +1449,10 @@ dealTermsRubiconNonGuaranteedTerms     :: DealTermsRubiconNonGuaranteedTerms dealTermsRubiconNonGuaranteedTerms =-    DealTermsRubiconNonGuaranteedTerms'-    { _dtrngtPriorityPrice = Nothing-    , _dtrngtStandardPrice = Nothing-    }+  DealTermsRubiconNonGuaranteedTerms'+    {_dtrngtPriorityPrice = Nothing, _dtrngtStandardPrice = Nothing} + -- | Optional price for Rubicon priority access in the auction. dtrngtPriorityPrice :: Lens' DealTermsRubiconNonGuaranteedTerms (Maybe Price) dtrngtPriorityPrice@@ -1432,11 +1483,14 @@  -- -- /See:/ 'dealServingMetadata' smart constructor.-data DealServingMetadata = DealServingMetadata'+data DealServingMetadata =+  DealServingMetadata'     { _dsmDealPauseStatus   :: !(Maybe DealServingMetadataDealPauseStatus)     , _dsmAlcoholAdsAllowed :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DealServingMetadata' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1447,11 +1501,10 @@ dealServingMetadata     :: DealServingMetadata dealServingMetadata =-    DealServingMetadata'-    { _dsmDealPauseStatus = Nothing-    , _dsmAlcoholAdsAllowed = Nothing-    }+  DealServingMetadata'+    {_dsmDealPauseStatus = Nothing, _dsmAlcoholAdsAllowed = Nothing} + -- | Tracks which parties (if any) have paused a deal. (readonly, except via -- PauseResumeOrderDeals action) dsmDealPauseStatus :: Lens' DealServingMetadata (Maybe DealServingMetadataDealPauseStatus)@@ -1484,11 +1537,14 @@  -- -- /See:/ 'addOrderDealsResponse' smart constructor.-data AddOrderDealsResponse = AddOrderDealsResponse'+data AddOrderDealsResponse =+  AddOrderDealsResponse'     { _aodrDeals                  :: !(Maybe [MarketplaceDeal])     , _aodrProposalRevisionNumber :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AddOrderDealsResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1499,11 +1555,10 @@ addOrderDealsResponse     :: AddOrderDealsResponse addOrderDealsResponse =-    AddOrderDealsResponse'-    { _aodrDeals = Nothing-    , _aodrProposalRevisionNumber = Nothing-    }+  AddOrderDealsResponse'+    {_aodrDeals = Nothing, _aodrProposalRevisionNumber = Nothing} + -- | List of deals added (in the same proposal as passed in the request) aodrDeals :: Lens' AddOrderDealsResponse [MarketplaceDeal] aodrDeals@@ -1536,12 +1591,15 @@  -- -- /See:/ 'deliveryControl' smart constructor.-data DeliveryControl = DeliveryControl'+data DeliveryControl =+  DeliveryControl'     { _dcCreativeBlockingLevel :: !(Maybe Text)     , _dcFrequencyCaps         :: !(Maybe [DeliveryControlFrequencyCap])     , _dcDeliveryRateType      :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeliveryControl' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1554,12 +1612,13 @@ deliveryControl     :: DeliveryControl deliveryControl =-    DeliveryControl'+  DeliveryControl'     { _dcCreativeBlockingLevel = Nothing     , _dcFrequencyCaps = Nothing     , _dcDeliveryRateType = Nothing     } + dcCreativeBlockingLevel :: Lens' DeliveryControl (Maybe Text) dcCreativeBlockingLevel   = lens _dcCreativeBlockingLevel@@ -1602,13 +1661,16 @@ -- matching rule where no buyer is set. -- -- /See:/ 'pricePerBuyer' smart constructor.-data PricePerBuyer = PricePerBuyer'+data PricePerBuyer =+  PricePerBuyer'     { _ppbBilledBuyer :: !(Maybe Buyer)     , _ppbPrice       :: !(Maybe Price)     , _ppbAuctionTier :: !(Maybe Text)     , _ppbBuyer       :: !(Maybe Buyer)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PricePerBuyer' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1623,13 +1685,14 @@ pricePerBuyer     :: PricePerBuyer pricePerBuyer =-    PricePerBuyer'+  PricePerBuyer'     { _ppbBilledBuyer = Nothing     , _ppbPrice = Nothing     , _ppbAuctionTier = Nothing     , _ppbBuyer = Nothing     } + -- | Reference to the buyer that will get billed. ppbBilledBuyer :: Lens' PricePerBuyer (Maybe Buyer) ppbBilledBuyer@@ -1673,7 +1736,8 @@ -- | A creative and its classification data. -- -- /See:/ 'creative' smart constructor.-data Creative = Creative'+data Creative =+  Creative'     { _cAttribute                  :: !(Maybe [Textual Int32])     , _cNATiveAd                   :: !(Maybe CreativeNATiveAd)     , _cHeight                     :: !(Maybe (Textual Int32))@@ -1704,8 +1768,10 @@     , _cDetectedDomains            :: !(Maybe [Text])     , _cOpenAuctionStatus          :: !(Maybe Text)     , _cCreativeStatusIdentityType :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  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:@@ -1772,7 +1838,7 @@ creative     :: Creative creative =-    Creative'+  Creative'     { _cAttribute = Nothing     , _cNATiveAd = Nothing     , _cHeight = Nothing@@ -1805,6 +1871,7 @@     , _cCreativeStatusIdentityType = Nothing     } + -- | List of buyer selectable attributes for the ads that may be shown from -- this snippet. Each attribute is represented by an integer as defined in -- buyer-declarable-creative-attributes.txt.@@ -2122,14 +2189,17 @@  -- -- /See:/ 'targetingValueDayPartTargetingDayPart' smart constructor.-data TargetingValueDayPartTargetingDayPart = TargetingValueDayPartTargetingDayPart'+data TargetingValueDayPartTargetingDayPart =+  TargetingValueDayPartTargetingDayPart'     { _tvdptdpEndHour     :: !(Maybe (Textual Int32))     , _tvdptdpStartHour   :: !(Maybe (Textual Int32))     , _tvdptdpStartMinute :: !(Maybe (Textual Int32))     , _tvdptdpDayOfWeek   :: !(Maybe Text)     , _tvdptdpEndMinute   :: !(Maybe (Textual Int32))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'TargetingValueDayPartTargetingDayPart' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2146,7 +2216,7 @@ targetingValueDayPartTargetingDayPart     :: TargetingValueDayPartTargetingDayPart targetingValueDayPartTargetingDayPart =-    TargetingValueDayPartTargetingDayPart'+  TargetingValueDayPartTargetingDayPart'     { _tvdptdpEndHour = Nothing     , _tvdptdpStartHour = Nothing     , _tvdptdpStartMinute = Nothing@@ -2154,6 +2224,7 @@     , _tvdptdpEndMinute = Nothing     } + tvdptdpEndHour :: Lens' TargetingValueDayPartTargetingDayPart (Maybe Int32) tvdptdpEndHour   = lens _tvdptdpEndHour@@ -2184,7 +2255,8 @@       . mapping _Coerce  instance FromJSON-         TargetingValueDayPartTargetingDayPart where+           TargetingValueDayPartTargetingDayPart+         where         parseJSON           = withObject "TargetingValueDayPartTargetingDayPart"               (\ o ->@@ -2208,12 +2280,15 @@ -- | Value of the dimension. -- -- /See:/ 'dimensionDimensionValue' smart constructor.-data DimensionDimensionValue = DimensionDimensionValue'+data DimensionDimensionValue =+  DimensionDimensionValue'     { _ddvName       :: !(Maybe Text)     , _ddvId         :: !(Maybe (Textual Int32))     , _ddvPercentage :: !(Maybe (Textual Int32))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DimensionDimensionValue' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2226,12 +2301,10 @@ dimensionDimensionValue     :: DimensionDimensionValue dimensionDimensionValue =-    DimensionDimensionValue'-    { _ddvName = Nothing-    , _ddvId = Nothing-    , _ddvPercentage = Nothing-    }+  DimensionDimensionValue'+    {_ddvName = Nothing, _ddvId = Nothing, _ddvPercentage = Nothing} + -- | Name of the dimension mainly for debugging purposes, except for the case -- of CREATIVE_SIZE. For CREATIVE_SIZE, strings are used instead of ids. ddvName :: Lens' DimensionDimensionValue (Maybe Text)@@ -2269,11 +2342,14 @@  -- -- /See:/ 'pretargetingConfigList' smart constructor.-data PretargetingConfigList = PretargetingConfigList'+data PretargetingConfigList =+  PretargetingConfigList'     { _pclKind  :: !Text     , _pclItems :: !(Maybe [PretargetingConfig])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PretargetingConfigList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2284,11 +2360,10 @@ pretargetingConfigList     :: PretargetingConfigList pretargetingConfigList =-    PretargetingConfigList'-    { _pclKind = "adexchangebuyer#pretargetingConfigList"-    , _pclItems = Nothing-    }+  PretargetingConfigList'+    {_pclKind = "adexchangebuyer#pretargetingConfigList", _pclItems = Nothing} + -- | Resource type. pclKind :: Lens' PretargetingConfigList Text pclKind = lens _pclKind (\ s a -> s{_pclKind = a})@@ -2318,10 +2393,13 @@  -- -- /See:/ 'targetingValueDemogAgeCriteria' smart constructor.-newtype TargetingValueDemogAgeCriteria = TargetingValueDemogAgeCriteria'+newtype TargetingValueDemogAgeCriteria =+  TargetingValueDemogAgeCriteria'     { _tvdacDemogAgeCriteriaIds :: Maybe [Text]-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'TargetingValueDemogAgeCriteria' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2330,10 +2408,9 @@ targetingValueDemogAgeCriteria     :: TargetingValueDemogAgeCriteria targetingValueDemogAgeCriteria =-    TargetingValueDemogAgeCriteria'-    { _tvdacDemogAgeCriteriaIds = Nothing-    }+  TargetingValueDemogAgeCriteria' {_tvdacDemogAgeCriteriaIds = Nothing} + tvdacDemogAgeCriteriaIds :: Lens' TargetingValueDemogAgeCriteria [Text] tvdacDemogAgeCriteriaIds   = lens _tvdacDemogAgeCriteriaIds@@ -2358,10 +2435,13 @@  -- -- /See:/ 'dealTermsNonGuaranteedFixedPriceTerms' smart constructor.-newtype DealTermsNonGuaranteedFixedPriceTerms = DealTermsNonGuaranteedFixedPriceTerms'+newtype DealTermsNonGuaranteedFixedPriceTerms =+  DealTermsNonGuaranteedFixedPriceTerms'     { _dtngfptFixedPrices :: Maybe [PricePerBuyer]-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DealTermsNonGuaranteedFixedPriceTerms' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2370,10 +2450,9 @@ dealTermsNonGuaranteedFixedPriceTerms     :: DealTermsNonGuaranteedFixedPriceTerms dealTermsNonGuaranteedFixedPriceTerms =-    DealTermsNonGuaranteedFixedPriceTerms'-    { _dtngfptFixedPrices = Nothing-    }+  DealTermsNonGuaranteedFixedPriceTerms' {_dtngfptFixedPrices = Nothing} + -- | Fixed price for the specified buyer. dtngfptFixedPrices :: Lens' DealTermsNonGuaranteedFixedPriceTerms [PricePerBuyer] dtngfptFixedPrices@@ -2383,7 +2462,8 @@       . _Coerce  instance FromJSON-         DealTermsNonGuaranteedFixedPriceTerms where+           DealTermsNonGuaranteedFixedPriceTerms+         where         parseJSON           = withObject "DealTermsNonGuaranteedFixedPriceTerms"               (\ o ->@@ -2400,7 +2480,8 @@ -- | The configuration data for an Ad Exchange performance report list. -- -- /See:/ 'performanceReport' smart constructor.-data PerformanceReport = PerformanceReport'+data PerformanceReport =+  PerformanceReport'     { _prFilteredBidRate         :: !(Maybe (Textual Double))     , _prKind                    :: !Text     , _prLatency95thPercentile   :: !(Maybe (Textual Double))@@ -2423,8 +2504,10 @@     , _prTimestamp               :: !(Maybe (Textual Int64))     , _prPixelMatchRequests      :: !(Maybe (Textual Double))     , _prOutOfQuota              :: !(Maybe (Textual Double))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PerformanceReport' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2475,7 +2558,7 @@ performanceReport     :: PerformanceReport performanceReport =-    PerformanceReport'+  PerformanceReport'     { _prFilteredBidRate = Nothing     , _prKind = "adexchangebuyer#performanceReport"     , _prLatency95thPercentile = Nothing@@ -2500,6 +2583,7 @@     , _prOutOfQuota = Nothing     } + -- | The number of bid responses that were filtered due to a policy violation -- or other errors. prFilteredBidRate :: Lens' PerformanceReport (Maybe Double)@@ -2725,11 +2809,14 @@  -- -- /See:/ 'pretargetingConfigExcludedPlacementsItem' smart constructor.-data PretargetingConfigExcludedPlacementsItem = PretargetingConfigExcludedPlacementsItem'+data PretargetingConfigExcludedPlacementsItem =+  PretargetingConfigExcludedPlacementsItem'     { _pcepiToken :: !(Maybe Text)     , _pcepiType  :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PretargetingConfigExcludedPlacementsItem' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2740,11 +2827,10 @@ pretargetingConfigExcludedPlacementsItem     :: PretargetingConfigExcludedPlacementsItem pretargetingConfigExcludedPlacementsItem =-    PretargetingConfigExcludedPlacementsItem'-    { _pcepiToken = Nothing-    , _pcepiType = Nothing-    }+  PretargetingConfigExcludedPlacementsItem'+    {_pcepiToken = Nothing, _pcepiType = Nothing} + -- | The value of the placement. Interpretation depends on the placement -- type, e.g. URL for a site placement, channel name for a channel -- placement, app id for a mobile app placement.@@ -2758,7 +2844,8 @@   = lens _pcepiType (\ s a -> s{_pcepiType = a})  instance FromJSON-         PretargetingConfigExcludedPlacementsItem where+           PretargetingConfigExcludedPlacementsItem+         where         parseJSON           = withObject               "PretargetingConfigExcludedPlacementsItem"@@ -2767,7 +2854,8 @@                    (o .:? "token") <*> (o .:? "type"))  instance ToJSON-         PretargetingConfigExcludedPlacementsItem where+           PretargetingConfigExcludedPlacementsItem+         where         toJSON PretargetingConfigExcludedPlacementsItem'{..}           = object               (catMaybes@@ -2776,11 +2864,14 @@  -- -- /See:/ 'seller' smart constructor.-data Seller = Seller'+data Seller =+  Seller'     { _sAccountId    :: !(Maybe Text)     , _sSubAccountId :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Seller' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2790,12 +2881,9 @@ -- * 'sSubAccountId' seller     :: Seller-seller =-    Seller'-    { _sAccountId = Nothing-    , _sSubAccountId = Nothing-    }+seller = Seller' {_sAccountId = Nothing, _sSubAccountId = Nothing} + -- | The unique id for the seller. The seller fills in this field. The seller -- account id is then available to buyer in the product. sAccountId :: Lens' Seller (Maybe Text)@@ -2825,7 +2913,8 @@ -- | Configuration data for an Ad Exchange buyer account. -- -- /See:/ 'account' smart constructor.-data Account = Account'+data Account =+  Account'     { _aApplyPretargetingToNonGuaranteedDeals :: !(Maybe Bool)     , _aMaximumTotalQps                       :: !(Maybe (Textual Int32))     , _aKind                                  :: !Text@@ -2835,8 +2924,10 @@     , _aNumberActiveCreatives                 :: !(Maybe (Textual Int32))     , _aId                                    :: !(Maybe (Textual Int32))     , _aBidderLocation                        :: !(Maybe [AccountBidderLocationItem])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  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:@@ -2861,7 +2952,7 @@ account     :: Account account =-    Account'+  Account'     { _aApplyPretargetingToNonGuaranteedDeals = Nothing     , _aMaximumTotalQps = Nothing     , _aKind = "adexchangebuyer#account"@@ -2873,6 +2964,7 @@     , _aBidderLocation = Nothing     } + -- | When this is false, bid requests that include a deal ID for a private -- auction or preferred deal are always sent to your bidder. When true, all -- active pretargeting configs will be applied to private auctions and@@ -2975,12 +3067,15 @@  -- -- /See:/ 'deleteOrderDealsRequest' smart constructor.-data DeleteOrderDealsRequest = DeleteOrderDealsRequest'+data DeleteOrderDealsRequest =+  DeleteOrderDealsRequest'     { _dodrUpdateAction           :: !(Maybe Text)     , _dodrDealIds                :: !(Maybe [Text])     , _dodrProposalRevisionNumber :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteOrderDealsRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2993,12 +3088,13 @@ deleteOrderDealsRequest     :: DeleteOrderDealsRequest deleteOrderDealsRequest =-    DeleteOrderDealsRequest'+  DeleteOrderDealsRequest'     { _dodrUpdateAction = Nothing     , _dodrDealIds = Nothing     , _dodrProposalRevisionNumber = Nothing     } + -- | Indicates an optional action to take on the proposal dodrUpdateAction :: Lens' DeleteOrderDealsRequest (Maybe Text) dodrUpdateAction@@ -3039,11 +3135,14 @@  -- -- /See:/ 'contactInformation' smart constructor.-data ContactInformation = ContactInformation'+data ContactInformation =+  ContactInformation'     { _ciEmail :: !(Maybe Text)     , _ciName  :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ContactInformation' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3053,12 +3152,9 @@ -- * 'ciName' contactInformation     :: ContactInformation-contactInformation =-    ContactInformation'-    { _ciEmail = Nothing-    , _ciName = Nothing-    }+contactInformation = ContactInformation' {_ciEmail = Nothing, _ciName = Nothing} + -- | Email address of the contact. ciEmail :: Lens' ContactInformation (Maybe Text) ciEmail = lens _ciEmail (\ s a -> s{_ciEmail = a})@@ -3083,12 +3179,15 @@ -- | A smaller image, for the advertiser logo. -- -- /See:/ 'creativeNATiveAdLogo' smart constructor.-data CreativeNATiveAdLogo = CreativeNATiveAdLogo'+data CreativeNATiveAdLogo =+  CreativeNATiveAdLogo'     { _cnatalHeight :: !(Maybe (Textual Int32))     , _cnatalURL    :: !(Maybe Text)     , _cnatalWidth  :: !(Maybe (Textual Int32))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativeNATiveAdLogo' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3101,12 +3200,10 @@ creativeNATiveAdLogo     :: CreativeNATiveAdLogo creativeNATiveAdLogo =-    CreativeNATiveAdLogo'-    { _cnatalHeight = Nothing-    , _cnatalURL = Nothing-    , _cnatalWidth = Nothing-    }+  CreativeNATiveAdLogo'+    {_cnatalHeight = Nothing, _cnatalURL = Nothing, _cnatalWidth = Nothing} + cnatalHeight :: Lens' CreativeNATiveAdLogo (Maybe Int32) cnatalHeight   = lens _cnatalHeight (\ s a -> s{_cnatalHeight = a})@@ -3139,10 +3236,13 @@  -- -- /See:/ 'getOrderDealsResponse' smart constructor.-newtype GetOrderDealsResponse = GetOrderDealsResponse'+newtype GetOrderDealsResponse =+  GetOrderDealsResponse'     { _godrDeals :: Maybe [MarketplaceDeal]-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetOrderDealsResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3150,11 +3250,9 @@ -- * 'godrDeals' getOrderDealsResponse     :: GetOrderDealsResponse-getOrderDealsResponse =-    GetOrderDealsResponse'-    { _godrDeals = Nothing-    }+getOrderDealsResponse = GetOrderDealsResponse' {_godrDeals = Nothing} + -- | List of deals for the proposal godrDeals :: Lens' GetOrderDealsResponse [MarketplaceDeal] godrDeals@@ -3176,11 +3274,14 @@ -- | The configuration data for an Ad Exchange performance report list. -- -- /See:/ 'performanceReportList' smart constructor.-data PerformanceReportList = PerformanceReportList'+data PerformanceReportList =+  PerformanceReportList'     { _prlKind              :: !Text     , _prlPerformanceReport :: !(Maybe [PerformanceReport])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PerformanceReportList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3191,11 +3292,12 @@ performanceReportList     :: PerformanceReportList performanceReportList =-    PerformanceReportList'+  PerformanceReportList'     { _prlKind = "adexchangebuyer#performanceReportList"     , _prlPerformanceReport = Nothing     } + -- | Resource type. prlKind :: Lens' PerformanceReportList Text prlKind = lens _prlKind (\ s a -> s{_prlKind = a})@@ -3226,7 +3328,8 @@  -- -- /See:/ 'pretargetingConfig' smart constructor.-data PretargetingConfig = PretargetingConfig'+data PretargetingConfig =+  PretargetingConfig'     { _pcPlatforms                     :: !(Maybe [Text])     , _pcMobileCarriers                :: !(Maybe [Textual Int64])     , _pcVendorTypes                   :: !(Maybe [Textual Int64])@@ -3253,8 +3356,10 @@     , _pcExcludedContentLabels         :: !(Maybe [Textual Int64])     , _pcBillingId                     :: !(Maybe (Textual Int64))     , _pcMobileOperatingSystemVersions :: !(Maybe [Textual Int64])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PretargetingConfig' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3313,7 +3418,7 @@ pretargetingConfig     :: PretargetingConfig pretargetingConfig =-    PretargetingConfig'+  PretargetingConfig'     { _pcPlatforms = Nothing     , _pcMobileCarriers = Nothing     , _pcVendorTypes = Nothing@@ -3342,6 +3447,7 @@     , _pcMobileOperatingSystemVersions = Nothing     } + -- | Requests matching any of these platforms will match. Possible values are -- PRETARGETING_PLATFORM_MOBILE, PRETARGETING_PLATFORM_DESKTOP, and -- PRETARGETING_PLATFORM_TABLET.@@ -3629,11 +3735,14 @@ -- be set in requests. -- -- /See:/ 'creativeFilteringReasons' smart constructor.-data CreativeFilteringReasons = CreativeFilteringReasons'+data CreativeFilteringReasons =+  CreativeFilteringReasons'     { _cfrReasons :: !(Maybe [CreativeFilteringReasonsReasonsItem])     , _cfrDate    :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativeFilteringReasons' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3644,11 +3753,9 @@ creativeFilteringReasons     :: CreativeFilteringReasons creativeFilteringReasons =-    CreativeFilteringReasons'-    { _cfrReasons = Nothing-    , _cfrDate = Nothing-    }+  CreativeFilteringReasons' {_cfrReasons = Nothing, _cfrDate = Nothing} + -- | The filtering reasons. cfrReasons :: Lens' CreativeFilteringReasons [CreativeFilteringReasonsReasonsItem] cfrReasons@@ -3678,15 +3785,18 @@ -- | Next Id: 7 -- -- /See:/ 'targetingValueCreativeSize' smart constructor.-data TargetingValueCreativeSize = TargetingValueCreativeSize'+data TargetingValueCreativeSize =+  TargetingValueCreativeSize'     { _tvcsSize             :: !(Maybe TargetingValueSize)     , _tvcsCompanionSizes   :: !(Maybe [TargetingValueSize])     , _tvcsSkippableAdType  :: !(Maybe Text)     , _tvcsCreativeSizeType :: !(Maybe Text)     , _tvcsAllowedFormats   :: !(Maybe [Text])     , _tvcsNATiveTemplate   :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'TargetingValueCreativeSize' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3705,7 +3815,7 @@ targetingValueCreativeSize     :: TargetingValueCreativeSize targetingValueCreativeSize =-    TargetingValueCreativeSize'+  TargetingValueCreativeSize'     { _tvcsSize = Nothing     , _tvcsCompanionSizes = Nothing     , _tvcsSkippableAdType = Nothing@@ -3714,6 +3824,7 @@     , _tvcsNATiveTemplate = Nothing     } + -- | For regular or video creative size type, specifies the size of the -- creative. tvcsSize :: Lens' TargetingValueCreativeSize (Maybe TargetingValueSize)@@ -3778,13 +3889,16 @@  -- -- /See:/ 'dealTermsGuaranteedFixedPriceTermsBillingInfo' smart constructor.-data DealTermsGuaranteedFixedPriceTermsBillingInfo = DealTermsGuaranteedFixedPriceTermsBillingInfo'+data DealTermsGuaranteedFixedPriceTermsBillingInfo =+  DealTermsGuaranteedFixedPriceTermsBillingInfo'     { _dtgfptbiCurrencyConversionTimeMs   :: !(Maybe (Textual Int64))     , _dtgfptbiDfpLineItemId              :: !(Maybe (Textual Int64))     , _dtgfptbiPrice                      :: !(Maybe Price)     , _dtgfptbiOriginalContractedQuantity :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DealTermsGuaranteedFixedPriceTermsBillingInfo' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3799,13 +3913,14 @@ dealTermsGuaranteedFixedPriceTermsBillingInfo     :: DealTermsGuaranteedFixedPriceTermsBillingInfo dealTermsGuaranteedFixedPriceTermsBillingInfo =-    DealTermsGuaranteedFixedPriceTermsBillingInfo'+  DealTermsGuaranteedFixedPriceTermsBillingInfo'     { _dtgfptbiCurrencyConversionTimeMs = Nothing     , _dtgfptbiDfpLineItemId = Nothing     , _dtgfptbiPrice = Nothing     , _dtgfptbiOriginalContractedQuantity = Nothing     } + -- | The timestamp (in ms since epoch) when the original reservation price -- for the deal was first converted to DFP currency. This is used to -- convert the contracted price into buyer\'s currency without discrepancy.@@ -3842,7 +3957,8 @@       . mapping _Coerce  instance FromJSON-         DealTermsGuaranteedFixedPriceTermsBillingInfo where+           DealTermsGuaranteedFixedPriceTermsBillingInfo+         where         parseJSON           = withObject               "DealTermsGuaranteedFixedPriceTermsBillingInfo"@@ -3854,7 +3970,8 @@                      <*> (o .:? "originalContractedQuantity"))  instance ToJSON-         DealTermsGuaranteedFixedPriceTermsBillingInfo where+           DealTermsGuaranteedFixedPriceTermsBillingInfo+         where         toJSON           DealTermsGuaranteedFixedPriceTermsBillingInfo'{..}           = object@@ -3868,10 +3985,13 @@  -- -- /See:/ 'getPublisherProFilesByAccountIdResponse' smart constructor.-newtype GetPublisherProFilesByAccountIdResponse = GetPublisherProFilesByAccountIdResponse'+newtype GetPublisherProFilesByAccountIdResponse =+  GetPublisherProFilesByAccountIdResponse'     { _gppfbairProFiles :: Maybe [PublisherProFileAPIProto]-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetPublisherProFilesByAccountIdResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3880,10 +4000,9 @@ getPublisherProFilesByAccountIdResponse     :: GetPublisherProFilesByAccountIdResponse getPublisherProFilesByAccountIdResponse =-    GetPublisherProFilesByAccountIdResponse'-    { _gppfbairProFiles = Nothing-    }+  GetPublisherProFilesByAccountIdResponse' {_gppfbairProFiles = Nothing} + -- | Profiles for the requested publisher gppfbairProFiles :: Lens' GetPublisherProFilesByAccountIdResponse [PublisherProFileAPIProto] gppfbairProFiles@@ -3893,7 +4012,8 @@       . _Coerce  instance FromJSON-         GetPublisherProFilesByAccountIdResponse where+           GetPublisherProFilesByAccountIdResponse+         where         parseJSON           = withObject               "GetPublisherProFilesByAccountIdResponse"@@ -3902,7 +4022,8 @@                    (o .:? "profiles" .!= mempty))  instance ToJSON-         GetPublisherProFilesByAccountIdResponse where+           GetPublisherProFilesByAccountIdResponse+         where         toJSON GetPublisherProFilesByAccountIdResponse'{..}           = object               (catMaybes [("profiles" .=) <$> _gppfbairProFiles])@@ -3916,7 +4037,8 @@ -- either buyer or the seller. -- -- /See:/ 'proposal' smart constructor.-data Proposal = Proposal'+data Proposal =+  Proposal'     { _pBuyerPrivateData           :: !(Maybe PrivateData)     , _pIsSetupComplete            :: !(Maybe Bool)     , _pInventorySource            :: !(Maybe Text)@@ -3940,8 +4062,10 @@     , _pNegotiationId              :: !(Maybe Text)     , _pHasBuyerSignedOff          :: !(Maybe Bool)     , _pBuyer                      :: !(Maybe Buyer)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Proposal' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3994,7 +4118,7 @@ proposal     :: Proposal proposal =-    Proposal'+  Proposal'     { _pBuyerPrivateData = Nothing     , _pIsSetupComplete = Nothing     , _pInventorySource = Nothing@@ -4020,6 +4144,7 @@     , _pBuyer = Nothing     } + -- | Private data for buyer. (hidden from seller). pBuyerPrivateData :: Lens' Proposal (Maybe PrivateData) pBuyerPrivateData@@ -4228,11 +4353,14 @@ -- access to. Each entry in the feed corresponds to a single billing info. -- -- /See:/ 'billingInfoList' smart constructor.-data BillingInfoList = BillingInfoList'+data BillingInfoList =+  BillingInfoList'     { _bilKind  :: !Text     , _bilItems :: !(Maybe [BillingInfo])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'BillingInfoList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -4243,11 +4371,10 @@ billingInfoList     :: BillingInfoList billingInfoList =-    BillingInfoList'-    { _bilKind = "adexchangebuyer#billingInfoList"-    , _bilItems = Nothing-    }+  BillingInfoList'+    {_bilKind = "adexchangebuyer#billingInfoList", _bilItems = Nothing} + -- | Resource type. bilKind :: Lens' BillingInfoList Text bilKind = lens _bilKind (\ s a -> s{_bilKind = a})@@ -4276,10 +4403,13 @@  -- -- /See:/ 'addOrderNotesResponse' smart constructor.-newtype AddOrderNotesResponse = AddOrderNotesResponse'+newtype AddOrderNotesResponse =+  AddOrderNotesResponse'     { _aNotes :: Maybe [MarketplaceNote]-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AddOrderNotesResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -4287,11 +4417,9 @@ -- * 'aNotes' addOrderNotesResponse     :: AddOrderNotesResponse-addOrderNotesResponse =-    AddOrderNotesResponse'-    { _aNotes = Nothing-    }+addOrderNotesResponse = AddOrderNotesResponse' {_aNotes = Nothing} + aNotes :: Lens' AddOrderNotesResponse [MarketplaceNote] aNotes   = lens _aNotes (\ s a -> s{_aNotes = a}) . _Default .@@ -4310,11 +4438,14 @@  -- -- /See:/ 'targetingValueSize' smart constructor.-data TargetingValueSize = TargetingValueSize'+data TargetingValueSize =+  TargetingValueSize'     { _tvsHeight :: !(Maybe (Textual Int32))     , _tvsWidth  :: !(Maybe (Textual Int32))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'TargetingValueSize' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -4325,11 +4456,9 @@ targetingValueSize     :: TargetingValueSize targetingValueSize =-    TargetingValueSize'-    { _tvsHeight = Nothing-    , _tvsWidth = Nothing-    }+  TargetingValueSize' {_tvsHeight = Nothing, _tvsWidth = Nothing} + -- | The height of the creative. tvsHeight :: Lens' TargetingValueSize (Maybe Int32) tvsHeight@@ -4358,13 +4487,16 @@  -- -- /See:/ 'updatePrivateAuctionProposalRequest' smart constructor.-data UpdatePrivateAuctionProposalRequest = UpdatePrivateAuctionProposalRequest'+data UpdatePrivateAuctionProposalRequest =+  UpdatePrivateAuctionProposalRequest'     { _upaprExternalDealId         :: !(Maybe Text)     , _upaprUpdateAction           :: !(Maybe Text)     , _upaprNote                   :: !(Maybe MarketplaceNote)     , _upaprProposalRevisionNumber :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'UpdatePrivateAuctionProposalRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -4379,13 +4511,14 @@ updatePrivateAuctionProposalRequest     :: UpdatePrivateAuctionProposalRequest updatePrivateAuctionProposalRequest =-    UpdatePrivateAuctionProposalRequest'+  UpdatePrivateAuctionProposalRequest'     { _upaprExternalDealId = Nothing     , _upaprUpdateAction = Nothing     , _upaprNote = Nothing     , _upaprProposalRevisionNumber = Nothing     } + -- | The externalDealId of the deal to be updated. upaprExternalDealId :: Lens' UpdatePrivateAuctionProposalRequest (Maybe Text) upaprExternalDealId@@ -4433,11 +4566,14 @@  -- -- /See:/ 'pretargetingConfigDimensionsItem' smart constructor.-data PretargetingConfigDimensionsItem = PretargetingConfigDimensionsItem'+data PretargetingConfigDimensionsItem =+  PretargetingConfigDimensionsItem'     { _pcdiHeight :: !(Maybe (Textual Int64))     , _pcdiWidth  :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PretargetingConfigDimensionsItem' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -4448,11 +4584,10 @@ pretargetingConfigDimensionsItem     :: PretargetingConfigDimensionsItem pretargetingConfigDimensionsItem =-    PretargetingConfigDimensionsItem'-    { _pcdiHeight = Nothing-    , _pcdiWidth = Nothing-    }+  PretargetingConfigDimensionsItem'+    {_pcdiHeight = Nothing, _pcdiWidth = Nothing} + -- | Height in pixels. pcdiHeight :: Lens' PretargetingConfigDimensionsItem (Maybe Int64) pcdiHeight@@ -4483,13 +4618,16 @@  -- -- /See:/ 'creativeCorrectionsItemContextsItem' smart constructor.-data CreativeCorrectionsItemContextsItem = CreativeCorrectionsItemContextsItem'+data CreativeCorrectionsItemContextsItem =+  CreativeCorrectionsItemContextsItem'     { _cciciPlatform      :: !(Maybe [Text])     , _cciciContextType   :: !(Maybe Text)     , _cciciAuctionType   :: !(Maybe [Text])     , _cciciGeoCriteriaId :: !(Maybe [Textual Int32])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativeCorrectionsItemContextsItem' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -4504,13 +4642,14 @@ creativeCorrectionsItemContextsItem     :: CreativeCorrectionsItemContextsItem creativeCorrectionsItemContextsItem =-    CreativeCorrectionsItemContextsItem'+  CreativeCorrectionsItemContextsItem'     { _cciciPlatform = Nothing     , _cciciContextType = Nothing     , _cciciAuctionType = Nothing     , _cciciGeoCriteriaId = Nothing     } + -- | Only set when contextType=PLATFORM. Represents the platforms this -- correction applies to. cciciPlatform :: Lens' CreativeCorrectionsItemContextsItem [Text]@@ -4568,12 +4707,15 @@ -- | This message carries publisher provided forecasting information. -- -- /See:/ 'publisherProvidedForecast' smart constructor.-data PublisherProvidedForecast = PublisherProvidedForecast'+data PublisherProvidedForecast =+  PublisherProvidedForecast'     { _ppfWeeklyImpressions :: !(Maybe (Textual Int64))     , _ppfWeeklyUniques     :: !(Maybe (Textual Int64))     , _ppfDimensions        :: !(Maybe [Dimension])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PublisherProvidedForecast' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -4586,12 +4728,13 @@ publisherProvidedForecast     :: PublisherProvidedForecast publisherProvidedForecast =-    PublisherProvidedForecast'+  PublisherProvidedForecast'     { _ppfWeeklyImpressions = Nothing     , _ppfWeeklyUniques = Nothing     , _ppfDimensions = Nothing     } + -- | Publisher provided weekly impressions. ppfWeeklyImpressions :: Lens' PublisherProvidedForecast (Maybe Int64) ppfWeeklyImpressions@@ -4633,15 +4776,18 @@  -- -- /See:/ 'targetingValue' smart constructor.-data TargetingValue = TargetingValue'+data TargetingValue =+  TargetingValue'     { _tvDemogAgeCriteriaValue    :: !(Maybe TargetingValueDemogAgeCriteria)     , _tvCreativeSizeValue        :: !(Maybe TargetingValueCreativeSize)     , _tvStringValue              :: !(Maybe Text)     , _tvLongValue                :: !(Maybe (Textual Int64))     , _tvDayPartTargetingValue    :: !(Maybe TargetingValueDayPartTargeting)     , _tvDemogGenderCriteriaValue :: !(Maybe TargetingValueDemogGenderCriteria)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'TargetingValue' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -4660,7 +4806,7 @@ targetingValue     :: TargetingValue targetingValue =-    TargetingValue'+  TargetingValue'     { _tvDemogAgeCriteriaValue = Nothing     , _tvCreativeSizeValue = Nothing     , _tvStringValue = Nothing@@ -4669,6 +4815,7 @@     , _tvDemogGenderCriteriaValue = Nothing     } + tvDemogAgeCriteriaValue :: Lens' TargetingValue (Maybe TargetingValueDemogAgeCriteria) tvDemogAgeCriteriaValue   = lens _tvDemogAgeCriteriaValue@@ -4733,12 +4880,15 @@ -- | The app icon, for app download ads. -- -- /See:/ 'creativeNATiveAdAppIcon' smart constructor.-data CreativeNATiveAdAppIcon = CreativeNATiveAdAppIcon'+data CreativeNATiveAdAppIcon =+  CreativeNATiveAdAppIcon'     { _cnataaiHeight :: !(Maybe (Textual Int32))     , _cnataaiURL    :: !(Maybe Text)     , _cnataaiWidth  :: !(Maybe (Textual Int32))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativeNATiveAdAppIcon' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -4751,12 +4901,10 @@ creativeNATiveAdAppIcon     :: CreativeNATiveAdAppIcon creativeNATiveAdAppIcon =-    CreativeNATiveAdAppIcon'-    { _cnataaiHeight = Nothing-    , _cnataaiURL = Nothing-    , _cnataaiWidth = Nothing-    }+  CreativeNATiveAdAppIcon'+    {_cnataaiHeight = Nothing, _cnataaiURL = Nothing, _cnataaiWidth = Nothing} + cnataaiHeight :: Lens' CreativeNATiveAdAppIcon (Maybe Int32) cnataaiHeight   = lens _cnataaiHeight@@ -4790,13 +4938,16 @@  -- -- /See:/ 'price' smart constructor.-data Price = Price'+data Price =+  Price'     { _pCurrencyCode      :: !(Maybe Text)     , _pAmountMicros      :: !(Maybe (Textual Double))     , _pPricingType       :: !(Maybe Text)     , _pExpectedCpmMicros :: !(Maybe (Textual Double))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Price' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -4811,13 +4962,14 @@ price     :: Price price =-    Price'+  Price'     { _pCurrencyCode = Nothing     , _pAmountMicros = Nothing     , _pPricingType = Nothing     , _pExpectedCpmMicros = Nothing     } + -- | The currency code for the price. pCurrencyCode :: Lens' Price (Maybe Text) pCurrencyCode@@ -4863,12 +5015,15 @@  -- -- /See:/ 'pretargetingConfigVideoPlayerSizesItem' smart constructor.-data PretargetingConfigVideoPlayerSizesItem = PretargetingConfigVideoPlayerSizesItem'+data PretargetingConfigVideoPlayerSizesItem =+  PretargetingConfigVideoPlayerSizesItem'     { _pcvpsiMinWidth    :: !(Maybe (Textual Int64))     , _pcvpsiAspectRatio :: !(Maybe Text)     , _pcvpsiMinHeight   :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PretargetingConfigVideoPlayerSizesItem' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -4881,12 +5036,13 @@ pretargetingConfigVideoPlayerSizesItem     :: PretargetingConfigVideoPlayerSizesItem pretargetingConfigVideoPlayerSizesItem =-    PretargetingConfigVideoPlayerSizesItem'+  PretargetingConfigVideoPlayerSizesItem'     { _pcvpsiMinWidth = Nothing     , _pcvpsiAspectRatio = Nothing     , _pcvpsiMinHeight = Nothing     } + -- | The minimum player width in pixels. Leave this field blank to match any -- player width. pcvpsiMinWidth :: Lens' PretargetingConfigVideoPlayerSizesItem (Maybe Int64)@@ -4911,7 +5067,8 @@       . mapping _Coerce  instance FromJSON-         PretargetingConfigVideoPlayerSizesItem where+           PretargetingConfigVideoPlayerSizesItem+         where         parseJSON           = withObject "PretargetingConfigVideoPlayerSizesItem"               (\ o ->@@ -4920,7 +5077,8 @@                      (o .:? "minHeight"))  instance ToJSON-         PretargetingConfigVideoPlayerSizesItem where+           PretargetingConfigVideoPlayerSizesItem+         where         toJSON PretargetingConfigVideoPlayerSizesItem'{..}           = object               (catMaybes@@ -4930,13 +5088,16 @@  -- -- /See:/ 'editAllOrderDealsRequest' smart constructor.-data EditAllOrderDealsRequest = EditAllOrderDealsRequest'+data EditAllOrderDealsRequest =+  EditAllOrderDealsRequest'     { _eUpdateAction           :: !(Maybe Text)     , _eDeals                  :: !(Maybe [MarketplaceDeal])     , _eProposalRevisionNumber :: !(Maybe (Textual Int64))     , _eProposal               :: !(Maybe Proposal)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'EditAllOrderDealsRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -4951,13 +5112,14 @@ editAllOrderDealsRequest     :: EditAllOrderDealsRequest editAllOrderDealsRequest =-    EditAllOrderDealsRequest'+  EditAllOrderDealsRequest'     { _eUpdateAction = Nothing     , _eDeals = Nothing     , _eProposalRevisionNumber = Nothing     , _eProposal = Nothing     } + -- | Indicates an optional action to take on the proposal eUpdateAction :: Lens' EditAllOrderDealsRequest (Maybe Text) eUpdateAction@@ -5016,13 +5178,16 @@ -- | The configuration data for an Ad Exchange billing info. -- -- /See:/ 'billingInfo' smart constructor.-data BillingInfo = BillingInfo'+data BillingInfo =+  BillingInfo'     { _biKind        :: !Text     , _biAccountName :: !(Maybe Text)     , _biAccountId   :: !(Maybe (Textual Int32))     , _biBillingId   :: !(Maybe [Text])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'BillingInfo' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -5037,13 +5202,14 @@ billingInfo     :: BillingInfo billingInfo =-    BillingInfo'+  BillingInfo'     { _biKind = "adexchangebuyer#billingInfo"     , _biAccountName = Nothing     , _biAccountId = Nothing     , _biBillingId = Nothing     } + -- | Resource type. biKind :: Lens' BillingInfo Text biKind = lens _biKind (\ s a -> s{_biKind = a})@@ -5090,11 +5256,14 @@  -- -- /See:/ 'targetingValueDayPartTargeting' smart constructor.-data TargetingValueDayPartTargeting = TargetingValueDayPartTargeting'+data TargetingValueDayPartTargeting =+  TargetingValueDayPartTargeting'     { _tvdptTimeZoneType :: !(Maybe Text)     , _tvdptDayParts     :: !(Maybe [TargetingValueDayPartTargetingDayPart])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'TargetingValueDayPartTargeting' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -5105,11 +5274,10 @@ targetingValueDayPartTargeting     :: TargetingValueDayPartTargeting targetingValueDayPartTargeting =-    TargetingValueDayPartTargeting'-    { _tvdptTimeZoneType = Nothing-    , _tvdptDayParts = Nothing-    }+  TargetingValueDayPartTargeting'+    {_tvdptTimeZoneType = Nothing, _tvdptDayParts = Nothing} + tvdptTimeZoneType :: Lens' TargetingValueDayPartTargeting (Maybe Text) tvdptTimeZoneType   = lens _tvdptTimeZoneType@@ -5140,12 +5308,15 @@  -- -- /See:/ 'sharedTargeting' smart constructor.-data SharedTargeting = SharedTargeting'+data SharedTargeting =+  SharedTargeting'     { _stKey        :: !(Maybe Text)     , _stExclusions :: !(Maybe [TargetingValue])     , _stInclusions :: !(Maybe [TargetingValue])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'SharedTargeting' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -5158,12 +5329,10 @@ sharedTargeting     :: SharedTargeting sharedTargeting =-    SharedTargeting'-    { _stKey = Nothing-    , _stExclusions = Nothing-    , _stInclusions = Nothing-    }+  SharedTargeting'+    {_stKey = Nothing, _stExclusions = Nothing, _stInclusions = Nothing} + -- | The key representing the shared targeting criterion. stKey :: Lens' SharedTargeting (Maybe Text) stKey = lens _stKey (\ s a -> s{_stKey = a})@@ -5203,12 +5372,15 @@ -- | A large image. -- -- /See:/ 'creativeNATiveAdImage' smart constructor.-data CreativeNATiveAdImage = CreativeNATiveAdImage'+data CreativeNATiveAdImage =+  CreativeNATiveAdImage'     { _cnataiHeight :: !(Maybe (Textual Int32))     , _cnataiURL    :: !(Maybe Text)     , _cnataiWidth  :: !(Maybe (Textual Int32))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativeNATiveAdImage' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -5221,12 +5393,10 @@ creativeNATiveAdImage     :: CreativeNATiveAdImage creativeNATiveAdImage =-    CreativeNATiveAdImage'-    { _cnataiHeight = Nothing-    , _cnataiURL = Nothing-    , _cnataiWidth = Nothing-    }+  CreativeNATiveAdImage'+    {_cnataiHeight = Nothing, _cnataiURL = Nothing, _cnataiWidth = Nothing} + cnataiHeight :: Lens' CreativeNATiveAdImage (Maybe Int32) cnataiHeight   = lens _cnataiHeight (\ s a -> s{_cnataiHeight = a})@@ -5266,7 +5436,8 @@ -- field is updatable at all times by either buyer or the seller. -- -- /See:/ 'product' smart constructor.-data Product = Product'+data Product =+  Product'     { _proState                         :: !(Maybe Text)     , _proInventorySource               :: !(Maybe Text)     , _proWebPropertyCode               :: !(Maybe Text)@@ -5294,8 +5465,10 @@     , _proLegacyOfferId                 :: !(Maybe Text)     , _proProductId                     :: !(Maybe Text)     , _proBuyer                         :: !(Maybe Buyer)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Product' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -5356,7 +5529,7 @@ product     :: Product product =-    Product'+  Product'     { _proState = Nothing     , _proInventorySource = Nothing     , _proWebPropertyCode = Nothing@@ -5386,6 +5559,7 @@     , _proBuyer = Nothing     } + -- | The state of the product. (buyer-readonly) proState :: Lens' Product (Maybe Text) proState = lens _proState (\ s a -> s{_proState = a})@@ -5638,12 +5812,15 @@  -- -- /See:/ 'creativeServingRestrictionsItem' smart constructor.-data CreativeServingRestrictionsItem = CreativeServingRestrictionsItem'+data CreativeServingRestrictionsItem =+  CreativeServingRestrictionsItem'     { _csriContexts           :: !(Maybe [CreativeServingRestrictionsItemContextsItem])     , _csriReason             :: !(Maybe Text)     , _csriDisApprovalReasons :: !(Maybe [CreativeServingRestrictionsItemDisApprovalReasonsItem])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativeServingRestrictionsItem' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -5656,12 +5833,13 @@ creativeServingRestrictionsItem     :: CreativeServingRestrictionsItem creativeServingRestrictionsItem =-    CreativeServingRestrictionsItem'+  CreativeServingRestrictionsItem'     { _csriContexts = Nothing     , _csriReason = Nothing     , _csriDisApprovalReasons = Nothing     } + -- | All known contexts\/restrictions. csriContexts :: Lens' CreativeServingRestrictionsItem [CreativeServingRestrictionsItemContextsItem] csriContexts@@ -5707,11 +5885,14 @@  -- -- /See:/ 'deleteOrderDealsResponse' smart constructor.-data DeleteOrderDealsResponse = DeleteOrderDealsResponse'+data DeleteOrderDealsResponse =+  DeleteOrderDealsResponse'     { _dDeals                  :: !(Maybe [MarketplaceDeal])     , _dProposalRevisionNumber :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteOrderDealsResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -5722,11 +5903,10 @@ deleteOrderDealsResponse     :: DeleteOrderDealsResponse deleteOrderDealsResponse =-    DeleteOrderDealsResponse'-    { _dDeals = Nothing-    , _dProposalRevisionNumber = Nothing-    }+  DeleteOrderDealsResponse'+    {_dDeals = Nothing, _dProposalRevisionNumber = Nothing} + -- | List of deals deleted (in the same proposal as passed in the request) dDeals :: Lens' DeleteOrderDealsResponse [MarketplaceDeal] dDeals@@ -5758,11 +5938,14 @@  -- -- /See:/ 'pretargetingConfigPlacementsItem' smart constructor.-data PretargetingConfigPlacementsItem = PretargetingConfigPlacementsItem'+data PretargetingConfigPlacementsItem =+  PretargetingConfigPlacementsItem'     { _pcpiToken :: !(Maybe Text)     , _pcpiType  :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PretargetingConfigPlacementsItem' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -5773,11 +5956,9 @@ pretargetingConfigPlacementsItem     :: PretargetingConfigPlacementsItem pretargetingConfigPlacementsItem =-    PretargetingConfigPlacementsItem'-    { _pcpiToken = Nothing-    , _pcpiType = Nothing-    }+  PretargetingConfigPlacementsItem' {_pcpiToken = Nothing, _pcpiType = Nothing} + -- | The value of the placement. Interpretation depends on the placement -- type, e.g. URL for a site placement, channel name for a channel -- placement, app id for a mobile app placement.@@ -5807,7 +5988,8 @@  -- -- /See:/ 'publisherProFileAPIProto' smart constructor.-data PublisherProFileAPIProto = PublisherProFileAPIProto'+data PublisherProFileAPIProto =+  PublisherProFileAPIProto'     { _ppfapAudience                  :: !(Maybe Text)     , _ppfapState                     :: !(Maybe Text)     , _ppfapMediaKitLink              :: !(Maybe Text)@@ -5830,8 +6012,10 @@     , _ppfapRateCardInfoLink          :: !(Maybe Text)     , _ppfapTopHeadlines              :: !(Maybe [Text])     , _ppfapProgrammaticContact       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PublisherProFileAPIProto' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -5882,7 +6066,7 @@ publisherProFileAPIProto     :: PublisherProFileAPIProto publisherProFileAPIProto =-    PublisherProFileAPIProto'+  PublisherProFileAPIProto'     { _ppfapAudience = Nothing     , _ppfapState = Nothing     , _ppfapMediaKitLink = Nothing@@ -5907,6 +6091,7 @@     , _ppfapProgrammaticContact = Nothing     } + -- | Publisher provided info on its audience. ppfapAudience :: Lens' PublisherProFileAPIProto (Maybe Text) ppfapAudience@@ -6106,7 +6291,8 @@ -- targeting information that is used for serving. -- -- /See:/ 'marketplaceDeal' smart constructor.-data MarketplaceDeal = MarketplaceDeal'+data MarketplaceDeal =+  MarketplaceDeal'     { _mdExternalDealId                 :: !(Maybe Text)     , _mdBuyerPrivateData               :: !(Maybe PrivateData)     , _mdIsSetupComplete                :: !(Maybe Bool)@@ -6132,8 +6318,10 @@     , _mdProductRevisionNumber          :: !(Maybe (Textual Int64))     , _mdProductId                      :: !(Maybe Text)     , _mdCreativeSafeFrameCompatibility :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'MarketplaceDeal' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -6190,7 +6378,7 @@ marketplaceDeal     :: MarketplaceDeal marketplaceDeal =-    MarketplaceDeal'+  MarketplaceDeal'     { _mdExternalDealId = Nothing     , _mdBuyerPrivateData = Nothing     , _mdIsSetupComplete = Nothing@@ -6218,6 +6406,7 @@     , _mdCreativeSafeFrameCompatibility = Nothing     } + -- | The external deal id assigned to this deal once the deal is finalized. -- This is the deal-id that shows up in serving\/reporting etc. (readonly) mdExternalDealId :: Lens' MarketplaceDeal (Maybe Text)@@ -6451,10 +6640,13 @@  -- -- /See:/ 'getOffersResponse' smart constructor.-newtype GetOffersResponse = GetOffersResponse'+newtype GetOffersResponse =+  GetOffersResponse'     { _gorProducts :: Maybe [Product]-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetOffersResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -6462,11 +6654,9 @@ -- * 'gorProducts' getOffersResponse     :: GetOffersResponse-getOffersResponse =-    GetOffersResponse'-    { _gorProducts = Nothing-    }+getOffersResponse = GetOffersResponse' {_gorProducts = Nothing} + -- | The returned list of products. gorProducts :: Lens' GetOffersResponse [Product] gorProducts@@ -6487,11 +6677,14 @@  -- -- /See:/ 'dealTermsNonGuaranteedAuctionTerms' smart constructor.-data DealTermsNonGuaranteedAuctionTerms = DealTermsNonGuaranteedAuctionTerms'+data DealTermsNonGuaranteedAuctionTerms =+  DealTermsNonGuaranteedAuctionTerms'     { _dtngatReservePricePerBuyers      :: !(Maybe [PricePerBuyer])     , _dtngatAutoOptimizePrivateAuction :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DealTermsNonGuaranteedAuctionTerms' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -6502,11 +6695,12 @@ dealTermsNonGuaranteedAuctionTerms     :: DealTermsNonGuaranteedAuctionTerms dealTermsNonGuaranteedAuctionTerms =-    DealTermsNonGuaranteedAuctionTerms'+  DealTermsNonGuaranteedAuctionTerms'     { _dtngatReservePricePerBuyers = Nothing     , _dtngatAutoOptimizePrivateAuction = Nothing     } + -- | Reserve price for the specified buyer. dtngatReservePricePerBuyers :: Lens' DealTermsNonGuaranteedAuctionTerms [PricePerBuyer] dtngatReservePricePerBuyers@@ -6543,11 +6737,14 @@  -- -- /See:/ 'creativeFilteringReasonsReasonsItem' smart constructor.-data CreativeFilteringReasonsReasonsItem = CreativeFilteringReasonsReasonsItem'+data CreativeFilteringReasonsReasonsItem =+  CreativeFilteringReasonsReasonsItem'     { _cfrriFilteringStatus :: !(Maybe (Textual Int32))     , _cfrriFilteringCount  :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativeFilteringReasonsReasonsItem' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -6558,11 +6755,10 @@ creativeFilteringReasonsReasonsItem     :: CreativeFilteringReasonsReasonsItem creativeFilteringReasonsReasonsItem =-    CreativeFilteringReasonsReasonsItem'-    { _cfrriFilteringStatus = Nothing-    , _cfrriFilteringCount = Nothing-    }+  CreativeFilteringReasonsReasonsItem'+    {_cfrriFilteringStatus = Nothing, _cfrriFilteringCount = Nothing} + -- | The filtering status code as defined in creative-status-codes.txt. cfrriFilteringStatus :: Lens' CreativeFilteringReasonsReasonsItem (Maybe Int32) cfrriFilteringStatus@@ -6597,7 +6793,8 @@  -- -- /See:/ 'dealTerms' smart constructor.-data DealTerms = DealTerms'+data DealTerms =+  DealTerms'     { _dtEstimatedGrossSpend           :: !(Maybe Price)     , _dtNonGuaranteedFixedPriceTerms  :: !(Maybe DealTermsNonGuaranteedFixedPriceTerms)     , _dtNonGuaranteedAuctionTerms     :: !(Maybe DealTermsNonGuaranteedAuctionTerms)@@ -6608,8 +6805,10 @@     , _dtSellerTimeZone                :: !(Maybe Text)     , _dtGuaranteedFixedPriceTerms     :: !(Maybe DealTermsGuaranteedFixedPriceTerms)     , _dtDescription                   :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DealTerms' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -6636,7 +6835,7 @@ dealTerms     :: DealTerms dealTerms =-    DealTerms'+  DealTerms'     { _dtEstimatedGrossSpend = Nothing     , _dtNonGuaranteedFixedPriceTerms = Nothing     , _dtNonGuaranteedAuctionTerms = Nothing@@ -6649,6 +6848,7 @@     , _dtDescription = Nothing     } + -- | Non-binding estimate of the estimated gross spend for this deal Can be -- set by buyer or seller. dtEstimatedGrossSpend :: Lens' DealTerms (Maybe Price)@@ -6756,11 +6956,14 @@ -- | The external deal ids associated with a creative. -- -- /See:/ 'creativeDealIds' smart constructor.-data CreativeDealIds = CreativeDealIds'+data CreativeDealIds =+  CreativeDealIds'     { _cdiKind         :: !Text     , _cdiDealStatuses :: !(Maybe [CreativeDealIdsDealStatusesItem])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativeDealIds' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -6771,11 +6974,10 @@ creativeDealIds     :: CreativeDealIds creativeDealIds =-    CreativeDealIds'-    { _cdiKind = "adexchangebuyer#creativeDealIds"-    , _cdiDealStatuses = Nothing-    }+  CreativeDealIds'+    {_cdiKind = "adexchangebuyer#creativeDealIds", _cdiDealStatuses = Nothing} + -- | Resource type. cdiKind :: Lens' CreativeDealIds Text cdiKind = lens _cdiKind (\ s a -> s{_cdiKind = a})@@ -6805,13 +7007,16 @@  -- -- /See:/ 'marketplaceLabel' smart constructor.-data MarketplaceLabel = MarketplaceLabel'+data MarketplaceLabel =+  MarketplaceLabel'     { _mlDeprecatedMarketplaceDealParty :: !(Maybe MarketplaceDealParty)     , _mlAccountId                      :: !(Maybe Text)     , _mlCreateTimeMs                   :: !(Maybe (Textual Int64))     , _mlLabel                          :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'MarketplaceLabel' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -6826,13 +7031,14 @@ marketplaceLabel     :: MarketplaceLabel marketplaceLabel =-    MarketplaceLabel'+  MarketplaceLabel'     { _mlDeprecatedMarketplaceDealParty = Nothing     , _mlAccountId = Nothing     , _mlCreateTimeMs = Nothing     , _mlLabel = Nothing     } + -- | Information about the party that created the label. mlDeprecatedMarketplaceDealParty :: Lens' MarketplaceLabel (Maybe MarketplaceDealParty) mlDeprecatedMarketplaceDealParty@@ -6877,10 +7083,13 @@  -- -- /See:/ 'buyer' smart constructor.-newtype Buyer = Buyer'+newtype Buyer =+  Buyer'     { _buyAccountId :: Maybe Text-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Buyer' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -6888,11 +7097,9 @@ -- * 'buyAccountId' buyer     :: Buyer-buyer =-    Buyer'-    { _buyAccountId = Nothing-    }+buyer = Buyer' {_buyAccountId = Nothing} + -- | Adx account id of the buyer. buyAccountId :: Lens' Buyer (Maybe Text) buyAccountId@@ -6910,12 +7117,15 @@  -- -- /See:/ 'addOrderDealsRequest' smart constructor.-data AddOrderDealsRequest = AddOrderDealsRequest'+data AddOrderDealsRequest =+  AddOrderDealsRequest'     { _aUpdateAction           :: !(Maybe Text)     , _aDeals                  :: !(Maybe [MarketplaceDeal])     , _aProposalRevisionNumber :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AddOrderDealsRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -6928,12 +7138,13 @@ addOrderDealsRequest     :: AddOrderDealsRequest addOrderDealsRequest =-    AddOrderDealsRequest'+  AddOrderDealsRequest'     { _aUpdateAction = Nothing     , _aDeals = Nothing     , _aProposalRevisionNumber = Nothing     } + -- | Indicates an optional action to take on the proposal aUpdateAction :: Lens' AddOrderDealsRequest (Maybe Text) aUpdateAction@@ -6975,14 +7186,17 @@ -- has_buyer_paused or the has_seller_paused bits can be set independently. -- -- /See:/ 'dealServingMetadataDealPauseStatus' smart constructor.-data DealServingMetadataDealPauseStatus = DealServingMetadataDealPauseStatus'+data DealServingMetadataDealPauseStatus =+  DealServingMetadataDealPauseStatus'     { _dsmdpsFirstPausedBy     :: !(Maybe Text)     , _dsmdpsBuyerPauseReason  :: !(Maybe Text)     , _dsmdpsHasBuyerPaused    :: !(Maybe Bool)     , _dsmdpsSellerPauseReason :: !(Maybe Text)     , _dsmdpsHasSellerPaused   :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DealServingMetadataDealPauseStatus' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -6999,7 +7213,7 @@ dealServingMetadataDealPauseStatus     :: DealServingMetadataDealPauseStatus dealServingMetadataDealPauseStatus =-    DealServingMetadataDealPauseStatus'+  DealServingMetadataDealPauseStatus'     { _dsmdpsFirstPausedBy = Nothing     , _dsmdpsBuyerPauseReason = Nothing     , _dsmdpsHasBuyerPaused = Nothing@@ -7007,6 +7221,7 @@     , _dsmdpsHasSellerPaused = Nothing     } + -- | If the deal is paused, records which party paused the deal first. dsmdpsFirstPausedBy :: Lens' DealServingMetadataDealPauseStatus (Maybe Text) dsmdpsFirstPausedBy@@ -7059,14 +7274,17 @@  -- -- /See:/ 'dealTermsGuaranteedFixedPriceTerms' smart constructor.-data DealTermsGuaranteedFixedPriceTerms = DealTermsGuaranteedFixedPriceTerms'+data DealTermsGuaranteedFixedPriceTerms =+  DealTermsGuaranteedFixedPriceTerms'     { _dtgfptGuaranteedLooks       :: !(Maybe (Textual Int64))     , _dtgfptGuaranteedImpressions :: !(Maybe (Textual Int64))     , _dtgfptBillingInfo           :: !(Maybe DealTermsGuaranteedFixedPriceTermsBillingInfo)     , _dtgfptFixedPrices           :: !(Maybe [PricePerBuyer])     , _dtgfptMinimumDailyLooks     :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DealTermsGuaranteedFixedPriceTerms' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -7083,13 +7301,14 @@ dealTermsGuaranteedFixedPriceTerms     :: DealTermsGuaranteedFixedPriceTerms dealTermsGuaranteedFixedPriceTerms =-    DealTermsGuaranteedFixedPriceTerms'+  DealTermsGuaranteedFixedPriceTerms'     { _dtgfptGuaranteedLooks = Nothing     , _dtgfptGuaranteedImpressions = Nothing     , _dtgfptBillingInfo = Nothing     , _dtgfptFixedPrices = Nothing     , _dtgfptMinimumDailyLooks = Nothing     }+  -- | Count of guaranteed looks. Required for deal, optional for product. For -- CPD deals, buyer changes to guaranteed_looks will be ignored.
gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Get.hs view
@@ -51,10 +51,13 @@ -- | Gets one account by ID. -- -- /See:/ 'accountsGet' smart constructor.-newtype AccountsGet = AccountsGet'+newtype AccountsGet =+  AccountsGet'     { _agId :: Textual Int32-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -63,10 +66,8 @@ accountsGet     :: Int32 -- ^ 'agId'     -> AccountsGet-accountsGet pAgId_ =-    AccountsGet'-    { _agId = _Coerce # pAgId_-    }+accountsGet pAgId_ = AccountsGet' {_agId = _Coerce # pAgId_}+  -- | The account id agId :: Lens' AccountsGet Int32
gen/Network/Google/Resource/AdExchangeBuyer/Accounts/List.hs view
@@ -49,14 +49,16 @@ -- -- /See:/ 'accountsList'' smart constructor. data AccountsList' =-    AccountsList''-    deriving (Eq,Show,Data,Typeable,Generic)+  AccountsList''+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsList'' with the minimum fields required to make a request. -- accountsList'     :: AccountsList' accountsList' = AccountsList''+  instance GoogleRequest AccountsList' where         type Rs AccountsList' = AccountsList
gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Patch.hs view
@@ -55,12 +55,15 @@ -- | Updates an existing account. This method supports patch semantics. -- -- /See:/ 'accountsPatch' smart constructor.-data AccountsPatch = AccountsPatch'+data AccountsPatch =+  AccountsPatch'     { _apPayload                    :: !Account     , _apConfirmUnsafeAccountChange :: !(Maybe Bool)     , _apId                         :: !(Textual Int32)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsPatch' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -75,11 +78,12 @@     -> Int32 -- ^ 'apId'     -> AccountsPatch accountsPatch pApPayload_ pApId_ =-    AccountsPatch'+  AccountsPatch'     { _apPayload = pApPayload_     , _apConfirmUnsafeAccountChange = Nothing     , _apId = _Coerce # pApId_     }+  -- | Multipart request metadata. apPayload :: Lens' AccountsPatch Account
gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Update.hs view
@@ -55,12 +55,15 @@ -- | Updates an existing account. -- -- /See:/ 'accountsUpdate' smart constructor.-data AccountsUpdate = AccountsUpdate'+data AccountsUpdate =+  AccountsUpdate'     { _auPayload                    :: !Account     , _auConfirmUnsafeAccountChange :: !(Maybe Bool)     , _auId                         :: !(Textual Int32)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsUpdate' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -75,11 +78,12 @@     -> Int32 -- ^ 'auId'     -> AccountsUpdate accountsUpdate pAuPayload_ pAuId_ =-    AccountsUpdate'+  AccountsUpdate'     { _auPayload = pAuPayload_     , _auConfirmUnsafeAccountChange = Nothing     , _auId = _Coerce # pAuId_     }+  -- | Multipart request metadata. auPayload :: Lens' AccountsUpdate Account
gen/Network/Google/Resource/AdExchangeBuyer/BillingInfo/Get.hs view
@@ -51,10 +51,13 @@ -- | Returns the billing information for one account specified by account ID. -- -- /See:/ 'billingInfoGet' smart constructor.-newtype BillingInfoGet = BillingInfoGet'+newtype BillingInfoGet =+  BillingInfoGet'     { _bigAccountId :: Textual Int32-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'BillingInfoGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -64,9 +67,8 @@     :: Int32 -- ^ 'bigAccountId'     -> BillingInfoGet billingInfoGet pBigAccountId_ =-    BillingInfoGet'-    { _bigAccountId = _Coerce # pBigAccountId_-    }+  BillingInfoGet' {_bigAccountId = _Coerce # pBigAccountId_}+  -- | The account id. bigAccountId :: Lens' BillingInfoGet Int32
gen/Network/Google/Resource/AdExchangeBuyer/BillingInfo/List.hs view
@@ -52,14 +52,16 @@ -- -- /See:/ 'billingInfoList'' smart constructor. data BillingInfoList' =-    BillingInfoList''-    deriving (Eq,Show,Data,Typeable,Generic)+  BillingInfoList''+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'BillingInfoList'' with the minimum fields required to make a request. -- billingInfoList'     :: BillingInfoList' billingInfoList' = BillingInfoList''+  instance GoogleRequest BillingInfoList' where         type Rs BillingInfoList' = BillingInfoList
gen/Network/Google/Resource/AdExchangeBuyer/Budget/Get.hs view
@@ -55,11 +55,14 @@ -- accountId and billingId. -- -- /See:/ 'budgetGet' smart constructor.-data BudgetGet = BudgetGet'+data BudgetGet =+  BudgetGet'     { _bgAccountId :: !(Textual Int64)     , _bgBillingId :: !(Textual Int64)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'BudgetGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -72,10 +75,11 @@     -> Int64 -- ^ 'bgBillingId'     -> BudgetGet budgetGet pBgAccountId_ pBgBillingId_ =-    BudgetGet'+  BudgetGet'     { _bgAccountId = _Coerce # pBgAccountId_     , _bgBillingId = _Coerce # pBgBillingId_     }+  -- | The account id to get the budget information for. bgAccountId :: Lens' BudgetGet Int64
gen/Network/Google/Resource/AdExchangeBuyer/Budget/Patch.hs view
@@ -59,12 +59,15 @@ -- method supports patch semantics. -- -- /See:/ 'budgetPatch' smart constructor.-data BudgetPatch = BudgetPatch'+data BudgetPatch =+  BudgetPatch'     { _bpPayload   :: !Budget     , _bpAccountId :: !(Textual Int64)     , _bpBillingId :: !(Textual Int64)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'BudgetPatch' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -80,11 +83,12 @@     -> Int64 -- ^ 'bpBillingId'     -> BudgetPatch budgetPatch pBpPayload_ pBpAccountId_ pBpBillingId_ =-    BudgetPatch'+  BudgetPatch'     { _bpPayload = pBpPayload_     , _bpAccountId = _Coerce # pBpAccountId_     , _bpBillingId = _Coerce # pBpBillingId_     }+  -- | Multipart request metadata. bpPayload :: Lens' BudgetPatch Budget
gen/Network/Google/Resource/AdExchangeBuyer/Budget/Update.hs view
@@ -57,12 +57,15 @@ -- accountId and billingId, with the budget amount in the request. -- -- /See:/ 'budgetUpdate' smart constructor.-data BudgetUpdate = BudgetUpdate'+data BudgetUpdate =+  BudgetUpdate'     { _buPayload   :: !Budget     , _buAccountId :: !(Textual Int64)     , _buBillingId :: !(Textual Int64)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'BudgetUpdate' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -78,11 +81,12 @@     -> Int64 -- ^ 'buBillingId'     -> BudgetUpdate budgetUpdate pBuPayload_ pBuAccountId_ pBuBillingId_ =-    BudgetUpdate'+  BudgetUpdate'     { _buPayload = pBuPayload_     , _buAccountId = _Coerce # pBuAccountId_     , _buBillingId = _Coerce # pBuBillingId_     }+  -- | Multipart request metadata. buPayload :: Lens' BudgetUpdate Budget
gen/Network/Google/Resource/AdExchangeBuyer/Creatives/AddDeal.hs view
@@ -56,12 +56,15 @@ -- | Add a deal id association for the creative. -- -- /See:/ 'creativesAddDeal' smart constructor.-data CreativesAddDeal = CreativesAddDeal'+data CreativesAddDeal =+  CreativesAddDeal'     { _cadBuyerCreativeId :: !Text     , _cadDealId          :: !(Textual Int64)     , _cadAccountId       :: !(Textual Int32)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativesAddDeal' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -77,11 +80,12 @@     -> Int32 -- ^ 'cadAccountId'     -> CreativesAddDeal creativesAddDeal pCadBuyerCreativeId_ pCadDealId_ pCadAccountId_ =-    CreativesAddDeal'+  CreativesAddDeal'     { _cadBuyerCreativeId = pCadBuyerCreativeId_     , _cadDealId = _Coerce # pCadDealId_     , _cadAccountId = _Coerce # pCadAccountId_     }+  -- | The buyer-specific id for this creative. cadBuyerCreativeId :: Lens' CreativesAddDeal Text
gen/Network/Google/Resource/AdExchangeBuyer/Creatives/Get.hs view
@@ -55,11 +55,14 @@ -- 30-40 minutes after submission. -- -- /See:/ 'creativesGet' smart constructor.-data CreativesGet = CreativesGet'+data CreativesGet =+  CreativesGet'     { _cgBuyerCreativeId :: !Text     , _cgAccountId       :: !(Textual Int32)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativesGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -72,10 +75,11 @@     -> Int32 -- ^ 'cgAccountId'     -> CreativesGet creativesGet pCgBuyerCreativeId_ pCgAccountId_ =-    CreativesGet'+  CreativesGet'     { _cgBuyerCreativeId = pCgBuyerCreativeId_     , _cgAccountId = _Coerce # pCgAccountId_     }+  -- | The buyer-specific id for this creative. cgBuyerCreativeId :: Lens' CreativesGet Text
gen/Network/Google/Resource/AdExchangeBuyer/Creatives/Insert.hs view
@@ -51,10 +51,13 @@ -- | Submit a new creative. -- -- /See:/ 'creativesInsert' smart constructor.-newtype CreativesInsert = CreativesInsert'+newtype CreativesInsert =+  CreativesInsert'     { _ciPayload :: Creative-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativesInsert' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -63,10 +66,8 @@ creativesInsert     :: Creative -- ^ 'ciPayload'     -> CreativesInsert-creativesInsert pCiPayload_ =-    CreativesInsert'-    { _ciPayload = pCiPayload_-    }+creativesInsert pCiPayload_ = CreativesInsert' {_ciPayload = pCiPayload_}+  -- | Multipart request metadata. ciPayload :: Lens' CreativesInsert Creative
gen/Network/Google/Resource/AdExchangeBuyer/Creatives/List.hs view
@@ -67,15 +67,18 @@ -- creative will be available 30-40 minutes after submission. -- -- /See:/ 'creativesList'' smart constructor.-data CreativesList' = CreativesList''+data CreativesList' =+  CreativesList''     { _clBuyerCreativeId         :: !(Maybe [Text])     , _clOpenAuctionStatusFilter :: !(Maybe CreativesListOpenAuctionStatusFilter)     , _clAccountId               :: !(Maybe [Textual Int32])     , _clPageToken               :: !(Maybe Text)     , _clDealsStatusFilter       :: !(Maybe CreativesListDealsStatusFilter)     , _clMaxResults              :: !(Maybe (Textual Word32))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativesList'' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -94,7 +97,7 @@ creativesList'     :: CreativesList' creativesList' =-    CreativesList''+  CreativesList''     { _clBuyerCreativeId = Nothing     , _clOpenAuctionStatusFilter = Nothing     , _clAccountId = Nothing@@ -102,6 +105,7 @@     , _clDealsStatusFilter = Nothing     , _clMaxResults = Nothing     }+  -- | When specified, only creatives for the given buyer creative ids are -- returned.
gen/Network/Google/Resource/AdExchangeBuyer/Creatives/ListDeals.hs view
@@ -55,11 +55,14 @@ -- | Lists the external deal ids associated with the creative. -- -- /See:/ 'creativesListDeals' smart constructor.-data CreativesListDeals = CreativesListDeals'+data CreativesListDeals =+  CreativesListDeals'     { _cldBuyerCreativeId :: !Text     , _cldAccountId       :: !(Textual Int32)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativesListDeals' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -72,10 +75,11 @@     -> Int32 -- ^ 'cldAccountId'     -> CreativesListDeals creativesListDeals pCldBuyerCreativeId_ pCldAccountId_ =-    CreativesListDeals'+  CreativesListDeals'     { _cldBuyerCreativeId = pCldBuyerCreativeId_     , _cldAccountId = _Coerce # pCldAccountId_     }+  -- | The buyer-specific id for this creative. cldBuyerCreativeId :: Lens' CreativesListDeals Text
gen/Network/Google/Resource/AdExchangeBuyer/Creatives/RemoveDeal.hs view
@@ -56,12 +56,15 @@ -- | Remove a deal id associated with the creative. -- -- /See:/ 'creativesRemoveDeal' smart constructor.-data CreativesRemoveDeal = CreativesRemoveDeal'+data CreativesRemoveDeal =+  CreativesRemoveDeal'     { _crdBuyerCreativeId :: !Text     , _crdDealId          :: !(Textual Int64)     , _crdAccountId       :: !(Textual Int32)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreativesRemoveDeal' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -77,11 +80,12 @@     -> Int32 -- ^ 'crdAccountId'     -> CreativesRemoveDeal creativesRemoveDeal pCrdBuyerCreativeId_ pCrdDealId_ pCrdAccountId_ =-    CreativesRemoveDeal'+  CreativesRemoveDeal'     { _crdBuyerCreativeId = pCrdBuyerCreativeId_     , _crdDealId = _Coerce # pCrdDealId_     , _crdAccountId = _Coerce # pCrdAccountId_     }+  -- | The buyer-specific id for this creative. crdBuyerCreativeId :: Lens' CreativesRemoveDeal Text
gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Delete.hs view
@@ -56,11 +56,14 @@ -- | Delete the specified deals from the proposal -- -- /See:/ 'marketplaceDealsDelete' smart constructor.-data MarketplaceDealsDelete = MarketplaceDealsDelete'+data MarketplaceDealsDelete =+  MarketplaceDealsDelete'     { _mddPayload    :: !DeleteOrderDealsRequest     , _mddProposalId :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'MarketplaceDealsDelete' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -73,10 +76,9 @@     -> Text -- ^ 'mddProposalId'     -> MarketplaceDealsDelete marketplaceDealsDelete pMddPayload_ pMddProposalId_ =-    MarketplaceDealsDelete'-    { _mddPayload = pMddPayload_-    , _mddProposalId = pMddProposalId_-    }+  MarketplaceDealsDelete'+    {_mddPayload = pMddPayload_, _mddProposalId = pMddProposalId_}+  -- | Multipart request metadata. mddPayload :: Lens' MarketplaceDealsDelete DeleteOrderDealsRequest
gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Insert.hs view
@@ -56,11 +56,14 @@ -- | Add new deals for the specified proposal -- -- /See:/ 'marketplaceDealsInsert' smart constructor.-data MarketplaceDealsInsert = MarketplaceDealsInsert'+data MarketplaceDealsInsert =+  MarketplaceDealsInsert'     { _mdiPayload    :: !AddOrderDealsRequest     , _mdiProposalId :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'MarketplaceDealsInsert' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -73,10 +76,9 @@     -> Text -- ^ 'mdiProposalId'     -> MarketplaceDealsInsert marketplaceDealsInsert pMdiPayload_ pMdiProposalId_ =-    MarketplaceDealsInsert'-    { _mdiPayload = pMdiPayload_-    , _mdiProposalId = pMdiProposalId_-    }+  MarketplaceDealsInsert'+    {_mdiPayload = pMdiPayload_, _mdiProposalId = pMdiProposalId_}+  -- | Multipart request metadata. mdiPayload :: Lens' MarketplaceDealsInsert AddOrderDealsRequest
gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/List.hs view
@@ -55,11 +55,14 @@ -- | List all the deals for a given proposal -- -- /See:/ 'marketplaceDealsList' smart constructor.-data MarketplaceDealsList = MarketplaceDealsList'+data MarketplaceDealsList =+  MarketplaceDealsList'     { _mdlProposalId :: !Text     , _mdlPqlQuery   :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'MarketplaceDealsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -71,10 +74,9 @@     :: Text -- ^ 'mdlProposalId'     -> MarketplaceDealsList marketplaceDealsList pMdlProposalId_ =-    MarketplaceDealsList'-    { _mdlProposalId = pMdlProposalId_-    , _mdlPqlQuery = Nothing-    }+  MarketplaceDealsList'+    {_mdlProposalId = pMdlProposalId_, _mdlPqlQuery = Nothing}+  -- | The proposalId to get deals for. To search across all proposals specify -- order_id = \'-\' as part of the URL.
gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Update.hs view
@@ -56,11 +56,14 @@ -- | Replaces all the deals in the proposal with the passed in deals -- -- /See:/ 'marketplaceDealsUpdate' smart constructor.-data MarketplaceDealsUpdate = MarketplaceDealsUpdate'+data MarketplaceDealsUpdate =+  MarketplaceDealsUpdate'     { _mduPayload    :: !EditAllOrderDealsRequest     , _mduProposalId :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'MarketplaceDealsUpdate' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -73,10 +76,9 @@     -> Text -- ^ 'mduProposalId'     -> MarketplaceDealsUpdate marketplaceDealsUpdate pMduPayload_ pMduProposalId_ =-    MarketplaceDealsUpdate'-    { _mduPayload = pMduPayload_-    , _mduProposalId = pMduProposalId_-    }+  MarketplaceDealsUpdate'+    {_mduPayload = pMduPayload_, _mduProposalId = pMduProposalId_}+  -- | Multipart request metadata. mduPayload :: Lens' MarketplaceDealsUpdate EditAllOrderDealsRequest
gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceNotes/Insert.hs view
@@ -56,11 +56,14 @@ -- | Add notes to the proposal -- -- /See:/ 'marketplaceNotesInsert' smart constructor.-data MarketplaceNotesInsert = MarketplaceNotesInsert'+data MarketplaceNotesInsert =+  MarketplaceNotesInsert'     { _mniPayload    :: !AddOrderNotesRequest     , _mniProposalId :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'MarketplaceNotesInsert' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -73,10 +76,9 @@     -> Text -- ^ 'mniProposalId'     -> MarketplaceNotesInsert marketplaceNotesInsert pMniPayload_ pMniProposalId_ =-    MarketplaceNotesInsert'-    { _mniPayload = pMniPayload_-    , _mniProposalId = pMniProposalId_-    }+  MarketplaceNotesInsert'+    {_mniPayload = pMniPayload_, _mniProposalId = pMniProposalId_}+  -- | Multipart request metadata. mniPayload :: Lens' MarketplaceNotesInsert AddOrderNotesRequest
gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceNotes/List.hs view
@@ -55,11 +55,14 @@ -- | Get all the notes associated with a proposal -- -- /See:/ 'marketplaceNotesList' smart constructor.-data MarketplaceNotesList = MarketplaceNotesList'+data MarketplaceNotesList =+  MarketplaceNotesList'     { _mnlProposalId :: !Text     , _mnlPqlQuery   :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'MarketplaceNotesList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -71,10 +74,9 @@     :: Text -- ^ 'mnlProposalId'     -> MarketplaceNotesList marketplaceNotesList pMnlProposalId_ =-    MarketplaceNotesList'-    { _mnlProposalId = pMnlProposalId_-    , _mnlPqlQuery = Nothing-    }+  MarketplaceNotesList'+    {_mnlProposalId = pMnlProposalId_, _mnlPqlQuery = Nothing}+  -- | The proposalId to get notes for. To search across all proposals specify -- order_id = \'-\' as part of the URL.
gen/Network/Google/Resource/AdExchangeBuyer/Marketplaceprivateauction/Updateproposal.hs view
@@ -56,11 +56,14 @@ -- | Update a given private auction proposal -- -- /See:/ 'marketplaceprivateauctionUpdateproposal' smart constructor.-data MarketplaceprivateauctionUpdateproposal = MarketplaceprivateauctionUpdateproposal'+data MarketplaceprivateauctionUpdateproposal =+  MarketplaceprivateauctionUpdateproposal'     { _muPrivateAuctionId :: !Text     , _muPayload          :: !UpdatePrivateAuctionProposalRequest-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'MarketplaceprivateauctionUpdateproposal' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -73,11 +76,10 @@     -> UpdatePrivateAuctionProposalRequest -- ^ 'muPayload'     -> MarketplaceprivateauctionUpdateproposal marketplaceprivateauctionUpdateproposal pMuPrivateAuctionId_ pMuPayload_ =-    MarketplaceprivateauctionUpdateproposal'-    { _muPrivateAuctionId = pMuPrivateAuctionId_-    , _muPayload = pMuPayload_-    }+  MarketplaceprivateauctionUpdateproposal'+    {_muPrivateAuctionId = pMuPrivateAuctionId_, _muPayload = pMuPayload_} + -- | The private auction id to be updated. muPrivateAuctionId :: Lens' MarketplaceprivateauctionUpdateproposal Text muPrivateAuctionId@@ -90,7 +92,8 @@   = lens _muPayload (\ s a -> s{_muPayload = a})  instance GoogleRequest-         MarketplaceprivateauctionUpdateproposal where+           MarketplaceprivateauctionUpdateproposal+         where         type Rs MarketplaceprivateauctionUpdateproposal = ()         type Scopes MarketplaceprivateauctionUpdateproposal =              '["https://www.googleapis.com/auth/adexchange.buyer"]
gen/Network/Google/Resource/AdExchangeBuyer/PerformanceReport/List.hs view
@@ -60,14 +60,17 @@ -- | Retrieves the authenticated user\'s list of performance metrics. -- -- /See:/ 'performanceReportList'' smart constructor.-data PerformanceReportList' = PerformanceReportList''+data PerformanceReportList' =+  PerformanceReportList''     { _prlAccountId     :: !(Textual Int64)     , _prlPageToken     :: !(Maybe Text)     , _prlEndDateTime   :: !Text     , _prlMaxResults    :: !(Maybe (Textual Word32))     , _prlStartDateTime :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PerformanceReportList'' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -87,13 +90,14 @@     -> Text -- ^ 'prlStartDateTime'     -> PerformanceReportList' performanceReportList' pPrlAccountId_ pPrlEndDateTime_ pPrlStartDateTime_ =-    PerformanceReportList''+  PerformanceReportList''     { _prlAccountId = _Coerce # pPrlAccountId_     , _prlPageToken = Nothing     , _prlEndDateTime = pPrlEndDateTime_     , _prlMaxResults = Nothing     , _prlStartDateTime = pPrlStartDateTime_     }+  -- | The account id to get the reports. prlAccountId :: Lens' PerformanceReportList' Int64
gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Delete.hs view
@@ -53,11 +53,14 @@ -- | Deletes an existing pretargeting config. -- -- /See:/ 'pretargetingConfigDelete' smart constructor.-data PretargetingConfigDelete = PretargetingConfigDelete'+data PretargetingConfigDelete =+  PretargetingConfigDelete'     { _pcdAccountId :: !(Textual Int64)     , _pcdConfigId  :: !(Textual Int64)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PretargetingConfigDelete' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -70,10 +73,11 @@     -> Int64 -- ^ 'pcdConfigId'     -> PretargetingConfigDelete pretargetingConfigDelete pPcdAccountId_ pPcdConfigId_ =-    PretargetingConfigDelete'+  PretargetingConfigDelete'     { _pcdAccountId = _Coerce # pPcdAccountId_     , _pcdConfigId = _Coerce # pPcdConfigId_     }+  -- | The account id to delete the pretargeting config for. pcdAccountId :: Lens' PretargetingConfigDelete Int64
gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Get.hs view
@@ -54,11 +54,14 @@ -- | Gets a specific pretargeting configuration -- -- /See:/ 'pretargetingConfigGet' smart constructor.-data PretargetingConfigGet = PretargetingConfigGet'+data PretargetingConfigGet =+  PretargetingConfigGet'     { _pcgAccountId :: !(Textual Int64)     , _pcgConfigId  :: !(Textual Int64)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PretargetingConfigGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -71,10 +74,11 @@     -> Int64 -- ^ 'pcgConfigId'     -> PretargetingConfigGet pretargetingConfigGet pPcgAccountId_ pPcgConfigId_ =-    PretargetingConfigGet'+  PretargetingConfigGet'     { _pcgAccountId = _Coerce # pPcgAccountId_     , _pcgConfigId = _Coerce # pPcgConfigId_     }+  -- | The account id to get the pretargeting config for. pcgAccountId :: Lens' PretargetingConfigGet Int64
gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Insert.hs view
@@ -54,11 +54,14 @@ -- | Inserts a new pretargeting configuration. -- -- /See:/ 'pretargetingConfigInsert' smart constructor.-data PretargetingConfigInsert = PretargetingConfigInsert'+data PretargetingConfigInsert =+  PretargetingConfigInsert'     { _pciPayload   :: !PretargetingConfig     , _pciAccountId :: !(Textual Int64)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PretargetingConfigInsert' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -71,10 +74,9 @@     -> Int64 -- ^ 'pciAccountId'     -> PretargetingConfigInsert pretargetingConfigInsert pPciPayload_ pPciAccountId_ =-    PretargetingConfigInsert'-    { _pciPayload = pPciPayload_-    , _pciAccountId = _Coerce # pPciAccountId_-    }+  PretargetingConfigInsert'+    {_pciPayload = pPciPayload_, _pciAccountId = _Coerce # pPciAccountId_}+  -- | Multipart request metadata. pciPayload :: Lens' PretargetingConfigInsert PretargetingConfig
gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/List.hs view
@@ -54,10 +54,13 @@ -- configurations. -- -- /See:/ 'pretargetingConfigList'' smart constructor.-newtype PretargetingConfigList' = PretargetingConfigList''+newtype PretargetingConfigList' =+  PretargetingConfigList''     { _pclAccountId :: Textual Int64-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PretargetingConfigList'' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -67,9 +70,8 @@     :: Int64 -- ^ 'pclAccountId'     -> PretargetingConfigList' pretargetingConfigList' pPclAccountId_ =-    PretargetingConfigList''-    { _pclAccountId = _Coerce # pPclAccountId_-    }+  PretargetingConfigList'' {_pclAccountId = _Coerce # pPclAccountId_}+  -- | The account id to get the pretargeting configs for. pclAccountId :: Lens' PretargetingConfigList' Int64
gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Patch.hs view
@@ -58,12 +58,15 @@ -- semantics. -- -- /See:/ 'pretargetingConfigPatch' smart constructor.-data PretargetingConfigPatch = PretargetingConfigPatch'+data PretargetingConfigPatch =+  PretargetingConfigPatch'     { _pcpPayload   :: !PretargetingConfig     , _pcpAccountId :: !(Textual Int64)     , _pcpConfigId  :: !(Textual Int64)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PretargetingConfigPatch' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -79,11 +82,12 @@     -> Int64 -- ^ 'pcpConfigId'     -> PretargetingConfigPatch pretargetingConfigPatch pPcpPayload_ pPcpAccountId_ pPcpConfigId_ =-    PretargetingConfigPatch'+  PretargetingConfigPatch'     { _pcpPayload = pPcpPayload_     , _pcpAccountId = _Coerce # pPcpAccountId_     , _pcpConfigId = _Coerce # pPcpConfigId_     }+  -- | Multipart request metadata. pcpPayload :: Lens' PretargetingConfigPatch PretargetingConfig
gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Update.hs view
@@ -56,12 +56,15 @@ -- | Updates an existing pretargeting config. -- -- /See:/ 'pretargetingConfigUpdate' smart constructor.-data PretargetingConfigUpdate = PretargetingConfigUpdate'+data PretargetingConfigUpdate =+  PretargetingConfigUpdate'     { _pcuPayload   :: !PretargetingConfig     , _pcuAccountId :: !(Textual Int64)     , _pcuConfigId  :: !(Textual Int64)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PretargetingConfigUpdate' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -77,11 +80,12 @@     -> Int64 -- ^ 'pcuConfigId'     -> PretargetingConfigUpdate pretargetingConfigUpdate pPcuPayload_ pPcuAccountId_ pPcuConfigId_ =-    PretargetingConfigUpdate'+  PretargetingConfigUpdate'     { _pcuPayload = pPcuPayload_     , _pcuAccountId = _Coerce # pPcuAccountId_     , _pcuConfigId = _Coerce # pPcuConfigId_     }+  -- | Multipart request metadata. pcuPayload :: Lens' PretargetingConfigUpdate PretargetingConfig
gen/Network/Google/Resource/AdExchangeBuyer/Products/Get.hs view
@@ -51,10 +51,13 @@ -- | Gets the requested product by id. -- -- /See:/ 'productsGet' smart constructor.-newtype ProductsGet = ProductsGet'+newtype ProductsGet =+  ProductsGet'     { _pgProductId :: Text-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProductsGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -63,10 +66,8 @@ productsGet     :: Text -- ^ 'pgProductId'     -> ProductsGet-productsGet pPgProductId_ =-    ProductsGet'-    { _pgProductId = pPgProductId_-    }+productsGet pPgProductId_ = ProductsGet' {_pgProductId = pPgProductId_}+  -- | The id for the product to get the head revision for. pgProductId :: Lens' ProductsGet Text
gen/Network/Google/Resource/AdExchangeBuyer/Products/Search.hs view
@@ -53,10 +53,13 @@ -- | Gets the requested product. -- -- /See:/ 'productsSearch' smart constructor.-newtype ProductsSearch = ProductsSearch'+newtype ProductsSearch =+  ProductsSearch'     { _psPqlQuery :: Maybe Text-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProductsSearch' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -64,10 +67,8 @@ -- * 'psPqlQuery' productsSearch     :: ProductsSearch-productsSearch =-    ProductsSearch'-    { _psPqlQuery = Nothing-    }+productsSearch = ProductsSearch' {_psPqlQuery = Nothing}+  -- | The pql query used to query for products. psPqlQuery :: Lens' ProductsSearch (Maybe Text)
gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Get.hs view
@@ -51,10 +51,13 @@ -- | Get a proposal given its id -- -- /See:/ 'proposalsGet' smart constructor.-newtype ProposalsGet = ProposalsGet'+newtype ProposalsGet =+  ProposalsGet'     { _pgProposalId :: Text-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProposalsGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -63,10 +66,8 @@ proposalsGet     :: Text -- ^ 'pgProposalId'     -> ProposalsGet-proposalsGet pPgProposalId_ =-    ProposalsGet'-    { _pgProposalId = pPgProposalId_-    }+proposalsGet pPgProposalId_ = ProposalsGet' {_pgProposalId = pPgProposalId_}+  -- | Id of the proposal to retrieve. pgProposalId :: Lens' ProposalsGet Text
gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Insert.hs view
@@ -53,10 +53,13 @@ -- | Create the given list of proposals -- -- /See:/ 'proposalsInsert' smart constructor.-newtype ProposalsInsert = ProposalsInsert'+newtype ProposalsInsert =+  ProposalsInsert'     { _piPayload :: CreateOrdersRequest-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProposalsInsert' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -65,10 +68,8 @@ proposalsInsert     :: CreateOrdersRequest -- ^ 'piPayload'     -> ProposalsInsert-proposalsInsert pPiPayload_ =-    ProposalsInsert'-    { _piPayload = pPiPayload_-    }+proposalsInsert pPiPayload_ = ProposalsInsert' {_piPayload = pPiPayload_}+  -- | Multipart request metadata. piPayload :: Lens' ProposalsInsert CreateOrdersRequest
gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Patch.hs view
@@ -57,13 +57,16 @@ -- | Update the given proposal. This method supports patch semantics. -- -- /See:/ 'proposalsPatch' smart constructor.-data ProposalsPatch = ProposalsPatch'+data ProposalsPatch =+  ProposalsPatch'     { _ppUpdateAction   :: !ProposalsPatchUpdateAction     , _ppRevisionNumber :: !(Textual Int64)     , _ppPayload        :: !Proposal     , _ppProposalId     :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProposalsPatch' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -82,12 +85,13 @@     -> Text -- ^ 'ppProposalId'     -> ProposalsPatch proposalsPatch pPpUpdateAction_ pPpRevisionNumber_ pPpPayload_ pPpProposalId_ =-    ProposalsPatch'+  ProposalsPatch'     { _ppUpdateAction = pPpUpdateAction_     , _ppRevisionNumber = _Coerce # pPpRevisionNumber_     , _ppPayload = pPpPayload_     , _ppProposalId = pPpProposalId_     }+  -- | The proposed action to take on the proposal. This field is required and -- it must be set when updating a proposal.
gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Search.hs view
@@ -53,10 +53,13 @@ -- | Search for proposals using pql query -- -- /See:/ 'proposalsSearch' smart constructor.-newtype ProposalsSearch = ProposalsSearch'+newtype ProposalsSearch =+  ProposalsSearch'     { _pPqlQuery :: Maybe Text-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProposalsSearch' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -64,10 +67,8 @@ -- * 'pPqlQuery' proposalsSearch     :: ProposalsSearch-proposalsSearch =-    ProposalsSearch'-    { _pPqlQuery = Nothing-    }+proposalsSearch = ProposalsSearch' {_pPqlQuery = Nothing}+  -- | Query string to retrieve specific proposals. pPqlQuery :: Lens' ProposalsSearch (Maybe Text)
gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Setupcomplete.hs view
@@ -52,10 +52,13 @@ -- | Update the given proposal to indicate that setup has been completed. -- -- /See:/ 'proposalsSetupcomplete' smart constructor.-newtype ProposalsSetupcomplete = ProposalsSetupcomplete'+newtype ProposalsSetupcomplete =+  ProposalsSetupcomplete'     { _psProposalId :: Text-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProposalsSetupcomplete' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -65,9 +68,8 @@     :: Text -- ^ 'psProposalId'     -> ProposalsSetupcomplete proposalsSetupcomplete pPsProposalId_ =-    ProposalsSetupcomplete'-    { _psProposalId = pPsProposalId_-    }+  ProposalsSetupcomplete' {_psProposalId = pPsProposalId_}+  -- | The proposal id for which the setup is complete psProposalId :: Lens' ProposalsSetupcomplete Text
gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Update.hs view
@@ -57,13 +57,16 @@ -- | Update the given proposal -- -- /See:/ 'proposalsUpdate' smart constructor.-data ProposalsUpdate = ProposalsUpdate'+data ProposalsUpdate =+  ProposalsUpdate'     { _puUpdateAction   :: !ProposalsUpdateUpdateAction     , _puRevisionNumber :: !(Textual Int64)     , _puPayload        :: !Proposal     , _puProposalId     :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProposalsUpdate' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -82,12 +85,13 @@     -> Text -- ^ 'puProposalId'     -> ProposalsUpdate proposalsUpdate pPuUpdateAction_ pPuRevisionNumber_ pPuPayload_ pPuProposalId_ =-    ProposalsUpdate'+  ProposalsUpdate'     { _puUpdateAction = pPuUpdateAction_     , _puRevisionNumber = _Coerce # pPuRevisionNumber_     , _puPayload = pPuPayload_     , _puProposalId = pPuProposalId_     }+  -- | The proposed action to take on the proposal. This field is required and -- it must be set when updating a proposal.
gen/Network/Google/Resource/AdExchangeBuyer/PubproFiles/List.hs view
@@ -53,10 +53,13 @@ -- | Gets the requested publisher profile(s) by publisher accountId. -- -- /See:/ 'pubproFilesList' smart constructor.-newtype PubproFilesList = PubproFilesList'+newtype PubproFilesList =+  PubproFilesList'     { _pflAccountId :: Textual Int32-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PubproFilesList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -66,9 +69,8 @@     :: Int32 -- ^ 'pflAccountId'     -> PubproFilesList pubproFilesList pPflAccountId_ =-    PubproFilesList'-    { _pflAccountId = _Coerce # pPflAccountId_-    }+  PubproFilesList' {_pflAccountId = _Coerce # pPflAccountId_}+  -- | The accountId of the publisher to get profiles for. pflAccountId :: Lens' PubproFilesList Int32
gogol-adexchange-buyer.cabal view
@@ -1,5 +1,5 @@ name:                  gogol-adexchange-buyer-version:               0.4.0+version:               0.5.0 synopsis:              Google Ad Exchange Buyer SDK. homepage:              https://github.com/brendanhay/gogol bug-reports:           https://github.com/brendanhay/gogol/issues@@ -81,5 +81,5 @@         , Network.Google.AdExchangeBuyer.Types.Sum      build-depends:-          gogol-core == 0.4.0.*+          gogol-core == 0.5.0.*         , base       >= 4.7 && < 5