{-# 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.Pipes.Types.PipeTargetBatchJobParameters where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.Pipes.Types.BatchArrayProperties
import Amazonka.Pipes.Types.BatchContainerOverrides
import Amazonka.Pipes.Types.BatchJobDependency
import Amazonka.Pipes.Types.BatchRetryStrategy
import qualified Amazonka.Prelude as Prelude
data PipeTargetBatchJobParameters = PipeTargetBatchJobParameters'
{
PipeTargetBatchJobParameters -> Maybe BatchArrayProperties
arrayProperties :: Prelude.Maybe BatchArrayProperties,
PipeTargetBatchJobParameters -> Maybe BatchContainerOverrides
containerOverrides :: Prelude.Maybe BatchContainerOverrides,
PipeTargetBatchJobParameters -> Maybe [BatchJobDependency]
dependsOn :: Prelude.Maybe [BatchJobDependency],
PipeTargetBatchJobParameters -> Maybe (HashMap Text Text)
parameters :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
PipeTargetBatchJobParameters -> Maybe BatchRetryStrategy
retryStrategy :: Prelude.Maybe BatchRetryStrategy,
PipeTargetBatchJobParameters -> Text
jobDefinition :: Prelude.Text,
PipeTargetBatchJobParameters -> Text
jobName :: Prelude.Text
}
deriving (PipeTargetBatchJobParameters
-> PipeTargetBatchJobParameters -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PipeTargetBatchJobParameters
-> PipeTargetBatchJobParameters -> Bool
$c/= :: PipeTargetBatchJobParameters
-> PipeTargetBatchJobParameters -> Bool
== :: PipeTargetBatchJobParameters
-> PipeTargetBatchJobParameters -> Bool
$c== :: PipeTargetBatchJobParameters
-> PipeTargetBatchJobParameters -> Bool
Prelude.Eq, ReadPrec [PipeTargetBatchJobParameters]
ReadPrec PipeTargetBatchJobParameters
Int -> ReadS PipeTargetBatchJobParameters
ReadS [PipeTargetBatchJobParameters]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [PipeTargetBatchJobParameters]
$creadListPrec :: ReadPrec [PipeTargetBatchJobParameters]
readPrec :: ReadPrec PipeTargetBatchJobParameters
$creadPrec :: ReadPrec PipeTargetBatchJobParameters
readList :: ReadS [PipeTargetBatchJobParameters]
$creadList :: ReadS [PipeTargetBatchJobParameters]
readsPrec :: Int -> ReadS PipeTargetBatchJobParameters
$creadsPrec :: Int -> ReadS PipeTargetBatchJobParameters
Prelude.Read, Int -> PipeTargetBatchJobParameters -> ShowS
[PipeTargetBatchJobParameters] -> ShowS
PipeTargetBatchJobParameters -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PipeTargetBatchJobParameters] -> ShowS
$cshowList :: [PipeTargetBatchJobParameters] -> ShowS
show :: PipeTargetBatchJobParameters -> String
$cshow :: PipeTargetBatchJobParameters -> String
showsPrec :: Int -> PipeTargetBatchJobParameters -> ShowS
$cshowsPrec :: Int -> PipeTargetBatchJobParameters -> ShowS
Prelude.Show, forall x.
Rep PipeTargetBatchJobParameters x -> PipeTargetBatchJobParameters
forall x.
PipeTargetBatchJobParameters -> Rep PipeTargetBatchJobParameters x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep PipeTargetBatchJobParameters x -> PipeTargetBatchJobParameters
$cfrom :: forall x.
PipeTargetBatchJobParameters -> Rep PipeTargetBatchJobParameters x
Prelude.Generic)
newPipeTargetBatchJobParameters ::
Prelude.Text ->
Prelude.Text ->
PipeTargetBatchJobParameters
newPipeTargetBatchJobParameters :: Text -> Text -> PipeTargetBatchJobParameters
newPipeTargetBatchJobParameters
Text
pJobDefinition_
Text
pJobName_ =
PipeTargetBatchJobParameters'
{ $sel:arrayProperties:PipeTargetBatchJobParameters' :: Maybe BatchArrayProperties
arrayProperties =
forall a. Maybe a
Prelude.Nothing,
$sel:containerOverrides:PipeTargetBatchJobParameters' :: Maybe BatchContainerOverrides
containerOverrides = forall a. Maybe a
Prelude.Nothing,
$sel:dependsOn:PipeTargetBatchJobParameters' :: Maybe [BatchJobDependency]
dependsOn = forall a. Maybe a
Prelude.Nothing,
$sel:parameters:PipeTargetBatchJobParameters' :: Maybe (HashMap Text Text)
parameters = forall a. Maybe a
Prelude.Nothing,
$sel:retryStrategy:PipeTargetBatchJobParameters' :: Maybe BatchRetryStrategy
retryStrategy = forall a. Maybe a
Prelude.Nothing,
$sel:jobDefinition:PipeTargetBatchJobParameters' :: Text
jobDefinition = Text
pJobDefinition_,
$sel:jobName:PipeTargetBatchJobParameters' :: Text
jobName = Text
pJobName_
}
pipeTargetBatchJobParameters_arrayProperties :: Lens.Lens' PipeTargetBatchJobParameters (Prelude.Maybe BatchArrayProperties)
pipeTargetBatchJobParameters_arrayProperties :: Lens' PipeTargetBatchJobParameters (Maybe BatchArrayProperties)
pipeTargetBatchJobParameters_arrayProperties = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PipeTargetBatchJobParameters' {Maybe BatchArrayProperties
arrayProperties :: Maybe BatchArrayProperties
$sel:arrayProperties:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe BatchArrayProperties
arrayProperties} -> Maybe BatchArrayProperties
arrayProperties) (\s :: PipeTargetBatchJobParameters
s@PipeTargetBatchJobParameters' {} Maybe BatchArrayProperties
a -> PipeTargetBatchJobParameters
s {$sel:arrayProperties:PipeTargetBatchJobParameters' :: Maybe BatchArrayProperties
arrayProperties = Maybe BatchArrayProperties
a} :: PipeTargetBatchJobParameters)
pipeTargetBatchJobParameters_containerOverrides :: Lens.Lens' PipeTargetBatchJobParameters (Prelude.Maybe BatchContainerOverrides)
pipeTargetBatchJobParameters_containerOverrides :: Lens' PipeTargetBatchJobParameters (Maybe BatchContainerOverrides)
pipeTargetBatchJobParameters_containerOverrides = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PipeTargetBatchJobParameters' {Maybe BatchContainerOverrides
containerOverrides :: Maybe BatchContainerOverrides
$sel:containerOverrides:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe BatchContainerOverrides
containerOverrides} -> Maybe BatchContainerOverrides
containerOverrides) (\s :: PipeTargetBatchJobParameters
s@PipeTargetBatchJobParameters' {} Maybe BatchContainerOverrides
a -> PipeTargetBatchJobParameters
s {$sel:containerOverrides:PipeTargetBatchJobParameters' :: Maybe BatchContainerOverrides
containerOverrides = Maybe BatchContainerOverrides
a} :: PipeTargetBatchJobParameters)
pipeTargetBatchJobParameters_dependsOn :: Lens.Lens' PipeTargetBatchJobParameters (Prelude.Maybe [BatchJobDependency])
pipeTargetBatchJobParameters_dependsOn :: Lens' PipeTargetBatchJobParameters (Maybe [BatchJobDependency])
pipeTargetBatchJobParameters_dependsOn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PipeTargetBatchJobParameters' {Maybe [BatchJobDependency]
dependsOn :: Maybe [BatchJobDependency]
$sel:dependsOn:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe [BatchJobDependency]
dependsOn} -> Maybe [BatchJobDependency]
dependsOn) (\s :: PipeTargetBatchJobParameters
s@PipeTargetBatchJobParameters' {} Maybe [BatchJobDependency]
a -> PipeTargetBatchJobParameters
s {$sel:dependsOn:PipeTargetBatchJobParameters' :: Maybe [BatchJobDependency]
dependsOn = Maybe [BatchJobDependency]
a} :: PipeTargetBatchJobParameters) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
pipeTargetBatchJobParameters_parameters :: Lens.Lens' PipeTargetBatchJobParameters (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
pipeTargetBatchJobParameters_parameters :: Lens' PipeTargetBatchJobParameters (Maybe (HashMap Text Text))
pipeTargetBatchJobParameters_parameters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PipeTargetBatchJobParameters' {Maybe (HashMap Text Text)
parameters :: Maybe (HashMap Text Text)
$sel:parameters:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe (HashMap Text Text)
parameters} -> Maybe (HashMap Text Text)
parameters) (\s :: PipeTargetBatchJobParameters
s@PipeTargetBatchJobParameters' {} Maybe (HashMap Text Text)
a -> PipeTargetBatchJobParameters
s {$sel:parameters:PipeTargetBatchJobParameters' :: Maybe (HashMap Text Text)
parameters = Maybe (HashMap Text Text)
a} :: PipeTargetBatchJobParameters) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
pipeTargetBatchJobParameters_retryStrategy :: Lens.Lens' PipeTargetBatchJobParameters (Prelude.Maybe BatchRetryStrategy)
pipeTargetBatchJobParameters_retryStrategy :: Lens' PipeTargetBatchJobParameters (Maybe BatchRetryStrategy)
pipeTargetBatchJobParameters_retryStrategy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PipeTargetBatchJobParameters' {Maybe BatchRetryStrategy
retryStrategy :: Maybe BatchRetryStrategy
$sel:retryStrategy:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe BatchRetryStrategy
retryStrategy} -> Maybe BatchRetryStrategy
retryStrategy) (\s :: PipeTargetBatchJobParameters
s@PipeTargetBatchJobParameters' {} Maybe BatchRetryStrategy
a -> PipeTargetBatchJobParameters
s {$sel:retryStrategy:PipeTargetBatchJobParameters' :: Maybe BatchRetryStrategy
retryStrategy = Maybe BatchRetryStrategy
a} :: PipeTargetBatchJobParameters)
pipeTargetBatchJobParameters_jobDefinition :: Lens.Lens' PipeTargetBatchJobParameters Prelude.Text
pipeTargetBatchJobParameters_jobDefinition :: Lens' PipeTargetBatchJobParameters Text
pipeTargetBatchJobParameters_jobDefinition = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PipeTargetBatchJobParameters' {Text
jobDefinition :: Text
$sel:jobDefinition:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Text
jobDefinition} -> Text
jobDefinition) (\s :: PipeTargetBatchJobParameters
s@PipeTargetBatchJobParameters' {} Text
a -> PipeTargetBatchJobParameters
s {$sel:jobDefinition:PipeTargetBatchJobParameters' :: Text
jobDefinition = Text
a} :: PipeTargetBatchJobParameters)
pipeTargetBatchJobParameters_jobName :: Lens.Lens' PipeTargetBatchJobParameters Prelude.Text
pipeTargetBatchJobParameters_jobName :: Lens' PipeTargetBatchJobParameters Text
pipeTargetBatchJobParameters_jobName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PipeTargetBatchJobParameters' {Text
jobName :: Text
$sel:jobName:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Text
jobName} -> Text
jobName) (\s :: PipeTargetBatchJobParameters
s@PipeTargetBatchJobParameters' {} Text
a -> PipeTargetBatchJobParameters
s {$sel:jobName:PipeTargetBatchJobParameters' :: Text
jobName = Text
a} :: PipeTargetBatchJobParameters)
instance Data.FromJSON PipeTargetBatchJobParameters where
parseJSON :: Value -> Parser PipeTargetBatchJobParameters
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"PipeTargetBatchJobParameters"
( \Object
x ->
Maybe BatchArrayProperties
-> Maybe BatchContainerOverrides
-> Maybe [BatchJobDependency]
-> Maybe (HashMap Text Text)
-> Maybe BatchRetryStrategy
-> Text
-> Text
-> PipeTargetBatchJobParameters
PipeTargetBatchJobParameters'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ArrayProperties")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ContainerOverrides")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"DependsOn" forall a. Parser (Maybe a) -> a -> Parser a
Data..!= forall a. Monoid a => a
Prelude.mempty)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Parameters" forall a. Parser (Maybe a) -> a -> Parser a
Data..!= forall a. Monoid a => a
Prelude.mempty)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"RetryStrategy")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"JobDefinition")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"JobName")
)
instance
Prelude.Hashable
PipeTargetBatchJobParameters
where
hashWithSalt :: Int -> PipeTargetBatchJobParameters -> Int
hashWithSalt Int
_salt PipeTargetBatchJobParameters' {Maybe [BatchJobDependency]
Maybe (HashMap Text Text)
Maybe BatchArrayProperties
Maybe BatchContainerOverrides
Maybe BatchRetryStrategy
Text
jobName :: Text
jobDefinition :: Text
retryStrategy :: Maybe BatchRetryStrategy
parameters :: Maybe (HashMap Text Text)
dependsOn :: Maybe [BatchJobDependency]
containerOverrides :: Maybe BatchContainerOverrides
arrayProperties :: Maybe BatchArrayProperties
$sel:jobName:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Text
$sel:jobDefinition:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Text
$sel:retryStrategy:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe BatchRetryStrategy
$sel:parameters:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe (HashMap Text Text)
$sel:dependsOn:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe [BatchJobDependency]
$sel:containerOverrides:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe BatchContainerOverrides
$sel:arrayProperties:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe BatchArrayProperties
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchArrayProperties
arrayProperties
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchContainerOverrides
containerOverrides
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [BatchJobDependency]
dependsOn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (HashMap Text Text)
parameters
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchRetryStrategy
retryStrategy
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
jobDefinition
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
jobName
instance Prelude.NFData PipeTargetBatchJobParameters where
rnf :: PipeTargetBatchJobParameters -> ()
rnf PipeTargetBatchJobParameters' {Maybe [BatchJobDependency]
Maybe (HashMap Text Text)
Maybe BatchArrayProperties
Maybe BatchContainerOverrides
Maybe BatchRetryStrategy
Text
jobName :: Text
jobDefinition :: Text
retryStrategy :: Maybe BatchRetryStrategy
parameters :: Maybe (HashMap Text Text)
dependsOn :: Maybe [BatchJobDependency]
containerOverrides :: Maybe BatchContainerOverrides
arrayProperties :: Maybe BatchArrayProperties
$sel:jobName:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Text
$sel:jobDefinition:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Text
$sel:retryStrategy:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe BatchRetryStrategy
$sel:parameters:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe (HashMap Text Text)
$sel:dependsOn:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe [BatchJobDependency]
$sel:containerOverrides:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe BatchContainerOverrides
$sel:arrayProperties:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe BatchArrayProperties
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchArrayProperties
arrayProperties
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchContainerOverrides
containerOverrides
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [BatchJobDependency]
dependsOn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text Text)
parameters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchRetryStrategy
retryStrategy
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
jobDefinition
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
jobName
instance Data.ToJSON PipeTargetBatchJobParameters where
toJSON :: PipeTargetBatchJobParameters -> Value
toJSON PipeTargetBatchJobParameters' {Maybe [BatchJobDependency]
Maybe (HashMap Text Text)
Maybe BatchArrayProperties
Maybe BatchContainerOverrides
Maybe BatchRetryStrategy
Text
jobName :: Text
jobDefinition :: Text
retryStrategy :: Maybe BatchRetryStrategy
parameters :: Maybe (HashMap Text Text)
dependsOn :: Maybe [BatchJobDependency]
containerOverrides :: Maybe BatchContainerOverrides
arrayProperties :: Maybe BatchArrayProperties
$sel:jobName:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Text
$sel:jobDefinition:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Text
$sel:retryStrategy:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe BatchRetryStrategy
$sel:parameters:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe (HashMap Text Text)
$sel:dependsOn:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe [BatchJobDependency]
$sel:containerOverrides:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe BatchContainerOverrides
$sel:arrayProperties:PipeTargetBatchJobParameters' :: PipeTargetBatchJobParameters -> Maybe BatchArrayProperties
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"ArrayProperties" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe BatchArrayProperties
arrayProperties,
(Key
"ContainerOverrides" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe BatchContainerOverrides
containerOverrides,
(Key
"DependsOn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [BatchJobDependency]
dependsOn,
(Key
"Parameters" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (HashMap Text Text)
parameters,
(Key
"RetryStrategy" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe BatchRetryStrategy
retryStrategy,
forall a. a -> Maybe a
Prelude.Just (Key
"JobDefinition" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
jobDefinition),
forall a. a -> Maybe a
Prelude.Just (Key
"JobName" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
jobName)
]
)