{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.StepFunctions.StartSyncExecution
(
StartSyncExecution (..),
newStartSyncExecution,
startSyncExecution_input,
startSyncExecution_name,
startSyncExecution_traceHeader,
startSyncExecution_stateMachineArn,
StartSyncExecutionResponse (..),
newStartSyncExecutionResponse,
startSyncExecutionResponse_billingDetails,
startSyncExecutionResponse_cause,
startSyncExecutionResponse_error,
startSyncExecutionResponse_input,
startSyncExecutionResponse_inputDetails,
startSyncExecutionResponse_name,
startSyncExecutionResponse_output,
startSyncExecutionResponse_outputDetails,
startSyncExecutionResponse_stateMachineArn,
startSyncExecutionResponse_traceHeader,
startSyncExecutionResponse_httpStatus,
startSyncExecutionResponse_executionArn,
startSyncExecutionResponse_startDate,
startSyncExecutionResponse_stopDate,
startSyncExecutionResponse_status,
)
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 qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
import Amazonka.StepFunctions.Types
data StartSyncExecution = StartSyncExecution'
{
StartSyncExecution -> Maybe (Sensitive Text)
input :: Prelude.Maybe (Data.Sensitive Prelude.Text),
StartSyncExecution -> Maybe Text
name :: Prelude.Maybe Prelude.Text,
:: Prelude.Maybe Prelude.Text,
StartSyncExecution -> Text
stateMachineArn :: Prelude.Text
}
deriving (StartSyncExecution -> StartSyncExecution -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: StartSyncExecution -> StartSyncExecution -> Bool
$c/= :: StartSyncExecution -> StartSyncExecution -> Bool
== :: StartSyncExecution -> StartSyncExecution -> Bool
$c== :: StartSyncExecution -> StartSyncExecution -> Bool
Prelude.Eq, Int -> StartSyncExecution -> ShowS
[StartSyncExecution] -> ShowS
StartSyncExecution -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [StartSyncExecution] -> ShowS
$cshowList :: [StartSyncExecution] -> ShowS
show :: StartSyncExecution -> String
$cshow :: StartSyncExecution -> String
showsPrec :: Int -> StartSyncExecution -> ShowS
$cshowsPrec :: Int -> StartSyncExecution -> ShowS
Prelude.Show, forall x. Rep StartSyncExecution x -> StartSyncExecution
forall x. StartSyncExecution -> Rep StartSyncExecution x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep StartSyncExecution x -> StartSyncExecution
$cfrom :: forall x. StartSyncExecution -> Rep StartSyncExecution x
Prelude.Generic)
newStartSyncExecution ::
Prelude.Text ->
StartSyncExecution
newStartSyncExecution :: Text -> StartSyncExecution
newStartSyncExecution Text
pStateMachineArn_ =
StartSyncExecution'
{ $sel:input:StartSyncExecution' :: Maybe (Sensitive Text)
input = forall a. Maybe a
Prelude.Nothing,
$sel:name:StartSyncExecution' :: Maybe Text
name = forall a. Maybe a
Prelude.Nothing,
$sel:traceHeader:StartSyncExecution' :: Maybe Text
traceHeader = forall a. Maybe a
Prelude.Nothing,
$sel:stateMachineArn:StartSyncExecution' :: Text
stateMachineArn = Text
pStateMachineArn_
}
startSyncExecution_input :: Lens.Lens' StartSyncExecution (Prelude.Maybe Prelude.Text)
startSyncExecution_input :: Lens' StartSyncExecution (Maybe Text)
startSyncExecution_input = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecution' {Maybe (Sensitive Text)
input :: Maybe (Sensitive Text)
$sel:input:StartSyncExecution' :: StartSyncExecution -> Maybe (Sensitive Text)
input} -> Maybe (Sensitive Text)
input) (\s :: StartSyncExecution
s@StartSyncExecution' {} Maybe (Sensitive Text)
a -> StartSyncExecution
s {$sel:input:StartSyncExecution' :: Maybe (Sensitive Text)
input = Maybe (Sensitive Text)
a} :: StartSyncExecution) 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 a. Iso' (Sensitive a) a
Data._Sensitive
startSyncExecution_name :: Lens.Lens' StartSyncExecution (Prelude.Maybe Prelude.Text)
startSyncExecution_name :: Lens' StartSyncExecution (Maybe Text)
startSyncExecution_name = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecution' {Maybe Text
name :: Maybe Text
$sel:name:StartSyncExecution' :: StartSyncExecution -> Maybe Text
name} -> Maybe Text
name) (\s :: StartSyncExecution
s@StartSyncExecution' {} Maybe Text
a -> StartSyncExecution
s {$sel:name:StartSyncExecution' :: Maybe Text
name = Maybe Text
a} :: StartSyncExecution)
startSyncExecution_traceHeader :: Lens.Lens' StartSyncExecution (Prelude.Maybe Prelude.Text)
= forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecution' {Maybe Text
traceHeader :: Maybe Text
$sel:traceHeader:StartSyncExecution' :: StartSyncExecution -> Maybe Text
traceHeader} -> Maybe Text
traceHeader) (\s :: StartSyncExecution
s@StartSyncExecution' {} Maybe Text
a -> StartSyncExecution
s {$sel:traceHeader:StartSyncExecution' :: Maybe Text
traceHeader = Maybe Text
a} :: StartSyncExecution)
startSyncExecution_stateMachineArn :: Lens.Lens' StartSyncExecution Prelude.Text
startSyncExecution_stateMachineArn :: Lens' StartSyncExecution Text
startSyncExecution_stateMachineArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecution' {Text
stateMachineArn :: Text
$sel:stateMachineArn:StartSyncExecution' :: StartSyncExecution -> Text
stateMachineArn} -> Text
stateMachineArn) (\s :: StartSyncExecution
s@StartSyncExecution' {} Text
a -> StartSyncExecution
s {$sel:stateMachineArn:StartSyncExecution' :: Text
stateMachineArn = Text
a} :: StartSyncExecution)
instance Core.AWSRequest StartSyncExecution where
type
AWSResponse StartSyncExecution =
StartSyncExecutionResponse
request :: (Service -> Service)
-> StartSyncExecution -> Request StartSyncExecution
request Service -> Service
overrides =
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy StartSyncExecution
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse StartSyncExecution)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe BillingDetails
-> Maybe (Sensitive Text)
-> Maybe (Sensitive Text)
-> Maybe (Sensitive Text)
-> Maybe CloudWatchEventsExecutionDataDetails
-> Maybe Text
-> Maybe (Sensitive Text)
-> Maybe CloudWatchEventsExecutionDataDetails
-> Maybe Text
-> Maybe Text
-> Int
-> Text
-> POSIX
-> POSIX
-> SyncExecutionStatus
-> StartSyncExecutionResponse
StartSyncExecutionResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"billingDetails")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"cause")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"error")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"input")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"inputDetails")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"name")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"output")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"outputDetails")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"stateMachineArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"traceHeader")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"executionArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"startDate")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"stopDate")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"status")
)
instance Prelude.Hashable StartSyncExecution where
hashWithSalt :: Int -> StartSyncExecution -> Int
hashWithSalt Int
_salt StartSyncExecution' {Maybe Text
Maybe (Sensitive Text)
Text
stateMachineArn :: Text
traceHeader :: Maybe Text
name :: Maybe Text
input :: Maybe (Sensitive Text)
$sel:stateMachineArn:StartSyncExecution' :: StartSyncExecution -> Text
$sel:traceHeader:StartSyncExecution' :: StartSyncExecution -> Maybe Text
$sel:name:StartSyncExecution' :: StartSyncExecution -> Maybe Text
$sel:input:StartSyncExecution' :: StartSyncExecution -> Maybe (Sensitive Text)
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (Sensitive Text)
input
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
name
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
traceHeader
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
stateMachineArn
instance Prelude.NFData StartSyncExecution where
rnf :: StartSyncExecution -> ()
rnf StartSyncExecution' {Maybe Text
Maybe (Sensitive Text)
Text
stateMachineArn :: Text
traceHeader :: Maybe Text
name :: Maybe Text
input :: Maybe (Sensitive Text)
$sel:stateMachineArn:StartSyncExecution' :: StartSyncExecution -> Text
$sel:traceHeader:StartSyncExecution' :: StartSyncExecution -> Maybe Text
$sel:name:StartSyncExecution' :: StartSyncExecution -> Maybe Text
$sel:input:StartSyncExecution' :: StartSyncExecution -> Maybe (Sensitive Text)
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe (Sensitive Text)
input
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
name
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
traceHeader
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
stateMachineArn
instance Data.ToHeaders StartSyncExecution where
toHeaders :: StartSyncExecution -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"AWSStepFunctions.StartSyncExecution" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.0" ::
Prelude.ByteString
)
]
)
instance Data.ToJSON StartSyncExecution where
toJSON :: StartSyncExecution -> Value
toJSON StartSyncExecution' {Maybe Text
Maybe (Sensitive Text)
Text
stateMachineArn :: Text
traceHeader :: Maybe Text
name :: Maybe Text
input :: Maybe (Sensitive Text)
$sel:stateMachineArn:StartSyncExecution' :: StartSyncExecution -> Text
$sel:traceHeader:StartSyncExecution' :: StartSyncExecution -> Maybe Text
$sel:name:StartSyncExecution' :: StartSyncExecution -> Maybe Text
$sel:input:StartSyncExecution' :: StartSyncExecution -> Maybe (Sensitive Text)
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (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 (Sensitive Text)
input,
(Key
"name" 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
name,
(Key
"traceHeader" 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
traceHeader,
forall a. a -> Maybe a
Prelude.Just
(Key
"stateMachineArn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
stateMachineArn)
]
)
instance Data.ToPath StartSyncExecution where
toPath :: StartSyncExecution -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery StartSyncExecution where
toQuery :: StartSyncExecution -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data StartSyncExecutionResponse = StartSyncExecutionResponse'
{
StartSyncExecutionResponse -> Maybe BillingDetails
billingDetails :: Prelude.Maybe BillingDetails,
StartSyncExecutionResponse -> Maybe (Sensitive Text)
cause :: Prelude.Maybe (Data.Sensitive Prelude.Text),
StartSyncExecutionResponse -> Maybe (Sensitive Text)
error :: Prelude.Maybe (Data.Sensitive Prelude.Text),
StartSyncExecutionResponse -> Maybe (Sensitive Text)
input :: Prelude.Maybe (Data.Sensitive Prelude.Text),
StartSyncExecutionResponse
-> Maybe CloudWatchEventsExecutionDataDetails
inputDetails :: Prelude.Maybe CloudWatchEventsExecutionDataDetails,
StartSyncExecutionResponse -> Maybe Text
name :: Prelude.Maybe Prelude.Text,
StartSyncExecutionResponse -> Maybe (Sensitive Text)
output :: Prelude.Maybe (Data.Sensitive Prelude.Text),
StartSyncExecutionResponse
-> Maybe CloudWatchEventsExecutionDataDetails
outputDetails :: Prelude.Maybe CloudWatchEventsExecutionDataDetails,
StartSyncExecutionResponse -> Maybe Text
stateMachineArn :: Prelude.Maybe Prelude.Text,
:: Prelude.Maybe Prelude.Text,
StartSyncExecutionResponse -> Int
httpStatus :: Prelude.Int,
StartSyncExecutionResponse -> Text
executionArn :: Prelude.Text,
StartSyncExecutionResponse -> POSIX
startDate :: Data.POSIX,
StartSyncExecutionResponse -> POSIX
stopDate :: Data.POSIX,
StartSyncExecutionResponse -> SyncExecutionStatus
status :: SyncExecutionStatus
}
deriving (StartSyncExecutionResponse -> StartSyncExecutionResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: StartSyncExecutionResponse -> StartSyncExecutionResponse -> Bool
$c/= :: StartSyncExecutionResponse -> StartSyncExecutionResponse -> Bool
== :: StartSyncExecutionResponse -> StartSyncExecutionResponse -> Bool
$c== :: StartSyncExecutionResponse -> StartSyncExecutionResponse -> Bool
Prelude.Eq, Int -> StartSyncExecutionResponse -> ShowS
[StartSyncExecutionResponse] -> ShowS
StartSyncExecutionResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [StartSyncExecutionResponse] -> ShowS
$cshowList :: [StartSyncExecutionResponse] -> ShowS
show :: StartSyncExecutionResponse -> String
$cshow :: StartSyncExecutionResponse -> String
showsPrec :: Int -> StartSyncExecutionResponse -> ShowS
$cshowsPrec :: Int -> StartSyncExecutionResponse -> ShowS
Prelude.Show, forall x.
Rep StartSyncExecutionResponse x -> StartSyncExecutionResponse
forall x.
StartSyncExecutionResponse -> Rep StartSyncExecutionResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep StartSyncExecutionResponse x -> StartSyncExecutionResponse
$cfrom :: forall x.
StartSyncExecutionResponse -> Rep StartSyncExecutionResponse x
Prelude.Generic)
newStartSyncExecutionResponse ::
Prelude.Int ->
Prelude.Text ->
Prelude.UTCTime ->
Prelude.UTCTime ->
SyncExecutionStatus ->
StartSyncExecutionResponse
newStartSyncExecutionResponse :: Int
-> Text
-> UTCTime
-> UTCTime
-> SyncExecutionStatus
-> StartSyncExecutionResponse
newStartSyncExecutionResponse
Int
pHttpStatus_
Text
pExecutionArn_
UTCTime
pStartDate_
UTCTime
pStopDate_
SyncExecutionStatus
pStatus_ =
StartSyncExecutionResponse'
{ $sel:billingDetails:StartSyncExecutionResponse' :: Maybe BillingDetails
billingDetails =
forall a. Maybe a
Prelude.Nothing,
$sel:cause:StartSyncExecutionResponse' :: Maybe (Sensitive Text)
cause = forall a. Maybe a
Prelude.Nothing,
$sel:error:StartSyncExecutionResponse' :: Maybe (Sensitive Text)
error = forall a. Maybe a
Prelude.Nothing,
$sel:input:StartSyncExecutionResponse' :: Maybe (Sensitive Text)
input = forall a. Maybe a
Prelude.Nothing,
$sel:inputDetails:StartSyncExecutionResponse' :: Maybe CloudWatchEventsExecutionDataDetails
inputDetails = forall a. Maybe a
Prelude.Nothing,
$sel:name:StartSyncExecutionResponse' :: Maybe Text
name = forall a. Maybe a
Prelude.Nothing,
$sel:output:StartSyncExecutionResponse' :: Maybe (Sensitive Text)
output = forall a. Maybe a
Prelude.Nothing,
$sel:outputDetails:StartSyncExecutionResponse' :: Maybe CloudWatchEventsExecutionDataDetails
outputDetails = forall a. Maybe a
Prelude.Nothing,
$sel:stateMachineArn:StartSyncExecutionResponse' :: Maybe Text
stateMachineArn = forall a. Maybe a
Prelude.Nothing,
$sel:traceHeader:StartSyncExecutionResponse' :: Maybe Text
traceHeader = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:StartSyncExecutionResponse' :: Int
httpStatus = Int
pHttpStatus_,
$sel:executionArn:StartSyncExecutionResponse' :: Text
executionArn = Text
pExecutionArn_,
$sel:startDate:StartSyncExecutionResponse' :: POSIX
startDate = forall (a :: Format). Iso' (Time a) UTCTime
Data._Time forall t b. AReview t b -> b -> t
Lens.# UTCTime
pStartDate_,
$sel:stopDate:StartSyncExecutionResponse' :: POSIX
stopDate = forall (a :: Format). Iso' (Time a) UTCTime
Data._Time forall t b. AReview t b -> b -> t
Lens.# UTCTime
pStopDate_,
$sel:status:StartSyncExecutionResponse' :: SyncExecutionStatus
status = SyncExecutionStatus
pStatus_
}
startSyncExecutionResponse_billingDetails :: Lens.Lens' StartSyncExecutionResponse (Prelude.Maybe BillingDetails)
startSyncExecutionResponse_billingDetails :: Lens' StartSyncExecutionResponse (Maybe BillingDetails)
startSyncExecutionResponse_billingDetails = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecutionResponse' {Maybe BillingDetails
billingDetails :: Maybe BillingDetails
$sel:billingDetails:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Maybe BillingDetails
billingDetails} -> Maybe BillingDetails
billingDetails) (\s :: StartSyncExecutionResponse
s@StartSyncExecutionResponse' {} Maybe BillingDetails
a -> StartSyncExecutionResponse
s {$sel:billingDetails:StartSyncExecutionResponse' :: Maybe BillingDetails
billingDetails = Maybe BillingDetails
a} :: StartSyncExecutionResponse)
startSyncExecutionResponse_cause :: Lens.Lens' StartSyncExecutionResponse (Prelude.Maybe Prelude.Text)
startSyncExecutionResponse_cause :: Lens' StartSyncExecutionResponse (Maybe Text)
startSyncExecutionResponse_cause = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecutionResponse' {Maybe (Sensitive Text)
cause :: Maybe (Sensitive Text)
$sel:cause:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Maybe (Sensitive Text)
cause} -> Maybe (Sensitive Text)
cause) (\s :: StartSyncExecutionResponse
s@StartSyncExecutionResponse' {} Maybe (Sensitive Text)
a -> StartSyncExecutionResponse
s {$sel:cause:StartSyncExecutionResponse' :: Maybe (Sensitive Text)
cause = Maybe (Sensitive Text)
a} :: StartSyncExecutionResponse) 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 a. Iso' (Sensitive a) a
Data._Sensitive
startSyncExecutionResponse_error :: Lens.Lens' StartSyncExecutionResponse (Prelude.Maybe Prelude.Text)
startSyncExecutionResponse_error :: Lens' StartSyncExecutionResponse (Maybe Text)
startSyncExecutionResponse_error = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecutionResponse' {Maybe (Sensitive Text)
error :: Maybe (Sensitive Text)
$sel:error:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Maybe (Sensitive Text)
error} -> Maybe (Sensitive Text)
error) (\s :: StartSyncExecutionResponse
s@StartSyncExecutionResponse' {} Maybe (Sensitive Text)
a -> StartSyncExecutionResponse
s {$sel:error:StartSyncExecutionResponse' :: Maybe (Sensitive Text)
error = Maybe (Sensitive Text)
a} :: StartSyncExecutionResponse) 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 a. Iso' (Sensitive a) a
Data._Sensitive
startSyncExecutionResponse_input :: Lens.Lens' StartSyncExecutionResponse (Prelude.Maybe Prelude.Text)
startSyncExecutionResponse_input :: Lens' StartSyncExecutionResponse (Maybe Text)
startSyncExecutionResponse_input = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecutionResponse' {Maybe (Sensitive Text)
input :: Maybe (Sensitive Text)
$sel:input:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Maybe (Sensitive Text)
input} -> Maybe (Sensitive Text)
input) (\s :: StartSyncExecutionResponse
s@StartSyncExecutionResponse' {} Maybe (Sensitive Text)
a -> StartSyncExecutionResponse
s {$sel:input:StartSyncExecutionResponse' :: Maybe (Sensitive Text)
input = Maybe (Sensitive Text)
a} :: StartSyncExecutionResponse) 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 a. Iso' (Sensitive a) a
Data._Sensitive
startSyncExecutionResponse_inputDetails :: Lens.Lens' StartSyncExecutionResponse (Prelude.Maybe CloudWatchEventsExecutionDataDetails)
startSyncExecutionResponse_inputDetails :: Lens'
StartSyncExecutionResponse
(Maybe CloudWatchEventsExecutionDataDetails)
startSyncExecutionResponse_inputDetails = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecutionResponse' {Maybe CloudWatchEventsExecutionDataDetails
inputDetails :: Maybe CloudWatchEventsExecutionDataDetails
$sel:inputDetails:StartSyncExecutionResponse' :: StartSyncExecutionResponse
-> Maybe CloudWatchEventsExecutionDataDetails
inputDetails} -> Maybe CloudWatchEventsExecutionDataDetails
inputDetails) (\s :: StartSyncExecutionResponse
s@StartSyncExecutionResponse' {} Maybe CloudWatchEventsExecutionDataDetails
a -> StartSyncExecutionResponse
s {$sel:inputDetails:StartSyncExecutionResponse' :: Maybe CloudWatchEventsExecutionDataDetails
inputDetails = Maybe CloudWatchEventsExecutionDataDetails
a} :: StartSyncExecutionResponse)
startSyncExecutionResponse_name :: Lens.Lens' StartSyncExecutionResponse (Prelude.Maybe Prelude.Text)
startSyncExecutionResponse_name :: Lens' StartSyncExecutionResponse (Maybe Text)
startSyncExecutionResponse_name = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecutionResponse' {Maybe Text
name :: Maybe Text
$sel:name:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Maybe Text
name} -> Maybe Text
name) (\s :: StartSyncExecutionResponse
s@StartSyncExecutionResponse' {} Maybe Text
a -> StartSyncExecutionResponse
s {$sel:name:StartSyncExecutionResponse' :: Maybe Text
name = Maybe Text
a} :: StartSyncExecutionResponse)
startSyncExecutionResponse_output :: Lens.Lens' StartSyncExecutionResponse (Prelude.Maybe Prelude.Text)
startSyncExecutionResponse_output :: Lens' StartSyncExecutionResponse (Maybe Text)
startSyncExecutionResponse_output = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecutionResponse' {Maybe (Sensitive Text)
output :: Maybe (Sensitive Text)
$sel:output:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Maybe (Sensitive Text)
output} -> Maybe (Sensitive Text)
output) (\s :: StartSyncExecutionResponse
s@StartSyncExecutionResponse' {} Maybe (Sensitive Text)
a -> StartSyncExecutionResponse
s {$sel:output:StartSyncExecutionResponse' :: Maybe (Sensitive Text)
output = Maybe (Sensitive Text)
a} :: StartSyncExecutionResponse) 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 a. Iso' (Sensitive a) a
Data._Sensitive
startSyncExecutionResponse_outputDetails :: Lens.Lens' StartSyncExecutionResponse (Prelude.Maybe CloudWatchEventsExecutionDataDetails)
startSyncExecutionResponse_outputDetails :: Lens'
StartSyncExecutionResponse
(Maybe CloudWatchEventsExecutionDataDetails)
startSyncExecutionResponse_outputDetails = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecutionResponse' {Maybe CloudWatchEventsExecutionDataDetails
outputDetails :: Maybe CloudWatchEventsExecutionDataDetails
$sel:outputDetails:StartSyncExecutionResponse' :: StartSyncExecutionResponse
-> Maybe CloudWatchEventsExecutionDataDetails
outputDetails} -> Maybe CloudWatchEventsExecutionDataDetails
outputDetails) (\s :: StartSyncExecutionResponse
s@StartSyncExecutionResponse' {} Maybe CloudWatchEventsExecutionDataDetails
a -> StartSyncExecutionResponse
s {$sel:outputDetails:StartSyncExecutionResponse' :: Maybe CloudWatchEventsExecutionDataDetails
outputDetails = Maybe CloudWatchEventsExecutionDataDetails
a} :: StartSyncExecutionResponse)
startSyncExecutionResponse_stateMachineArn :: Lens.Lens' StartSyncExecutionResponse (Prelude.Maybe Prelude.Text)
startSyncExecutionResponse_stateMachineArn :: Lens' StartSyncExecutionResponse (Maybe Text)
startSyncExecutionResponse_stateMachineArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecutionResponse' {Maybe Text
stateMachineArn :: Maybe Text
$sel:stateMachineArn:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Maybe Text
stateMachineArn} -> Maybe Text
stateMachineArn) (\s :: StartSyncExecutionResponse
s@StartSyncExecutionResponse' {} Maybe Text
a -> StartSyncExecutionResponse
s {$sel:stateMachineArn:StartSyncExecutionResponse' :: Maybe Text
stateMachineArn = Maybe Text
a} :: StartSyncExecutionResponse)
startSyncExecutionResponse_traceHeader :: Lens.Lens' StartSyncExecutionResponse (Prelude.Maybe Prelude.Text)
= forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecutionResponse' {Maybe Text
traceHeader :: Maybe Text
$sel:traceHeader:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Maybe Text
traceHeader} -> Maybe Text
traceHeader) (\s :: StartSyncExecutionResponse
s@StartSyncExecutionResponse' {} Maybe Text
a -> StartSyncExecutionResponse
s {$sel:traceHeader:StartSyncExecutionResponse' :: Maybe Text
traceHeader = Maybe Text
a} :: StartSyncExecutionResponse)
startSyncExecutionResponse_httpStatus :: Lens.Lens' StartSyncExecutionResponse Prelude.Int
startSyncExecutionResponse_httpStatus :: Lens' StartSyncExecutionResponse Int
startSyncExecutionResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecutionResponse' {Int
httpStatus :: Int
$sel:httpStatus:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: StartSyncExecutionResponse
s@StartSyncExecutionResponse' {} Int
a -> StartSyncExecutionResponse
s {$sel:httpStatus:StartSyncExecutionResponse' :: Int
httpStatus = Int
a} :: StartSyncExecutionResponse)
startSyncExecutionResponse_executionArn :: Lens.Lens' StartSyncExecutionResponse Prelude.Text
startSyncExecutionResponse_executionArn :: Lens' StartSyncExecutionResponse Text
startSyncExecutionResponse_executionArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecutionResponse' {Text
executionArn :: Text
$sel:executionArn:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Text
executionArn} -> Text
executionArn) (\s :: StartSyncExecutionResponse
s@StartSyncExecutionResponse' {} Text
a -> StartSyncExecutionResponse
s {$sel:executionArn:StartSyncExecutionResponse' :: Text
executionArn = Text
a} :: StartSyncExecutionResponse)
startSyncExecutionResponse_startDate :: Lens.Lens' StartSyncExecutionResponse Prelude.UTCTime
startSyncExecutionResponse_startDate :: Lens' StartSyncExecutionResponse UTCTime
startSyncExecutionResponse_startDate = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecutionResponse' {POSIX
startDate :: POSIX
$sel:startDate:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> POSIX
startDate} -> POSIX
startDate) (\s :: StartSyncExecutionResponse
s@StartSyncExecutionResponse' {} POSIX
a -> StartSyncExecutionResponse
s {$sel:startDate:StartSyncExecutionResponse' :: POSIX
startDate = POSIX
a} :: StartSyncExecutionResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
startSyncExecutionResponse_stopDate :: Lens.Lens' StartSyncExecutionResponse Prelude.UTCTime
startSyncExecutionResponse_stopDate :: Lens' StartSyncExecutionResponse UTCTime
startSyncExecutionResponse_stopDate = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecutionResponse' {POSIX
stopDate :: POSIX
$sel:stopDate:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> POSIX
stopDate} -> POSIX
stopDate) (\s :: StartSyncExecutionResponse
s@StartSyncExecutionResponse' {} POSIX
a -> StartSyncExecutionResponse
s {$sel:stopDate:StartSyncExecutionResponse' :: POSIX
stopDate = POSIX
a} :: StartSyncExecutionResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
startSyncExecutionResponse_status :: Lens.Lens' StartSyncExecutionResponse SyncExecutionStatus
startSyncExecutionResponse_status :: Lens' StartSyncExecutionResponse SyncExecutionStatus
startSyncExecutionResponse_status = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartSyncExecutionResponse' {SyncExecutionStatus
status :: SyncExecutionStatus
$sel:status:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> SyncExecutionStatus
status} -> SyncExecutionStatus
status) (\s :: StartSyncExecutionResponse
s@StartSyncExecutionResponse' {} SyncExecutionStatus
a -> StartSyncExecutionResponse
s {$sel:status:StartSyncExecutionResponse' :: SyncExecutionStatus
status = SyncExecutionStatus
a} :: StartSyncExecutionResponse)
instance Prelude.NFData StartSyncExecutionResponse where
rnf :: StartSyncExecutionResponse -> ()
rnf StartSyncExecutionResponse' {Int
Maybe Text
Maybe (Sensitive Text)
Maybe BillingDetails
Maybe CloudWatchEventsExecutionDataDetails
Text
POSIX
SyncExecutionStatus
status :: SyncExecutionStatus
stopDate :: POSIX
startDate :: POSIX
executionArn :: Text
httpStatus :: Int
traceHeader :: Maybe Text
stateMachineArn :: Maybe Text
outputDetails :: Maybe CloudWatchEventsExecutionDataDetails
output :: Maybe (Sensitive Text)
name :: Maybe Text
inputDetails :: Maybe CloudWatchEventsExecutionDataDetails
input :: Maybe (Sensitive Text)
error :: Maybe (Sensitive Text)
cause :: Maybe (Sensitive Text)
billingDetails :: Maybe BillingDetails
$sel:status:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> SyncExecutionStatus
$sel:stopDate:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> POSIX
$sel:startDate:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> POSIX
$sel:executionArn:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Text
$sel:httpStatus:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Int
$sel:traceHeader:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Maybe Text
$sel:stateMachineArn:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Maybe Text
$sel:outputDetails:StartSyncExecutionResponse' :: StartSyncExecutionResponse
-> Maybe CloudWatchEventsExecutionDataDetails
$sel:output:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Maybe (Sensitive Text)
$sel:name:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Maybe Text
$sel:inputDetails:StartSyncExecutionResponse' :: StartSyncExecutionResponse
-> Maybe CloudWatchEventsExecutionDataDetails
$sel:input:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Maybe (Sensitive Text)
$sel:error:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Maybe (Sensitive Text)
$sel:cause:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Maybe (Sensitive Text)
$sel:billingDetails:StartSyncExecutionResponse' :: StartSyncExecutionResponse -> Maybe BillingDetails
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe BillingDetails
billingDetails
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (Sensitive Text)
cause
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (Sensitive Text)
error
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (Sensitive Text)
input
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe CloudWatchEventsExecutionDataDetails
inputDetails
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
name
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (Sensitive Text)
output
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe CloudWatchEventsExecutionDataDetails
outputDetails
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
stateMachineArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
traceHeader
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
executionArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf POSIX
startDate
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf POSIX
stopDate
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf SyncExecutionStatus
status