diff --git a/README.md b/README.md --- a/README.md +++ b/README.md @@ -8,7 +8,7 @@ ## Version -`0.3.0` +`0.5.0` ## Description diff --git a/gen/Network/Google/AdExchangeBuyer/Types.hs b/gen/Network/Google/AdExchangeBuyer/Types.hs --- a/gen/Network/Google/AdExchangeBuyer/Types.hs +++ b/gen/Network/Google/AdExchangeBuyer/Types.hs @@ -759,4 +759,4 @@ -- | Manage your Ad Exchange buyer account configuration adExchangeBuyerScope :: Proxy '["https://www.googleapis.com/auth/adexchange.buyer"] -adExchangeBuyerScope = Proxy; +adExchangeBuyerScope = Proxy diff --git a/gen/Network/Google/AdExchangeBuyer/Types/Product.hs b/gen/Network/Google/AdExchangeBuyer/Types/Product.hs --- a/gen/Network/Google/AdExchangeBuyer/Types/Product.hs +++ b/gen/Network/Google/AdExchangeBuyer/Types/Product.hs @@ -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. diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Get.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Get.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Get.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Get.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/List.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/List.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/List.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/List.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Patch.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Patch.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Patch.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Patch.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Update.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Update.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Update.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Update.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/BillingInfo/Get.hs b/gen/Network/Google/Resource/AdExchangeBuyer/BillingInfo/Get.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/BillingInfo/Get.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/BillingInfo/Get.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/BillingInfo/List.hs b/gen/Network/Google/Resource/AdExchangeBuyer/BillingInfo/List.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/BillingInfo/List.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/BillingInfo/List.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Get.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Get.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Get.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Get.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Patch.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Patch.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Patch.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Patch.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Update.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Update.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Update.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Update.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/AddDeal.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/AddDeal.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/AddDeal.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/AddDeal.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/Get.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/Get.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/Get.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/Get.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/Insert.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/Insert.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/Insert.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/Insert.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/List.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/List.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/List.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/List.hs @@ -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. diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/ListDeals.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/ListDeals.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/ListDeals.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/ListDeals.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/RemoveDeal.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/RemoveDeal.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/RemoveDeal.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/RemoveDeal.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Delete.hs b/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Delete.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Delete.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Delete.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Insert.hs b/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Insert.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Insert.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Insert.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/List.hs b/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/List.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/List.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/List.hs @@ -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. diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Update.hs b/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Update.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Update.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Update.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceNotes/Insert.hs b/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceNotes/Insert.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceNotes/Insert.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceNotes/Insert.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceNotes/List.hs b/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceNotes/List.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceNotes/List.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceNotes/List.hs @@ -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. diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Marketplaceprivateauction/Updateproposal.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Marketplaceprivateauction/Updateproposal.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Marketplaceprivateauction/Updateproposal.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Marketplaceprivateauction/Updateproposal.hs @@ -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"] diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/PerformanceReport/List.hs b/gen/Network/Google/Resource/AdExchangeBuyer/PerformanceReport/List.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/PerformanceReport/List.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/PerformanceReport/List.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Delete.hs b/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Delete.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Delete.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Delete.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Get.hs b/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Get.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Get.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Get.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Insert.hs b/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Insert.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Insert.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Insert.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/List.hs b/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/List.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/List.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/List.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Patch.hs b/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Patch.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Patch.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Patch.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Update.hs b/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Update.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Update.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Update.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Products/Get.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Products/Get.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Products/Get.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Products/Get.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Products/Search.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Products/Search.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Products/Search.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Products/Search.hs @@ -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) diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Get.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Get.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Get.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Get.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Insert.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Insert.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Insert.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Insert.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Patch.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Patch.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Patch.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Patch.hs @@ -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. diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Search.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Search.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Search.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Search.hs @@ -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) diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Setupcomplete.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Setupcomplete.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Setupcomplete.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Setupcomplete.hs @@ -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 diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Update.hs b/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Update.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Update.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Update.hs @@ -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. diff --git a/gen/Network/Google/Resource/AdExchangeBuyer/PubproFiles/List.hs b/gen/Network/Google/Resource/AdExchangeBuyer/PubproFiles/List.hs --- a/gen/Network/Google/Resource/AdExchangeBuyer/PubproFiles/List.hs +++ b/gen/Network/Google/Resource/AdExchangeBuyer/PubproFiles/List.hs @@ -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 diff --git a/gogol-adexchange-buyer.cabal b/gogol-adexchange-buyer.cabal --- a/gogol-adexchange-buyer.cabal +++ b/gogol-adexchange-buyer.cabal @@ -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