{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.MediaConvert.Types.NielsenNonLinearWatermarkSettings where
import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import Amazonka.MediaConvert.Types.NielsenActiveWatermarkProcessType
import Amazonka.MediaConvert.Types.NielsenSourceWatermarkStatusType
import Amazonka.MediaConvert.Types.NielsenUniqueTicPerAudioTrackType
import qualified Amazonka.Prelude as Prelude
data NielsenNonLinearWatermarkSettings = NielsenNonLinearWatermarkSettings'
{
NielsenNonLinearWatermarkSettings -> Maybe Text
episodeId :: Prelude.Maybe Prelude.Text,
NielsenNonLinearWatermarkSettings
-> Maybe NielsenActiveWatermarkProcessType
activeWatermarkProcess :: Prelude.Maybe NielsenActiveWatermarkProcessType,
NielsenNonLinearWatermarkSettings -> Maybe Natural
sourceId :: Prelude.Maybe Prelude.Natural,
NielsenNonLinearWatermarkSettings -> Maybe Text
cbetSourceId :: Prelude.Maybe Prelude.Text,
NielsenNonLinearWatermarkSettings -> Maybe Text
ticServerUrl :: Prelude.Maybe Prelude.Text,
NielsenNonLinearWatermarkSettings -> Maybe Text
metadataDestination :: Prelude.Maybe Prelude.Text,
NielsenNonLinearWatermarkSettings -> Maybe Text
assetName :: Prelude.Maybe Prelude.Text,
NielsenNonLinearWatermarkSettings -> Maybe Text
adiFilename :: Prelude.Maybe Prelude.Text,
NielsenNonLinearWatermarkSettings -> Maybe Text
assetId :: Prelude.Maybe Prelude.Text,
NielsenNonLinearWatermarkSettings
-> Maybe NielsenUniqueTicPerAudioTrackType
uniqueTicPerAudioTrack :: Prelude.Maybe NielsenUniqueTicPerAudioTrackType,
NielsenNonLinearWatermarkSettings
-> Maybe NielsenSourceWatermarkStatusType
sourceWatermarkStatus :: Prelude.Maybe NielsenSourceWatermarkStatusType
}
deriving (NielsenNonLinearWatermarkSettings
-> NielsenNonLinearWatermarkSettings -> Bool
(NielsenNonLinearWatermarkSettings
-> NielsenNonLinearWatermarkSettings -> Bool)
-> (NielsenNonLinearWatermarkSettings
-> NielsenNonLinearWatermarkSettings -> Bool)
-> Eq NielsenNonLinearWatermarkSettings
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: NielsenNonLinearWatermarkSettings
-> NielsenNonLinearWatermarkSettings -> Bool
$c/= :: NielsenNonLinearWatermarkSettings
-> NielsenNonLinearWatermarkSettings -> Bool
== :: NielsenNonLinearWatermarkSettings
-> NielsenNonLinearWatermarkSettings -> Bool
$c== :: NielsenNonLinearWatermarkSettings
-> NielsenNonLinearWatermarkSettings -> Bool
Prelude.Eq, ReadPrec [NielsenNonLinearWatermarkSettings]
ReadPrec NielsenNonLinearWatermarkSettings
Int -> ReadS NielsenNonLinearWatermarkSettings
ReadS [NielsenNonLinearWatermarkSettings]
(Int -> ReadS NielsenNonLinearWatermarkSettings)
-> ReadS [NielsenNonLinearWatermarkSettings]
-> ReadPrec NielsenNonLinearWatermarkSettings
-> ReadPrec [NielsenNonLinearWatermarkSettings]
-> Read NielsenNonLinearWatermarkSettings
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [NielsenNonLinearWatermarkSettings]
$creadListPrec :: ReadPrec [NielsenNonLinearWatermarkSettings]
readPrec :: ReadPrec NielsenNonLinearWatermarkSettings
$creadPrec :: ReadPrec NielsenNonLinearWatermarkSettings
readList :: ReadS [NielsenNonLinearWatermarkSettings]
$creadList :: ReadS [NielsenNonLinearWatermarkSettings]
readsPrec :: Int -> ReadS NielsenNonLinearWatermarkSettings
$creadsPrec :: Int -> ReadS NielsenNonLinearWatermarkSettings
Prelude.Read, Int -> NielsenNonLinearWatermarkSettings -> ShowS
[NielsenNonLinearWatermarkSettings] -> ShowS
NielsenNonLinearWatermarkSettings -> String
(Int -> NielsenNonLinearWatermarkSettings -> ShowS)
-> (NielsenNonLinearWatermarkSettings -> String)
-> ([NielsenNonLinearWatermarkSettings] -> ShowS)
-> Show NielsenNonLinearWatermarkSettings
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [NielsenNonLinearWatermarkSettings] -> ShowS
$cshowList :: [NielsenNonLinearWatermarkSettings] -> ShowS
show :: NielsenNonLinearWatermarkSettings -> String
$cshow :: NielsenNonLinearWatermarkSettings -> String
showsPrec :: Int -> NielsenNonLinearWatermarkSettings -> ShowS
$cshowsPrec :: Int -> NielsenNonLinearWatermarkSettings -> ShowS
Prelude.Show, (forall x.
NielsenNonLinearWatermarkSettings
-> Rep NielsenNonLinearWatermarkSettings x)
-> (forall x.
Rep NielsenNonLinearWatermarkSettings x
-> NielsenNonLinearWatermarkSettings)
-> Generic NielsenNonLinearWatermarkSettings
forall x.
Rep NielsenNonLinearWatermarkSettings x
-> NielsenNonLinearWatermarkSettings
forall x.
NielsenNonLinearWatermarkSettings
-> Rep NielsenNonLinearWatermarkSettings x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep NielsenNonLinearWatermarkSettings x
-> NielsenNonLinearWatermarkSettings
$cfrom :: forall x.
NielsenNonLinearWatermarkSettings
-> Rep NielsenNonLinearWatermarkSettings x
Prelude.Generic)
newNielsenNonLinearWatermarkSettings ::
NielsenNonLinearWatermarkSettings
newNielsenNonLinearWatermarkSettings :: NielsenNonLinearWatermarkSettings
newNielsenNonLinearWatermarkSettings =
NielsenNonLinearWatermarkSettings' :: Maybe Text
-> Maybe NielsenActiveWatermarkProcessType
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings
NielsenNonLinearWatermarkSettings'
{ $sel:episodeId:NielsenNonLinearWatermarkSettings' :: Maybe Text
episodeId =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:activeWatermarkProcess:NielsenNonLinearWatermarkSettings' :: Maybe NielsenActiveWatermarkProcessType
activeWatermarkProcess = Maybe NielsenActiveWatermarkProcessType
forall a. Maybe a
Prelude.Nothing,
$sel:sourceId:NielsenNonLinearWatermarkSettings' :: Maybe Natural
sourceId = Maybe Natural
forall a. Maybe a
Prelude.Nothing,
$sel:cbetSourceId:NielsenNonLinearWatermarkSettings' :: Maybe Text
cbetSourceId = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:ticServerUrl:NielsenNonLinearWatermarkSettings' :: Maybe Text
ticServerUrl = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:metadataDestination:NielsenNonLinearWatermarkSettings' :: Maybe Text
metadataDestination = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:assetName:NielsenNonLinearWatermarkSettings' :: Maybe Text
assetName = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:adiFilename:NielsenNonLinearWatermarkSettings' :: Maybe Text
adiFilename = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:assetId:NielsenNonLinearWatermarkSettings' :: Maybe Text
assetId = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:uniqueTicPerAudioTrack:NielsenNonLinearWatermarkSettings' :: Maybe NielsenUniqueTicPerAudioTrackType
uniqueTicPerAudioTrack = Maybe NielsenUniqueTicPerAudioTrackType
forall a. Maybe a
Prelude.Nothing,
$sel:sourceWatermarkStatus:NielsenNonLinearWatermarkSettings' :: Maybe NielsenSourceWatermarkStatusType
sourceWatermarkStatus = Maybe NielsenSourceWatermarkStatusType
forall a. Maybe a
Prelude.Nothing
}
nielsenNonLinearWatermarkSettings_episodeId :: Lens.Lens' NielsenNonLinearWatermarkSettings (Prelude.Maybe Prelude.Text)
nielsenNonLinearWatermarkSettings_episodeId :: (Maybe Text -> f (Maybe Text))
-> NielsenNonLinearWatermarkSettings
-> f NielsenNonLinearWatermarkSettings
nielsenNonLinearWatermarkSettings_episodeId = (NielsenNonLinearWatermarkSettings -> Maybe Text)
-> (NielsenNonLinearWatermarkSettings
-> Maybe Text -> NielsenNonLinearWatermarkSettings)
-> Lens
NielsenNonLinearWatermarkSettings
NielsenNonLinearWatermarkSettings
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NielsenNonLinearWatermarkSettings' {Maybe Text
episodeId :: Maybe Text
$sel:episodeId:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings -> Maybe Text
episodeId} -> Maybe Text
episodeId) (\s :: NielsenNonLinearWatermarkSettings
s@NielsenNonLinearWatermarkSettings' {} Maybe Text
a -> NielsenNonLinearWatermarkSettings
s {$sel:episodeId:NielsenNonLinearWatermarkSettings' :: Maybe Text
episodeId = Maybe Text
a} :: NielsenNonLinearWatermarkSettings)
nielsenNonLinearWatermarkSettings_activeWatermarkProcess :: Lens.Lens' NielsenNonLinearWatermarkSettings (Prelude.Maybe NielsenActiveWatermarkProcessType)
nielsenNonLinearWatermarkSettings_activeWatermarkProcess :: (Maybe NielsenActiveWatermarkProcessType
-> f (Maybe NielsenActiveWatermarkProcessType))
-> NielsenNonLinearWatermarkSettings
-> f NielsenNonLinearWatermarkSettings
nielsenNonLinearWatermarkSettings_activeWatermarkProcess = (NielsenNonLinearWatermarkSettings
-> Maybe NielsenActiveWatermarkProcessType)
-> (NielsenNonLinearWatermarkSettings
-> Maybe NielsenActiveWatermarkProcessType
-> NielsenNonLinearWatermarkSettings)
-> Lens
NielsenNonLinearWatermarkSettings
NielsenNonLinearWatermarkSettings
(Maybe NielsenActiveWatermarkProcessType)
(Maybe NielsenActiveWatermarkProcessType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NielsenNonLinearWatermarkSettings' {Maybe NielsenActiveWatermarkProcessType
activeWatermarkProcess :: Maybe NielsenActiveWatermarkProcessType
$sel:activeWatermarkProcess:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings
-> Maybe NielsenActiveWatermarkProcessType
activeWatermarkProcess} -> Maybe NielsenActiveWatermarkProcessType
activeWatermarkProcess) (\s :: NielsenNonLinearWatermarkSettings
s@NielsenNonLinearWatermarkSettings' {} Maybe NielsenActiveWatermarkProcessType
a -> NielsenNonLinearWatermarkSettings
s {$sel:activeWatermarkProcess:NielsenNonLinearWatermarkSettings' :: Maybe NielsenActiveWatermarkProcessType
activeWatermarkProcess = Maybe NielsenActiveWatermarkProcessType
a} :: NielsenNonLinearWatermarkSettings)
nielsenNonLinearWatermarkSettings_sourceId :: Lens.Lens' NielsenNonLinearWatermarkSettings (Prelude.Maybe Prelude.Natural)
nielsenNonLinearWatermarkSettings_sourceId :: (Maybe Natural -> f (Maybe Natural))
-> NielsenNonLinearWatermarkSettings
-> f NielsenNonLinearWatermarkSettings
nielsenNonLinearWatermarkSettings_sourceId = (NielsenNonLinearWatermarkSettings -> Maybe Natural)
-> (NielsenNonLinearWatermarkSettings
-> Maybe Natural -> NielsenNonLinearWatermarkSettings)
-> Lens
NielsenNonLinearWatermarkSettings
NielsenNonLinearWatermarkSettings
(Maybe Natural)
(Maybe Natural)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NielsenNonLinearWatermarkSettings' {Maybe Natural
sourceId :: Maybe Natural
$sel:sourceId:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings -> Maybe Natural
sourceId} -> Maybe Natural
sourceId) (\s :: NielsenNonLinearWatermarkSettings
s@NielsenNonLinearWatermarkSettings' {} Maybe Natural
a -> NielsenNonLinearWatermarkSettings
s {$sel:sourceId:NielsenNonLinearWatermarkSettings' :: Maybe Natural
sourceId = Maybe Natural
a} :: NielsenNonLinearWatermarkSettings)
nielsenNonLinearWatermarkSettings_cbetSourceId :: Lens.Lens' NielsenNonLinearWatermarkSettings (Prelude.Maybe Prelude.Text)
nielsenNonLinearWatermarkSettings_cbetSourceId :: (Maybe Text -> f (Maybe Text))
-> NielsenNonLinearWatermarkSettings
-> f NielsenNonLinearWatermarkSettings
nielsenNonLinearWatermarkSettings_cbetSourceId = (NielsenNonLinearWatermarkSettings -> Maybe Text)
-> (NielsenNonLinearWatermarkSettings
-> Maybe Text -> NielsenNonLinearWatermarkSettings)
-> Lens
NielsenNonLinearWatermarkSettings
NielsenNonLinearWatermarkSettings
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NielsenNonLinearWatermarkSettings' {Maybe Text
cbetSourceId :: Maybe Text
$sel:cbetSourceId:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings -> Maybe Text
cbetSourceId} -> Maybe Text
cbetSourceId) (\s :: NielsenNonLinearWatermarkSettings
s@NielsenNonLinearWatermarkSettings' {} Maybe Text
a -> NielsenNonLinearWatermarkSettings
s {$sel:cbetSourceId:NielsenNonLinearWatermarkSettings' :: Maybe Text
cbetSourceId = Maybe Text
a} :: NielsenNonLinearWatermarkSettings)
nielsenNonLinearWatermarkSettings_ticServerUrl :: Lens.Lens' NielsenNonLinearWatermarkSettings (Prelude.Maybe Prelude.Text)
nielsenNonLinearWatermarkSettings_ticServerUrl :: (Maybe Text -> f (Maybe Text))
-> NielsenNonLinearWatermarkSettings
-> f NielsenNonLinearWatermarkSettings
nielsenNonLinearWatermarkSettings_ticServerUrl = (NielsenNonLinearWatermarkSettings -> Maybe Text)
-> (NielsenNonLinearWatermarkSettings
-> Maybe Text -> NielsenNonLinearWatermarkSettings)
-> Lens
NielsenNonLinearWatermarkSettings
NielsenNonLinearWatermarkSettings
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NielsenNonLinearWatermarkSettings' {Maybe Text
ticServerUrl :: Maybe Text
$sel:ticServerUrl:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings -> Maybe Text
ticServerUrl} -> Maybe Text
ticServerUrl) (\s :: NielsenNonLinearWatermarkSettings
s@NielsenNonLinearWatermarkSettings' {} Maybe Text
a -> NielsenNonLinearWatermarkSettings
s {$sel:ticServerUrl:NielsenNonLinearWatermarkSettings' :: Maybe Text
ticServerUrl = Maybe Text
a} :: NielsenNonLinearWatermarkSettings)
nielsenNonLinearWatermarkSettings_metadataDestination :: Lens.Lens' NielsenNonLinearWatermarkSettings (Prelude.Maybe Prelude.Text)
nielsenNonLinearWatermarkSettings_metadataDestination :: (Maybe Text -> f (Maybe Text))
-> NielsenNonLinearWatermarkSettings
-> f NielsenNonLinearWatermarkSettings
nielsenNonLinearWatermarkSettings_metadataDestination = (NielsenNonLinearWatermarkSettings -> Maybe Text)
-> (NielsenNonLinearWatermarkSettings
-> Maybe Text -> NielsenNonLinearWatermarkSettings)
-> Lens
NielsenNonLinearWatermarkSettings
NielsenNonLinearWatermarkSettings
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NielsenNonLinearWatermarkSettings' {Maybe Text
metadataDestination :: Maybe Text
$sel:metadataDestination:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings -> Maybe Text
metadataDestination} -> Maybe Text
metadataDestination) (\s :: NielsenNonLinearWatermarkSettings
s@NielsenNonLinearWatermarkSettings' {} Maybe Text
a -> NielsenNonLinearWatermarkSettings
s {$sel:metadataDestination:NielsenNonLinearWatermarkSettings' :: Maybe Text
metadataDestination = Maybe Text
a} :: NielsenNonLinearWatermarkSettings)
nielsenNonLinearWatermarkSettings_assetName :: Lens.Lens' NielsenNonLinearWatermarkSettings (Prelude.Maybe Prelude.Text)
nielsenNonLinearWatermarkSettings_assetName :: (Maybe Text -> f (Maybe Text))
-> NielsenNonLinearWatermarkSettings
-> f NielsenNonLinearWatermarkSettings
nielsenNonLinearWatermarkSettings_assetName = (NielsenNonLinearWatermarkSettings -> Maybe Text)
-> (NielsenNonLinearWatermarkSettings
-> Maybe Text -> NielsenNonLinearWatermarkSettings)
-> Lens
NielsenNonLinearWatermarkSettings
NielsenNonLinearWatermarkSettings
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NielsenNonLinearWatermarkSettings' {Maybe Text
assetName :: Maybe Text
$sel:assetName:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings -> Maybe Text
assetName} -> Maybe Text
assetName) (\s :: NielsenNonLinearWatermarkSettings
s@NielsenNonLinearWatermarkSettings' {} Maybe Text
a -> NielsenNonLinearWatermarkSettings
s {$sel:assetName:NielsenNonLinearWatermarkSettings' :: Maybe Text
assetName = Maybe Text
a} :: NielsenNonLinearWatermarkSettings)
nielsenNonLinearWatermarkSettings_adiFilename :: Lens.Lens' NielsenNonLinearWatermarkSettings (Prelude.Maybe Prelude.Text)
nielsenNonLinearWatermarkSettings_adiFilename :: (Maybe Text -> f (Maybe Text))
-> NielsenNonLinearWatermarkSettings
-> f NielsenNonLinearWatermarkSettings
nielsenNonLinearWatermarkSettings_adiFilename = (NielsenNonLinearWatermarkSettings -> Maybe Text)
-> (NielsenNonLinearWatermarkSettings
-> Maybe Text -> NielsenNonLinearWatermarkSettings)
-> Lens
NielsenNonLinearWatermarkSettings
NielsenNonLinearWatermarkSettings
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NielsenNonLinearWatermarkSettings' {Maybe Text
adiFilename :: Maybe Text
$sel:adiFilename:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings -> Maybe Text
adiFilename} -> Maybe Text
adiFilename) (\s :: NielsenNonLinearWatermarkSettings
s@NielsenNonLinearWatermarkSettings' {} Maybe Text
a -> NielsenNonLinearWatermarkSettings
s {$sel:adiFilename:NielsenNonLinearWatermarkSettings' :: Maybe Text
adiFilename = Maybe Text
a} :: NielsenNonLinearWatermarkSettings)
nielsenNonLinearWatermarkSettings_assetId :: Lens.Lens' NielsenNonLinearWatermarkSettings (Prelude.Maybe Prelude.Text)
nielsenNonLinearWatermarkSettings_assetId :: (Maybe Text -> f (Maybe Text))
-> NielsenNonLinearWatermarkSettings
-> f NielsenNonLinearWatermarkSettings
nielsenNonLinearWatermarkSettings_assetId = (NielsenNonLinearWatermarkSettings -> Maybe Text)
-> (NielsenNonLinearWatermarkSettings
-> Maybe Text -> NielsenNonLinearWatermarkSettings)
-> Lens
NielsenNonLinearWatermarkSettings
NielsenNonLinearWatermarkSettings
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NielsenNonLinearWatermarkSettings' {Maybe Text
assetId :: Maybe Text
$sel:assetId:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings -> Maybe Text
assetId} -> Maybe Text
assetId) (\s :: NielsenNonLinearWatermarkSettings
s@NielsenNonLinearWatermarkSettings' {} Maybe Text
a -> NielsenNonLinearWatermarkSettings
s {$sel:assetId:NielsenNonLinearWatermarkSettings' :: Maybe Text
assetId = Maybe Text
a} :: NielsenNonLinearWatermarkSettings)
nielsenNonLinearWatermarkSettings_uniqueTicPerAudioTrack :: Lens.Lens' NielsenNonLinearWatermarkSettings (Prelude.Maybe NielsenUniqueTicPerAudioTrackType)
nielsenNonLinearWatermarkSettings_uniqueTicPerAudioTrack :: (Maybe NielsenUniqueTicPerAudioTrackType
-> f (Maybe NielsenUniqueTicPerAudioTrackType))
-> NielsenNonLinearWatermarkSettings
-> f NielsenNonLinearWatermarkSettings
nielsenNonLinearWatermarkSettings_uniqueTicPerAudioTrack = (NielsenNonLinearWatermarkSettings
-> Maybe NielsenUniqueTicPerAudioTrackType)
-> (NielsenNonLinearWatermarkSettings
-> Maybe NielsenUniqueTicPerAudioTrackType
-> NielsenNonLinearWatermarkSettings)
-> Lens
NielsenNonLinearWatermarkSettings
NielsenNonLinearWatermarkSettings
(Maybe NielsenUniqueTicPerAudioTrackType)
(Maybe NielsenUniqueTicPerAudioTrackType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NielsenNonLinearWatermarkSettings' {Maybe NielsenUniqueTicPerAudioTrackType
uniqueTicPerAudioTrack :: Maybe NielsenUniqueTicPerAudioTrackType
$sel:uniqueTicPerAudioTrack:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings
-> Maybe NielsenUniqueTicPerAudioTrackType
uniqueTicPerAudioTrack} -> Maybe NielsenUniqueTicPerAudioTrackType
uniqueTicPerAudioTrack) (\s :: NielsenNonLinearWatermarkSettings
s@NielsenNonLinearWatermarkSettings' {} Maybe NielsenUniqueTicPerAudioTrackType
a -> NielsenNonLinearWatermarkSettings
s {$sel:uniqueTicPerAudioTrack:NielsenNonLinearWatermarkSettings' :: Maybe NielsenUniqueTicPerAudioTrackType
uniqueTicPerAudioTrack = Maybe NielsenUniqueTicPerAudioTrackType
a} :: NielsenNonLinearWatermarkSettings)
nielsenNonLinearWatermarkSettings_sourceWatermarkStatus :: Lens.Lens' NielsenNonLinearWatermarkSettings (Prelude.Maybe NielsenSourceWatermarkStatusType)
nielsenNonLinearWatermarkSettings_sourceWatermarkStatus :: (Maybe NielsenSourceWatermarkStatusType
-> f (Maybe NielsenSourceWatermarkStatusType))
-> NielsenNonLinearWatermarkSettings
-> f NielsenNonLinearWatermarkSettings
nielsenNonLinearWatermarkSettings_sourceWatermarkStatus = (NielsenNonLinearWatermarkSettings
-> Maybe NielsenSourceWatermarkStatusType)
-> (NielsenNonLinearWatermarkSettings
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
-> Lens
NielsenNonLinearWatermarkSettings
NielsenNonLinearWatermarkSettings
(Maybe NielsenSourceWatermarkStatusType)
(Maybe NielsenSourceWatermarkStatusType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\NielsenNonLinearWatermarkSettings' {Maybe NielsenSourceWatermarkStatusType
sourceWatermarkStatus :: Maybe NielsenSourceWatermarkStatusType
$sel:sourceWatermarkStatus:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings
-> Maybe NielsenSourceWatermarkStatusType
sourceWatermarkStatus} -> Maybe NielsenSourceWatermarkStatusType
sourceWatermarkStatus) (\s :: NielsenNonLinearWatermarkSettings
s@NielsenNonLinearWatermarkSettings' {} Maybe NielsenSourceWatermarkStatusType
a -> NielsenNonLinearWatermarkSettings
s {$sel:sourceWatermarkStatus:NielsenNonLinearWatermarkSettings' :: Maybe NielsenSourceWatermarkStatusType
sourceWatermarkStatus = Maybe NielsenSourceWatermarkStatusType
a} :: NielsenNonLinearWatermarkSettings)
instance
Core.FromJSON
NielsenNonLinearWatermarkSettings
where
parseJSON :: Value -> Parser NielsenNonLinearWatermarkSettings
parseJSON =
String
-> (Object -> Parser NielsenNonLinearWatermarkSettings)
-> Value
-> Parser NielsenNonLinearWatermarkSettings
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Core.withObject
String
"NielsenNonLinearWatermarkSettings"
( \Object
x ->
Maybe Text
-> Maybe NielsenActiveWatermarkProcessType
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings
NielsenNonLinearWatermarkSettings'
(Maybe Text
-> Maybe NielsenActiveWatermarkProcessType
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
-> Parser (Maybe Text)
-> Parser
(Maybe NielsenActiveWatermarkProcessType
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"episodeId")
Parser
(Maybe NielsenActiveWatermarkProcessType
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
-> Parser (Maybe NielsenActiveWatermarkProcessType)
-> Parser
(Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe NielsenActiveWatermarkProcessType)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"activeWatermarkProcess")
Parser
(Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
-> Parser (Maybe Natural)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Natural)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"sourceId")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"cbetSourceId")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"ticServerUrl")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"metadataDestination")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"assetName")
Parser
(Maybe Text
-> Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"adiFilename")
Parser
(Maybe Text
-> Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
-> Parser (Maybe Text)
-> Parser
(Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"assetId")
Parser
(Maybe NielsenUniqueTicPerAudioTrackType
-> Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
-> Parser (Maybe NielsenUniqueTicPerAudioTrackType)
-> Parser
(Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe NielsenUniqueTicPerAudioTrackType)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"uniqueTicPerAudioTrack")
Parser
(Maybe NielsenSourceWatermarkStatusType
-> NielsenNonLinearWatermarkSettings)
-> Parser (Maybe NielsenSourceWatermarkStatusType)
-> Parser NielsenNonLinearWatermarkSettings
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe NielsenSourceWatermarkStatusType)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"sourceWatermarkStatus")
)
instance
Prelude.Hashable
NielsenNonLinearWatermarkSettings
instance
Prelude.NFData
NielsenNonLinearWatermarkSettings
instance
Core.ToJSON
NielsenNonLinearWatermarkSettings
where
toJSON :: NielsenNonLinearWatermarkSettings -> Value
toJSON NielsenNonLinearWatermarkSettings' {Maybe Natural
Maybe Text
Maybe NielsenActiveWatermarkProcessType
Maybe NielsenSourceWatermarkStatusType
Maybe NielsenUniqueTicPerAudioTrackType
sourceWatermarkStatus :: Maybe NielsenSourceWatermarkStatusType
uniqueTicPerAudioTrack :: Maybe NielsenUniqueTicPerAudioTrackType
assetId :: Maybe Text
adiFilename :: Maybe Text
assetName :: Maybe Text
metadataDestination :: Maybe Text
ticServerUrl :: Maybe Text
cbetSourceId :: Maybe Text
sourceId :: Maybe Natural
activeWatermarkProcess :: Maybe NielsenActiveWatermarkProcessType
episodeId :: Maybe Text
$sel:sourceWatermarkStatus:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings
-> Maybe NielsenSourceWatermarkStatusType
$sel:uniqueTicPerAudioTrack:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings
-> Maybe NielsenUniqueTicPerAudioTrackType
$sel:assetId:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings -> Maybe Text
$sel:adiFilename:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings -> Maybe Text
$sel:assetName:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings -> Maybe Text
$sel:metadataDestination:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings -> Maybe Text
$sel:ticServerUrl:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings -> Maybe Text
$sel:cbetSourceId:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings -> Maybe Text
$sel:sourceId:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings -> Maybe Natural
$sel:activeWatermarkProcess:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings
-> Maybe NielsenActiveWatermarkProcessType
$sel:episodeId:NielsenNonLinearWatermarkSettings' :: NielsenNonLinearWatermarkSettings -> Maybe Text
..} =
[Pair] -> Value
Core.object
( [Maybe Pair] -> [Pair]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Text
"episodeId" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Text -> Pair) -> Maybe Text -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
episodeId,
(Text
"activeWatermarkProcess" Text -> NielsenActiveWatermarkProcessType -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(NielsenActiveWatermarkProcessType -> Pair)
-> Maybe NielsenActiveWatermarkProcessType -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe NielsenActiveWatermarkProcessType
activeWatermarkProcess,
(Text
"sourceId" Text -> Natural -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Natural -> Pair) -> Maybe Natural -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Natural
sourceId,
(Text
"cbetSourceId" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Text -> Pair) -> Maybe Text -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
cbetSourceId,
(Text
"ticServerUrl" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Text -> Pair) -> Maybe Text -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
ticServerUrl,
(Text
"metadataDestination" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(Text -> Pair) -> Maybe Text -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
metadataDestination,
(Text
"assetName" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Text -> Pair) -> Maybe Text -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
assetName,
(Text
"adiFilename" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Text -> Pair) -> Maybe Text -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
adiFilename,
(Text
"assetId" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Text -> Pair) -> Maybe Text -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
assetId,
(Text
"uniqueTicPerAudioTrack" Text -> NielsenUniqueTicPerAudioTrackType -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(NielsenUniqueTicPerAudioTrackType -> Pair)
-> Maybe NielsenUniqueTicPerAudioTrackType -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe NielsenUniqueTicPerAudioTrackType
uniqueTicPerAudioTrack,
(Text
"sourceWatermarkStatus" Text -> NielsenSourceWatermarkStatusType -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(NielsenSourceWatermarkStatusType -> Pair)
-> Maybe NielsenSourceWatermarkStatusType -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe NielsenSourceWatermarkStatusType
sourceWatermarkStatus
]
)