{-# 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.SWF.Types.ScheduleActivityTaskDecisionAttributes where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import Amazonka.SWF.Types.ActivityType
import Amazonka.SWF.Types.TaskList
data ScheduleActivityTaskDecisionAttributes = ScheduleActivityTaskDecisionAttributes'
{
ScheduleActivityTaskDecisionAttributes -> Maybe Text
control :: Prelude.Maybe Prelude.Text,
ScheduleActivityTaskDecisionAttributes -> Maybe Text
heartbeatTimeout :: Prelude.Maybe Prelude.Text,
ScheduleActivityTaskDecisionAttributes -> Maybe Text
input :: Prelude.Maybe Prelude.Text,
ScheduleActivityTaskDecisionAttributes -> Maybe Text
scheduleToCloseTimeout :: Prelude.Maybe Prelude.Text,
ScheduleActivityTaskDecisionAttributes -> Maybe Text
scheduleToStartTimeout :: Prelude.Maybe Prelude.Text,
ScheduleActivityTaskDecisionAttributes -> Maybe Text
startToCloseTimeout :: Prelude.Maybe Prelude.Text,
ScheduleActivityTaskDecisionAttributes -> Maybe TaskList
taskList :: Prelude.Maybe TaskList,
ScheduleActivityTaskDecisionAttributes -> Maybe Text
taskPriority :: Prelude.Maybe Prelude.Text,
ScheduleActivityTaskDecisionAttributes -> ActivityType
activityType :: ActivityType,
ScheduleActivityTaskDecisionAttributes -> Text
activityId :: Prelude.Text
}
deriving (ScheduleActivityTaskDecisionAttributes
-> ScheduleActivityTaskDecisionAttributes -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ScheduleActivityTaskDecisionAttributes
-> ScheduleActivityTaskDecisionAttributes -> Bool
$c/= :: ScheduleActivityTaskDecisionAttributes
-> ScheduleActivityTaskDecisionAttributes -> Bool
== :: ScheduleActivityTaskDecisionAttributes
-> ScheduleActivityTaskDecisionAttributes -> Bool
$c== :: ScheduleActivityTaskDecisionAttributes
-> ScheduleActivityTaskDecisionAttributes -> Bool
Prelude.Eq, ReadPrec [ScheduleActivityTaskDecisionAttributes]
ReadPrec ScheduleActivityTaskDecisionAttributes
Int -> ReadS ScheduleActivityTaskDecisionAttributes
ReadS [ScheduleActivityTaskDecisionAttributes]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ScheduleActivityTaskDecisionAttributes]
$creadListPrec :: ReadPrec [ScheduleActivityTaskDecisionAttributes]
readPrec :: ReadPrec ScheduleActivityTaskDecisionAttributes
$creadPrec :: ReadPrec ScheduleActivityTaskDecisionAttributes
readList :: ReadS [ScheduleActivityTaskDecisionAttributes]
$creadList :: ReadS [ScheduleActivityTaskDecisionAttributes]
readsPrec :: Int -> ReadS ScheduleActivityTaskDecisionAttributes
$creadsPrec :: Int -> ReadS ScheduleActivityTaskDecisionAttributes
Prelude.Read, Int -> ScheduleActivityTaskDecisionAttributes -> ShowS
[ScheduleActivityTaskDecisionAttributes] -> ShowS
ScheduleActivityTaskDecisionAttributes -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ScheduleActivityTaskDecisionAttributes] -> ShowS
$cshowList :: [ScheduleActivityTaskDecisionAttributes] -> ShowS
show :: ScheduleActivityTaskDecisionAttributes -> String
$cshow :: ScheduleActivityTaskDecisionAttributes -> String
showsPrec :: Int -> ScheduleActivityTaskDecisionAttributes -> ShowS
$cshowsPrec :: Int -> ScheduleActivityTaskDecisionAttributes -> ShowS
Prelude.Show, forall x.
Rep ScheduleActivityTaskDecisionAttributes x
-> ScheduleActivityTaskDecisionAttributes
forall x.
ScheduleActivityTaskDecisionAttributes
-> Rep ScheduleActivityTaskDecisionAttributes x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ScheduleActivityTaskDecisionAttributes x
-> ScheduleActivityTaskDecisionAttributes
$cfrom :: forall x.
ScheduleActivityTaskDecisionAttributes
-> Rep ScheduleActivityTaskDecisionAttributes x
Prelude.Generic)
newScheduleActivityTaskDecisionAttributes ::
ActivityType ->
Prelude.Text ->
ScheduleActivityTaskDecisionAttributes
newScheduleActivityTaskDecisionAttributes :: ActivityType -> Text -> ScheduleActivityTaskDecisionAttributes
newScheduleActivityTaskDecisionAttributes
ActivityType
pActivityType_
Text
pActivityId_ =
ScheduleActivityTaskDecisionAttributes'
{ $sel:control:ScheduleActivityTaskDecisionAttributes' :: Maybe Text
control =
forall a. Maybe a
Prelude.Nothing,
$sel:heartbeatTimeout:ScheduleActivityTaskDecisionAttributes' :: Maybe Text
heartbeatTimeout = forall a. Maybe a
Prelude.Nothing,
$sel:input:ScheduleActivityTaskDecisionAttributes' :: Maybe Text
input = forall a. Maybe a
Prelude.Nothing,
$sel:scheduleToCloseTimeout:ScheduleActivityTaskDecisionAttributes' :: Maybe Text
scheduleToCloseTimeout =
forall a. Maybe a
Prelude.Nothing,
$sel:scheduleToStartTimeout:ScheduleActivityTaskDecisionAttributes' :: Maybe Text
scheduleToStartTimeout =
forall a. Maybe a
Prelude.Nothing,
$sel:startToCloseTimeout:ScheduleActivityTaskDecisionAttributes' :: Maybe Text
startToCloseTimeout =
forall a. Maybe a
Prelude.Nothing,
$sel:taskList:ScheduleActivityTaskDecisionAttributes' :: Maybe TaskList
taskList = forall a. Maybe a
Prelude.Nothing,
$sel:taskPriority:ScheduleActivityTaskDecisionAttributes' :: Maybe Text
taskPriority = forall a. Maybe a
Prelude.Nothing,
$sel:activityType:ScheduleActivityTaskDecisionAttributes' :: ActivityType
activityType = ActivityType
pActivityType_,
$sel:activityId:ScheduleActivityTaskDecisionAttributes' :: Text
activityId = Text
pActivityId_
}
scheduleActivityTaskDecisionAttributes_control :: Lens.Lens' ScheduleActivityTaskDecisionAttributes (Prelude.Maybe Prelude.Text)
scheduleActivityTaskDecisionAttributes_control :: Lens' ScheduleActivityTaskDecisionAttributes (Maybe Text)
scheduleActivityTaskDecisionAttributes_control = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduleActivityTaskDecisionAttributes' {Maybe Text
control :: Maybe Text
$sel:control:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
control} -> Maybe Text
control) (\s :: ScheduleActivityTaskDecisionAttributes
s@ScheduleActivityTaskDecisionAttributes' {} Maybe Text
a -> ScheduleActivityTaskDecisionAttributes
s {$sel:control:ScheduleActivityTaskDecisionAttributes' :: Maybe Text
control = Maybe Text
a} :: ScheduleActivityTaskDecisionAttributes)
scheduleActivityTaskDecisionAttributes_heartbeatTimeout :: Lens.Lens' ScheduleActivityTaskDecisionAttributes (Prelude.Maybe Prelude.Text)
scheduleActivityTaskDecisionAttributes_heartbeatTimeout :: Lens' ScheduleActivityTaskDecisionAttributes (Maybe Text)
scheduleActivityTaskDecisionAttributes_heartbeatTimeout = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduleActivityTaskDecisionAttributes' {Maybe Text
heartbeatTimeout :: Maybe Text
$sel:heartbeatTimeout:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
heartbeatTimeout} -> Maybe Text
heartbeatTimeout) (\s :: ScheduleActivityTaskDecisionAttributes
s@ScheduleActivityTaskDecisionAttributes' {} Maybe Text
a -> ScheduleActivityTaskDecisionAttributes
s {$sel:heartbeatTimeout:ScheduleActivityTaskDecisionAttributes' :: Maybe Text
heartbeatTimeout = Maybe Text
a} :: ScheduleActivityTaskDecisionAttributes)
scheduleActivityTaskDecisionAttributes_input :: Lens.Lens' ScheduleActivityTaskDecisionAttributes (Prelude.Maybe Prelude.Text)
scheduleActivityTaskDecisionAttributes_input :: Lens' ScheduleActivityTaskDecisionAttributes (Maybe Text)
scheduleActivityTaskDecisionAttributes_input = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduleActivityTaskDecisionAttributes' {Maybe Text
input :: Maybe Text
$sel:input:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
input} -> Maybe Text
input) (\s :: ScheduleActivityTaskDecisionAttributes
s@ScheduleActivityTaskDecisionAttributes' {} Maybe Text
a -> ScheduleActivityTaskDecisionAttributes
s {$sel:input:ScheduleActivityTaskDecisionAttributes' :: Maybe Text
input = Maybe Text
a} :: ScheduleActivityTaskDecisionAttributes)
scheduleActivityTaskDecisionAttributes_scheduleToCloseTimeout :: Lens.Lens' ScheduleActivityTaskDecisionAttributes (Prelude.Maybe Prelude.Text)
scheduleActivityTaskDecisionAttributes_scheduleToCloseTimeout :: Lens' ScheduleActivityTaskDecisionAttributes (Maybe Text)
scheduleActivityTaskDecisionAttributes_scheduleToCloseTimeout = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduleActivityTaskDecisionAttributes' {Maybe Text
scheduleToCloseTimeout :: Maybe Text
$sel:scheduleToCloseTimeout:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
scheduleToCloseTimeout} -> Maybe Text
scheduleToCloseTimeout) (\s :: ScheduleActivityTaskDecisionAttributes
s@ScheduleActivityTaskDecisionAttributes' {} Maybe Text
a -> ScheduleActivityTaskDecisionAttributes
s {$sel:scheduleToCloseTimeout:ScheduleActivityTaskDecisionAttributes' :: Maybe Text
scheduleToCloseTimeout = Maybe Text
a} :: ScheduleActivityTaskDecisionAttributes)
scheduleActivityTaskDecisionAttributes_scheduleToStartTimeout :: Lens.Lens' ScheduleActivityTaskDecisionAttributes (Prelude.Maybe Prelude.Text)
scheduleActivityTaskDecisionAttributes_scheduleToStartTimeout :: Lens' ScheduleActivityTaskDecisionAttributes (Maybe Text)
scheduleActivityTaskDecisionAttributes_scheduleToStartTimeout = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduleActivityTaskDecisionAttributes' {Maybe Text
scheduleToStartTimeout :: Maybe Text
$sel:scheduleToStartTimeout:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
scheduleToStartTimeout} -> Maybe Text
scheduleToStartTimeout) (\s :: ScheduleActivityTaskDecisionAttributes
s@ScheduleActivityTaskDecisionAttributes' {} Maybe Text
a -> ScheduleActivityTaskDecisionAttributes
s {$sel:scheduleToStartTimeout:ScheduleActivityTaskDecisionAttributes' :: Maybe Text
scheduleToStartTimeout = Maybe Text
a} :: ScheduleActivityTaskDecisionAttributes)
scheduleActivityTaskDecisionAttributes_startToCloseTimeout :: Lens.Lens' ScheduleActivityTaskDecisionAttributes (Prelude.Maybe Prelude.Text)
scheduleActivityTaskDecisionAttributes_startToCloseTimeout :: Lens' ScheduleActivityTaskDecisionAttributes (Maybe Text)
scheduleActivityTaskDecisionAttributes_startToCloseTimeout = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduleActivityTaskDecisionAttributes' {Maybe Text
startToCloseTimeout :: Maybe Text
$sel:startToCloseTimeout:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
startToCloseTimeout} -> Maybe Text
startToCloseTimeout) (\s :: ScheduleActivityTaskDecisionAttributes
s@ScheduleActivityTaskDecisionAttributes' {} Maybe Text
a -> ScheduleActivityTaskDecisionAttributes
s {$sel:startToCloseTimeout:ScheduleActivityTaskDecisionAttributes' :: Maybe Text
startToCloseTimeout = Maybe Text
a} :: ScheduleActivityTaskDecisionAttributes)
scheduleActivityTaskDecisionAttributes_taskList :: Lens.Lens' ScheduleActivityTaskDecisionAttributes (Prelude.Maybe TaskList)
scheduleActivityTaskDecisionAttributes_taskList :: Lens' ScheduleActivityTaskDecisionAttributes (Maybe TaskList)
scheduleActivityTaskDecisionAttributes_taskList = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduleActivityTaskDecisionAttributes' {Maybe TaskList
taskList :: Maybe TaskList
$sel:taskList:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe TaskList
taskList} -> Maybe TaskList
taskList) (\s :: ScheduleActivityTaskDecisionAttributes
s@ScheduleActivityTaskDecisionAttributes' {} Maybe TaskList
a -> ScheduleActivityTaskDecisionAttributes
s {$sel:taskList:ScheduleActivityTaskDecisionAttributes' :: Maybe TaskList
taskList = Maybe TaskList
a} :: ScheduleActivityTaskDecisionAttributes)
scheduleActivityTaskDecisionAttributes_taskPriority :: Lens.Lens' ScheduleActivityTaskDecisionAttributes (Prelude.Maybe Prelude.Text)
scheduleActivityTaskDecisionAttributes_taskPriority :: Lens' ScheduleActivityTaskDecisionAttributes (Maybe Text)
scheduleActivityTaskDecisionAttributes_taskPriority = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduleActivityTaskDecisionAttributes' {Maybe Text
taskPriority :: Maybe Text
$sel:taskPriority:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
taskPriority} -> Maybe Text
taskPriority) (\s :: ScheduleActivityTaskDecisionAttributes
s@ScheduleActivityTaskDecisionAttributes' {} Maybe Text
a -> ScheduleActivityTaskDecisionAttributes
s {$sel:taskPriority:ScheduleActivityTaskDecisionAttributes' :: Maybe Text
taskPriority = Maybe Text
a} :: ScheduleActivityTaskDecisionAttributes)
scheduleActivityTaskDecisionAttributes_activityType :: Lens.Lens' ScheduleActivityTaskDecisionAttributes ActivityType
scheduleActivityTaskDecisionAttributes_activityType :: Lens' ScheduleActivityTaskDecisionAttributes ActivityType
scheduleActivityTaskDecisionAttributes_activityType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduleActivityTaskDecisionAttributes' {ActivityType
activityType :: ActivityType
$sel:activityType:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> ActivityType
activityType} -> ActivityType
activityType) (\s :: ScheduleActivityTaskDecisionAttributes
s@ScheduleActivityTaskDecisionAttributes' {} ActivityType
a -> ScheduleActivityTaskDecisionAttributes
s {$sel:activityType:ScheduleActivityTaskDecisionAttributes' :: ActivityType
activityType = ActivityType
a} :: ScheduleActivityTaskDecisionAttributes)
scheduleActivityTaskDecisionAttributes_activityId :: Lens.Lens' ScheduleActivityTaskDecisionAttributes Prelude.Text
scheduleActivityTaskDecisionAttributes_activityId :: Lens' ScheduleActivityTaskDecisionAttributes Text
scheduleActivityTaskDecisionAttributes_activityId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduleActivityTaskDecisionAttributes' {Text
activityId :: Text
$sel:activityId:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Text
activityId} -> Text
activityId) (\s :: ScheduleActivityTaskDecisionAttributes
s@ScheduleActivityTaskDecisionAttributes' {} Text
a -> ScheduleActivityTaskDecisionAttributes
s {$sel:activityId:ScheduleActivityTaskDecisionAttributes' :: Text
activityId = Text
a} :: ScheduleActivityTaskDecisionAttributes)
instance
Prelude.Hashable
ScheduleActivityTaskDecisionAttributes
where
hashWithSalt :: Int -> ScheduleActivityTaskDecisionAttributes -> Int
hashWithSalt
Int
_salt
ScheduleActivityTaskDecisionAttributes' {Maybe Text
Maybe TaskList
Text
ActivityType
activityId :: Text
activityType :: ActivityType
taskPriority :: Maybe Text
taskList :: Maybe TaskList
startToCloseTimeout :: Maybe Text
scheduleToStartTimeout :: Maybe Text
scheduleToCloseTimeout :: Maybe Text
input :: Maybe Text
heartbeatTimeout :: Maybe Text
control :: Maybe Text
$sel:activityId:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Text
$sel:activityType:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> ActivityType
$sel:taskPriority:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
$sel:taskList:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe TaskList
$sel:startToCloseTimeout:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
$sel:scheduleToStartTimeout:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
$sel:scheduleToCloseTimeout:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
$sel:input:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
$sel:heartbeatTimeout:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
$sel:control:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
control
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
heartbeatTimeout
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
input
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
scheduleToCloseTimeout
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
scheduleToStartTimeout
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
startToCloseTimeout
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe TaskList
taskList
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
taskPriority
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` ActivityType
activityType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
activityId
instance
Prelude.NFData
ScheduleActivityTaskDecisionAttributes
where
rnf :: ScheduleActivityTaskDecisionAttributes -> ()
rnf ScheduleActivityTaskDecisionAttributes' {Maybe Text
Maybe TaskList
Text
ActivityType
activityId :: Text
activityType :: ActivityType
taskPriority :: Maybe Text
taskList :: Maybe TaskList
startToCloseTimeout :: Maybe Text
scheduleToStartTimeout :: Maybe Text
scheduleToCloseTimeout :: Maybe Text
input :: Maybe Text
heartbeatTimeout :: Maybe Text
control :: Maybe Text
$sel:activityId:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Text
$sel:activityType:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> ActivityType
$sel:taskPriority:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
$sel:taskList:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe TaskList
$sel:startToCloseTimeout:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
$sel:scheduleToStartTimeout:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
$sel:scheduleToCloseTimeout:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
$sel:input:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
$sel:heartbeatTimeout:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
$sel:control:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
control
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
heartbeatTimeout
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
input
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
scheduleToCloseTimeout
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
scheduleToStartTimeout
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
startToCloseTimeout
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe TaskList
taskList
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
taskPriority
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf ActivityType
activityType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
activityId
instance
Data.ToJSON
ScheduleActivityTaskDecisionAttributes
where
toJSON :: ScheduleActivityTaskDecisionAttributes -> Value
toJSON ScheduleActivityTaskDecisionAttributes' {Maybe Text
Maybe TaskList
Text
ActivityType
activityId :: Text
activityType :: ActivityType
taskPriority :: Maybe Text
taskList :: Maybe TaskList
startToCloseTimeout :: Maybe Text
scheduleToStartTimeout :: Maybe Text
scheduleToCloseTimeout :: Maybe Text
input :: Maybe Text
heartbeatTimeout :: Maybe Text
control :: Maybe Text
$sel:activityId:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Text
$sel:activityType:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> ActivityType
$sel:taskPriority:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
$sel:taskList:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe TaskList
$sel:startToCloseTimeout:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
$sel:scheduleToStartTimeout:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
$sel:scheduleToCloseTimeout:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
$sel:input:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
$sel:heartbeatTimeout:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
$sel:control:ScheduleActivityTaskDecisionAttributes' :: ScheduleActivityTaskDecisionAttributes -> Maybe Text
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"control" 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 Text
control,
(Key
"heartbeatTimeout" 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 Text
heartbeatTimeout,
(Key
"input" 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 Text
input,
(Key
"scheduleToCloseTimeout" 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 Text
scheduleToCloseTimeout,
(Key
"scheduleToStartTimeout" 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 Text
scheduleToStartTimeout,
(Key
"startToCloseTimeout" 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 Text
startToCloseTimeout,
(Key
"taskList" 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 TaskList
taskList,
(Key
"taskPriority" 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 Text
taskPriority,
forall a. a -> Maybe a
Prelude.Just (Key
"activityType" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= ActivityType
activityType),
forall a. a -> Maybe a
Prelude.Just (Key
"activityId" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
activityId)
]
)