module Stratosphere.MediaConvert.JobTemplate (
module Exports, JobTemplate(..), mkJobTemplate
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.MediaConvert.JobTemplate.AccelerationSettingsProperty as Exports
import {-# SOURCE #-} Stratosphere.MediaConvert.JobTemplate.HopDestinationProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data JobTemplate
=
JobTemplate {JobTemplate -> ()
haddock_workaround_ :: (),
JobTemplate -> Maybe AccelerationSettingsProperty
accelerationSettings :: (Prelude.Maybe AccelerationSettingsProperty),
JobTemplate -> Maybe (Value Text)
category :: (Prelude.Maybe (Value Prelude.Text)),
JobTemplate -> Maybe (Value Text)
description :: (Prelude.Maybe (Value Prelude.Text)),
JobTemplate -> Maybe [HopDestinationProperty]
hopDestinations :: (Prelude.Maybe [HopDestinationProperty]),
JobTemplate -> Maybe (Value Text)
name :: (Prelude.Maybe (Value Prelude.Text)),
JobTemplate -> Maybe (Value Integer)
priority :: (Prelude.Maybe (Value Prelude.Integer)),
JobTemplate -> Maybe (Value Text)
queue :: (Prelude.Maybe (Value Prelude.Text)),
JobTemplate -> Object
settingsJson :: JSON.Object,
JobTemplate -> Maybe (Value Text)
statusUpdateInterval :: (Prelude.Maybe (Value Prelude.Text)),
JobTemplate -> Maybe Object
tags :: (Prelude.Maybe JSON.Object)}
deriving stock (JobTemplate -> JobTemplate -> Bool
(JobTemplate -> JobTemplate -> Bool)
-> (JobTemplate -> JobTemplate -> Bool) -> Eq JobTemplate
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: JobTemplate -> JobTemplate -> Bool
== :: JobTemplate -> JobTemplate -> Bool
$c/= :: JobTemplate -> JobTemplate -> Bool
/= :: JobTemplate -> JobTemplate -> Bool
Prelude.Eq, Int -> JobTemplate -> ShowS
[JobTemplate] -> ShowS
JobTemplate -> String
(Int -> JobTemplate -> ShowS)
-> (JobTemplate -> String)
-> ([JobTemplate] -> ShowS)
-> Show JobTemplate
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> JobTemplate -> ShowS
showsPrec :: Int -> JobTemplate -> ShowS
$cshow :: JobTemplate -> String
show :: JobTemplate -> String
$cshowList :: [JobTemplate] -> ShowS
showList :: [JobTemplate] -> ShowS
Prelude.Show)
mkJobTemplate :: JSON.Object -> JobTemplate
mkJobTemplate :: Object -> JobTemplate
mkJobTemplate Object
settingsJson
= JobTemplate
{haddock_workaround_ :: ()
haddock_workaround_ = (), settingsJson :: Object
settingsJson = Object
settingsJson,
accelerationSettings :: Maybe AccelerationSettingsProperty
accelerationSettings = Maybe AccelerationSettingsProperty
forall a. Maybe a
Prelude.Nothing, category :: Maybe (Value Text)
category = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
description :: Maybe (Value Text)
description = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, hopDestinations :: Maybe [HopDestinationProperty]
hopDestinations = Maybe [HopDestinationProperty]
forall a. Maybe a
Prelude.Nothing,
name :: Maybe (Value Text)
name = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, priority :: Maybe (Value Integer)
priority = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
queue :: Maybe (Value Text)
queue = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, statusUpdateInterval :: Maybe (Value Text)
statusUpdateInterval = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
tags :: Maybe Object
tags = Maybe Object
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties JobTemplate where
toResourceProperties :: JobTemplate -> ResourceProperties
toResourceProperties JobTemplate {Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: JobTemplate -> ()
accelerationSettings :: JobTemplate -> Maybe AccelerationSettingsProperty
category :: JobTemplate -> Maybe (Value Text)
description :: JobTemplate -> Maybe (Value Text)
hopDestinations :: JobTemplate -> Maybe [HopDestinationProperty]
name :: JobTemplate -> Maybe (Value Text)
priority :: JobTemplate -> Maybe (Value Integer)
queue :: JobTemplate -> Maybe (Value Text)
settingsJson :: JobTemplate -> Object
statusUpdateInterval :: JobTemplate -> Maybe (Value Text)
tags :: JobTemplate -> Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::MediaConvert::JobTemplate",
supportsTags :: Bool
supportsTags = Bool
Prelude.True,
properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
[Key
"SettingsJson" Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Object
settingsJson]
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> AccelerationSettingsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AccelerationSettings" (AccelerationSettingsProperty -> (Key, Value))
-> Maybe AccelerationSettingsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AccelerationSettingsProperty
accelerationSettings,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Category" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
category,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Description" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
description,
Key -> [HopDestinationProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"HopDestinations" ([HopDestinationProperty] -> (Key, Value))
-> Maybe [HopDestinationProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [HopDestinationProperty]
hopDestinations,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Name" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
name,
Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Priority" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
priority,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Queue" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
queue,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"StatusUpdateInterval" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
statusUpdateInterval,
Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
tags]))}
instance JSON.ToJSON JobTemplate where
toJSON :: JobTemplate -> Value
toJSON JobTemplate {Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: JobTemplate -> ()
accelerationSettings :: JobTemplate -> Maybe AccelerationSettingsProperty
category :: JobTemplate -> Maybe (Value Text)
description :: JobTemplate -> Maybe (Value Text)
hopDestinations :: JobTemplate -> Maybe [HopDestinationProperty]
name :: JobTemplate -> Maybe (Value Text)
priority :: JobTemplate -> Maybe (Value Integer)
queue :: JobTemplate -> Maybe (Value Text)
settingsJson :: JobTemplate -> Object
statusUpdateInterval :: JobTemplate -> Maybe (Value Text)
tags :: JobTemplate -> Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
= [(Key, Value)] -> Value
JSON.object
([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
[Key
"SettingsJson" Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Object
settingsJson]
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> AccelerationSettingsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AccelerationSettings" (AccelerationSettingsProperty -> (Key, Value))
-> Maybe AccelerationSettingsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AccelerationSettingsProperty
accelerationSettings,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Category" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
category,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Description" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
description,
Key -> [HopDestinationProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"HopDestinations" ([HopDestinationProperty] -> (Key, Value))
-> Maybe [HopDestinationProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [HopDestinationProperty]
hopDestinations,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Name" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
name,
Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Priority" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
priority,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Queue" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
queue,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"StatusUpdateInterval" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
statusUpdateInterval,
Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
tags])))
instance Property "AccelerationSettings" JobTemplate where
type PropertyType "AccelerationSettings" JobTemplate = AccelerationSettingsProperty
set :: PropertyType "AccelerationSettings" JobTemplate
-> JobTemplate -> JobTemplate
set PropertyType "AccelerationSettings" JobTemplate
newValue JobTemplate {Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: JobTemplate -> ()
accelerationSettings :: JobTemplate -> Maybe AccelerationSettingsProperty
category :: JobTemplate -> Maybe (Value Text)
description :: JobTemplate -> Maybe (Value Text)
hopDestinations :: JobTemplate -> Maybe [HopDestinationProperty]
name :: JobTemplate -> Maybe (Value Text)
priority :: JobTemplate -> Maybe (Value Integer)
queue :: JobTemplate -> Maybe (Value Text)
settingsJson :: JobTemplate -> Object
statusUpdateInterval :: JobTemplate -> Maybe (Value Text)
tags :: JobTemplate -> Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
= JobTemplate {accelerationSettings :: Maybe AccelerationSettingsProperty
accelerationSettings = AccelerationSettingsProperty -> Maybe AccelerationSettingsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "AccelerationSettings" JobTemplate
AccelerationSettingsProperty
newValue, Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
()
Object
haddock_workaround_ :: ()
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
haddock_workaround_ :: ()
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
instance Property "Category" JobTemplate where
type PropertyType "Category" JobTemplate = Value Prelude.Text
set :: PropertyType "Category" JobTemplate -> JobTemplate -> JobTemplate
set PropertyType "Category" JobTemplate
newValue JobTemplate {Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: JobTemplate -> ()
accelerationSettings :: JobTemplate -> Maybe AccelerationSettingsProperty
category :: JobTemplate -> Maybe (Value Text)
description :: JobTemplate -> Maybe (Value Text)
hopDestinations :: JobTemplate -> Maybe [HopDestinationProperty]
name :: JobTemplate -> Maybe (Value Text)
priority :: JobTemplate -> Maybe (Value Integer)
queue :: JobTemplate -> Maybe (Value Text)
settingsJson :: JobTemplate -> Object
statusUpdateInterval :: JobTemplate -> Maybe (Value Text)
tags :: JobTemplate -> Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
= JobTemplate {category :: Maybe (Value Text)
category = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Category" JobTemplate
Value Text
newValue, Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
instance Property "Description" JobTemplate where
type PropertyType "Description" JobTemplate = Value Prelude.Text
set :: PropertyType "Description" JobTemplate
-> JobTemplate -> JobTemplate
set PropertyType "Description" JobTemplate
newValue JobTemplate {Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: JobTemplate -> ()
accelerationSettings :: JobTemplate -> Maybe AccelerationSettingsProperty
category :: JobTemplate -> Maybe (Value Text)
description :: JobTemplate -> Maybe (Value Text)
hopDestinations :: JobTemplate -> Maybe [HopDestinationProperty]
name :: JobTemplate -> Maybe (Value Text)
priority :: JobTemplate -> Maybe (Value Integer)
queue :: JobTemplate -> Maybe (Value Text)
settingsJson :: JobTemplate -> Object
statusUpdateInterval :: JobTemplate -> Maybe (Value Text)
tags :: JobTemplate -> Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
= JobTemplate {description :: Maybe (Value Text)
description = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Description" JobTemplate
Value Text
newValue, Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
instance Property "HopDestinations" JobTemplate where
type PropertyType "HopDestinations" JobTemplate = [HopDestinationProperty]
set :: PropertyType "HopDestinations" JobTemplate
-> JobTemplate -> JobTemplate
set PropertyType "HopDestinations" JobTemplate
newValue JobTemplate {Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: JobTemplate -> ()
accelerationSettings :: JobTemplate -> Maybe AccelerationSettingsProperty
category :: JobTemplate -> Maybe (Value Text)
description :: JobTemplate -> Maybe (Value Text)
hopDestinations :: JobTemplate -> Maybe [HopDestinationProperty]
name :: JobTemplate -> Maybe (Value Text)
priority :: JobTemplate -> Maybe (Value Integer)
queue :: JobTemplate -> Maybe (Value Text)
settingsJson :: JobTemplate -> Object
statusUpdateInterval :: JobTemplate -> Maybe (Value Text)
tags :: JobTemplate -> Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
= JobTemplate {hopDestinations :: Maybe [HopDestinationProperty]
hopDestinations = [HopDestinationProperty] -> Maybe [HopDestinationProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [HopDestinationProperty]
PropertyType "HopDestinations" JobTemplate
newValue, Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
instance Property "Name" JobTemplate where
type PropertyType "Name" JobTemplate = Value Prelude.Text
set :: PropertyType "Name" JobTemplate -> JobTemplate -> JobTemplate
set PropertyType "Name" JobTemplate
newValue JobTemplate {Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: JobTemplate -> ()
accelerationSettings :: JobTemplate -> Maybe AccelerationSettingsProperty
category :: JobTemplate -> Maybe (Value Text)
description :: JobTemplate -> Maybe (Value Text)
hopDestinations :: JobTemplate -> Maybe [HopDestinationProperty]
name :: JobTemplate -> Maybe (Value Text)
priority :: JobTemplate -> Maybe (Value Integer)
queue :: JobTemplate -> Maybe (Value Text)
settingsJson :: JobTemplate -> Object
statusUpdateInterval :: JobTemplate -> Maybe (Value Text)
tags :: JobTemplate -> Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
= JobTemplate {name :: Maybe (Value Text)
name = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Name" JobTemplate
Value Text
newValue, Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
instance Property "Priority" JobTemplate where
type PropertyType "Priority" JobTemplate = Value Prelude.Integer
set :: PropertyType "Priority" JobTemplate -> JobTemplate -> JobTemplate
set PropertyType "Priority" JobTemplate
newValue JobTemplate {Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: JobTemplate -> ()
accelerationSettings :: JobTemplate -> Maybe AccelerationSettingsProperty
category :: JobTemplate -> Maybe (Value Text)
description :: JobTemplate -> Maybe (Value Text)
hopDestinations :: JobTemplate -> Maybe [HopDestinationProperty]
name :: JobTemplate -> Maybe (Value Text)
priority :: JobTemplate -> Maybe (Value Integer)
queue :: JobTemplate -> Maybe (Value Text)
settingsJson :: JobTemplate -> Object
statusUpdateInterval :: JobTemplate -> Maybe (Value Text)
tags :: JobTemplate -> Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
= JobTemplate {priority :: Maybe (Value Integer)
priority = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Priority" JobTemplate
Value Integer
newValue, Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
instance Property "Queue" JobTemplate where
type PropertyType "Queue" JobTemplate = Value Prelude.Text
set :: PropertyType "Queue" JobTemplate -> JobTemplate -> JobTemplate
set PropertyType "Queue" JobTemplate
newValue JobTemplate {Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: JobTemplate -> ()
accelerationSettings :: JobTemplate -> Maybe AccelerationSettingsProperty
category :: JobTemplate -> Maybe (Value Text)
description :: JobTemplate -> Maybe (Value Text)
hopDestinations :: JobTemplate -> Maybe [HopDestinationProperty]
name :: JobTemplate -> Maybe (Value Text)
priority :: JobTemplate -> Maybe (Value Integer)
queue :: JobTemplate -> Maybe (Value Text)
settingsJson :: JobTemplate -> Object
statusUpdateInterval :: JobTemplate -> Maybe (Value Text)
tags :: JobTemplate -> Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
= JobTemplate {queue :: Maybe (Value Text)
queue = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Queue" JobTemplate
Value Text
newValue, Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
instance Property "SettingsJson" JobTemplate where
type PropertyType "SettingsJson" JobTemplate = JSON.Object
set :: PropertyType "SettingsJson" JobTemplate
-> JobTemplate -> JobTemplate
set PropertyType "SettingsJson" JobTemplate
newValue JobTemplate {Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: JobTemplate -> ()
accelerationSettings :: JobTemplate -> Maybe AccelerationSettingsProperty
category :: JobTemplate -> Maybe (Value Text)
description :: JobTemplate -> Maybe (Value Text)
hopDestinations :: JobTemplate -> Maybe [HopDestinationProperty]
name :: JobTemplate -> Maybe (Value Text)
priority :: JobTemplate -> Maybe (Value Integer)
queue :: JobTemplate -> Maybe (Value Text)
settingsJson :: JobTemplate -> Object
statusUpdateInterval :: JobTemplate -> Maybe (Value Text)
tags :: JobTemplate -> Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
= JobTemplate {settingsJson :: Object
settingsJson = Object
PropertyType "SettingsJson" JobTemplate
newValue, Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
instance Property "StatusUpdateInterval" JobTemplate where
type PropertyType "StatusUpdateInterval" JobTemplate = Value Prelude.Text
set :: PropertyType "StatusUpdateInterval" JobTemplate
-> JobTemplate -> JobTemplate
set PropertyType "StatusUpdateInterval" JobTemplate
newValue JobTemplate {Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: JobTemplate -> ()
accelerationSettings :: JobTemplate -> Maybe AccelerationSettingsProperty
category :: JobTemplate -> Maybe (Value Text)
description :: JobTemplate -> Maybe (Value Text)
hopDestinations :: JobTemplate -> Maybe [HopDestinationProperty]
name :: JobTemplate -> Maybe (Value Text)
priority :: JobTemplate -> Maybe (Value Integer)
queue :: JobTemplate -> Maybe (Value Text)
settingsJson :: JobTemplate -> Object
statusUpdateInterval :: JobTemplate -> Maybe (Value Text)
tags :: JobTemplate -> Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
= JobTemplate {statusUpdateInterval :: Maybe (Value Text)
statusUpdateInterval = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "StatusUpdateInterval" JobTemplate
Value Text
newValue, Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
tags :: Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
tags :: Maybe Object
..}
instance Property "Tags" JobTemplate where
type PropertyType "Tags" JobTemplate = JSON.Object
set :: PropertyType "Tags" JobTemplate -> JobTemplate -> JobTemplate
set PropertyType "Tags" JobTemplate
newValue JobTemplate {Maybe [HopDestinationProperty]
Maybe Object
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: JobTemplate -> ()
accelerationSettings :: JobTemplate -> Maybe AccelerationSettingsProperty
category :: JobTemplate -> Maybe (Value Text)
description :: JobTemplate -> Maybe (Value Text)
hopDestinations :: JobTemplate -> Maybe [HopDestinationProperty]
name :: JobTemplate -> Maybe (Value Text)
priority :: JobTemplate -> Maybe (Value Integer)
queue :: JobTemplate -> Maybe (Value Text)
settingsJson :: JobTemplate -> Object
statusUpdateInterval :: JobTemplate -> Maybe (Value Text)
tags :: JobTemplate -> Maybe Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
tags :: Maybe Object
..}
= JobTemplate {tags :: Maybe Object
tags = Object -> Maybe Object
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Object
PropertyType "Tags" JobTemplate
newValue, Maybe [HopDestinationProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe AccelerationSettingsProperty
()
Object
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
haddock_workaround_ :: ()
accelerationSettings :: Maybe AccelerationSettingsProperty
category :: Maybe (Value Text)
description :: Maybe (Value Text)
hopDestinations :: Maybe [HopDestinationProperty]
name :: Maybe (Value Text)
priority :: Maybe (Value Integer)
queue :: Maybe (Value Text)
settingsJson :: Object
statusUpdateInterval :: Maybe (Value Text)
..}