@@ -20,6 +20,59 @@ module Network.Google.DFAReporting.Types.Product where
2020import Network.Google.DFAReporting.Types.Sum
2121import Network.Google.Prelude
2222
23+-- | Video Offset
24+--
25+-- /See:/ 'videoOffSet' smart constructor.
26+data VideoOffSet = VideoOffSet'
27+ { _vosOffSetPercentage :: !(Maybe (Textual Int32))
28+ , _vosOffSetSeconds :: !(Maybe (Textual Int32))
29+ } deriving (Eq,Show,Data,Typeable,Generic)
30+
31+-- | Creates a value of 'VideoOffSet' with the minimum fields required to make a request.
32+--
33+-- Use one of the following lenses to modify other fields as desired:
34+--
35+-- * 'vosOffSetPercentage'
36+--
37+-- * 'vosOffSetSeconds'
38+videoOffSet
39+ :: VideoOffSet
40+videoOffSet =
41+ VideoOffSet'
42+ { _vosOffSetPercentage = Nothing
43+ , _vosOffSetSeconds = Nothing
44+ }
45+
46+-- | Duration, as a percentage of video duration. Do not set when
47+-- offsetSeconds is set.
48+vosOffSetPercentage :: Lens' VideoOffSet (Maybe Int32)
49+vosOffSetPercentage
50+ = lens _vosOffSetPercentage
51+ (\ s a -> s{_vosOffSetPercentage = a})
52+ . mapping _Coerce
53+
54+-- | Duration, in seconds. Do not set when offsetPercentage is set.
55+vosOffSetSeconds :: Lens' VideoOffSet (Maybe Int32)
56+vosOffSetSeconds
57+ = lens _vosOffSetSeconds
58+ (\ s a -> s{_vosOffSetSeconds = a})
59+ . mapping _Coerce
60+
61+instance FromJSON VideoOffSet where
62+ parseJSON
63+ = withObject "VideoOffSet"
64+ (\ o ->
65+ VideoOffSet' <$>
66+ (o .:? "offsetPercentage") <*>
67+ (o .:? "offsetSeconds"))
68+
69+instance ToJSON VideoOffSet where
70+ toJSON VideoOffSet'{..}
71+ = object
72+ (catMaybes
73+ [("offsetPercentage" .=) <$> _vosOffSetPercentage,
74+ ("offsetSeconds" .=) <$> _vosOffSetSeconds])
75+
2376-- | Represents the list of File resources.
2477--
2578-- /See:/ 'fileList' smart constructor.
@@ -599,6 +652,84 @@ instance ToJSON GeoTargeting where
599652 ("excludeCountries" .=) <$> _gtExcludeCountries,
600653 ("postalCodes" .=) <$> _gtPostalCodes])
601654
655+-- | Video Settings
656+--
657+-- /See:/ 'videoSettings' smart constructor.
658+data VideoSettings = VideoSettings'
659+ { _vsKind :: !Text
660+ , _vsCompanionSettings :: !(Maybe CompanionSetting)
661+ , _vsTranscodeSettings :: !(Maybe TranscodeSetting)
662+ , _vsSkippableSettings :: !(Maybe SkippableSetting)
663+ } deriving (Eq,Show,Data,Typeable,Generic)
664+
665+-- | Creates a value of 'VideoSettings' with the minimum fields required to make a request.
666+--
667+-- Use one of the following lenses to modify other fields as desired:
668+--
669+-- * 'vsKind'
670+--
671+-- * 'vsCompanionSettings'
672+--
673+-- * 'vsTranscodeSettings'
674+--
675+-- * 'vsSkippableSettings'
676+videoSettings
677+ :: VideoSettings
678+videoSettings =
679+ VideoSettings'
680+ { _vsKind = "dfareporting#videoSettings"
681+ , _vsCompanionSettings = Nothing
682+ , _vsTranscodeSettings = Nothing
683+ , _vsSkippableSettings = Nothing
684+ }
685+
686+-- | Identifies what kind of resource this is. Value: the fixed string
687+-- \"dfareporting#videoSettings\".
688+vsKind :: Lens' VideoSettings Text
689+vsKind = lens _vsKind (\ s a -> s{_vsKind = a})
690+
691+-- | Settings for the companion creatives of video creatives served to this
692+-- placement.
693+vsCompanionSettings :: Lens' VideoSettings (Maybe CompanionSetting)
694+vsCompanionSettings
695+ = lens _vsCompanionSettings
696+ (\ s a -> s{_vsCompanionSettings = a})
697+
698+-- | Settings for the transcodes of video creatives served to this placement.
699+-- If this object is provided, the creative-level transcode settings will
700+-- be overridden.
701+vsTranscodeSettings :: Lens' VideoSettings (Maybe TranscodeSetting)
702+vsTranscodeSettings
703+ = lens _vsTranscodeSettings
704+ (\ s a -> s{_vsTranscodeSettings = a})
705+
706+-- | Settings for the skippability of video creatives served to this
707+-- placement. If this object is provided, the creative-level skippable
708+-- settings will be overridden.
709+vsSkippableSettings :: Lens' VideoSettings (Maybe SkippableSetting)
710+vsSkippableSettings
711+ = lens _vsSkippableSettings
712+ (\ s a -> s{_vsSkippableSettings = a})
713+
714+instance FromJSON VideoSettings where
715+ parseJSON
716+ = withObject "VideoSettings"
717+ (\ o ->
718+ VideoSettings' <$>
719+ (o .:? "kind" .!= "dfareporting#videoSettings") <*>
720+ (o .:? "companionSettings")
721+ <*> (o .:? "transcodeSettings")
722+ <*> (o .:? "skippableSettings"))
723+
724+instance ToJSON VideoSettings where
725+ toJSON VideoSettings'{..}
726+ = object
727+ (catMaybes
728+ [Just ("kind" .= _vsKind),
729+ ("companionSettings" .=) <$> _vsCompanionSettings,
730+ ("transcodeSettings" .=) <$> _vsTranscodeSettings,
731+ ("skippableSettings" .=) <$> _vsSkippableSettings])
732+
602733-- | Represents fields that are compatible to be selected for a report of
603734-- type \"REACH\".
604735--
@@ -2211,6 +2342,90 @@ instance ToJSON FloodlightActivityDynamicTag where
22112342 [("tag" .=) <$> _fadtTag, ("name" .=) <$> _fadtName,
22122343 ("id" .=) <$> _fadtId])
22132344
2345+-- | Contains information about supported video formats.
2346+--
2347+-- /See:/ 'videoFormat' smart constructor.
2348+data VideoFormat = VideoFormat'
2349+ { _vfKind :: !Text
2350+ , _vfFileType :: !(Maybe VideoFormatFileType)
2351+ , _vfResolution :: !(Maybe Size)
2352+ , _vfTargetBitRate :: !(Maybe (Textual Int32))
2353+ , _vfId :: !(Maybe (Textual Int32))
2354+ } deriving (Eq,Show,Data,Typeable,Generic)
2355+
2356+-- | Creates a value of 'VideoFormat' with the minimum fields required to make a request.
2357+--
2358+-- Use one of the following lenses to modify other fields as desired:
2359+--
2360+-- * 'vfKind'
2361+--
2362+-- * 'vfFileType'
2363+--
2364+-- * 'vfResolution'
2365+--
2366+-- * 'vfTargetBitRate'
2367+--
2368+-- * 'vfId'
2369+videoFormat
2370+ :: VideoFormat
2371+videoFormat =
2372+ VideoFormat'
2373+ { _vfKind = "dfareporting#videoFormat"
2374+ , _vfFileType = Nothing
2375+ , _vfResolution = Nothing
2376+ , _vfTargetBitRate = Nothing
2377+ , _vfId = Nothing
2378+ }
2379+
2380+-- | Identifies what kind of resource this is. Value: the fixed string
2381+-- \"dfareporting#videoFormat\".
2382+vfKind :: Lens' VideoFormat Text
2383+vfKind = lens _vfKind (\ s a -> s{_vfKind = a})
2384+
2385+-- | File type of the video format.
2386+vfFileType :: Lens' VideoFormat (Maybe VideoFormatFileType)
2387+vfFileType
2388+ = lens _vfFileType (\ s a -> s{_vfFileType = a})
2389+
2390+-- | The resolution of this video format.
2391+vfResolution :: Lens' VideoFormat (Maybe Size)
2392+vfResolution
2393+ = lens _vfResolution (\ s a -> s{_vfResolution = a})
2394+
2395+-- | The target bit rate of this video format.
2396+vfTargetBitRate :: Lens' VideoFormat (Maybe Int32)
2397+vfTargetBitRate
2398+ = lens _vfTargetBitRate
2399+ (\ s a -> s{_vfTargetBitRate = a})
2400+ . mapping _Coerce
2401+
2402+-- | ID of the video format.
2403+vfId :: Lens' VideoFormat (Maybe Int32)
2404+vfId
2405+ = lens _vfId (\ s a -> s{_vfId = a}) .
2406+ mapping _Coerce
2407+
2408+instance FromJSON VideoFormat where
2409+ parseJSON
2410+ = withObject "VideoFormat"
2411+ (\ o ->
2412+ VideoFormat' <$>
2413+ (o .:? "kind" .!= "dfareporting#videoFormat") <*>
2414+ (o .:? "fileType")
2415+ <*> (o .:? "resolution")
2416+ <*> (o .:? "targetBitRate")
2417+ <*> (o .:? "id"))
2418+
2419+instance ToJSON VideoFormat where
2420+ toJSON VideoFormat'{..}
2421+ = object
2422+ (catMaybes
2423+ [Just ("kind" .= _vfKind),
2424+ ("fileType" .=) <$> _vfFileType,
2425+ ("resolution" .=) <$> _vfResolution,
2426+ ("targetBitRate" .=) <$> _vfTargetBitRate,
2427+ ("id" .=) <$> _vfId])
2428+
22142429-- | DirectorySites contains properties of a website from the Site Directory.
22152430-- Sites need to be added to an account via the Sites resource before they
22162431-- can be assigned to a placement.
@@ -4236,7 +4451,7 @@ aEventTagOverrides
42364451 . _Default
42374452 . _Coerce
42384453
4239−-- | Whether this ad is active.
4454+-- | Whether this ad is active. When true, archived must be false.
42404455aActive :: Lens' Ad (Maybe Bool)
42414456aActive = lens _aActive (\ s a -> s{_aActive = a})
42424457
@@ -4345,7 +4560,7 @@ aCompatibility
43454560 = lens _aCompatibility
43464561 (\ s a -> s{_aCompatibility = a})
43474562
4348−-- | Whether this ad is archived.
4563+-- | Whether this ad is archived. When true, active must be false.
43494564aArchived :: Lens' Ad (Maybe Bool)
43504565aArchived
43514566 = lens _aArchived (\ s a -> s{_aArchived = a})
@@ -5025,6 +5240,78 @@ instance ToJSON ObjectFilter where
50255240 Just ("kind" .= _ofKind),
50265241 ("objectIds" .=) <$> _ofObjectIds])
50275242
5243+-- | Skippable Settings
5244+--
5245+-- /See:/ 'skippableSetting' smart constructor.
5246+data SkippableSetting = SkippableSetting'
5247+ { _ssSkipOffSet :: !(Maybe VideoOffSet)
5248+ , _ssProgressOffSet :: !(Maybe VideoOffSet)
5249+ , _ssKind :: !Text
5250+ , _ssSkippable :: !(Maybe Bool)
5251+ } deriving (Eq,Show,Data,Typeable,Generic)
5252+
5253+-- | Creates a value of 'SkippableSetting' with the minimum fields required to make a request.
5254+--
5255+-- Use one of the following lenses to modify other fields as desired:
5256+--
5257+-- * 'ssSkipOffSet'
5258+--
5259+-- * 'ssProgressOffSet'
5260+--
5261+-- * 'ssKind'
5262+--
5263+-- * 'ssSkippable'
5264+skippableSetting
5265+ :: SkippableSetting
5266+skippableSetting =
5267+ SkippableSetting'
5268+ { _ssSkipOffSet = Nothing
5269+ , _ssProgressOffSet = Nothing
5270+ , _ssKind = "dfareporting#skippableSetting"
5271+ , _ssSkippable = Nothing
5272+ }
5273+
5274+-- | Amount of time to play videos served to this placement before the skip
5275+-- button should appear. Applicable when skippable is true.
5276+ssSkipOffSet :: Lens' SkippableSetting (Maybe VideoOffSet)
5277+ssSkipOffSet
5278+ = lens _ssSkipOffSet (\ s a -> s{_ssSkipOffSet = a})
5279+
5280+-- | Amount of time to play videos served to this placement before counting a
5281+-- view. Applicable when skippable is true.
5282+ssProgressOffSet :: Lens' SkippableSetting (Maybe VideoOffSet)
5283+ssProgressOffSet
5284+ = lens _ssProgressOffSet
5285+ (\ s a -> s{_ssProgressOffSet = a})
5286+
5287+-- | Identifies what kind of resource this is. Value: the fixed string
5288+-- \"dfareporting#skippableSetting\".
5289+ssKind :: Lens' SkippableSetting Text
5290+ssKind = lens _ssKind (\ s a -> s{_ssKind = a})
5291+
5292+-- | Whether the user can skip creatives served to this placement.
5293+ssSkippable :: Lens' SkippableSetting (Maybe Bool)
5294+ssSkippable
5295+ = lens _ssSkippable (\ s a -> s{_ssSkippable = a})
5296+
5297+instance FromJSON SkippableSetting where
5298+ parseJSON
5299+ = withObject "SkippableSetting"
5300+ (\ o ->
5301+ SkippableSetting' <$>
5302+ (o .:? "skipOffset") <*> (o .:? "progressOffset") <*>
5303+ (o .:? "kind" .!= "dfareporting#skippableSetting")
5304+ <*> (o .:? "skippable"))
5305+
5306+instance ToJSON SkippableSetting where
5307+ toJSON SkippableSetting'{..}
5308+ = object
5309+ (catMaybes
5310+ [("skipOffset" .=) <$> _ssSkipOffSet,
5311+ ("progressOffset" .=) <$> _ssProgressOffSet,
5312+ Just ("kind" .= _ssKind),
5313+ ("skippable" .=) <$> _ssSkippable])
5314+
50285315-- | Reporting Configuration
50295316--
50305317-- /See:/ 'reportsConfiguration' smart constructor.
@@ -7015,6 +7302,7 @@ data Creative = Creative'
70157302 , _creBackupImageTargetWindow :: !(Maybe TargetWindow)
70167303 , _creRenderingIdDimensionValue :: !(Maybe DimensionValue)
70177304 , _creCustomKeyValues :: !(Maybe [Text])
7305+ , _creSkipOffSet :: !(Maybe VideoOffSet)
70187306 , _creVideoDuration :: !(Maybe (Textual Double))
70197307 , _creRenderingId :: !(Maybe (Textual Int64))
70207308 , _creThirdPartyBackupImageImpressionsURL :: !(Maybe Text)
@@ -7025,6 +7313,7 @@ data Creative = Creative'
70257313 , _creAuthoringTool :: !(Maybe CreativeAuthoringTool)
70267314 , _creSize :: !(Maybe Size)
70277315 , _creThirdPartyURLs :: !(Maybe [ThirdPartyTrackingURL])
7316+ , _creProgressOffSet :: !(Maybe VideoOffSet)
70287317 , _creCounterCustomEvents :: !(Maybe [CreativeCustomEvent])
70297318 , _creKind :: !Text
70307319 , _creSSLOverride :: !(Maybe Bool)
@@ -7085,6 +7374,8 @@ data Creative = Creative'
70857374--
70867375-- * 'creCustomKeyValues'
70877376--
7377+-- * 'creSkipOffSet'
7378+--
70887379-- * 'creVideoDuration'
70897380--
70907381-- * 'creRenderingId'
@@ -7105,6 +7396,8 @@ data Creative = Creative'
71057396--
71067397-- * 'creThirdPartyURLs'
71077398--
7399+-- * 'creProgressOffSet'
7400+--
71087401-- * 'creCounterCustomEvents'
71097402--
71107403-- * 'creKind'
@@ -7204,6 +7497,7 @@ creative =
72047497 , _creBackupImageTargetWindow = Nothing
72057498 , _creRenderingIdDimensionValue = Nothing
72067499 , _creCustomKeyValues = Nothing
7500+ , _creSkipOffSet = Nothing
72077501 , _creVideoDuration = Nothing
72087502 , _creRenderingId = Nothing
72097503 , _creThirdPartyBackupImageImpressionsURL = Nothing
@@ -7214,6 +7508,7 @@ creative =
72147508 , _creAuthoringTool = Nothing
72157509 , _creSize = Nothing
72167510 , _creThirdPartyURLs = Nothing
7511+ , _creProgressOffSet = Nothing
72177512 , _creCounterCustomEvents = Nothing
72187513 , _creKind = "dfareporting#creative"
72197514 , _creSSLOverride = Nothing
@@ -7300,6 +7595,13 @@ creCustomKeyValues
73007595 . _Default
73017596 . _Coerce
73027597
7598+-- | Amount of time to play the video before the skip button appears.
7599+-- Applicable to the following creative types: all INSTREAM_VIDEO.
7600+creSkipOffSet :: Lens' Creative (Maybe VideoOffSet)
7601+creSkipOffSet
7602+ = lens _creSkipOffSet
7603+ (\ s a -> s{_creSkipOffSet = a})
7604+
73037605-- | Creative video duration in seconds. This is a read-only field.
73047606-- Applicable to the following creative types: INSTREAM_VIDEO, all
73057607-- RICH_MEDIA, and all VPAID.
@@ -7386,6 +7688,13 @@ creThirdPartyURLs
73867688 . _Default
73877689 . _Coerce
73887690
7691+-- | Amount of time to play the video before counting a view. Applicable to
7692+-- the following creative types: all INSTREAM_VIDEO.
7693+creProgressOffSet :: Lens' Creative (Maybe VideoOffSet)
7694+creProgressOffSet
7695+ = lens _creProgressOffSet
7696+ (\ s a -> s{_creProgressOffSet = a})
7697+
73897698-- | List of counter events configured for the creative. For
73907699-- DISPLAY_IMAGE_GALLERY creatives, these are read-only and auto-generated
73917700-- from clickTags. Applicable to the following creative types:
@@ -7804,6 +8113,7 @@ instance FromJSON Creative where
78048113 (o .:? "backupImageTargetWindow")
78058114 <*> (o .:? "renderingIdDimensionValue")
78068115 <*> (o .:? "customKeyValues" .!= mempty)
8116+ <*> (o .:? "skipOffset")
78078117 <*> (o .:? "videoDuration")
78088118 <*> (o .:? "renderingId")
78098119 <*> (o .:? "thirdPartyBackupImageImpressionsUrl")
@@ -7814,6 +8124,7 @@ instance FromJSON Creative where
78148124 <*> (o .:? "authoringTool")
78158125 <*> (o .:? "size")
78168126 <*> (o .:? "thirdPartyUrls" .!= mempty)
8127+ <*> (o .:? "progressOffset")
78178128 <*> (o .:? "counterCustomEvents" .!= mempty)
78188129 <*> (o .:? "kind" .!= "dfareporting#creative")
78198130 <*> (o .:? "sslOverride")
@@ -7872,6 +8183,7 @@ instance ToJSON Creative where
78728183 ("renderingIdDimensionValue" .=) <$>
78738184 _creRenderingIdDimensionValue,
78748185 ("customKeyValues" .=) <$> _creCustomKeyValues,
8186+ ("skipOffset" .=) <$> _creSkipOffSet,
78758187 ("videoDuration" .=) <$> _creVideoDuration,
78768188 ("renderingId" .=) <$> _creRenderingId,
78778189 ("thirdPartyBackupImageImpressionsUrl" .=) <$>
@@ -7884,6 +8196,7 @@ instance ToJSON Creative where
78848196 ("authoringTool" .=) <$> _creAuthoringTool,
78858197 ("size" .=) <$> _creSize,
78868198 ("thirdPartyUrls" .=) <$> _creThirdPartyURLs,
8199+ ("progressOffset" .=) <$> _creProgressOffSet,
78878200 ("counterCustomEvents" .=) <$>
78888201 _creCounterCustomEvents,
78898202 Just ("kind" .= _creKind),
@@ -9069,13 +9382,14 @@ instance ToJSON BrowsersListResponse where
90699382--
90709383-- /See:/ 'siteSettings' smart constructor.
90719384data SiteSettings = SiteSettings'
9072− { _ssDisableNewCookie :: !(Maybe Bool)
9073− , _ssDisableBrandSafeAds :: !(Maybe Bool)
9074− , _ssLookbackConfiguration :: !(Maybe LookbackConfiguration)
9075− , _ssTagSetting :: !(Maybe TagSetting)
9076− , _ssActiveViewOptOut :: !(Maybe Bool)
9077− , _ssVideoActiveViewOptOut :: !(Maybe Bool)
9078− , _ssCreativeSettings :: !(Maybe CreativeSettings)
9385+ { _ssDisableNewCookie :: !(Maybe Bool)
9386+ , _ssVideoActiveViewOptOutTemplate :: !(Maybe Bool)
9387+ , _ssDisableBrandSafeAds :: !(Maybe Bool)
9388+ , _ssLookbackConfiguration :: !(Maybe LookbackConfiguration)
9389+ , _ssTagSetting :: !(Maybe TagSetting)
9390+ , _ssActiveViewOptOut :: !(Maybe Bool)
9391+ , _ssVpaidAdapterChoiceTemplate :: !(Maybe SiteSettingsVpaidAdapterChoiceTemplate)
9392+ , _ssCreativeSettings :: !(Maybe CreativeSettings)
90799393 } deriving (Eq,Show,Data,Typeable,Generic)
90809394
90819395-- | Creates a value of 'SiteSettings' with the minimum fields required to make a request.
@@ -9084,6 +9398,8 @@ data SiteSettings = SiteSettings'
90849398--
90859399-- * 'ssDisableNewCookie'
90869400--
9401+-- * 'ssVideoActiveViewOptOutTemplate'
9402+--
90879403-- * 'ssDisableBrandSafeAds'
90889404--
90899405-- * 'ssLookbackConfiguration'
@@ -9092,7 +9408,7 @@ data SiteSettings = SiteSettings'
90929408--
90939409-- * 'ssActiveViewOptOut'
90949410--
9095−-- * 'ssVideoActiveViewOptOut'
9411+-- * 'ssVpaidAdapterChoiceTemplate'
90969412--
90979413-- * 'ssCreativeSettings'
90989414siteSettings
@@ -9100,11 +9416,12 @@ siteSettings
91009416siteSettings =
91019417 SiteSettings'
91029418 { _ssDisableNewCookie = Nothing
9419+ , _ssVideoActiveViewOptOutTemplate = Nothing
91039420 , _ssDisableBrandSafeAds = Nothing
91049421 , _ssLookbackConfiguration = Nothing
91059422 , _ssTagSetting = Nothing
91069423 , _ssActiveViewOptOut = Nothing
9107− , _ssVideoActiveViewOptOut = Nothing
9424+ , _ssVpaidAdapterChoiceTemplate = Nothing
91089425 , _ssCreativeSettings = Nothing
91099426 }
91109427
@@ -9114,6 +9431,15 @@ ssDisableNewCookie
91149431 = lens _ssDisableNewCookie
91159432 (\ s a -> s{_ssDisableNewCookie = a})
91169433
9434+-- | Whether Verification and ActiveView for in-stream video creatives are
9435+-- disabled by default for new placements created under this site. This
9436+-- value will be used to populate the placement.videoActiveViewOptOut
9437+-- field, when no value is specified for the new placement.
9438+ssVideoActiveViewOptOutTemplate :: Lens' SiteSettings (Maybe Bool)
9439+ssVideoActiveViewOptOutTemplate
9440+ = lens _ssVideoActiveViewOptOutTemplate
9441+ (\ s a -> s{_ssVideoActiveViewOptOutTemplate = a})
9442+
91179443-- | Whether brand safe ads are disabled for this site.
91189444ssDisableBrandSafeAds :: Lens' SiteSettings (Maybe Bool)
91199445ssDisableBrandSafeAds
@@ -9137,18 +9463,19 @@ ssActiveViewOptOut
91379463 = lens _ssActiveViewOptOut
91389464 (\ s a -> s{_ssActiveViewOptOut = a})
91399465
9140−-- | Whether Verification and ActiveView are disabled for in-stream video
9141−-- creatives on this site. The same setting videoActiveViewOptOut exists on
9142−-- the directory site level -- the opt out occurs if either of these
9143−-- settings are true. These settings are distinct from
9144−-- DirectorySites.settings.activeViewOptOut or
9145−-- Sites.siteSettings.activeViewOptOut which only apply to display ads.
9146−-- However, Accounts.activeViewOptOut opts out both video traffic, as well
9147−-- as display ads, from Verification and ActiveView.
9148−ssVideoActiveViewOptOut :: Lens' SiteSettings (Maybe Bool)
9149−ssVideoActiveViewOptOut
9150− = lens _ssVideoActiveViewOptOut
9151− (\ s a -> s{_ssVideoActiveViewOptOut = a})
9466+-- | Default VPAID adapter setting for new placements created under this
9467+-- site. This value will be used to populate the
9468+-- placements.vpaidAdapterChoice field, when no value is specified for the
9469+-- new placement. Controls which VPAID format the measurement adapter will
9470+-- use for in-stream video creatives assigned to the placement. The
9471+-- publisher\'s specifications will typically determine this setting. For
9472+-- VPAID creatives, the adapter format will match the VPAID format (HTML5
9473+-- VPAID creatives use the HTML5 adapter, and Flash VPAID creatives use the
9474+-- Flash adapter).
9475+ssVpaidAdapterChoiceTemplate :: Lens' SiteSettings (Maybe SiteSettingsVpaidAdapterChoiceTemplate)
9476+ssVpaidAdapterChoiceTemplate
9477+ = lens _ssVpaidAdapterChoiceTemplate
9478+ (\ s a -> s{_ssVpaidAdapterChoiceTemplate = a})
91529479
91539480-- | Site-wide creative settings.
91549481ssCreativeSettings :: Lens' SiteSettings (Maybe CreativeSettings)
@@ -9162,11 +9489,12 @@ instance FromJSON SiteSettings where
91629489 (\ o ->
91639490 SiteSettings' <$>
91649491 (o .:? "disableNewCookie") <*>
9165− (o .:? "disableBrandSafeAds")
9492+ (o .:? "videoActiveViewOptOutTemplate")
9493+ <*> (o .:? "disableBrandSafeAds")
91669494 <*> (o .:? "lookbackConfiguration")
91679495 <*> (o .:? "tagSetting")
91689496 <*> (o .:? "activeViewOptOut")
9169− <*> (o .:? "videoActiveViewOptOut")
9497+ <*> (o .:? "vpaidAdapterChoiceTemplate")
91709498 <*> (o .:? "creativeSettings"))
91719499
91729500instance ToJSON SiteSettings where
@@ -9174,14 +9502,16 @@ instance ToJSON SiteSettings where
91749502 = object
91759503 (catMaybes
91769504 [("disableNewCookie" .=) <$> _ssDisableNewCookie,
9505+ ("videoActiveViewOptOutTemplate" .=) <$>
9506+ _ssVideoActiveViewOptOutTemplate,
91779507 ("disableBrandSafeAds" .=) <$>
91789508 _ssDisableBrandSafeAds,
91799509 ("lookbackConfiguration" .=) <$>
91809510 _ssLookbackConfiguration,
91819511 ("tagSetting" .=) <$> _ssTagSetting,
91829512 ("activeViewOptOut" .=) <$> _ssActiveViewOptOut,
9183− ("videoActiveViewOptOut" .=) <$>
9184− _ssVideoActiveViewOptOut,
9513+ ("vpaidAdapterChoiceTemplate" .=) <$>
9514+ _ssVpaidAdapterChoiceTemplate,
91859515 ("creativeSettings" .=) <$> _ssCreativeSettings])
91869516
91879517-- | Content Category List Response
@@ -14993,6 +15323,58 @@ instance ToJSON UserRole where
1499315323 ("permissions" .=) <$> _urPermissions,
1499415324 ("subaccountId" .=) <$> _urSubAccountId])
1499515325
15326+-- | Video Format List Response
15327+--
15328+-- /See:/ 'videoFormatsListResponse' smart constructor.
15329+data VideoFormatsListResponse = VideoFormatsListResponse'
15330+ { _vflrKind :: !Text
15331+ , _vflrVideoFormats :: !(Maybe [VideoFormat])
15332+ } deriving (Eq,Show,Data,Typeable,Generic)
15333+
15334+-- | Creates a value of 'VideoFormatsListResponse' with the minimum fields required to make a request.
15335+--
15336+-- Use one of the following lenses to modify other fields as desired:
15337+--
15338+-- * 'vflrKind'
15339+--
15340+-- * 'vflrVideoFormats'
15341+videoFormatsListResponse
15342+ :: VideoFormatsListResponse
15343+videoFormatsListResponse =
15344+ VideoFormatsListResponse'
15345+ { _vflrKind = "dfareporting#videoFormatsListResponse"
15346+ , _vflrVideoFormats = Nothing
15347+ }
15348+
15349+-- | Identifies what kind of resource this is. Value: the fixed string
15350+-- \"dfareporting#videoFormatsListResponse\".
15351+vflrKind :: Lens' VideoFormatsListResponse Text
15352+vflrKind = lens _vflrKind (\ s a -> s{_vflrKind = a})
15353+
15354+-- | Video format collection.
15355+vflrVideoFormats :: Lens' VideoFormatsListResponse [VideoFormat]
15356+vflrVideoFormats
15357+ = lens _vflrVideoFormats
15358+ (\ s a -> s{_vflrVideoFormats = a})
15359+ . _Default
15360+ . _Coerce
15361+
15362+instance FromJSON VideoFormatsListResponse where
15363+ parseJSON
15364+ = withObject "VideoFormatsListResponse"
15365+ (\ o ->
15366+ VideoFormatsListResponse' <$>
15367+ (o .:? "kind" .!=
15368+ "dfareporting#videoFormatsListResponse")
15369+ <*> (o .:? "videoFormats" .!= mempty))
15370+
15371+instance ToJSON VideoFormatsListResponse where
15372+ toJSON VideoFormatsListResponse'{..}
15373+ = object
15374+ (catMaybes
15375+ [Just ("kind" .= _vflrKind),
15376+ ("videoFormats" .=) <$> _vflrVideoFormats])
15377+
1499615378-- | Directory Site List Response
1499715379--
1499815380-- /See:/ 'directorySitesListResponse' smart constructor.
@@ -16037,6 +16419,81 @@ instance ToJSON FloodlightConfiguration where
1603716419 ("standardVariableTypes" .=) <$>
1603816420 _fcStandardVariableTypes])
1603916421
16422+-- | Companion Settings
16423+--
16424+-- /See:/ 'companionSetting' smart constructor.
16425+data CompanionSetting = CompanionSetting'
16426+ { _comKind :: !Text
16427+ , _comImageOnly :: !(Maybe Bool)
16428+ , _comCompanionsDisabled :: !(Maybe Bool)
16429+ , _comEnabledSizes :: !(Maybe [Size])
16430+ } deriving (Eq,Show,Data,Typeable,Generic)
16431+
16432+-- | Creates a value of 'CompanionSetting' with the minimum fields required to make a request.
16433+--
16434+-- Use one of the following lenses to modify other fields as desired:
16435+--
16436+-- * 'comKind'
16437+--
16438+-- * 'comImageOnly'
16439+--
16440+-- * 'comCompanionsDisabled'
16441+--
16442+-- * 'comEnabledSizes'
16443+companionSetting
16444+ :: CompanionSetting
16445+companionSetting =
16446+ CompanionSetting'
16447+ { _comKind = "dfareporting#companionSetting"
16448+ , _comImageOnly = Nothing
16449+ , _comCompanionsDisabled = Nothing
16450+ , _comEnabledSizes = Nothing
16451+ }
16452+
16453+-- | Identifies what kind of resource this is. Value: the fixed string
16454+-- \"dfareporting#companionSetting\".
16455+comKind :: Lens' CompanionSetting Text
16456+comKind = lens _comKind (\ s a -> s{_comKind = a})
16457+
16458+-- | Whether to serve only static images as companions.
16459+comImageOnly :: Lens' CompanionSetting (Maybe Bool)
16460+comImageOnly
16461+ = lens _comImageOnly (\ s a -> s{_comImageOnly = a})
16462+
16463+-- | Whether companions are disabled for this placement.
16464+comCompanionsDisabled :: Lens' CompanionSetting (Maybe Bool)
16465+comCompanionsDisabled
16466+ = lens _comCompanionsDisabled
16467+ (\ s a -> s{_comCompanionsDisabled = a})
16468+
16469+-- | Whitelist of companion sizes to be served to this placement. Set this
16470+-- list to null or empty to serve all companion sizes.
16471+comEnabledSizes :: Lens' CompanionSetting [Size]
16472+comEnabledSizes
16473+ = lens _comEnabledSizes
16474+ (\ s a -> s{_comEnabledSizes = a})
16475+ . _Default
16476+ . _Coerce
16477+
16478+instance FromJSON CompanionSetting where
16479+ parseJSON
16480+ = withObject "CompanionSetting"
16481+ (\ o ->
16482+ CompanionSetting' <$>
16483+ (o .:? "kind" .!= "dfareporting#companionSetting")
16484+ <*> (o .:? "imageOnly")
16485+ <*> (o .:? "companionsDisabled")
16486+ <*> (o .:? "enabledSizes" .!= mempty))
16487+
16488+instance ToJSON CompanionSetting where
16489+ toJSON CompanionSetting'{..}
16490+ = object
16491+ (catMaybes
16492+ [Just ("kind" .= _comKind),
16493+ ("imageOnly" .=) <$> _comImageOnly,
16494+ ("companionsDisabled" .=) <$> _comCompanionsDisabled,
16495+ ("enabledSizes" .=) <$> _comEnabledSizes])
16496+
1604016497-- | Floodlight Activity Group List Response
1604116498--
1604216499-- /See:/ 'floodlightActivityGroupsListResponse' smart constructor.
@@ -16196,7 +16653,9 @@ conoTimestampMicros
1619616653 (\ s a -> s{_conoTimestampMicros = a})
1619716654 . mapping _Coerce
1619816655
16199−-- | Whether the user has Limit Ad Tracking set.
16656+-- | Whether Limit Ad Tracking is enabled. When set to true, the conversion
16657+-- will be used for reporting but not targeting. This will prevent
16658+-- remarketing.
1620016659conoLimitAdTracking :: Lens' Conversion (Maybe Bool)
1620116660conoLimitAdTracking
1620216661 = lens _conoLimitAdTracking
@@ -18014,144 +18473,145 @@ instance ToJSON Recipient where
1801418473--
1801518474-- /See:/ 'site' smart constructor.
1801618475data Site = Site'
18017− { _ssKind :: !Text
18018− , _ssKeyName :: !(Maybe Text)
18019− , _ssSiteContacts :: !(Maybe [SiteContact])
18020− , _ssSiteSettings :: !(Maybe SiteSettings)
18021− , _ssIdDimensionValue :: !(Maybe DimensionValue)
18022− , _ssDirectorySiteIdDimensionValue :: !(Maybe DimensionValue)
18023− , _ssAccountId :: !(Maybe (Textual Int64))
18024− , _ssName :: !(Maybe Text)
18025− , _ssDirectorySiteId :: !(Maybe (Textual Int64))
18026− , _ssId :: !(Maybe (Textual Int64))
18027− , _ssSubAccountId :: !(Maybe (Textual Int64))
18028− , _ssApproved :: !(Maybe Bool)
18476+ { _sitiKind :: !Text
18477+ , _sitiKeyName :: !(Maybe Text)
18478+ , _sitiSiteContacts :: !(Maybe [SiteContact])
18479+ , _sitiSiteSettings :: !(Maybe SiteSettings)
18480+ , _sitiIdDimensionValue :: !(Maybe DimensionValue)
18481+ , _sitiDirectorySiteIdDimensionValue :: !(Maybe DimensionValue)
18482+ , _sitiAccountId :: !(Maybe (Textual Int64))
18483+ , _sitiName :: !(Maybe Text)
18484+ , _sitiDirectorySiteId :: !(Maybe (Textual Int64))
18485+ , _sitiId :: !(Maybe (Textual Int64))
18486+ , _sitiSubAccountId :: !(Maybe (Textual Int64))
18487+ , _sitiApproved :: !(Maybe Bool)
1802918488 } deriving (Eq,Show,Data,Typeable,Generic)
1803018489
1803118490-- | Creates a value of 'Site' with the minimum fields required to make a request.
1803218491--
1803318492-- Use one of the following lenses to modify other fields as desired:
1803418493--
18035−-- * 'ssKind'
18494+-- * 'sitiKind'
1803618495--
18037−-- * 'ssKeyName'
18496+-- * 'sitiKeyName'
1803818497--
18039−-- * 'ssSiteContacts'
18498+-- * 'sitiSiteContacts'
1804018499--
18041−-- * 'ssSiteSettings'
18500+-- * 'sitiSiteSettings'
1804218501--
18043−-- * 'ssIdDimensionValue'
18502+-- * 'sitiIdDimensionValue'
1804418503--
18045−-- * 'ssDirectorySiteIdDimensionValue'
18504+-- * 'sitiDirectorySiteIdDimensionValue'
1804618505--
18047−-- * 'ssAccountId'
18506+-- * 'sitiAccountId'
1804818507--
18049−-- * 'ssName'
18508+-- * 'sitiName'
1805018509--
18051−-- * 'ssDirectorySiteId'
18510+-- * 'sitiDirectorySiteId'
1805218511--
18053−-- * 'ssId'
18512+-- * 'sitiId'
1805418513--
18055−-- * 'ssSubAccountId'
18514+-- * 'sitiSubAccountId'
1805618515--
18057−-- * 'ssApproved'
18516+-- * 'sitiApproved'
1805818517site
1805918518 :: Site
1806018519site =
1806118520 Site'
18062− { _ssKind = "dfareporting#site"
18063− , _ssKeyName = Nothing
18064− , _ssSiteContacts = Nothing
18065− , _ssSiteSettings = Nothing
18066− , _ssIdDimensionValue = Nothing
18067− , _ssDirectorySiteIdDimensionValue = Nothing
18068− , _ssAccountId = Nothing
18069− , _ssName = Nothing
18070− , _ssDirectorySiteId = Nothing
18071− , _ssId = Nothing
18072− , _ssSubAccountId = Nothing
18073− , _ssApproved = Nothing
18521+ { _sitiKind = "dfareporting#site"
18522+ , _sitiKeyName = Nothing
18523+ , _sitiSiteContacts = Nothing
18524+ , _sitiSiteSettings = Nothing
18525+ , _sitiIdDimensionValue = Nothing
18526+ , _sitiDirectorySiteIdDimensionValue = Nothing
18527+ , _sitiAccountId = Nothing
18528+ , _sitiName = Nothing
18529+ , _sitiDirectorySiteId = Nothing
18530+ , _sitiId = Nothing
18531+ , _sitiSubAccountId = Nothing
18532+ , _sitiApproved = Nothing
1807418533 }
1807518534
1807618535-- | Identifies what kind of resource this is. Value: the fixed string
1807718536-- \"dfareporting#site\".
18078−ssKind :: Lens' Site Text
18079−ssKind = lens _ssKind (\ s a -> s{_ssKind = a})
18537+sitiKind :: Lens' Site Text
18538+sitiKind = lens _sitiKind (\ s a -> s{_sitiKind = a})
1808018539
1808118540-- | Key name of this site. This is a read-only, auto-generated field.
18082−ssKeyName :: Lens' Site (Maybe Text)
18083−ssKeyName
18084− = lens _ssKeyName (\ s a -> s{_ssKeyName = a})
18541+sitiKeyName :: Lens' Site (Maybe Text)
18542+sitiKeyName
18543+ = lens _sitiKeyName (\ s a -> s{_sitiKeyName = a})
1808518544
1808618545-- | Site contacts.
18087−ssSiteContacts :: Lens' Site [SiteContact]
18088−ssSiteContacts
18089− = lens _ssSiteContacts
18090− (\ s a -> s{_ssSiteContacts = a})
18546+sitiSiteContacts :: Lens' Site [SiteContact]
18547+sitiSiteContacts
18548+ = lens _sitiSiteContacts
18549+ (\ s a -> s{_sitiSiteContacts = a})
1809118550 . _Default
1809218551 . _Coerce
1809318552
1809418553-- | Site-wide settings.
18095−ssSiteSettings :: Lens' Site (Maybe SiteSettings)
18096−ssSiteSettings
18097− = lens _ssSiteSettings
18098− (\ s a -> s{_ssSiteSettings = a})
18554+sitiSiteSettings :: Lens' Site (Maybe SiteSettings)
18555+sitiSiteSettings
18556+ = lens _sitiSiteSettings
18557+ (\ s a -> s{_sitiSiteSettings = a})
1809918558
1810018559-- | Dimension value for the ID of this site. This is a read-only,
1810118560-- auto-generated field.
18102−ssIdDimensionValue :: Lens' Site (Maybe DimensionValue)
18103−ssIdDimensionValue
18104− = lens _ssIdDimensionValue
18105− (\ s a -> s{_ssIdDimensionValue = a})
18561+sitiIdDimensionValue :: Lens' Site (Maybe DimensionValue)
18562+sitiIdDimensionValue
18563+ = lens _sitiIdDimensionValue
18564+ (\ s a -> s{_sitiIdDimensionValue = a})
1810618565
1810718566-- | Dimension value for the ID of the directory site. This is a read-only,
1810818567-- auto-generated field.
18109−ssDirectorySiteIdDimensionValue :: Lens' Site (Maybe DimensionValue)
18110−ssDirectorySiteIdDimensionValue
18111− = lens _ssDirectorySiteIdDimensionValue
18112− (\ s a -> s{_ssDirectorySiteIdDimensionValue = a})
18568+sitiDirectorySiteIdDimensionValue :: Lens' Site (Maybe DimensionValue)
18569+sitiDirectorySiteIdDimensionValue
18570+ = lens _sitiDirectorySiteIdDimensionValue
18571+ (\ s a -> s{_sitiDirectorySiteIdDimensionValue = a})
1811318572
1811418573-- | Account ID of this site. This is a read-only field that can be left
1811518574-- blank.
18116−ssAccountId :: Lens' Site (Maybe Int64)
18117−ssAccountId
18118− = lens _ssAccountId (\ s a -> s{_ssAccountId = a}) .
18119− mapping _Coerce
18575+sitiAccountId :: Lens' Site (Maybe Int64)
18576+sitiAccountId
18577+ = lens _sitiAccountId
18578+ (\ s a -> s{_sitiAccountId = a})
18579+ . mapping _Coerce
1812018580
1812118581-- | Name of this site.This is a required field. Must be less than 128
1812218582-- characters long. If this site is under a subaccount, the name must be
1812318583-- unique among sites of the same subaccount. Otherwise, this site is a
1812418584-- top-level site, and the name must be unique among top-level sites of the
1812518585-- same account.
18126−ssName :: Lens' Site (Maybe Text)
18127−ssName = lens _ssName (\ s a -> s{_ssName = a})
18586+sitiName :: Lens' Site (Maybe Text)
18587+sitiName = lens _sitiName (\ s a -> s{_sitiName = a})
1812818588
1812918589-- | Directory site associated with this site. This is a required field that
1813018590-- is read-only after insertion.
18131−ssDirectorySiteId :: Lens' Site (Maybe Int64)
18132−ssDirectorySiteId
18133− = lens _ssDirectorySiteId
18134− (\ s a -> s{_ssDirectorySiteId = a})
18591+sitiDirectorySiteId :: Lens' Site (Maybe Int64)
18592+sitiDirectorySiteId
18593+ = lens _sitiDirectorySiteId
18594+ (\ s a -> s{_sitiDirectorySiteId = a})
1813518595 . mapping _Coerce
1813618596
1813718597-- | ID of this site. This is a read-only, auto-generated field.
18138−ssId :: Lens' Site (Maybe Int64)
18139−ssId
18140− = lens _ssId (\ s a -> s{_ssId = a}) .
18598+sitiId :: Lens' Site (Maybe Int64)
18599+sitiId
18600+ = lens _sitiId (\ s a -> s{_sitiId = a}) .
1814118601 mapping _Coerce
1814218602
1814318603-- | Subaccount ID of this site. This is a read-only field that can be left
1814418604-- blank.
18145−ssSubAccountId :: Lens' Site (Maybe Int64)
18146−ssSubAccountId
18147− = lens _ssSubAccountId
18148− (\ s a -> s{_ssSubAccountId = a})
18605+sitiSubAccountId :: Lens' Site (Maybe Int64)
18606+sitiSubAccountId
18607+ = lens _sitiSubAccountId
18608+ (\ s a -> s{_sitiSubAccountId = a})
1814918609 . mapping _Coerce
1815018610
1815118611-- | Whether this site is approved.
18152−ssApproved :: Lens' Site (Maybe Bool)
18153−ssApproved
18154− = lens _ssApproved (\ s a -> s{_ssApproved = a})
18612+sitiApproved :: Lens' Site (Maybe Bool)
18613+sitiApproved
18614+ = lens _sitiApproved (\ s a -> s{_sitiApproved = a})
1815518615
1815618616instance FromJSON Site where
1815718617 parseJSON
@@ -18175,19 +18635,19 @@ instance ToJSON Site where
1817518635 toJSON Site'{..}
1817618636 = object
1817718637 (catMaybes
18178− [Just ("kind" .= _ssKind),
18179− ("keyName" .=) <$> _ssKeyName,
18180− ("siteContacts" .=) <$> _ssSiteContacts,
18181− ("siteSettings" .=) <$> _ssSiteSettings,
18182− ("idDimensionValue" .=) <$> _ssIdDimensionValue,
18638+ [Just ("kind" .= _sitiKind),
18639+ ("keyName" .=) <$> _sitiKeyName,
18640+ ("siteContacts" .=) <$> _sitiSiteContacts,
18641+ ("siteSettings" .=) <$> _sitiSiteSettings,
18642+ ("idDimensionValue" .=) <$> _sitiIdDimensionValue,
1818318643 ("directorySiteIdDimensionValue" .=) <$>
18184− _ssDirectorySiteIdDimensionValue,
18185− ("accountId" .=) <$> _ssAccountId,
18186− ("name" .=) <$> _ssName,
18187− ("directorySiteId" .=) <$> _ssDirectorySiteId,
18188− ("id" .=) <$> _ssId,
18189− ("subaccountId" .=) <$> _ssSubAccountId,
18190− ("approved" .=) <$> _ssApproved])
18644+ _sitiDirectorySiteIdDimensionValue,
18645+ ("accountId" .=) <$> _sitiAccountId,
18646+ ("name" .=) <$> _sitiName,
18647+ ("directorySiteId" .=) <$> _sitiDirectorySiteId,
18648+ ("id" .=) <$> _sitiId,
18649+ ("subaccountId" .=) <$> _sitiSubAccountId,
18650+ ("approved" .=) <$> _sitiApproved])
1819118651
1819218652-- | User Defined Variable configuration.
1819318653--
@@ -20282,6 +20742,59 @@ instance ToJSON OrderContact where
2028220742 ("contactType" .=) <$> _ocContactType,
2028320743 ("contactInfo" .=) <$> _ocContactInfo])
2028420744
20745+-- | Transcode Settings
20746+--
20747+-- /See:/ 'transcodeSetting' smart constructor.
20748+data TranscodeSetting = TranscodeSetting'
20749+ { _tsKind :: !Text
20750+ , _tsEnabledVideoFormats :: !(Maybe [Textual Int32])
20751+ } deriving (Eq,Show,Data,Typeable,Generic)
20752+
20753+-- | Creates a value of 'TranscodeSetting' with the minimum fields required to make a request.
20754+--
20755+-- Use one of the following lenses to modify other fields as desired:
20756+--
20757+-- * 'tsKind'
20758+--
20759+-- * 'tsEnabledVideoFormats'
20760+transcodeSetting
20761+ :: TranscodeSetting
20762+transcodeSetting =
20763+ TranscodeSetting'
20764+ { _tsKind = "dfareporting#transcodeSetting"
20765+ , _tsEnabledVideoFormats = Nothing
20766+ }
20767+
20768+-- | Identifies what kind of resource this is. Value: the fixed string
20769+-- \"dfareporting#transcodeSetting\".
20770+tsKind :: Lens' TranscodeSetting Text
20771+tsKind = lens _tsKind (\ s a -> s{_tsKind = a})
20772+
20773+-- | Whitelist of video formats to be served to this placement. Set this list
20774+-- to null or empty to serve all video formats.
20775+tsEnabledVideoFormats :: Lens' TranscodeSetting [Int32]
20776+tsEnabledVideoFormats
20777+ = lens _tsEnabledVideoFormats
20778+ (\ s a -> s{_tsEnabledVideoFormats = a})
20779+ . _Default
20780+ . _Coerce
20781+
20782+instance FromJSON TranscodeSetting where
20783+ parseJSON
20784+ = withObject "TranscodeSetting"
20785+ (\ o ->
20786+ TranscodeSetting' <$>
20787+ (o .:? "kind" .!= "dfareporting#transcodeSetting")
20788+ <*> (o .:? "enabledVideoFormats" .!= mempty))
20789+
20790+instance ToJSON TranscodeSetting where
20791+ toJSON TranscodeSetting'{..}
20792+ = object
20793+ (catMaybes
20794+ [Just ("kind" .= _tsKind),
20795+ ("enabledVideoFormats" .=) <$>
20796+ _tsEnabledVideoFormats])
20797+
2028520798-- | Floodlight Activity GenerateTag Response
2028620799--
2028720800-- /See:/ 'floodlightActivitiesGenerateTagResponse' smart constructor.
@@ -20908,6 +21421,7 @@ instance ToJSON Metro where
2090821421-- /See:/ 'placement' smart constructor.
2090921422data Placement = Placement'
2091021423 { _p1Status :: !(Maybe PlacementStatus)
21424+ , _p1VideoSettings :: !(Maybe VideoSettings)
2091121425 , _p1PlacementStrategyId :: !(Maybe (Textual Int64))
2091221426 , _p1TagFormats :: !(Maybe [PlacementTagFormatsItem])
2091321427 , _p1SiteIdDimensionValue :: !(Maybe DimensionValue)
@@ -20920,6 +21434,7 @@ data Placement = Placement'
2092021434 , _p1AdvertiserIdDimensionValue :: !(Maybe DimensionValue)
2092121435 , _p1CampaignId :: !(Maybe (Textual Int64))
2092221436 , _p1IdDimensionValue :: !(Maybe DimensionValue)
21437+ , _p1VpaidAdapterChoice :: !(Maybe PlacementVpaidAdapterChoice)
2092321438 , _p1Primary :: !(Maybe Bool)
2092421439 , _p1LookbackConfiguration :: !(Maybe LookbackConfiguration)
2092521440 , _p1TagSetting :: !(Maybe TagSetting)
@@ -20930,6 +21445,7 @@ data Placement = Placement'
2093021445 , _p1Name :: !(Maybe Text)
2093121446 , _p1DirectorySiteId :: !(Maybe (Textual Int64))
2093221447 , _p1CreateInfo :: !(Maybe LastModifiedInfo)
21448+ , _p1VideoActiveViewOptOut :: !(Maybe Bool)
2093321449 , _p1LastModifiedInfo :: !(Maybe LastModifiedInfo)
2093421450 , _p1Id :: !(Maybe (Textual Int64))
2093521451 , _p1SSLRequired :: !(Maybe Bool)
@@ -20951,6 +21467,8 @@ data Placement = Placement'
2095121467--
2095221468-- * 'p1Status'
2095321469--
21470+-- * 'p1VideoSettings'
21471+--
2095421472-- * 'p1PlacementStrategyId'
2095521473--
2095621474-- * 'p1TagFormats'
@@ -20975,6 +21493,8 @@ data Placement = Placement'
2097521493--
2097621494-- * 'p1IdDimensionValue'
2097721495--
21496+-- * 'p1VpaidAdapterChoice'
21497+--
2097821498-- * 'p1Primary'
2097921499--
2098021500-- * 'p1LookbackConfiguration'
@@ -20995,6 +21515,8 @@ data Placement = Placement'
2099521515--
2099621516-- * 'p1CreateInfo'
2099721517--
21518+-- * 'p1VideoActiveViewOptOut'
21519+--
2099821520-- * 'p1LastModifiedInfo'
2099921521--
2100021522-- * 'p1Id'
@@ -21025,6 +21547,7 @@ placement
2102521547placement =
2102621548 Placement'
2102721549 { _p1Status = Nothing
21550+ , _p1VideoSettings = Nothing
2102821551 , _p1PlacementStrategyId = Nothing
2102921552 , _p1TagFormats = Nothing
2103021553 , _p1SiteIdDimensionValue = Nothing
@@ -21037,6 +21560,7 @@ placement =
2103721560 , _p1AdvertiserIdDimensionValue = Nothing
2103821561 , _p1CampaignId = Nothing
2103921562 , _p1IdDimensionValue = Nothing
21563+ , _p1VpaidAdapterChoice = Nothing
2104021564 , _p1Primary = Nothing
2104121565 , _p1LookbackConfiguration = Nothing
2104221566 , _p1TagSetting = Nothing
@@ -21047,6 +21571,7 @@ placement =
2104721571 , _p1Name = Nothing
2104821572 , _p1DirectorySiteId = Nothing
2104921573 , _p1CreateInfo = Nothing
21574+ , _p1VideoActiveViewOptOut = Nothing
2105021575 , _p1LastModifiedInfo = Nothing
2105121576 , _p1Id = Nothing
2105221577 , _p1SSLRequired = Nothing
@@ -21066,6 +21591,14 @@ placement =
2106621591p1Status :: Lens' Placement (Maybe PlacementStatus)
2106721592p1Status = lens _p1Status (\ s a -> s{_p1Status = a})
2106821593
21594+-- | A collection of settings which affect video creatives served through
21595+-- this placement. Applicable to placements with IN_STREAM_VIDEO
21596+-- compatibility.
21597+p1VideoSettings :: Lens' Placement (Maybe VideoSettings)
21598+p1VideoSettings
21599+ = lens _p1VideoSettings
21600+ (\ s a -> s{_p1VideoSettings = a})
21601+
2106921602-- | ID of the placement strategy assigned to this placement.
2107021603p1PlacementStrategyId :: Lens' Placement (Maybe Int64)
2107121604p1PlacementStrategyId
@@ -21155,6 +21688,14 @@ p1IdDimensionValue
2115521688 = lens _p1IdDimensionValue
2115621689 (\ s a -> s{_p1IdDimensionValue = a})
2115721690
21691+-- | VPAID adapter setting for this placement. Controls which VPAID format
21692+-- the measurement adapter will use for in-stream video creatives assigned
21693+-- to this placement.
21694+p1VpaidAdapterChoice :: Lens' Placement (Maybe PlacementVpaidAdapterChoice)
21695+p1VpaidAdapterChoice
21696+ = lens _p1VpaidAdapterChoice
21697+ (\ s a -> s{_p1VpaidAdapterChoice = a})
21698+
2115821699-- | Whether this placement is the primary placement of a roadblock
2115921700-- (placement group). You cannot change this field from true to false.
2116021701-- Setting this field to true will automatically set the primary field on
@@ -21223,6 +21764,19 @@ p1CreateInfo :: Lens' Placement (Maybe LastModifiedInfo)
2122321764p1CreateInfo
2122421765 = lens _p1CreateInfo (\ s a -> s{_p1CreateInfo = a})
2122521766
21767+-- | Whether Verification and ActiveView are disabled for in-stream video
21768+-- creatives for this placement. The same setting videoActiveViewOptOut
21769+-- exists on the site level -- the opt out occurs if either of these
21770+-- settings are true. These settings are distinct from
21771+-- DirectorySites.settings.activeViewOptOut or
21772+-- Sites.siteSettings.activeViewOptOut which only apply to display ads.
21773+-- However, Accounts.activeViewOptOut opts out both video traffic, as well
21774+-- as display ads, from Verification and ActiveView.
21775+p1VideoActiveViewOptOut :: Lens' Placement (Maybe Bool)
21776+p1VideoActiveViewOptOut
21777+ = lens _p1VideoActiveViewOptOut
21778+ (\ s a -> s{_p1VideoActiveViewOptOut = a})
21779+
2122621780-- | Information about the most recent modification of this placement. This
2122721781-- is a read-only field.
2122821782p1LastModifiedInfo :: Lens' Placement (Maybe LastModifiedInfo)
@@ -21317,7 +21871,8 @@ instance FromJSON Placement where
2131721871 = withObject "Placement"
2131821872 (\ o ->
2131921873 Placement' <$>
21320− (o .:? "status") <*> (o .:? "placementStrategyId")
21874+ (o .:? "status") <*> (o .:? "videoSettings") <*>
21875+ (o .:? "placementStrategyId")
2132121876 <*> (o .:? "tagFormats" .!= mempty)
2132221877 <*> (o .:? "siteIdDimensionValue")
2132321878 <*> (o .:? "pricingSchedule")
@@ -21329,6 +21884,7 @@ instance FromJSON Placement where
2132921884 <*> (o .:? "advertiserIdDimensionValue")
2133021885 <*> (o .:? "campaignId")
2133121886 <*> (o .:? "idDimensionValue")
21887+ <*> (o .:? "vpaidAdapterChoice")
2133221888 <*> (o .:? "primary")
2133321889 <*> (o .:? "lookbackConfiguration")
2133421890 <*> (o .:? "tagSetting")
@@ -21339,6 +21895,7 @@ instance FromJSON Placement where
2133921895 <*> (o .:? "name")
2134021896 <*> (o .:? "directorySiteId")
2134121897 <*> (o .:? "createInfo")
21898+ <*> (o .:? "videoActiveViewOptOut")
2134221899 <*> (o .:? "lastModifiedInfo")
2134321900 <*> (o .:? "id")
2134421901 <*> (o .:? "sslRequired")
@@ -21358,6 +21915,7 @@ instance ToJSON Placement where
2135821915 = object
2135921916 (catMaybes
2136021917 [("status" .=) <$> _p1Status,
21918+ ("videoSettings" .=) <$> _p1VideoSettings,
2136121919 ("placementStrategyId" .=) <$>
2136221920 _p1PlacementStrategyId,
2136321921 ("tagFormats" .=) <$> _p1TagFormats,
@@ -21373,6 +21931,7 @@ instance ToJSON Placement where
2137321931 _p1AdvertiserIdDimensionValue,
2137421932 ("campaignId" .=) <$> _p1CampaignId,
2137521933 ("idDimensionValue" .=) <$> _p1IdDimensionValue,
21934+ ("vpaidAdapterChoice" .=) <$> _p1VpaidAdapterChoice,
2137621935 ("primary" .=) <$> _p1Primary,
2137721936 ("lookbackConfiguration" .=) <$>
2137821937 _p1LookbackConfiguration,
@@ -21385,6 +21944,8 @@ instance ToJSON Placement where
2138521944 ("name" .=) <$> _p1Name,
2138621945 ("directorySiteId" .=) <$> _p1DirectorySiteId,
2138721946 ("createInfo" .=) <$> _p1CreateInfo,
21947+ ("videoActiveViewOptOut" .=) <$>
21948+ _p1VideoActiveViewOptOut,
2138821949 ("lastModifiedInfo" .=) <$> _p1LastModifiedInfo,
2138921950 ("id" .=) <$> _p1Id,
2139021951 ("sslRequired" .=) <$> _p1SSLRequired,