{-# 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.CustomerProfiles.GetWorkflowSteps
(
GetWorkflowSteps (..),
newGetWorkflowSteps,
getWorkflowSteps_maxResults,
getWorkflowSteps_nextToken,
getWorkflowSteps_domainName,
getWorkflowSteps_workflowId,
GetWorkflowStepsResponse (..),
newGetWorkflowStepsResponse,
getWorkflowStepsResponse_items,
getWorkflowStepsResponse_nextToken,
getWorkflowStepsResponse_workflowId,
getWorkflowStepsResponse_workflowType,
getWorkflowStepsResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import Amazonka.CustomerProfiles.Types
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data GetWorkflowSteps = GetWorkflowSteps'
{
GetWorkflowSteps -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
GetWorkflowSteps -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
GetWorkflowSteps -> Text
domainName :: Prelude.Text,
GetWorkflowSteps -> Text
workflowId :: Prelude.Text
}
deriving (GetWorkflowSteps -> GetWorkflowSteps -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetWorkflowSteps -> GetWorkflowSteps -> Bool
$c/= :: GetWorkflowSteps -> GetWorkflowSteps -> Bool
== :: GetWorkflowSteps -> GetWorkflowSteps -> Bool
$c== :: GetWorkflowSteps -> GetWorkflowSteps -> Bool
Prelude.Eq, ReadPrec [GetWorkflowSteps]
ReadPrec GetWorkflowSteps
Int -> ReadS GetWorkflowSteps
ReadS [GetWorkflowSteps]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetWorkflowSteps]
$creadListPrec :: ReadPrec [GetWorkflowSteps]
readPrec :: ReadPrec GetWorkflowSteps
$creadPrec :: ReadPrec GetWorkflowSteps
readList :: ReadS [GetWorkflowSteps]
$creadList :: ReadS [GetWorkflowSteps]
readsPrec :: Int -> ReadS GetWorkflowSteps
$creadsPrec :: Int -> ReadS GetWorkflowSteps
Prelude.Read, Int -> GetWorkflowSteps -> ShowS
[GetWorkflowSteps] -> ShowS
GetWorkflowSteps -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetWorkflowSteps] -> ShowS
$cshowList :: [GetWorkflowSteps] -> ShowS
show :: GetWorkflowSteps -> String
$cshow :: GetWorkflowSteps -> String
showsPrec :: Int -> GetWorkflowSteps -> ShowS
$cshowsPrec :: Int -> GetWorkflowSteps -> ShowS
Prelude.Show, forall x. Rep GetWorkflowSteps x -> GetWorkflowSteps
forall x. GetWorkflowSteps -> Rep GetWorkflowSteps x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep GetWorkflowSteps x -> GetWorkflowSteps
$cfrom :: forall x. GetWorkflowSteps -> Rep GetWorkflowSteps x
Prelude.Generic)
newGetWorkflowSteps ::
Prelude.Text ->
Prelude.Text ->
GetWorkflowSteps
newGetWorkflowSteps :: Text -> Text -> GetWorkflowSteps
newGetWorkflowSteps Text
pDomainName_ Text
pWorkflowId_ =
GetWorkflowSteps'
{ $sel:maxResults:GetWorkflowSteps' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:GetWorkflowSteps' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:domainName:GetWorkflowSteps' :: Text
domainName = Text
pDomainName_,
$sel:workflowId:GetWorkflowSteps' :: Text
workflowId = Text
pWorkflowId_
}
getWorkflowSteps_maxResults :: Lens.Lens' GetWorkflowSteps (Prelude.Maybe Prelude.Natural)
getWorkflowSteps_maxResults :: Lens' GetWorkflowSteps (Maybe Natural)
getWorkflowSteps_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWorkflowSteps' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:GetWorkflowSteps' :: GetWorkflowSteps -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: GetWorkflowSteps
s@GetWorkflowSteps' {} Maybe Natural
a -> GetWorkflowSteps
s {$sel:maxResults:GetWorkflowSteps' :: Maybe Natural
maxResults = Maybe Natural
a} :: GetWorkflowSteps)
getWorkflowSteps_nextToken :: Lens.Lens' GetWorkflowSteps (Prelude.Maybe Prelude.Text)
getWorkflowSteps_nextToken :: Lens' GetWorkflowSteps (Maybe Text)
getWorkflowSteps_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWorkflowSteps' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:GetWorkflowSteps' :: GetWorkflowSteps -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: GetWorkflowSteps
s@GetWorkflowSteps' {} Maybe Text
a -> GetWorkflowSteps
s {$sel:nextToken:GetWorkflowSteps' :: Maybe Text
nextToken = Maybe Text
a} :: GetWorkflowSteps)
getWorkflowSteps_domainName :: Lens.Lens' GetWorkflowSteps Prelude.Text
getWorkflowSteps_domainName :: Lens' GetWorkflowSteps Text
getWorkflowSteps_domainName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWorkflowSteps' {Text
domainName :: Text
$sel:domainName:GetWorkflowSteps' :: GetWorkflowSteps -> Text
domainName} -> Text
domainName) (\s :: GetWorkflowSteps
s@GetWorkflowSteps' {} Text
a -> GetWorkflowSteps
s {$sel:domainName:GetWorkflowSteps' :: Text
domainName = Text
a} :: GetWorkflowSteps)
getWorkflowSteps_workflowId :: Lens.Lens' GetWorkflowSteps Prelude.Text
getWorkflowSteps_workflowId :: Lens' GetWorkflowSteps Text
getWorkflowSteps_workflowId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWorkflowSteps' {Text
workflowId :: Text
$sel:workflowId:GetWorkflowSteps' :: GetWorkflowSteps -> Text
workflowId} -> Text
workflowId) (\s :: GetWorkflowSteps
s@GetWorkflowSteps' {} Text
a -> GetWorkflowSteps
s {$sel:workflowId:GetWorkflowSteps' :: Text
workflowId = Text
a} :: GetWorkflowSteps)
instance Core.AWSRequest GetWorkflowSteps where
type
AWSResponse GetWorkflowSteps =
GetWorkflowStepsResponse
request :: (Service -> Service)
-> GetWorkflowSteps -> Request GetWorkflowSteps
request Service -> Service
overrides =
forall a. ToRequest a => Service -> a -> Request a
Request.get (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy GetWorkflowSteps
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse GetWorkflowSteps)))
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 [WorkflowStepItem]
-> Maybe Text
-> Maybe Text
-> Maybe WorkflowType
-> Int
-> GetWorkflowStepsResponse
GetWorkflowStepsResponse'
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
"Items" forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ 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 -> Either String (Maybe a)
Data..?> Key
"NextToken")
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
"WorkflowId")
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
"WorkflowType")
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))
)
instance Prelude.Hashable GetWorkflowSteps where
hashWithSalt :: Int -> GetWorkflowSteps -> Int
hashWithSalt Int
_salt GetWorkflowSteps' {Maybe Natural
Maybe Text
Text
workflowId :: Text
domainName :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:workflowId:GetWorkflowSteps' :: GetWorkflowSteps -> Text
$sel:domainName:GetWorkflowSteps' :: GetWorkflowSteps -> Text
$sel:nextToken:GetWorkflowSteps' :: GetWorkflowSteps -> Maybe Text
$sel:maxResults:GetWorkflowSteps' :: GetWorkflowSteps -> Maybe Natural
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxResults
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
domainName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
workflowId
instance Prelude.NFData GetWorkflowSteps where
rnf :: GetWorkflowSteps -> ()
rnf GetWorkflowSteps' {Maybe Natural
Maybe Text
Text
workflowId :: Text
domainName :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:workflowId:GetWorkflowSteps' :: GetWorkflowSteps -> Text
$sel:domainName:GetWorkflowSteps' :: GetWorkflowSteps -> Text
$sel:nextToken:GetWorkflowSteps' :: GetWorkflowSteps -> Maybe Text
$sel:maxResults:GetWorkflowSteps' :: GetWorkflowSteps -> Maybe Natural
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
maxResults
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
domainName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
workflowId
instance Data.ToHeaders GetWorkflowSteps where
toHeaders :: GetWorkflowSteps -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToPath GetWorkflowSteps where
toPath :: GetWorkflowSteps -> ByteString
toPath GetWorkflowSteps' {Maybe Natural
Maybe Text
Text
workflowId :: Text
domainName :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:workflowId:GetWorkflowSteps' :: GetWorkflowSteps -> Text
$sel:domainName:GetWorkflowSteps' :: GetWorkflowSteps -> Text
$sel:nextToken:GetWorkflowSteps' :: GetWorkflowSteps -> Maybe Text
$sel:maxResults:GetWorkflowSteps' :: GetWorkflowSteps -> Maybe Natural
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"/domains/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
domainName,
ByteString
"/workflows/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
workflowId,
ByteString
"/steps"
]
instance Data.ToQuery GetWorkflowSteps where
toQuery :: GetWorkflowSteps -> QueryString
toQuery GetWorkflowSteps' {Maybe Natural
Maybe Text
Text
workflowId :: Text
domainName :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:workflowId:GetWorkflowSteps' :: GetWorkflowSteps -> Text
$sel:domainName:GetWorkflowSteps' :: GetWorkflowSteps -> Text
$sel:nextToken:GetWorkflowSteps' :: GetWorkflowSteps -> Maybe Text
$sel:maxResults:GetWorkflowSteps' :: GetWorkflowSteps -> Maybe Natural
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"max-results" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Natural
maxResults,
ByteString
"next-token" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
nextToken
]
data GetWorkflowStepsResponse = GetWorkflowStepsResponse'
{
GetWorkflowStepsResponse -> Maybe [WorkflowStepItem]
items :: Prelude.Maybe [WorkflowStepItem],
GetWorkflowStepsResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
GetWorkflowStepsResponse -> Maybe Text
workflowId :: Prelude.Maybe Prelude.Text,
GetWorkflowStepsResponse -> Maybe WorkflowType
workflowType :: Prelude.Maybe WorkflowType,
GetWorkflowStepsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (GetWorkflowStepsResponse -> GetWorkflowStepsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetWorkflowStepsResponse -> GetWorkflowStepsResponse -> Bool
$c/= :: GetWorkflowStepsResponse -> GetWorkflowStepsResponse -> Bool
== :: GetWorkflowStepsResponse -> GetWorkflowStepsResponse -> Bool
$c== :: GetWorkflowStepsResponse -> GetWorkflowStepsResponse -> Bool
Prelude.Eq, ReadPrec [GetWorkflowStepsResponse]
ReadPrec GetWorkflowStepsResponse
Int -> ReadS GetWorkflowStepsResponse
ReadS [GetWorkflowStepsResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetWorkflowStepsResponse]
$creadListPrec :: ReadPrec [GetWorkflowStepsResponse]
readPrec :: ReadPrec GetWorkflowStepsResponse
$creadPrec :: ReadPrec GetWorkflowStepsResponse
readList :: ReadS [GetWorkflowStepsResponse]
$creadList :: ReadS [GetWorkflowStepsResponse]
readsPrec :: Int -> ReadS GetWorkflowStepsResponse
$creadsPrec :: Int -> ReadS GetWorkflowStepsResponse
Prelude.Read, Int -> GetWorkflowStepsResponse -> ShowS
[GetWorkflowStepsResponse] -> ShowS
GetWorkflowStepsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetWorkflowStepsResponse] -> ShowS
$cshowList :: [GetWorkflowStepsResponse] -> ShowS
show :: GetWorkflowStepsResponse -> String
$cshow :: GetWorkflowStepsResponse -> String
showsPrec :: Int -> GetWorkflowStepsResponse -> ShowS
$cshowsPrec :: Int -> GetWorkflowStepsResponse -> ShowS
Prelude.Show, forall x.
Rep GetWorkflowStepsResponse x -> GetWorkflowStepsResponse
forall x.
GetWorkflowStepsResponse -> Rep GetWorkflowStepsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetWorkflowStepsResponse x -> GetWorkflowStepsResponse
$cfrom :: forall x.
GetWorkflowStepsResponse -> Rep GetWorkflowStepsResponse x
Prelude.Generic)
newGetWorkflowStepsResponse ::
Prelude.Int ->
GetWorkflowStepsResponse
newGetWorkflowStepsResponse :: Int -> GetWorkflowStepsResponse
newGetWorkflowStepsResponse Int
pHttpStatus_ =
GetWorkflowStepsResponse'
{ $sel:items:GetWorkflowStepsResponse' :: Maybe [WorkflowStepItem]
items = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:GetWorkflowStepsResponse' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:workflowId:GetWorkflowStepsResponse' :: Maybe Text
workflowId = forall a. Maybe a
Prelude.Nothing,
$sel:workflowType:GetWorkflowStepsResponse' :: Maybe WorkflowType
workflowType = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:GetWorkflowStepsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
getWorkflowStepsResponse_items :: Lens.Lens' GetWorkflowStepsResponse (Prelude.Maybe [WorkflowStepItem])
getWorkflowStepsResponse_items :: Lens' GetWorkflowStepsResponse (Maybe [WorkflowStepItem])
getWorkflowStepsResponse_items = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWorkflowStepsResponse' {Maybe [WorkflowStepItem]
items :: Maybe [WorkflowStepItem]
$sel:items:GetWorkflowStepsResponse' :: GetWorkflowStepsResponse -> Maybe [WorkflowStepItem]
items} -> Maybe [WorkflowStepItem]
items) (\s :: GetWorkflowStepsResponse
s@GetWorkflowStepsResponse' {} Maybe [WorkflowStepItem]
a -> GetWorkflowStepsResponse
s {$sel:items:GetWorkflowStepsResponse' :: Maybe [WorkflowStepItem]
items = Maybe [WorkflowStepItem]
a} :: GetWorkflowStepsResponse) 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
getWorkflowStepsResponse_nextToken :: Lens.Lens' GetWorkflowStepsResponse (Prelude.Maybe Prelude.Text)
getWorkflowStepsResponse_nextToken :: Lens' GetWorkflowStepsResponse (Maybe Text)
getWorkflowStepsResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWorkflowStepsResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:GetWorkflowStepsResponse' :: GetWorkflowStepsResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: GetWorkflowStepsResponse
s@GetWorkflowStepsResponse' {} Maybe Text
a -> GetWorkflowStepsResponse
s {$sel:nextToken:GetWorkflowStepsResponse' :: Maybe Text
nextToken = Maybe Text
a} :: GetWorkflowStepsResponse)
getWorkflowStepsResponse_workflowId :: Lens.Lens' GetWorkflowStepsResponse (Prelude.Maybe Prelude.Text)
getWorkflowStepsResponse_workflowId :: Lens' GetWorkflowStepsResponse (Maybe Text)
getWorkflowStepsResponse_workflowId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWorkflowStepsResponse' {Maybe Text
workflowId :: Maybe Text
$sel:workflowId:GetWorkflowStepsResponse' :: GetWorkflowStepsResponse -> Maybe Text
workflowId} -> Maybe Text
workflowId) (\s :: GetWorkflowStepsResponse
s@GetWorkflowStepsResponse' {} Maybe Text
a -> GetWorkflowStepsResponse
s {$sel:workflowId:GetWorkflowStepsResponse' :: Maybe Text
workflowId = Maybe Text
a} :: GetWorkflowStepsResponse)
getWorkflowStepsResponse_workflowType :: Lens.Lens' GetWorkflowStepsResponse (Prelude.Maybe WorkflowType)
getWorkflowStepsResponse_workflowType :: Lens' GetWorkflowStepsResponse (Maybe WorkflowType)
getWorkflowStepsResponse_workflowType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWorkflowStepsResponse' {Maybe WorkflowType
workflowType :: Maybe WorkflowType
$sel:workflowType:GetWorkflowStepsResponse' :: GetWorkflowStepsResponse -> Maybe WorkflowType
workflowType} -> Maybe WorkflowType
workflowType) (\s :: GetWorkflowStepsResponse
s@GetWorkflowStepsResponse' {} Maybe WorkflowType
a -> GetWorkflowStepsResponse
s {$sel:workflowType:GetWorkflowStepsResponse' :: Maybe WorkflowType
workflowType = Maybe WorkflowType
a} :: GetWorkflowStepsResponse)
getWorkflowStepsResponse_httpStatus :: Lens.Lens' GetWorkflowStepsResponse Prelude.Int
getWorkflowStepsResponse_httpStatus :: Lens' GetWorkflowStepsResponse Int
getWorkflowStepsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWorkflowStepsResponse' {Int
httpStatus :: Int
$sel:httpStatus:GetWorkflowStepsResponse' :: GetWorkflowStepsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: GetWorkflowStepsResponse
s@GetWorkflowStepsResponse' {} Int
a -> GetWorkflowStepsResponse
s {$sel:httpStatus:GetWorkflowStepsResponse' :: Int
httpStatus = Int
a} :: GetWorkflowStepsResponse)
instance Prelude.NFData GetWorkflowStepsResponse where
rnf :: GetWorkflowStepsResponse -> ()
rnf GetWorkflowStepsResponse' {Int
Maybe [WorkflowStepItem]
Maybe Text
Maybe WorkflowType
httpStatus :: Int
workflowType :: Maybe WorkflowType
workflowId :: Maybe Text
nextToken :: Maybe Text
items :: Maybe [WorkflowStepItem]
$sel:httpStatus:GetWorkflowStepsResponse' :: GetWorkflowStepsResponse -> Int
$sel:workflowType:GetWorkflowStepsResponse' :: GetWorkflowStepsResponse -> Maybe WorkflowType
$sel:workflowId:GetWorkflowStepsResponse' :: GetWorkflowStepsResponse -> Maybe Text
$sel:nextToken:GetWorkflowStepsResponse' :: GetWorkflowStepsResponse -> Maybe Text
$sel:items:GetWorkflowStepsResponse' :: GetWorkflowStepsResponse -> Maybe [WorkflowStepItem]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [WorkflowStepItem]
items
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
workflowId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe WorkflowType
workflowType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus