@@ -307,8 +307,9 @@ instance ToJSON CreativeNATiveAd where
307307
308308--
309309-- /See:/ 'editAllOrderDealsResponse' smart constructor.
310−newtype EditAllOrderDealsResponse = EditAllOrderDealsResponse'
311− { _eaodrDeals :: Maybe [MarketplaceDeal]
310+data EditAllOrderDealsResponse = EditAllOrderDealsResponse'
311+ { _eaodrDeals :: !(Maybe [MarketplaceDeal])
312+ , _eaodrOrderRevisionNumber :: !(Maybe (Textual Int64))
312313 } deriving (Eq,Show,Data,Typeable,Generic)
313314
314315-- | Creates a value of 'EditAllOrderDealsResponse' with the minimum fields required to make a request.
@@ -316,11 +317,14 @@ newtype EditAllOrderDealsResponse = EditAllOrderDealsResponse'
316317-- Use one of the following lenses to modify other fields as desired:
317318--
318319-- * 'eaodrDeals'
320+--
321+-- * 'eaodrOrderRevisionNumber'
319322editAllOrderDealsResponse
320323 :: EditAllOrderDealsResponse
321324editAllOrderDealsResponse =
322325 EditAllOrderDealsResponse'
323326 { _eaodrDeals = Nothing
327+ , _eaodrOrderRevisionNumber = Nothing
324328 }
325329
326330-- | List of all deals in the proposal after edit.
@@ -330,16 +334,28 @@ eaodrDeals
330334 _Default
331335 . _Coerce
332336
337+-- | The latest revision number after the update has been applied.
338+eaodrOrderRevisionNumber :: Lens' EditAllOrderDealsResponse (Maybe Int64)
339+eaodrOrderRevisionNumber
340+ = lens _eaodrOrderRevisionNumber
341+ (\ s a -> s{_eaodrOrderRevisionNumber = a})
342+ . mapping _Coerce
343+
333344instance FromJSON EditAllOrderDealsResponse where
334345 parseJSON
335346 = withObject "EditAllOrderDealsResponse"
336347 (\ o ->
337348 EditAllOrderDealsResponse' <$>
338− (o .:? "deals" .!= mempty))
349+ (o .:? "deals" .!= mempty) <*>
350+ (o .:? "orderRevisionNumber"))
339351
340352instance ToJSON EditAllOrderDealsResponse where
341353 toJSON EditAllOrderDealsResponse'{..}
342− = object (catMaybes [("deals" .=) <$> _eaodrDeals])
354+ = object
355+ (catMaybes
356+ [("deals" .=) <$> _eaodrDeals,
357+ ("orderRevisionNumber" .=) <$>
358+ _eaodrOrderRevisionNumber])
343359
344360-- | The creatives feed lists the active creatives for the Ad Exchange buyer
345361-- accounts that the user has access to. Each entry in the feed corresponds
@@ -529,9 +545,10 @@ instance ToJSON CreateOrdersResponse where
529545--
530546-- /See:/ 'accountBidderLocationItem' smart constructor.
531547data AccountBidderLocationItem = AccountBidderLocationItem'
532− { _abliURL :: !(Maybe Text)
533− , _abliMaximumQps :: !(Maybe (Textual Int32))
534− , _abliRegion :: !(Maybe Text)
548+ { _abliURL :: !(Maybe Text)
549+ , _abliMaximumQps :: !(Maybe (Textual Int32))
550+ , _abliRegion :: !(Maybe Text)
551+ , _abliBidProtocol :: !(Maybe Text)
535552 } deriving (Eq,Show,Data,Typeable,Generic)
536553
537554-- | Creates a value of 'AccountBidderLocationItem' with the minimum fields required to make a request.
@@ -543,6 +560,8 @@ data AccountBidderLocationItem = AccountBidderLocationItem'
543560-- * 'abliMaximumQps'
544561--
545562-- * 'abliRegion'
563+--
564+-- * 'abliBidProtocol'
546565accountBidderLocationItem
547566 :: AccountBidderLocationItem
548567accountBidderLocationItem =
@@ -550,6 +569,7 @@ accountBidderLocationItem =
550569 { _abliURL = Nothing
551570 , _abliMaximumQps = Nothing
552571 , _abliRegion = Nothing
572+ , _abliBidProtocol = Nothing
553573 }
554574
555575-- | The URL to which the Ad Exchange will send bid requests.
@@ -570,13 +590,25 @@ abliRegion :: Lens' AccountBidderLocationItem (Maybe Text)
570590abliRegion
571591 = lens _abliRegion (\ s a -> s{_abliRegion = a})
572592
593+-- | The protocol that the bidder endpoint is using. By default, OpenRTB
594+-- protocols use JSON, except PROTOCOL_OPENRTB_PROTOBUF.
595+-- PROTOCOL_OPENRTB_PROTOBUF uses protobuf encoding over the latest OpenRTB
596+-- protocol version, which is 2.3 right now. Allowed values: - PROTOCOL_ADX
597+-- - PROTOCOL_OPENRTB_2_2 - PROTOCOL_OPENRTB_2_3 -
598+-- PROTOCOL_OPENRTB_PROTOBUF
599+abliBidProtocol :: Lens' AccountBidderLocationItem (Maybe Text)
600+abliBidProtocol
601+ = lens _abliBidProtocol
602+ (\ s a -> s{_abliBidProtocol = a})
603+
573604instance FromJSON AccountBidderLocationItem where
574605 parseJSON
575606 = withObject "AccountBidderLocationItem"
576607 (\ o ->
577608 AccountBidderLocationItem' <$>
578609 (o .:? "url") <*> (o .:? "maximumQps") <*>
579− (o .:? "region"))
610+ (o .:? "region")
611+ <*> (o .:? "bidProtocol"))
580612
581613instance ToJSON AccountBidderLocationItem where
582614 toJSON AccountBidderLocationItem'{..}
@@ -584,7 +616,8 @@ instance ToJSON AccountBidderLocationItem where
584616 (catMaybes
585617 [("url" .=) <$> _abliURL,
586618 ("maximumQps" .=) <$> _abliMaximumQps,
587− ("region" .=) <$> _abliRegion])
619+ ("region" .=) <$> _abliRegion,
620+ ("bidProtocol" .=) <$> _abliBidProtocol])
588621
589622--
590623-- /See:/ 'privateData' smart constructor.
@@ -1049,6 +1082,58 @@ instance ToJSON AccountsList where
10491082 [Just ("kind" .= _alKind),
10501083 ("items" .=) <$> _alItems])
10511084
1085+-- | This message carries publisher provided breakdown. E.g. {dimension_type:
1086+-- \'COUNTRY\', [{dimension_value: {id: 1, name: \'US\'}},
1087+-- {dimension_value: {id: 2, name: \'UK\'}}]}
1088+--
1089+-- /See:/ 'dimension' smart constructor.
1090+data Dimension = Dimension'
1091+ { _dDimensionValues :: !(Maybe [DimensionDimensionValue])
1092+ , _dDimensionType :: !(Maybe Text)
1093+ } deriving (Eq,Show,Data,Typeable,Generic)
1094+
1095+-- | Creates a value of 'Dimension' with the minimum fields required to make a request.
1096+--
1097+-- Use one of the following lenses to modify other fields as desired:
1098+--
1099+-- * 'dDimensionValues'
1100+--
1101+-- * 'dDimensionType'
1102+dimension
1103+ :: Dimension
1104+dimension =
1105+ Dimension'
1106+ { _dDimensionValues = Nothing
1107+ , _dDimensionType = Nothing
1108+ }
1109+
1110+dDimensionValues :: Lens' Dimension [DimensionDimensionValue]
1111+dDimensionValues
1112+ = lens _dDimensionValues
1113+ (\ s a -> s{_dDimensionValues = a})
1114+ . _Default
1115+ . _Coerce
1116+
1117+dDimensionType :: Lens' Dimension (Maybe Text)
1118+dDimensionType
1119+ = lens _dDimensionType
1120+ (\ s a -> s{_dDimensionType = a})
1121+
1122+instance FromJSON Dimension where
1123+ parseJSON
1124+ = withObject "Dimension"
1125+ (\ o ->
1126+ Dimension' <$>
1127+ (o .:? "dimensionValues" .!= mempty) <*>
1128+ (o .:? "dimensionType"))
1129+
1130+instance ToJSON Dimension where
1131+ toJSON Dimension'{..}
1132+ = object
1133+ (catMaybes
1134+ [("dimensionValues" .=) <$> _dDimensionValues,
1135+ ("dimensionType" .=) <$> _dDimensionType])
1136+
10521137--
10531138-- /See:/ 'createOrdersRequest' smart constructor.
10541139data CreateOrdersRequest = CreateOrdersRequest'
@@ -1078,6 +1163,7 @@ cProposals
10781163 _Default
10791164 . _Coerce
10801165
1166+-- | Web property id of the seller creating these orders
10811167cWebPropertyCode :: Lens' CreateOrdersRequest (Maybe Text)
10821168cWebPropertyCode
10831169 = lens _cWebPropertyCode
@@ -1146,6 +1232,43 @@ instance ToJSON CreativeCorrectionsItem where
11461232 [("reason" .=) <$> _cciReason,
11471233 ("details" .=) <$> _cciDetails])
11481234
1235+--
1236+-- /See:/ 'dealServingMetadata' smart constructor.
1237+newtype DealServingMetadata = DealServingMetadata'
1238+ { _dsmDealPauseStatus :: Maybe DealServingMetadataDealPauseStatus
1239+ } deriving (Eq,Show,Data,Typeable,Generic)
1240+
1241+-- | Creates a value of 'DealServingMetadata' with the minimum fields required to make a request.
1242+--
1243+-- Use one of the following lenses to modify other fields as desired:
1244+--
1245+-- * 'dsmDealPauseStatus'
1246+dealServingMetadata
1247+ :: DealServingMetadata
1248+dealServingMetadata =
1249+ DealServingMetadata'
1250+ { _dsmDealPauseStatus = Nothing
1251+ }
1252+
1253+-- | Tracks which parties (if any) have paused a deal. (readonly, except via
1254+-- PauseResumeOrderDeals action)
1255+dsmDealPauseStatus :: Lens' DealServingMetadata (Maybe DealServingMetadataDealPauseStatus)
1256+dsmDealPauseStatus
1257+ = lens _dsmDealPauseStatus
1258+ (\ s a -> s{_dsmDealPauseStatus = a})
1259+
1260+instance FromJSON DealServingMetadata where
1261+ parseJSON
1262+ = withObject "DealServingMetadata"
1263+ (\ o ->
1264+ DealServingMetadata' <$> (o .:? "dealPauseStatus"))
1265+
1266+instance ToJSON DealServingMetadata where
1267+ toJSON DealServingMetadata'{..}
1268+ = object
1269+ (catMaybes
1270+ [("dealPauseStatus" .=) <$> _dsmDealPauseStatus])
1271+
11491272--
11501273-- /See:/ 'addOrderDealsResponse' smart constructor.
11511274data AddOrderDealsResponse = AddOrderDealsResponse'
@@ -1269,8 +1392,9 @@ instance ToJSON DeliveryControl where
12691392--
12701393-- /See:/ 'pricePerBuyer' smart constructor.
12711394data PricePerBuyer = PricePerBuyer'
1272− { _ppbPrice :: !(Maybe Price)
1273− , _ppbBuyer :: !(Maybe Buyer)
1395+ { _ppbPrice :: !(Maybe Price)
1396+ , _ppbAuctionTier :: !(Maybe Text)
1397+ , _ppbBuyer :: !(Maybe Buyer)
12741398 } deriving (Eq,Show,Data,Typeable,Generic)
12751399
12761400-- | Creates a value of 'PricePerBuyer' with the minimum fields required to make a request.
@@ -1279,12 +1403,15 @@ data PricePerBuyer = PricePerBuyer'
12791403--
12801404-- * 'ppbPrice'
12811405--
1406+-- * 'ppbAuctionTier'
1407+--
12821408-- * 'ppbBuyer'
12831409pricePerBuyer
12841410 :: PricePerBuyer
12851411pricePerBuyer =
12861412 PricePerBuyer'
12871413 { _ppbPrice = Nothing
1414+ , _ppbAuctionTier = Nothing
12881415 , _ppbBuyer = Nothing
12891416 }
12901417
@@ -1292,6 +1419,12 @@ pricePerBuyer =
12921419ppbPrice :: Lens' PricePerBuyer (Maybe Price)
12931420ppbPrice = lens _ppbPrice (\ s a -> s{_ppbPrice = a})
12941421
1422+-- | Optional access type for this buyer.
1423+ppbAuctionTier :: Lens' PricePerBuyer (Maybe Text)
1424+ppbAuctionTier
1425+ = lens _ppbAuctionTier
1426+ (\ s a -> s{_ppbAuctionTier = a})
1427+
12951428-- | The buyer who will pay this price. If unset, all buyers can pay this
12961429-- price (if the advertisers match, and there\'s no more specific rule
12971430-- matching the buyer).
@@ -1303,13 +1436,15 @@ instance FromJSON PricePerBuyer where
13031436 = withObject "PricePerBuyer"
13041437 (\ o ->
13051438 PricePerBuyer' <$>
1306− (o .:? "price") <*> (o .:? "buyer"))
1439+ (o .:? "price") <*> (o .:? "auctionTier") <*>
1440+ (o .:? "buyer"))
13071441
13081442instance ToJSON PricePerBuyer where
13091443 toJSON PricePerBuyer'{..}
13101444 = object
13111445 (catMaybes
13121446 [("price" .=) <$> _ppbPrice,
1447+ ("auctionTier" .=) <$> _ppbAuctionTier,
13131448 ("buyer" .=) <$> _ppbBuyer])
13141449
13151450-- | A creative and its classification data.
@@ -1757,6 +1892,52 @@ instance ToJSON TargetingValueDayPartTargetingDayPart
17571892 ("dayOfWeek" .=) <$> _tvdptdpDayOfWeek,
17581893 ("endMinute" .=) <$> _tvdptdpEndMinute])
17591894
1895+-- | Value of the dimension.
1896+--
1897+-- /See:/ 'dimensionDimensionValue' smart constructor.
1898+data DimensionDimensionValue = DimensionDimensionValue'
1899+ { _ddvName :: !(Maybe Text)
1900+ , _ddvId :: !(Maybe (Textual Int32))
1901+ } deriving (Eq,Show,Data,Typeable,Generic)
1902+
1903+-- | Creates a value of 'DimensionDimensionValue' with the minimum fields required to make a request.
1904+--
1905+-- Use one of the following lenses to modify other fields as desired:
1906+--
1907+-- * 'ddvName'
1908+--
1909+-- * 'ddvId'
1910+dimensionDimensionValue
1911+ :: DimensionDimensionValue
1912+dimensionDimensionValue =
1913+ DimensionDimensionValue'
1914+ { _ddvName = Nothing
1915+ , _ddvId = Nothing
1916+ }
1917+
1918+-- | Name of the dimension mainly for debugging purposes.
1919+ddvName :: Lens' DimensionDimensionValue (Maybe Text)
1920+ddvName = lens _ddvName (\ s a -> s{_ddvName = a})
1921+
1922+-- | Id of the dimension.
1923+ddvId :: Lens' DimensionDimensionValue (Maybe Int32)
1924+ddvId
1925+ = lens _ddvId (\ s a -> s{_ddvId = a}) .
1926+ mapping _Coerce
1927+
1928+instance FromJSON DimensionDimensionValue where
1929+ parseJSON
1930+ = withObject "DimensionDimensionValue"
1931+ (\ o ->
1932+ DimensionDimensionValue' <$>
1933+ (o .:? "name") <*> (o .:? "id"))
1934+
1935+instance ToJSON DimensionDimensionValue where
1936+ toJSON DimensionDimensionValue'{..}
1937+ = object
1938+ (catMaybes
1939+ [("name" .=) <$> _ddvName, ("id" .=) <$> _ddvId])
1940+
17601941--
17611942-- /See:/ 'pretargetingConfigList' smart constructor.
17621943data PretargetingConfigList = PretargetingConfigList'
@@ -2431,6 +2612,7 @@ deleteOrderDealsRequest =
24312612 , _dodrProposalRevisionNumber = Nothing
24322613 }
24332614
2615+-- | Indicates an optional action to take on the proposal
24342616dodrUpdateAction :: Lens' DeleteOrderDealsRequest (Maybe Text)
24352617dodrUpdateAction
24362618 = lens _dodrUpdateAction
@@ -2605,8 +2787,6 @@ instance ToJSON GetOrderDealsResponse where
26052787 = object (catMaybes [("deals" .=) <$> _godrDeals])
26062788
26072789-- | The configuration data for an Ad Exchange performance report list.
2608−-- https:\/\/sites.google.com\/a\/google.com\/adx-integration\/Home\/engineering\/binary-releases\/rtb-api-release
2609−-- https:\/\/cs.corp.google.com\/#piper\/\/\/depot\/google3\/contentads\/adx\/tools\/rtb_api\/adxrtb.py
26102790--
26112791-- /See:/ 'performanceReportList' smart constructor.
26122792data PerformanceReportList = PerformanceReportList'
@@ -3134,6 +3314,123 @@ instance ToJSON TargetingValueCreativeSize where
31343314 ("companionSizes" .=) <$> _tvcsCompanionSizes,
31353315 ("creativeSizeType" .=) <$> _tvcsCreativeSizeType])
31363316
3317+--
3318+-- /See:/ 'dealTermsGuaranteedFixedPriceTermsBillingInfo' smart constructor.
3319+data DealTermsGuaranteedFixedPriceTermsBillingInfo = DealTermsGuaranteedFixedPriceTermsBillingInfo'
3320+ { _dtgfptbiCurrencyConversionTimeMs :: !(Maybe (Textual Int64))
3321+ , _dtgfptbiPrice :: !(Maybe Price)
3322+ , _dtgfptbiOriginalContractedQuantity :: !(Maybe (Textual Int64))
3323+ } deriving (Eq,Show,Data,Typeable,Generic)
3324+
3325+-- | Creates a value of 'DealTermsGuaranteedFixedPriceTermsBillingInfo' with the minimum fields required to make a request.
3326+--
3327+-- Use one of the following lenses to modify other fields as desired:
3328+--
3329+-- * 'dtgfptbiCurrencyConversionTimeMs'
3330+--
3331+-- * 'dtgfptbiPrice'
3332+--
3333+-- * 'dtgfptbiOriginalContractedQuantity'
3334+dealTermsGuaranteedFixedPriceTermsBillingInfo
3335+ :: DealTermsGuaranteedFixedPriceTermsBillingInfo
3336+dealTermsGuaranteedFixedPriceTermsBillingInfo =
3337+ DealTermsGuaranteedFixedPriceTermsBillingInfo'
3338+ { _dtgfptbiCurrencyConversionTimeMs = Nothing
3339+ , _dtgfptbiPrice = Nothing
3340+ , _dtgfptbiOriginalContractedQuantity = Nothing
3341+ }
3342+
3343+-- | The timestamp (in ms since epoch) when the original reservation price
3344+-- for the deal was first converted to DFP currency. This is used to
3345+-- convert the contracted price into advertiser\'s currency without
3346+-- discrepancy.
3347+dtgfptbiCurrencyConversionTimeMs :: Lens' DealTermsGuaranteedFixedPriceTermsBillingInfo (Maybe Int64)
3348+dtgfptbiCurrencyConversionTimeMs
3349+ = lens _dtgfptbiCurrencyConversionTimeMs
3350+ (\ s a -> s{_dtgfptbiCurrencyConversionTimeMs = a})
3351+ . mapping _Coerce
3352+
3353+-- | The original reservation price for the deal, if the currency code is
3354+-- different from the one used in negotiation.
3355+dtgfptbiPrice :: Lens' DealTermsGuaranteedFixedPriceTermsBillingInfo (Maybe Price)
3356+dtgfptbiPrice
3357+ = lens _dtgfptbiPrice
3358+ (\ s a -> s{_dtgfptbiPrice = a})
3359+
3360+-- | The original contracted quantity (# impressions) for this deal. To
3361+-- ensure delivery, sometimes publisher will book the deal with a
3362+-- impression buffer, however clients are billed using the original
3363+-- contracted quantity.
3364+dtgfptbiOriginalContractedQuantity :: Lens' DealTermsGuaranteedFixedPriceTermsBillingInfo (Maybe Int64)
3365+dtgfptbiOriginalContractedQuantity
3366+ = lens _dtgfptbiOriginalContractedQuantity
3367+ (\ s a -> s{_dtgfptbiOriginalContractedQuantity = a})
3368+ . mapping _Coerce
3369+
3370+instance FromJSON
3371+ DealTermsGuaranteedFixedPriceTermsBillingInfo where
3372+ parseJSON
3373+ = withObject
3374+ "DealTermsGuaranteedFixedPriceTermsBillingInfo"
3375+ (\ o ->
3376+ DealTermsGuaranteedFixedPriceTermsBillingInfo' <$>
3377+ (o .:? "currencyConversionTimeMs") <*>
3378+ (o .:? "price")
3379+ <*> (o .:? "originalContractedQuantity"))
3380+
3381+instance ToJSON
3382+ DealTermsGuaranteedFixedPriceTermsBillingInfo where
3383+ toJSON
3384+ DealTermsGuaranteedFixedPriceTermsBillingInfo'{..}
3385+ = object
3386+ (catMaybes
3387+ [("currencyConversionTimeMs" .=) <$>
3388+ _dtgfptbiCurrencyConversionTimeMs,
3389+ ("price" .=) <$> _dtgfptbiPrice,
3390+ ("originalContractedQuantity" .=) <$>
3391+ _dtgfptbiOriginalContractedQuantity])
3392+
3393+--
3394+-- /See:/ 'getPublisherProFilesByAccountIdResponse' smart constructor.
3395+newtype GetPublisherProFilesByAccountIdResponse = GetPublisherProFilesByAccountIdResponse'
3396+ { _gppfbairProFiles :: Maybe [PublisherProFileAPIProto]
3397+ } deriving (Eq,Show,Data,Typeable,Generic)
3398+
3399+-- | Creates a value of 'GetPublisherProFilesByAccountIdResponse' with the minimum fields required to make a request.
3400+--
3401+-- Use one of the following lenses to modify other fields as desired:
3402+--
3403+-- * 'gppfbairProFiles'
3404+getPublisherProFilesByAccountIdResponse
3405+ :: GetPublisherProFilesByAccountIdResponse
3406+getPublisherProFilesByAccountIdResponse =
3407+ GetPublisherProFilesByAccountIdResponse'
3408+ { _gppfbairProFiles = Nothing
3409+ }
3410+
3411+-- | Profiles for the requested publisher
3412+gppfbairProFiles :: Lens' GetPublisherProFilesByAccountIdResponse [PublisherProFileAPIProto]
3413+gppfbairProFiles
3414+ = lens _gppfbairProFiles
3415+ (\ s a -> s{_gppfbairProFiles = a})
3416+ . _Default
3417+ . _Coerce
3418+
3419+instance FromJSON
3420+ GetPublisherProFilesByAccountIdResponse where
3421+ parseJSON
3422+ = withObject
3423+ "GetPublisherProFilesByAccountIdResponse"
3424+ (\ o ->
3425+ GetPublisherProFilesByAccountIdResponse' <$>
3426+ (o .:? "profiles" .!= mempty))
3427+
3428+instance ToJSON
3429+ GetPublisherProFilesByAccountIdResponse where
3430+ toJSON GetPublisherProFilesByAccountIdResponse'{..}
3431+ = object
3432+ (catMaybes [("profiles" .=) <$> _gppfbairProFiles])
3433+
31373434-- | Represents a proposal in the marketplace. A proposal is the unit of
31383435-- negotiation between a seller and a buyer and contains deals which are
31393436-- served. Each field in a proposal can have one of the following setting:
@@ -3152,6 +3449,7 @@ data Proposal = Proposal'
31523449 , _pOriginatorRole :: !(Maybe Text)
31533450 , _pRevisionNumber :: !(Maybe (Textual Int64))
31543451 , _pBilledBuyer :: !(Maybe Buyer)
3452+ , _pPrivateAuctionId :: !(Maybe Text)
31553453 , _pIsRenegotiating :: !(Maybe Bool)
31563454 , _pHasSellerSignedOff :: !(Maybe Bool)
31573455 , _pSeller :: !(Maybe Seller)
@@ -3163,6 +3461,7 @@ data Proposal = Proposal'
31633461 , _pRevisionTimeMs :: !(Maybe (Textual Int64))
31643462 , _pProposalState :: !(Maybe Text)
31653463 , _pLastUpdaterOrCommentorRole :: !(Maybe Text)
3464+ , _pNegotiationId :: !(Maybe Text)
31663465 , _pHasBuyerSignedOff :: !(Maybe Bool)
31673466 , _pBuyer :: !(Maybe Buyer)
31683467 } deriving (Eq,Show,Data,Typeable,Generic)
@@ -3187,6 +3486,8 @@ data Proposal = Proposal'
31873486--
31883487-- * 'pBilledBuyer'
31893488--
3489+-- * 'pPrivateAuctionId'
3490+--
31903491-- * 'pIsRenegotiating'
31913492--
31923493-- * 'pHasSellerSignedOff'
@@ -3209,6 +3510,8 @@ data Proposal = Proposal'
32093510--
32103511-- * 'pLastUpdaterOrCommentorRole'
32113512--
3513+-- * 'pNegotiationId'
3514+--
32123515-- * 'pHasBuyerSignedOff'
32133516--
32143517-- * 'pBuyer'
@@ -3224,6 +3527,7 @@ proposal =
32243527 , _pOriginatorRole = Nothing
32253528 , _pRevisionNumber = Nothing
32263529 , _pBilledBuyer = Nothing
3530+ , _pPrivateAuctionId = Nothing
32273531 , _pIsRenegotiating = Nothing
32283532 , _pHasSellerSignedOff = Nothing
32293533 , _pSeller = Nothing
@@ -3235,6 +3539,7 @@ proposal =
32353539 , _pRevisionTimeMs = Nothing
32363540 , _pProposalState = Nothing
32373541 , _pLastUpdaterOrCommentorRole = Nothing
3542+ , _pNegotiationId = Nothing
32383543 , _pHasBuyerSignedOff = Nothing
32393544 , _pBuyer = Nothing
32403545 }
@@ -3246,7 +3551,7 @@ pBuyerPrivateData
32463551 (\ s a -> s{_pBuyerPrivateData = a})
32473552
32483553-- | True, if the buyside inventory setup is complete for this proposal.
3249−-- (readonly)
3554+-- (readonly, except via OrderSetupCompleted action)
32503555pIsSetupComplete :: Lens' Proposal (Maybe Bool)
32513556pIsSetupComplete
32523557 = lens _pIsSetupComplete
@@ -3290,6 +3595,13 @@ pBilledBuyer :: Lens' Proposal (Maybe Buyer)
32903595pBilledBuyer
32913596 = lens _pBilledBuyer (\ s a -> s{_pBilledBuyer = a})
32923597
3598+-- | Optional private auction id if this proposal is a private auction
3599+-- proposal.
3600+pPrivateAuctionId :: Lens' Proposal (Maybe Text)
3601+pPrivateAuctionId
3602+ = lens _pPrivateAuctionId
3603+ (\ s a -> s{_pPrivateAuctionId = a})
3604+
32933605-- | True if the proposal is being renegotiated (readonly).
32943606pIsRenegotiating :: Lens' Proposal (Maybe Bool)
32953607pIsRenegotiating
@@ -3356,6 +3668,12 @@ pLastUpdaterOrCommentorRole
33563668 = lens _pLastUpdaterOrCommentorRole
33573669 (\ s a -> s{_pLastUpdaterOrCommentorRole = a})
33583670
3671+-- | Optional negotiation id if this proposal is a preferred deal proposal.
3672+pNegotiationId :: Lens' Proposal (Maybe Text)
3673+pNegotiationId
3674+ = lens _pNegotiationId
3675+ (\ s a -> s{_pNegotiationId = a})
3676+
33593677-- | When an proposal is in an accepted state, indicates whether the buyer
33603678-- has signed off Once both sides have signed off on a deal, the proposal
33613679-- can be finalized by the seller. (seller-readonly)
@@ -3381,6 +3699,7 @@ instance FromJSON Proposal where
33813699 <*> (o .:? "originatorRole")
33823700 <*> (o .:? "revisionNumber")
33833701 <*> (o .:? "billedBuyer")
3702+ <*> (o .:? "privateAuctionId")
33843703 <*> (o .:? "isRenegotiating")
33853704 <*> (o .:? "hasSellerSignedOff")
33863705 <*> (o .:? "seller")
@@ -3392,6 +3711,7 @@ instance FromJSON Proposal where
33923711 <*> (o .:? "revisionTimeMs")
33933712 <*> (o .:? "proposalState")
33943713 <*> (o .:? "lastUpdaterOrCommentorRole")
3714+ <*> (o .:? "negotiationId")
33953715 <*> (o .:? "hasBuyerSignedOff")
33963716 <*> (o .:? "buyer"))
33973717
@@ -3407,6 +3727,7 @@ instance ToJSON Proposal where
34073727 ("originatorRole" .=) <$> _pOriginatorRole,
34083728 ("revisionNumber" .=) <$> _pRevisionNumber,
34093729 ("billedBuyer" .=) <$> _pBilledBuyer,
3730+ ("privateAuctionId" .=) <$> _pPrivateAuctionId,
34103731 ("isRenegotiating" .=) <$> _pIsRenegotiating,
34113732 ("hasSellerSignedOff" .=) <$> _pHasSellerSignedOff,
34123733 ("seller" .=) <$> _pSeller,
@@ -3419,6 +3740,7 @@ instance ToJSON Proposal where
34193740 ("proposalState" .=) <$> _pProposalState,
34203741 ("lastUpdaterOrCommentorRole" .=) <$>
34213742 _pLastUpdaterOrCommentorRole,
3743+ ("negotiationId" .=) <$> _pNegotiationId,
34223744 ("hasBuyerSignedOff" .=) <$> _pHasBuyerSignedOff,
34233745 ("buyer" .=) <$> _pBuyer])
34243746
@@ -3554,6 +3876,81 @@ instance ToJSON TargetingValueSize where
35543876 [("height" .=) <$> _tvsHeight,
35553877 ("width" .=) <$> _tvsWidth])
35563878
3879+--
3880+-- /See:/ 'updatePrivateAuctionProposalRequest' smart constructor.
3881+data UpdatePrivateAuctionProposalRequest = UpdatePrivateAuctionProposalRequest'
3882+ { _upaprExternalDealId :: !(Maybe Text)
3883+ , _upaprUpdateAction :: !(Maybe Text)
3884+ , _upaprNote :: !(Maybe MarketplaceNote)
3885+ , _upaprProposalRevisionNumber :: !(Maybe (Textual Int64))
3886+ } deriving (Eq,Show,Data,Typeable,Generic)
3887+
3888+-- | Creates a value of 'UpdatePrivateAuctionProposalRequest' with the minimum fields required to make a request.
3889+--
3890+-- Use one of the following lenses to modify other fields as desired:
3891+--
3892+-- * 'upaprExternalDealId'
3893+--
3894+-- * 'upaprUpdateAction'
3895+--
3896+-- * 'upaprNote'
3897+--
3898+-- * 'upaprProposalRevisionNumber'
3899+updatePrivateAuctionProposalRequest
3900+ :: UpdatePrivateAuctionProposalRequest
3901+updatePrivateAuctionProposalRequest =
3902+ UpdatePrivateAuctionProposalRequest'
3903+ { _upaprExternalDealId = Nothing
3904+ , _upaprUpdateAction = Nothing
3905+ , _upaprNote = Nothing
3906+ , _upaprProposalRevisionNumber = Nothing
3907+ }
3908+
3909+-- | The externalDealId of the deal to be updated.
3910+upaprExternalDealId :: Lens' UpdatePrivateAuctionProposalRequest (Maybe Text)
3911+upaprExternalDealId
3912+ = lens _upaprExternalDealId
3913+ (\ s a -> s{_upaprExternalDealId = a})
3914+
3915+-- | The proposed action on the private auction proposal.
3916+upaprUpdateAction :: Lens' UpdatePrivateAuctionProposalRequest (Maybe Text)
3917+upaprUpdateAction
3918+ = lens _upaprUpdateAction
3919+ (\ s a -> s{_upaprUpdateAction = a})
3920+
3921+-- | Optional note to be added.
3922+upaprNote :: Lens' UpdatePrivateAuctionProposalRequest (Maybe MarketplaceNote)
3923+upaprNote
3924+ = lens _upaprNote (\ s a -> s{_upaprNote = a})
3925+
3926+-- | The current revision number of the proposal to be updated.
3927+upaprProposalRevisionNumber :: Lens' UpdatePrivateAuctionProposalRequest (Maybe Int64)
3928+upaprProposalRevisionNumber
3929+ = lens _upaprProposalRevisionNumber
3930+ (\ s a -> s{_upaprProposalRevisionNumber = a})
3931+ . mapping _Coerce
3932+
3933+instance FromJSON UpdatePrivateAuctionProposalRequest
3934+ where
3935+ parseJSON
3936+ = withObject "UpdatePrivateAuctionProposalRequest"
3937+ (\ o ->
3938+ UpdatePrivateAuctionProposalRequest' <$>
3939+ (o .:? "externalDealId") <*> (o .:? "updateAction")
3940+ <*> (o .:? "note")
3941+ <*> (o .:? "proposalRevisionNumber"))
3942+
3943+instance ToJSON UpdatePrivateAuctionProposalRequest
3944+ where
3945+ toJSON UpdatePrivateAuctionProposalRequest'{..}
3946+ = object
3947+ (catMaybes
3948+ [("externalDealId" .=) <$> _upaprExternalDealId,
3949+ ("updateAction" .=) <$> _upaprUpdateAction,
3950+ ("note" .=) <$> _upaprNote,
3951+ ("proposalRevisionNumber" .=) <$>
3952+ _upaprProposalRevisionNumber])
3953+
35573954--
35583955-- /See:/ 'pretargetingConfigDimensionsItem' smart constructor.
35593956data PretargetingConfigDimensionsItem = PretargetingConfigDimensionsItem'
@@ -3604,6 +4001,72 @@ instance ToJSON PretargetingConfigDimensionsItem
36044001 [("height" .=) <$> _pcdiHeight,
36054002 ("width" .=) <$> _pcdiWidth])
36064003
4004+-- | This message carries publisher provided forecasting information.
4005+--
4006+-- /See:/ 'publisherProvidedForecast' smart constructor.
4007+data PublisherProvidedForecast = PublisherProvidedForecast'
4008+ { _ppfWeeklyImpressions :: !(Maybe (Textual Int64))
4009+ , _ppfWeeklyUniques :: !(Maybe (Textual Int64))
4010+ , _ppfDimensions :: !(Maybe [Dimension])
4011+ } deriving (Eq,Show,Data,Typeable,Generic)
4012+
4013+-- | Creates a value of 'PublisherProvidedForecast' with the minimum fields required to make a request.
4014+--
4015+-- Use one of the following lenses to modify other fields as desired:
4016+--
4017+-- * 'ppfWeeklyImpressions'
4018+--
4019+-- * 'ppfWeeklyUniques'
4020+--
4021+-- * 'ppfDimensions'
4022+publisherProvidedForecast
4023+ :: PublisherProvidedForecast
4024+publisherProvidedForecast =
4025+ PublisherProvidedForecast'
4026+ { _ppfWeeklyImpressions = Nothing
4027+ , _ppfWeeklyUniques = Nothing
4028+ , _ppfDimensions = Nothing
4029+ }
4030+
4031+-- | Publisher provided weekly impressions.
4032+ppfWeeklyImpressions :: Lens' PublisherProvidedForecast (Maybe Int64)
4033+ppfWeeklyImpressions
4034+ = lens _ppfWeeklyImpressions
4035+ (\ s a -> s{_ppfWeeklyImpressions = a})
4036+ . mapping _Coerce
4037+
4038+-- | Publisher provided weekly uniques.
4039+ppfWeeklyUniques :: Lens' PublisherProvidedForecast (Maybe Int64)
4040+ppfWeeklyUniques
4041+ = lens _ppfWeeklyUniques
4042+ (\ s a -> s{_ppfWeeklyUniques = a})
4043+ . mapping _Coerce
4044+
4045+-- | Publisher provided dimensions. E.g. geo, sizes etc...
4046+ppfDimensions :: Lens' PublisherProvidedForecast [Dimension]
4047+ppfDimensions
4048+ = lens _ppfDimensions
4049+ (\ s a -> s{_ppfDimensions = a})
4050+ . _Default
4051+ . _Coerce
4052+
4053+instance FromJSON PublisherProvidedForecast where
4054+ parseJSON
4055+ = withObject "PublisherProvidedForecast"
4056+ (\ o ->
4057+ PublisherProvidedForecast' <$>
4058+ (o .:? "weeklyImpressions") <*>
4059+ (o .:? "weeklyUniques")
4060+ <*> (o .:? "dimensions" .!= mempty))
4061+
4062+instance ToJSON PublisherProvidedForecast where
4063+ toJSON PublisherProvidedForecast'{..}
4064+ = object
4065+ (catMaybes
4066+ [("weeklyImpressions" .=) <$> _ppfWeeklyImpressions,
4067+ ("weeklyUniques" .=) <$> _ppfWeeklyUniques,
4068+ ("dimensions" .=) <$> _ppfDimensions])
4069+
36074070--
36084071-- /See:/ 'targetingValue' smart constructor.
36094072data TargetingValue = TargetingValue'
@@ -4103,14 +4566,16 @@ sharedTargeting =
41034566stKey :: Lens' SharedTargeting (Maybe Text)
41044567stKey = lens _stKey (\ s a -> s{_stKey = a})
41054568
4106−-- | The list of values to exclude from targeting.
4569+-- | The list of values to exclude from targeting. Each value is AND\'d
4570+-- together.
41074571stExclusions :: Lens' SharedTargeting [TargetingValue]
41084572stExclusions
41094573 = lens _stExclusions (\ s a -> s{_stExclusions = a})
41104574 . _Default
41114575 . _Coerce
41124576
4113−-- | The list of value to include as part of the targeting.
4577+-- | The list of value to include as part of the targeting. Each value is
4578+-- OR\'d together.
41144579stInclusions :: Lens' SharedTargeting [TargetingValue]
41154580stInclusions
41164581 = lens _stInclusions (\ s a -> s{_stInclusions = a})
@@ -4200,24 +4665,29 @@ instance ToJSON CreativeNATiveAdImage where
42004665--
42014666-- /See:/ 'product' smart constructor.
42024667data Product = Product'
4203− { _proState :: !(Maybe Text)
4204− , _proInventorySource :: !(Maybe Text)
4205− , _proWebPropertyCode :: !(Maybe Text)
4206− , _proCreationTimeMs :: !(Maybe (Textual Int64))
4207− , _proTerms :: !(Maybe DealTerms)
4208− , _proLastUpdateTimeMs :: !(Maybe (Textual Int64))
4209− , _proKind :: !Text
4210− , _proRevisionNumber :: !(Maybe (Textual Int64))
4211− , _proHasCreatorSignedOff :: !(Maybe Bool)
4212− , _proFlightStartTimeMs :: !(Maybe (Textual Int64))
4213− , _proSharedTargetings :: !(Maybe [SharedTargeting])
4214− , _proSeller :: !(Maybe Seller)
4215− , _proSyndicationProduct :: !(Maybe Text)
4216− , _proFlightEndTimeMs :: !(Maybe (Textual Int64))
4217− , _proName :: !(Maybe Text)
4218− , _proCreatorContacts :: !(Maybe [ContactInformation])
4219− , _proLabels :: !(Maybe [MarketplaceLabel])
4220− , _proProductId :: !(Maybe Text)
4668+ { _proState :: !(Maybe Text)
4669+ , _proInventorySource :: !(Maybe Text)
4670+ , _proWebPropertyCode :: !(Maybe Text)
4671+ , _proCreationTimeMs :: !(Maybe (Textual Int64))
4672+ , _proTerms :: !(Maybe DealTerms)
4673+ , _proLastUpdateTimeMs :: !(Maybe (Textual Int64))
4674+ , _proKind :: !Text
4675+ , _proRevisionNumber :: !(Maybe (Textual Int64))
4676+ , _proPrivateAuctionId :: !(Maybe Text)
4677+ , _proDeliveryControl :: !(Maybe DeliveryControl)
4678+ , _proHasCreatorSignedOff :: !(Maybe Bool)
4679+ , _proFlightStartTimeMs :: !(Maybe (Textual Int64))
4680+ , _proSharedTargetings :: !(Maybe [SharedTargeting])
4681+ , _proSeller :: !(Maybe Seller)
4682+ , _proSyndicationProduct :: !(Maybe Text)
4683+ , _proFlightEndTimeMs :: !(Maybe (Textual Int64))
4684+ , _proName :: !(Maybe Text)
4685+ , _proCreatorContacts :: !(Maybe [ContactInformation])
4686+ , _proPublisherProvidedForecast :: !(Maybe PublisherProvidedForecast)
4687+ , _proLabels :: !(Maybe [MarketplaceLabel])
4688+ , _proPublisherProFileId :: !(Maybe Text)
4689+ , _proLegacyOfferId :: !(Maybe Text)
4690+ , _proProductId :: !(Maybe Text)
42214691 } deriving (Eq,Show,Data,Typeable,Generic)
42224692
42234693-- | Creates a value of 'Product' with the minimum fields required to make a request.
@@ -4240,6 +4710,10 @@ data Product = Product'
42404710--
42414711-- * 'proRevisionNumber'
42424712--
4713+-- * 'proPrivateAuctionId'
4714+--
4715+-- * 'proDeliveryControl'
4716+--
42434717-- * 'proHasCreatorSignedOff'
42444718--
42454719-- * 'proFlightStartTimeMs'
@@ -4256,8 +4730,14 @@ data Product = Product'
42564730--
42574731-- * 'proCreatorContacts'
42584732--
4733+-- * 'proPublisherProvidedForecast'
4734+--
42594735-- * 'proLabels'
42604736--
4737+-- * 'proPublisherProFileId'
4738+--
4739+-- * 'proLegacyOfferId'
4740+--
42614741-- * 'proProductId'
42624742product
42634743 :: Product
@@ -4271,6 +4751,8 @@ product =
42714751 , _proLastUpdateTimeMs = Nothing
42724752 , _proKind = "adexchangebuyer#product"
42734753 , _proRevisionNumber = Nothing
4754+ , _proPrivateAuctionId = Nothing
4755+ , _proDeliveryControl = Nothing
42744756 , _proHasCreatorSignedOff = Nothing
42754757 , _proFlightStartTimeMs = Nothing
42764758 , _proSharedTargetings = Nothing
@@ -4279,7 +4761,10 @@ product =
42794761 , _proFlightEndTimeMs = Nothing
42804762 , _proName = Nothing
42814763 , _proCreatorContacts = Nothing
4764+ , _proPublisherProvidedForecast = Nothing
42824765 , _proLabels = Nothing
4766+ , _proPublisherProFileId = Nothing
4767+ , _proLegacyOfferId = Nothing
42834768 , _proProductId = Nothing
42844769 }
42854770
@@ -4293,6 +4778,8 @@ proInventorySource
42934778 = lens _proInventorySource
42944779 (\ s a -> s{_proInventorySource = a})
42954780
4781+-- | The web property code for the seller. This field is meant to be copied
4782+-- over as is when creating deals.
42964783proWebPropertyCode :: Lens' Product (Maybe Text)
42974784proWebPropertyCode
42984785 = lens _proWebPropertyCode
@@ -4328,6 +4815,21 @@ proRevisionNumber
43284815 (\ s a -> s{_proRevisionNumber = a})
43294816 . mapping _Coerce
43304817
4818+-- | Optional private auction id if this offer is a private auction offer.
4819+proPrivateAuctionId :: Lens' Product (Maybe Text)
4820+proPrivateAuctionId
4821+ = lens _proPrivateAuctionId
4822+ (\ s a -> s{_proPrivateAuctionId = a})
4823+
4824+-- | The set of fields around delivery control that are interesting for a
4825+-- buyer to see but are non-negotiable. These are set by the publisher.
4826+-- This message is assigned an id of 100 since some day we would want to
4827+-- model this as a protobuf extension.
4828+proDeliveryControl :: Lens' Product (Maybe DeliveryControl)
4829+proDeliveryControl
4830+ = lens _proDeliveryControl
4831+ (\ s a -> s{_proDeliveryControl = a})
4832+
43314833-- | If the creator has already signed off on the product, then the buyer can
43324834-- finalize the deal by accepting the product as is. When copying to a
43334835-- proposal, if any of the terms are changed, then auto_finalize is
@@ -4388,6 +4890,12 @@ proCreatorContacts
43884890 . _Default
43894891 . _Coerce
43904892
4893+-- | Publisher self-provided forecast information.
4894+proPublisherProvidedForecast :: Lens' Product (Maybe PublisherProvidedForecast)
4895+proPublisherProvidedForecast
4896+ = lens _proPublisherProvidedForecast
4897+ (\ s a -> s{_proPublisherProvidedForecast = a})
4898+
43914899-- | Optional List of labels for the product (optional, buyer-readonly).
43924900proLabels :: Lens' Product [MarketplaceLabel]
43934901proLabels
@@ -4395,6 +4903,21 @@ proLabels
43954903 _Default
43964904 . _Coerce
43974905
4906+-- | Id of the publisher profile for a given seller. A (seller.account_id,
4907+-- publisher_profile_id) pair uniquely identifies a publisher profile.
4908+-- Buyers can call the PublisherProfiles::List endpoint to get a list of
4909+-- publisher profiles for a given seller.
4910+proPublisherProFileId :: Lens' Product (Maybe Text)
4911+proPublisherProFileId
4912+ = lens _proPublisherProFileId
4913+ (\ s a -> s{_proPublisherProFileId = a})
4914+
4915+-- | Optional legacy offer id if this offer is a preferred deal offer.
4916+proLegacyOfferId :: Lens' Product (Maybe Text)
4917+proLegacyOfferId
4918+ = lens _proLegacyOfferId
4919+ (\ s a -> s{_proLegacyOfferId = a})
4920+
43984921-- | The unique id for the product (readonly)
43994922proProductId :: Lens' Product (Maybe Text)
44004923proProductId
@@ -4412,6 +4935,8 @@ instance FromJSON Product where
44124935 <*> (o .:? "lastUpdateTimeMs")
44134936 <*> (o .:? "kind" .!= "adexchangebuyer#product")
44144937 <*> (o .:? "revisionNumber")
4938+ <*> (o .:? "privateAuctionId")
4939+ <*> (o .:? "deliveryControl")
44154940 <*> (o .:? "hasCreatorSignedOff")
44164941 <*> (o .:? "flightStartTimeMs")
44174942 <*> (o .:? "sharedTargetings" .!= mempty)
@@ -4420,7 +4945,10 @@ instance FromJSON Product where
44204945 <*> (o .:? "flightEndTimeMs")
44214946 <*> (o .:? "name")
44224947 <*> (o .:? "creatorContacts" .!= mempty)
4948+ <*> (o .:? "publisherProvidedForecast")
44234949 <*> (o .:? "labels" .!= mempty)
4950+ <*> (o .:? "publisherProfileId")
4951+ <*> (o .:? "legacyOfferId")
44244952 <*> (o .:? "productId"))
44254953
44264954instance ToJSON Product where
@@ -4435,6 +4963,8 @@ instance ToJSON Product where
44354963 ("lastUpdateTimeMs" .=) <$> _proLastUpdateTimeMs,
44364964 Just ("kind" .= _proKind),
44374965 ("revisionNumber" .=) <$> _proRevisionNumber,
4966+ ("privateAuctionId" .=) <$> _proPrivateAuctionId,
4967+ ("deliveryControl" .=) <$> _proDeliveryControl,
44384968 ("hasCreatorSignedOff" .=) <$>
44394969 _proHasCreatorSignedOff,
44404970 ("flightStartTimeMs" .=) <$> _proFlightStartTimeMs,
@@ -4444,7 +4974,11 @@ instance ToJSON Product where
44444974 ("flightEndTimeMs" .=) <$> _proFlightEndTimeMs,
44454975 ("name" .=) <$> _proName,
44464976 ("creatorContacts" .=) <$> _proCreatorContacts,
4977+ ("publisherProvidedForecast" .=) <$>
4978+ _proPublisherProvidedForecast,
44474979 ("labels" .=) <$> _proLabels,
4980+ ("publisherProfileId" .=) <$> _proPublisherProFileId,
4981+ ("legacyOfferId" .=) <$> _proLegacyOfferId,
44484982 ("productId" .=) <$> _proProductId])
44494983
44504984--
@@ -4616,31 +5150,343 @@ instance ToJSON PretargetingConfigPlacementsItem
46165150 [("token" .=) <$> _pcpiToken,
46175151 ("type" .=) <$> _pcpiType])
46185152
5153+--
5154+-- /See:/ 'publisherProFileAPIProto' smart constructor.
5155+data PublisherProFileAPIProto = PublisherProFileAPIProto'
5156+ { _ppfapAudience :: !(Maybe Text)
5157+ , _ppfapState :: !(Maybe Text)
5158+ , _ppfapMediaKitLink :: !(Maybe Text)
5159+ , _ppfapDirectContact :: !(Maybe Text)
5160+ , _ppfapSamplePageLink :: !(Maybe Text)
5161+ , _ppfapLogoURL :: !(Maybe Text)
5162+ , _ppfapKind :: !Text
5163+ , _ppfapExchange :: !(Maybe Text)
5164+ , _ppfapOverview :: !(Maybe Text)
5165+ , _ppfapGooglePlusLink :: !(Maybe Text)
5166+ , _ppfapProFileId :: !(Maybe (Textual Int32))
5167+ , _ppfapIsParent :: !(Maybe Bool)
5168+ , _ppfapSeller :: !(Maybe Seller)
5169+ , _ppfapAccountId :: !(Maybe Text)
5170+ , _ppfapName :: !(Maybe Text)
5171+ , _ppfapBuyerPitchStatement :: !(Maybe Text)
5172+ , _ppfapPublisherProvidedForecast :: !(Maybe PublisherProvidedForecast)
5173+ , _ppfapIsPublished :: !(Maybe Bool)
5174+ , _ppfapPublisherDomains :: !(Maybe [Text])
5175+ , _ppfapPublisherProFileId :: !(Maybe Text)
5176+ , _ppfapRateCardInfoLink :: !(Maybe Text)
5177+ , _ppfapTopHeadlines :: !(Maybe [Text])
5178+ , _ppfapProgrammaticContact :: !(Maybe Text)
5179+ } deriving (Eq,Show,Data,Typeable,Generic)
5180+
5181+-- | Creates a value of 'PublisherProFileAPIProto' with the minimum fields required to make a request.
5182+--
5183+-- Use one of the following lenses to modify other fields as desired:
5184+--
5185+-- * 'ppfapAudience'
5186+--
5187+-- * 'ppfapState'
5188+--
5189+-- * 'ppfapMediaKitLink'
5190+--
5191+-- * 'ppfapDirectContact'
5192+--
5193+-- * 'ppfapSamplePageLink'
5194+--
5195+-- * 'ppfapLogoURL'
5196+--
5197+-- * 'ppfapKind'
5198+--
5199+-- * 'ppfapExchange'
5200+--
5201+-- * 'ppfapOverview'
5202+--
5203+-- * 'ppfapGooglePlusLink'
5204+--
5205+-- * 'ppfapProFileId'
5206+--
5207+-- * 'ppfapIsParent'
5208+--
5209+-- * 'ppfapSeller'
5210+--
5211+-- * 'ppfapAccountId'
5212+--
5213+-- * 'ppfapName'
5214+--
5215+-- * 'ppfapBuyerPitchStatement'
5216+--
5217+-- * 'ppfapPublisherProvidedForecast'
5218+--
5219+-- * 'ppfapIsPublished'
5220+--
5221+-- * 'ppfapPublisherDomains'
5222+--
5223+-- * 'ppfapPublisherProFileId'
5224+--
5225+-- * 'ppfapRateCardInfoLink'
5226+--
5227+-- * 'ppfapTopHeadlines'
5228+--
5229+-- * 'ppfapProgrammaticContact'
5230+publisherProFileAPIProto
5231+ :: PublisherProFileAPIProto
5232+publisherProFileAPIProto =
5233+ PublisherProFileAPIProto'
5234+ { _ppfapAudience = Nothing
5235+ , _ppfapState = Nothing
5236+ , _ppfapMediaKitLink = Nothing
5237+ , _ppfapDirectContact = Nothing
5238+ , _ppfapSamplePageLink = Nothing
5239+ , _ppfapLogoURL = Nothing
5240+ , _ppfapKind = "adexchangebuyer#publisherProfileApiProto"
5241+ , _ppfapExchange = Nothing
5242+ , _ppfapOverview = Nothing
5243+ , _ppfapGooglePlusLink = Nothing
5244+ , _ppfapProFileId = Nothing
5245+ , _ppfapIsParent = Nothing
5246+ , _ppfapSeller = Nothing
5247+ , _ppfapAccountId = Nothing
5248+ , _ppfapName = Nothing
5249+ , _ppfapBuyerPitchStatement = Nothing
5250+ , _ppfapPublisherProvidedForecast = Nothing
5251+ , _ppfapIsPublished = Nothing
5252+ , _ppfapPublisherDomains = Nothing
5253+ , _ppfapPublisherProFileId = Nothing
5254+ , _ppfapRateCardInfoLink = Nothing
5255+ , _ppfapTopHeadlines = Nothing
5256+ , _ppfapProgrammaticContact = Nothing
5257+ }
5258+
5259+-- | Publisher provided info on its audience.
5260+ppfapAudience :: Lens' PublisherProFileAPIProto (Maybe Text)
5261+ppfapAudience
5262+ = lens _ppfapAudience
5263+ (\ s a -> s{_ppfapAudience = a})
5264+
5265+-- | State of the publisher profile.
5266+ppfapState :: Lens' PublisherProFileAPIProto (Maybe Text)
5267+ppfapState
5268+ = lens _ppfapState (\ s a -> s{_ppfapState = a})
5269+
5270+-- | The url for additional marketing and sales materials.
5271+ppfapMediaKitLink :: Lens' PublisherProFileAPIProto (Maybe Text)
5272+ppfapMediaKitLink
5273+ = lens _ppfapMediaKitLink
5274+ (\ s a -> s{_ppfapMediaKitLink = a})
5275+
5276+-- | Direct contact for the publisher profile.
5277+ppfapDirectContact :: Lens' PublisherProFileAPIProto (Maybe Text)
5278+ppfapDirectContact
5279+ = lens _ppfapDirectContact
5280+ (\ s a -> s{_ppfapDirectContact = a})
5281+
5282+-- | Link for a sample content page.
5283+ppfapSamplePageLink :: Lens' PublisherProFileAPIProto (Maybe Text)
5284+ppfapSamplePageLink
5285+ = lens _ppfapSamplePageLink
5286+ (\ s a -> s{_ppfapSamplePageLink = a})
5287+
5288+-- | The url to the logo for the publisher.
5289+ppfapLogoURL :: Lens' PublisherProFileAPIProto (Maybe Text)
5290+ppfapLogoURL
5291+ = lens _ppfapLogoURL (\ s a -> s{_ppfapLogoURL = a})
5292+
5293+-- | Identifies what kind of resource this is. Value: the fixed string
5294+-- \"adexchangebuyer#publisherProfileApiProto\".
5295+ppfapKind :: Lens' PublisherProFileAPIProto Text
5296+ppfapKind
5297+ = lens _ppfapKind (\ s a -> s{_ppfapKind = a})
5298+
5299+-- | Exchange where this publisher profile is from. E.g. AdX, Rubicon etc...
5300+ppfapExchange :: Lens' PublisherProFileAPIProto (Maybe Text)
5301+ppfapExchange
5302+ = lens _ppfapExchange
5303+ (\ s a -> s{_ppfapExchange = a})
5304+
5305+-- | Publisher provided overview.
5306+ppfapOverview :: Lens' PublisherProFileAPIProto (Maybe Text)
5307+ppfapOverview
5308+ = lens _ppfapOverview
5309+ (\ s a -> s{_ppfapOverview = a})
5310+
5311+-- | Link to publisher\'s Google+ page.
5312+ppfapGooglePlusLink :: Lens' PublisherProFileAPIProto (Maybe Text)
5313+ppfapGooglePlusLink
5314+ = lens _ppfapGooglePlusLink
5315+ (\ s a -> s{_ppfapGooglePlusLink = a})
5316+
5317+-- | The pair of (seller.account_id, profile_id) uniquely identifies a
5318+-- publisher profile for a given publisher.
5319+ppfapProFileId :: Lens' PublisherProFileAPIProto (Maybe Int32)
5320+ppfapProFileId
5321+ = lens _ppfapProFileId
5322+ (\ s a -> s{_ppfapProFileId = a})
5323+ . mapping _Coerce
5324+
5325+-- | True, if this is the parent profile, which represents all domains owned
5326+-- by the publisher.
5327+ppfapIsParent :: Lens' PublisherProFileAPIProto (Maybe Bool)
5328+ppfapIsParent
5329+ = lens _ppfapIsParent
5330+ (\ s a -> s{_ppfapIsParent = a})
5331+
5332+-- | Seller of the publisher profile.
5333+ppfapSeller :: Lens' PublisherProFileAPIProto (Maybe Seller)
5334+ppfapSeller
5335+ = lens _ppfapSeller (\ s a -> s{_ppfapSeller = a})
5336+
5337+-- | The account id of the seller.
5338+ppfapAccountId :: Lens' PublisherProFileAPIProto (Maybe Text)
5339+ppfapAccountId
5340+ = lens _ppfapAccountId
5341+ (\ s a -> s{_ppfapAccountId = a})
5342+
5343+ppfapName :: Lens' PublisherProFileAPIProto (Maybe Text)
5344+ppfapName
5345+ = lens _ppfapName (\ s a -> s{_ppfapName = a})
5346+
5347+-- | A pitch statement for the buyer
5348+ppfapBuyerPitchStatement :: Lens' PublisherProFileAPIProto (Maybe Text)
5349+ppfapBuyerPitchStatement
5350+ = lens _ppfapBuyerPitchStatement
5351+ (\ s a -> s{_ppfapBuyerPitchStatement = a})
5352+
5353+-- | Publisher provided forecasting information.
5354+ppfapPublisherProvidedForecast :: Lens' PublisherProFileAPIProto (Maybe PublisherProvidedForecast)
5355+ppfapPublisherProvidedForecast
5356+ = lens _ppfapPublisherProvidedForecast
5357+ (\ s a -> s{_ppfapPublisherProvidedForecast = a})
5358+
5359+-- | True, if this profile is published. Deprecated for state.
5360+ppfapIsPublished :: Lens' PublisherProFileAPIProto (Maybe Bool)
5361+ppfapIsPublished
5362+ = lens _ppfapIsPublished
5363+ (\ s a -> s{_ppfapIsPublished = a})
5364+
5365+-- | The list of domains represented in this publisher profile. Empty if this
5366+-- is a parent profile.
5367+ppfapPublisherDomains :: Lens' PublisherProFileAPIProto [Text]
5368+ppfapPublisherDomains
5369+ = lens _ppfapPublisherDomains
5370+ (\ s a -> s{_ppfapPublisherDomains = a})
5371+ . _Default
5372+ . _Coerce
5373+
5374+-- | Unique Id for publisher profile.
5375+ppfapPublisherProFileId :: Lens' PublisherProFileAPIProto (Maybe Text)
5376+ppfapPublisherProFileId
5377+ = lens _ppfapPublisherProFileId
5378+ (\ s a -> s{_ppfapPublisherProFileId = a})
5379+
5380+-- | Link to publisher rate card
5381+ppfapRateCardInfoLink :: Lens' PublisherProFileAPIProto (Maybe Text)
5382+ppfapRateCardInfoLink
5383+ = lens _ppfapRateCardInfoLink
5384+ (\ s a -> s{_ppfapRateCardInfoLink = a})
5385+
5386+-- | Publisher provided key metrics and rankings.
5387+ppfapTopHeadlines :: Lens' PublisherProFileAPIProto [Text]
5388+ppfapTopHeadlines
5389+ = lens _ppfapTopHeadlines
5390+ (\ s a -> s{_ppfapTopHeadlines = a})
5391+ . _Default
5392+ . _Coerce
5393+
5394+-- | Programmatic contact for the publisher profile.
5395+ppfapProgrammaticContact :: Lens' PublisherProFileAPIProto (Maybe Text)
5396+ppfapProgrammaticContact
5397+ = lens _ppfapProgrammaticContact
5398+ (\ s a -> s{_ppfapProgrammaticContact = a})
5399+
5400+instance FromJSON PublisherProFileAPIProto where
5401+ parseJSON
5402+ = withObject "PublisherProFileAPIProto"
5403+ (\ o ->
5404+ PublisherProFileAPIProto' <$>
5405+ (o .:? "audience") <*> (o .:? "state") <*>
5406+ (o .:? "mediaKitLink")
5407+ <*> (o .:? "directContact")
5408+ <*> (o .:? "samplePageLink")
5409+ <*> (o .:? "logoUrl")
5410+ <*>
5411+ (o .:? "kind" .!=
5412+ "adexchangebuyer#publisherProfileApiProto")
5413+ <*> (o .:? "exchange")
5414+ <*> (o .:? "overview")
5415+ <*> (o .:? "googlePlusLink")
5416+ <*> (o .:? "profileId")
5417+ <*> (o .:? "isParent")
5418+ <*> (o .:? "seller")
5419+ <*> (o .:? "accountId")
5420+ <*> (o .:? "name")
5421+ <*> (o .:? "buyerPitchStatement")
5422+ <*> (o .:? "publisherProvidedForecast")
5423+ <*> (o .:? "isPublished")
5424+ <*> (o .:? "publisherDomains" .!= mempty)
5425+ <*> (o .:? "publisherProfileId")
5426+ <*> (o .:? "rateCardInfoLink")
5427+ <*> (o .:? "topHeadlines" .!= mempty)
5428+ <*> (o .:? "programmaticContact"))
5429+
5430+instance ToJSON PublisherProFileAPIProto where
5431+ toJSON PublisherProFileAPIProto'{..}
5432+ = object
5433+ (catMaybes
5434+ [("audience" .=) <$> _ppfapAudience,
5435+ ("state" .=) <$> _ppfapState,
5436+ ("mediaKitLink" .=) <$> _ppfapMediaKitLink,
5437+ ("directContact" .=) <$> _ppfapDirectContact,
5438+ ("samplePageLink" .=) <$> _ppfapSamplePageLink,
5439+ ("logoUrl" .=) <$> _ppfapLogoURL,
5440+ Just ("kind" .= _ppfapKind),
5441+ ("exchange" .=) <$> _ppfapExchange,
5442+ ("overview" .=) <$> _ppfapOverview,
5443+ ("googlePlusLink" .=) <$> _ppfapGooglePlusLink,
5444+ ("profileId" .=) <$> _ppfapProFileId,
5445+ ("isParent" .=) <$> _ppfapIsParent,
5446+ ("seller" .=) <$> _ppfapSeller,
5447+ ("accountId" .=) <$> _ppfapAccountId,
5448+ ("name" .=) <$> _ppfapName,
5449+ ("buyerPitchStatement" .=) <$>
5450+ _ppfapBuyerPitchStatement,
5451+ ("publisherProvidedForecast" .=) <$>
5452+ _ppfapPublisherProvidedForecast,
5453+ ("isPublished" .=) <$> _ppfapIsPublished,
5454+ ("publisherDomains" .=) <$> _ppfapPublisherDomains,
5455+ ("publisherProfileId" .=) <$>
5456+ _ppfapPublisherProFileId,
5457+ ("rateCardInfoLink" .=) <$> _ppfapRateCardInfoLink,
5458+ ("topHeadlines" .=) <$> _ppfapTopHeadlines,
5459+ ("programmaticContact" .=) <$>
5460+ _ppfapProgrammaticContact])
5461+
46195462-- | A proposal can contain multiple deals. A deal contains the terms and
46205463-- targeting information that is used for serving.
46215464--
46225465-- /See:/ 'marketplaceDeal' smart constructor.
46235466data MarketplaceDeal = MarketplaceDeal'
4624− { _mdExternalDealId :: !(Maybe Text)
4625− , _mdBuyerPrivateData :: !(Maybe PrivateData)
4626− , _mdWebPropertyCode :: !(Maybe Text)
4627− , _mdCreationTimeMs :: !(Maybe (Textual Int64))
4628− , _mdTerms :: !(Maybe DealTerms)
4629− , _mdLastUpdateTimeMs :: !(Maybe (Textual Int64))
4630− , _mdKind :: !Text
4631− , _mdDeliveryControl :: !(Maybe DeliveryControl)
4632− , _mdFlightStartTimeMs :: !(Maybe (Textual Int64))
4633− , _mdSharedTargetings :: !(Maybe [SharedTargeting])
4634− , _mdProposalId :: !(Maybe Text)
4635− , _mdDealId :: !(Maybe Text)
4636− , _mdInventoryDescription :: !(Maybe Text)
4637− , _mdSyndicationProduct :: !(Maybe Text)
4638− , _mdFlightEndTimeMs :: !(Maybe (Textual Int64))
4639− , _mdName :: !(Maybe Text)
4640− , _mdSellerContacts :: !(Maybe [ContactInformation])
4641− , _mdCreativePreApprovalPolicy :: !(Maybe Text)
4642− , _mdProductRevisionNumber :: !(Maybe (Textual Int64))
4643− , _mdProductId :: !(Maybe Text)
5467+ { _mdExternalDealId :: !(Maybe Text)
5468+ , _mdBuyerPrivateData :: !(Maybe PrivateData)
5469+ , _mdWebPropertyCode :: !(Maybe Text)
5470+ , _mdCreationTimeMs :: !(Maybe (Textual Int64))
5471+ , _mdTerms :: !(Maybe DealTerms)
5472+ , _mdLastUpdateTimeMs :: !(Maybe (Textual Int64))
5473+ , _mdKind :: !Text
5474+ , _mdDeliveryControl :: !(Maybe DeliveryControl)
5475+ , _mdDealServingMetadata :: !(Maybe DealServingMetadata)
5476+ , _mdFlightStartTimeMs :: !(Maybe (Textual Int64))
5477+ , _mdSharedTargetings :: !(Maybe [SharedTargeting])
5478+ , _mdProposalId :: !(Maybe Text)
5479+ , _mdDealId :: !(Maybe Text)
5480+ , _mdInventoryDescription :: !(Maybe Text)
5481+ , _mdSyndicationProduct :: !(Maybe Text)
5482+ , _mdFlightEndTimeMs :: !(Maybe (Textual Int64))
5483+ , _mdName :: !(Maybe Text)
5484+ , _mdSellerContacts :: !(Maybe [ContactInformation])
5485+ , _mdProgrammaticCreativeSource :: !(Maybe Text)
5486+ , _mdCreativePreApprovalPolicy :: !(Maybe Text)
5487+ , _mdProductRevisionNumber :: !(Maybe (Textual Int64))
5488+ , _mdProductId :: !(Maybe Text)
5489+ , _mdCreativeSafeFrameCompatibility :: !(Maybe Text)
46445490 } deriving (Eq,Show,Data,Typeable,Generic)
46455491
46465492-- | Creates a value of 'MarketplaceDeal' with the minimum fields required to make a request.
@@ -4663,6 +5509,8 @@ data MarketplaceDeal = MarketplaceDeal'
46635509--
46645510-- * 'mdDeliveryControl'
46655511--
5512+-- * 'mdDealServingMetadata'
5513+--
46665514-- * 'mdFlightStartTimeMs'
46675515--
46685516-- * 'mdSharedTargetings'
@@ -4681,11 +5529,15 @@ data MarketplaceDeal = MarketplaceDeal'
46815529--
46825530-- * 'mdSellerContacts'
46835531--
5532+-- * 'mdProgrammaticCreativeSource'
5533+--
46845534-- * 'mdCreativePreApprovalPolicy'
46855535--
46865536-- * 'mdProductRevisionNumber'
46875537--
46885538-- * 'mdProductId'
5539+--
5540+-- * 'mdCreativeSafeFrameCompatibility'
46895541marketplaceDeal
46905542 :: MarketplaceDeal
46915543marketplaceDeal =
@@ -4698,6 +5550,7 @@ marketplaceDeal =
46985550 , _mdLastUpdateTimeMs = Nothing
46995551 , _mdKind = "adexchangebuyer#marketplaceDeal"
47005552 , _mdDeliveryControl = Nothing
5553+ , _mdDealServingMetadata = Nothing
47015554 , _mdFlightStartTimeMs = Nothing
47025555 , _mdSharedTargetings = Nothing
47035556 , _mdProposalId = Nothing
@@ -4707,9 +5560,11 @@ marketplaceDeal =
47075560 , _mdFlightEndTimeMs = Nothing
47085561 , _mdName = Nothing
47095562 , _mdSellerContacts = Nothing
5563+ , _mdProgrammaticCreativeSource = Nothing
47105564 , _mdCreativePreApprovalPolicy = Nothing
47115565 , _mdProductRevisionNumber = Nothing
47125566 , _mdProductId = Nothing
5567+ , _mdCreativeSafeFrameCompatibility = Nothing
47135568 }
47145569
47155570-- | The external deal id assigned to this deal once the deal is finalized.
@@ -4762,6 +5617,13 @@ mdDeliveryControl
47625617 = lens _mdDeliveryControl
47635618 (\ s a -> s{_mdDeliveryControl = a})
47645619
5620+-- | Metadata about the serving status of this deal (readonly, writes via
5621+-- custom actions)
5622+mdDealServingMetadata :: Lens' MarketplaceDeal (Maybe DealServingMetadata)
5623+mdDealServingMetadata
5624+ = lens _mdDealServingMetadata
5625+ (\ s a -> s{_mdDealServingMetadata = a})
5626+
47655627-- | Proposed flight start time of the deal (ms since epoch) This will
47665628-- generally be stored in a granularity of a second. (updatable)
47675629mdFlightStartTimeMs :: Lens' MarketplaceDeal (Maybe Int64)
@@ -4770,7 +5632,8 @@ mdFlightStartTimeMs
47705632 (\ s a -> s{_mdFlightStartTimeMs = a})
47715633 . mapping _Coerce
47725634
4773−-- | The shared targeting visible to buyers and sellers. (updatable)
5635+-- | The shared targeting visible to buyers and sellers. Each shared
5636+-- targeting entity is AND\'d together. (updatable)
47745637mdSharedTargetings :: Lens' MarketplaceDeal [SharedTargeting]
47755638mdSharedTargetings
47765639 = lens _mdSharedTargetings
@@ -4819,6 +5682,14 @@ mdSellerContacts
48195682 . _Default
48205683 . _Coerce
48215684
5685+-- | Specifies the creative source for programmatic deals, PUBLISHER means
5686+-- creative is provided by seller and ADVERTISR means creative is provided
5687+-- by buyer. (buyer-readonly)
5688+mdProgrammaticCreativeSource :: Lens' MarketplaceDeal (Maybe Text)
5689+mdProgrammaticCreativeSource
5690+ = lens _mdProgrammaticCreativeSource
5691+ (\ s a -> s{_mdProgrammaticCreativeSource = a})
5692+
48225693-- | Specifies the creative pre-approval policy (buyer-readonly)
48235694mdCreativePreApprovalPolicy :: Lens' MarketplaceDeal (Maybe Text)
48245695mdCreativePreApprovalPolicy
@@ -4839,6 +5710,12 @@ mdProductId :: Lens' MarketplaceDeal (Maybe Text)
48395710mdProductId
48405711 = lens _mdProductId (\ s a -> s{_mdProductId = a})
48415712
5713+-- | Specifies whether the creative is safeFrame compatible (buyer-readonly)
5714+mdCreativeSafeFrameCompatibility :: Lens' MarketplaceDeal (Maybe Text)
5715+mdCreativeSafeFrameCompatibility
5716+ = lens _mdCreativeSafeFrameCompatibility
5717+ (\ s a -> s{_mdCreativeSafeFrameCompatibility = a})
5718+
48425719instance FromJSON MarketplaceDeal where
48435720 parseJSON
48445721 = withObject "MarketplaceDeal"
@@ -4853,6 +5730,7 @@ instance FromJSON MarketplaceDeal where
48535730 <*>
48545731 (o .:? "kind" .!= "adexchangebuyer#marketplaceDeal")
48555732 <*> (o .:? "deliveryControl")
5733+ <*> (o .:? "dealServingMetadata")
48565734 <*> (o .:? "flightStartTimeMs")
48575735 <*> (o .:? "sharedTargetings" .!= mempty)
48585736 <*> (o .:? "proposalId")
@@ -4862,9 +5740,11 @@ instance FromJSON MarketplaceDeal where
48625740 <*> (o .:? "flightEndTimeMs")
48635741 <*> (o .:? "name")
48645742 <*> (o .:? "sellerContacts" .!= mempty)
5743+ <*> (o .:? "programmaticCreativeSource")
48655744 <*> (o .:? "creativePreApprovalPolicy")
48665745 <*> (o .:? "productRevisionNumber")
4867− <*> (o .:? "productId"))
5746+ <*> (o .:? "productId")
5747+ <*> (o .:? "creativeSafeFrameCompatibility"))
48685748
48695749instance ToJSON MarketplaceDeal where
48705750 toJSON MarketplaceDeal'{..}
@@ -4878,6 +5758,8 @@ instance ToJSON MarketplaceDeal where
48785758 ("lastUpdateTimeMs" .=) <$> _mdLastUpdateTimeMs,
48795759 Just ("kind" .= _mdKind),
48805760 ("deliveryControl" .=) <$> _mdDeliveryControl,
5761+ ("dealServingMetadata" .=) <$>
5762+ _mdDealServingMetadata,
48815763 ("flightStartTimeMs" .=) <$> _mdFlightStartTimeMs,
48825764 ("sharedTargetings" .=) <$> _mdSharedTargetings,
48835765 ("proposalId" .=) <$> _mdProposalId,
@@ -4888,11 +5770,15 @@ instance ToJSON MarketplaceDeal where
48885770 ("flightEndTimeMs" .=) <$> _mdFlightEndTimeMs,
48895771 ("name" .=) <$> _mdName,
48905772 ("sellerContacts" .=) <$> _mdSellerContacts,
5773+ ("programmaticCreativeSource" .=) <$>
5774+ _mdProgrammaticCreativeSource,
48915775 ("creativePreApprovalPolicy" .=) <$>
48925776 _mdCreativePreApprovalPolicy,
48935777 ("productRevisionNumber" .=) <$>
48945778 _mdProductRevisionNumber,
4895− ("productId" .=) <$> _mdProductId])
5779+ ("productId" .=) <$> _mdProductId,
5780+ ("creativeSafeFrameCompatibility" .=) <$>
5781+ _mdCreativeSafeFrameCompatibility])
48965782
48975783--
48985784-- /See:/ 'getOffersResponse' smart constructor.
@@ -4933,8 +5819,8 @@ instance ToJSON GetOffersResponse where
49335819--
49345820-- /See:/ 'dealTermsNonGuaranteedAuctionTerms' smart constructor.
49355821data DealTermsNonGuaranteedAuctionTerms = DealTermsNonGuaranteedAuctionTerms'
4936− { _dtngatReservePricePerBuyers :: !(Maybe [PricePerBuyer])
4937− , _dtngatPrivateAuctionId :: !(Maybe Text)
5822+ { _dtngatReservePricePerBuyers :: !(Maybe [PricePerBuyer])
5823+ , _dtngatAutoOptimizePrivateAuction :: !(Maybe Bool)
49385824 } deriving (Eq,Show,Data,Typeable,Generic)
49395825
49405826-- | Creates a value of 'DealTermsNonGuaranteedAuctionTerms' with the minimum fields required to make a request.
@@ -4943,13 +5829,13 @@ data DealTermsNonGuaranteedAuctionTerms = DealTermsNonGuaranteedAuctionTerms'
49435829--
49445830-- * 'dtngatReservePricePerBuyers'
49455831--
4946−-- * 'dtngatPrivateAuctionId'
5832+-- * 'dtngatAutoOptimizePrivateAuction'
49475833dealTermsNonGuaranteedAuctionTerms
49485834 :: DealTermsNonGuaranteedAuctionTerms
49495835dealTermsNonGuaranteedAuctionTerms =
49505836 DealTermsNonGuaranteedAuctionTerms'
49515837 { _dtngatReservePricePerBuyers = Nothing
4952− , _dtngatPrivateAuctionId = Nothing
5838+ , _dtngatAutoOptimizePrivateAuction = Nothing
49535839 }
49545840
49555841-- | Reserve price for the specified buyer.
@@ -4960,11 +5846,12 @@ dtngatReservePricePerBuyers
49605846 . _Default
49615847 . _Coerce
49625848
4963−-- | Id of the corresponding private auction.
4964−dtngatPrivateAuctionId :: Lens' DealTermsNonGuaranteedAuctionTerms (Maybe Text)
4965−dtngatPrivateAuctionId
4966− = lens _dtngatPrivateAuctionId
4967− (\ s a -> s{_dtngatPrivateAuctionId = a})
5849+-- | True if open auction buyers are allowed to compete with invited buyers
5850+-- in this private auction (buyer-readonly).
5851+dtngatAutoOptimizePrivateAuction :: Lens' DealTermsNonGuaranteedAuctionTerms (Maybe Bool)
5852+dtngatAutoOptimizePrivateAuction
5853+ = lens _dtngatAutoOptimizePrivateAuction
5854+ (\ s a -> s{_dtngatAutoOptimizePrivateAuction = a})
49685855
49695856instance FromJSON DealTermsNonGuaranteedAuctionTerms
49705857 where
@@ -4973,7 +5860,7 @@ instance FromJSON DealTermsNonGuaranteedAuctionTerms
49735860 (\ o ->
49745861 DealTermsNonGuaranteedAuctionTerms' <$>
49755862 (o .:? "reservePricePerBuyers" .!= mempty) <*>
4976− (o .:? "privateAuctionId"))
5863+ (o .:? "autoOptimizePrivateAuction"))
49775864
49785865instance ToJSON DealTermsNonGuaranteedAuctionTerms
49795866 where
@@ -4982,7 +5869,8 @@ instance ToJSON DealTermsNonGuaranteedAuctionTerms
49825869 (catMaybes
49835870 [("reservePricePerBuyers" .=) <$>
49845871 _dtngatReservePricePerBuyers,
4985− ("privateAuctionId" .=) <$> _dtngatPrivateAuctionId])
5872+ ("autoOptimizePrivateAuction" .=) <$>
5873+ _dtngatAutoOptimizePrivateAuction])
49865874
49875875--
49885876-- /See:/ 'creativeFilteringReasonsReasonsItem' smart constructor.
@@ -5047,6 +5935,7 @@ data DealTerms = DealTerms'
50475935 , _dtNonGuaranteedAuctionTerms :: !(Maybe DealTermsNonGuaranteedAuctionTerms)
50485936 , _dtBrandingType :: !(Maybe Text)
50495937 , _dtEstimatedImpressionsPerDay :: !(Maybe (Textual Int64))
5938+ , _dtSellerTimeZone :: !(Maybe Text)
50505939 , _dtGuaranteedFixedPriceTerms :: !(Maybe DealTermsGuaranteedFixedPriceTerms)
50515940 , _dtDescription :: !(Maybe Text)
50525941 } deriving (Eq,Show,Data,Typeable,Generic)
@@ -5065,6 +5954,8 @@ data DealTerms = DealTerms'
50655954--
50665955-- * 'dtEstimatedImpressionsPerDay'
50675956--
5957+-- * 'dtSellerTimeZone'
5958+--
50685959-- * 'dtGuaranteedFixedPriceTerms'
50695960--
50705961-- * 'dtDescription'
@@ -5077,6 +5968,7 @@ dealTerms =
50775968 , _dtNonGuaranteedAuctionTerms = Nothing
50785969 , _dtBrandingType = Nothing
50795970 , _dtEstimatedImpressionsPerDay = Nothing
5971+ , _dtSellerTimeZone = Nothing
50805972 , _dtGuaranteedFixedPriceTerms = Nothing
50815973 , _dtDescription = Nothing
50825974 }
@@ -5114,6 +6006,13 @@ dtEstimatedImpressionsPerDay
51146006 (\ s a -> s{_dtEstimatedImpressionsPerDay = a})
51156007 . mapping _Coerce
51166008
6009+-- | For deals with Cost Per Day billing, defines the timezone used to mark
6010+-- the boundaries of a day (buyer-readonly)
6011+dtSellerTimeZone :: Lens' DealTerms (Maybe Text)
6012+dtSellerTimeZone
6013+ = lens _dtSellerTimeZone
6014+ (\ s a -> s{_dtSellerTimeZone = a})
6015+
51176016-- | The terms for guaranteed fixed price deals.
51186017dtGuaranteedFixedPriceTerms :: Lens' DealTerms (Maybe DealTermsGuaranteedFixedPriceTerms)
51196018dtGuaranteedFixedPriceTerms
@@ -5136,6 +6035,7 @@ instance FromJSON DealTerms where
51366035 <*> (o .:? "nonGuaranteedAuctionTerms")
51376036 <*> (o .:? "brandingType")
51386037 <*> (o .:? "estimatedImpressionsPerDay")
6038+ <*> (o .:? "sellerTimeZone")
51396039 <*> (o .:? "guaranteedFixedPriceTerms")
51406040 <*> (o .:? "description"))
51416041
@@ -5152,6 +6052,7 @@ instance ToJSON DealTerms where
51526052 ("brandingType" .=) <$> _dtBrandingType,
51536053 ("estimatedImpressionsPerDay" .=) <$>
51546054 _dtEstimatedImpressionsPerDay,
6055+ ("sellerTimeZone" .=) <$> _dtSellerTimeZone,
51556056 ("guaranteedFixedPriceTerms" .=) <$>
51566057 _dtGuaranteedFixedPriceTerms,
51576058 ("description" .=) <$> _dtDescription])
@@ -5323,11 +6224,63 @@ instance ToJSON AddOrderDealsRequest where
53236224 ("proposalRevisionNumber" .=) <$>
53246225 _aProposalRevisionNumber])
53256226
6227+-- | Tracks which parties (if any) have paused a deal. The deal is considered
6228+-- paused if has_buyer_paused || has_seller_paused.
6229+--
6230+-- /See:/ 'dealServingMetadataDealPauseStatus' smart constructor.
6231+data DealServingMetadataDealPauseStatus = DealServingMetadataDealPauseStatus'
6232+ { _dsmdpsHasBuyerPaused :: !(Maybe Bool)
6233+ , _dsmdpsHasSellerPaused :: !(Maybe Bool)
6234+ } deriving (Eq,Show,Data,Typeable,Generic)
6235+
6236+-- | Creates a value of 'DealServingMetadataDealPauseStatus' with the minimum fields required to make a request.
6237+--
6238+-- Use one of the following lenses to modify other fields as desired:
6239+--
6240+-- * 'dsmdpsHasBuyerPaused'
6241+--
6242+-- * 'dsmdpsHasSellerPaused'
6243+dealServingMetadataDealPauseStatus
6244+ :: DealServingMetadataDealPauseStatus
6245+dealServingMetadataDealPauseStatus =
6246+ DealServingMetadataDealPauseStatus'
6247+ { _dsmdpsHasBuyerPaused = Nothing
6248+ , _dsmdpsHasSellerPaused = Nothing
6249+ }
6250+
6251+dsmdpsHasBuyerPaused :: Lens' DealServingMetadataDealPauseStatus (Maybe Bool)
6252+dsmdpsHasBuyerPaused
6253+ = lens _dsmdpsHasBuyerPaused
6254+ (\ s a -> s{_dsmdpsHasBuyerPaused = a})
6255+
6256+dsmdpsHasSellerPaused :: Lens' DealServingMetadataDealPauseStatus (Maybe Bool)
6257+dsmdpsHasSellerPaused
6258+ = lens _dsmdpsHasSellerPaused
6259+ (\ s a -> s{_dsmdpsHasSellerPaused = a})
6260+
6261+instance FromJSON DealServingMetadataDealPauseStatus
6262+ where
6263+ parseJSON
6264+ = withObject "DealServingMetadataDealPauseStatus"
6265+ (\ o ->
6266+ DealServingMetadataDealPauseStatus' <$>
6267+ (o .:? "hasBuyerPaused") <*>
6268+ (o .:? "hasSellerPaused"))
6269+
6270+instance ToJSON DealServingMetadataDealPauseStatus
6271+ where
6272+ toJSON DealServingMetadataDealPauseStatus'{..}
6273+ = object
6274+ (catMaybes
6275+ [("hasBuyerPaused" .=) <$> _dsmdpsHasBuyerPaused,
6276+ ("hasSellerPaused" .=) <$> _dsmdpsHasSellerPaused])
6277+
53266278--
53276279-- /See:/ 'dealTermsGuaranteedFixedPriceTerms' smart constructor.
53286280data DealTermsGuaranteedFixedPriceTerms = DealTermsGuaranteedFixedPriceTerms'
53296281 { _dtgfptGuaranteedLooks :: !(Maybe (Textual Int64))
53306282 , _dtgfptGuaranteedImpressions :: !(Maybe (Textual Int64))
6283+ , _dtgfptBillingInfo :: !(Maybe DealTermsGuaranteedFixedPriceTermsBillingInfo)
53316284 , _dtgfptFixedPrices :: !(Maybe [PricePerBuyer])
53326285 } deriving (Eq,Show,Data,Typeable,Generic)
53336286
@@ -5339,6 +6292,8 @@ data DealTermsGuaranteedFixedPriceTerms = DealTermsGuaranteedFixedPriceTerms'
53396292--
53406293-- * 'dtgfptGuaranteedImpressions'
53416294--
6295+-- * 'dtgfptBillingInfo'
6296+--
53426297-- * 'dtgfptFixedPrices'
53436298dealTermsGuaranteedFixedPriceTerms
53446299 :: DealTermsGuaranteedFixedPriceTerms
@@ -5346,6 +6301,7 @@ dealTermsGuaranteedFixedPriceTerms =
53466301 DealTermsGuaranteedFixedPriceTerms'
53476302 { _dtgfptGuaranteedLooks = Nothing
53486303 , _dtgfptGuaranteedImpressions = Nothing
6304+ , _dtgfptBillingInfo = Nothing
53496305 , _dtgfptFixedPrices = Nothing
53506306 }
53516307
@@ -5364,6 +6320,14 @@ dtgfptGuaranteedImpressions
53646320 (\ s a -> s{_dtgfptGuaranteedImpressions = a})
53656321 . mapping _Coerce
53666322
6323+-- | External billing info for this Deal. This field is relevant when
6324+-- external billing info such as price has a different currency code than
6325+-- DFP\/AdX.
6326+dtgfptBillingInfo :: Lens' DealTermsGuaranteedFixedPriceTerms (Maybe DealTermsGuaranteedFixedPriceTermsBillingInfo)
6327+dtgfptBillingInfo
6328+ = lens _dtgfptBillingInfo
6329+ (\ s a -> s{_dtgfptBillingInfo = a})
6330+
53676331-- | Fixed price for the specified buyer.
53686332dtgfptFixedPrices :: Lens' DealTermsGuaranteedFixedPriceTerms [PricePerBuyer]
53696333dtgfptFixedPrices
@@ -5380,6 +6344,7 @@ instance FromJSON DealTermsGuaranteedFixedPriceTerms
53806344 DealTermsGuaranteedFixedPriceTerms' <$>
53816345 (o .:? "guaranteedLooks") <*>
53826346 (o .:? "guaranteedImpressions")
6347+ <*> (o .:? "billingInfo")
53836348 <*> (o .:? "fixedPrices" .!= mempty))
53846349
53856350instance ToJSON DealTermsGuaranteedFixedPriceTerms
@@ -5390,4 +6355,5 @@ instance ToJSON DealTermsGuaranteedFixedPriceTerms
53906355 [("guaranteedLooks" .=) <$> _dtgfptGuaranteedLooks,
53916356 ("guaranteedImpressions" .=) <$>
53926357 _dtgfptGuaranteedImpressions,
6358+ ("billingInfo" .=) <$> _dtgfptBillingInfo,
53936359 ("fixedPrices" .=) <$> _dtgfptFixedPrices])