{-# 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.ResilienceHub.DescribeAppVersionResourcesResolutionStatus
(
DescribeAppVersionResourcesResolutionStatus (..),
newDescribeAppVersionResourcesResolutionStatus,
describeAppVersionResourcesResolutionStatus_resolutionId,
describeAppVersionResourcesResolutionStatus_appArn,
describeAppVersionResourcesResolutionStatus_appVersion,
DescribeAppVersionResourcesResolutionStatusResponse (..),
newDescribeAppVersionResourcesResolutionStatusResponse,
describeAppVersionResourcesResolutionStatusResponse_errorMessage,
describeAppVersionResourcesResolutionStatusResponse_httpStatus,
describeAppVersionResourcesResolutionStatusResponse_appArn,
describeAppVersionResourcesResolutionStatusResponse_appVersion,
describeAppVersionResourcesResolutionStatusResponse_resolutionId,
describeAppVersionResourcesResolutionStatusResponse_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 Amazonka.ResilienceHub.Types
import qualified Amazonka.Response as Response
data DescribeAppVersionResourcesResolutionStatus = DescribeAppVersionResourcesResolutionStatus'
{
DescribeAppVersionResourcesResolutionStatus -> Maybe Text
resolutionId :: Prelude.Maybe Prelude.Text,
DescribeAppVersionResourcesResolutionStatus -> Text
appArn :: Prelude.Text,
DescribeAppVersionResourcesResolutionStatus -> Text
appVersion :: Prelude.Text
}
deriving (DescribeAppVersionResourcesResolutionStatus
-> DescribeAppVersionResourcesResolutionStatus -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeAppVersionResourcesResolutionStatus
-> DescribeAppVersionResourcesResolutionStatus -> Bool
$c/= :: DescribeAppVersionResourcesResolutionStatus
-> DescribeAppVersionResourcesResolutionStatus -> Bool
== :: DescribeAppVersionResourcesResolutionStatus
-> DescribeAppVersionResourcesResolutionStatus -> Bool
$c== :: DescribeAppVersionResourcesResolutionStatus
-> DescribeAppVersionResourcesResolutionStatus -> Bool
Prelude.Eq, ReadPrec [DescribeAppVersionResourcesResolutionStatus]
ReadPrec DescribeAppVersionResourcesResolutionStatus
Int -> ReadS DescribeAppVersionResourcesResolutionStatus
ReadS [DescribeAppVersionResourcesResolutionStatus]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeAppVersionResourcesResolutionStatus]
$creadListPrec :: ReadPrec [DescribeAppVersionResourcesResolutionStatus]
readPrec :: ReadPrec DescribeAppVersionResourcesResolutionStatus
$creadPrec :: ReadPrec DescribeAppVersionResourcesResolutionStatus
readList :: ReadS [DescribeAppVersionResourcesResolutionStatus]
$creadList :: ReadS [DescribeAppVersionResourcesResolutionStatus]
readsPrec :: Int -> ReadS DescribeAppVersionResourcesResolutionStatus
$creadsPrec :: Int -> ReadS DescribeAppVersionResourcesResolutionStatus
Prelude.Read, Int -> DescribeAppVersionResourcesResolutionStatus -> ShowS
[DescribeAppVersionResourcesResolutionStatus] -> ShowS
DescribeAppVersionResourcesResolutionStatus -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeAppVersionResourcesResolutionStatus] -> ShowS
$cshowList :: [DescribeAppVersionResourcesResolutionStatus] -> ShowS
show :: DescribeAppVersionResourcesResolutionStatus -> String
$cshow :: DescribeAppVersionResourcesResolutionStatus -> String
showsPrec :: Int -> DescribeAppVersionResourcesResolutionStatus -> ShowS
$cshowsPrec :: Int -> DescribeAppVersionResourcesResolutionStatus -> ShowS
Prelude.Show, forall x.
Rep DescribeAppVersionResourcesResolutionStatus x
-> DescribeAppVersionResourcesResolutionStatus
forall x.
DescribeAppVersionResourcesResolutionStatus
-> Rep DescribeAppVersionResourcesResolutionStatus x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeAppVersionResourcesResolutionStatus x
-> DescribeAppVersionResourcesResolutionStatus
$cfrom :: forall x.
DescribeAppVersionResourcesResolutionStatus
-> Rep DescribeAppVersionResourcesResolutionStatus x
Prelude.Generic)
newDescribeAppVersionResourcesResolutionStatus ::
Prelude.Text ->
Prelude.Text ->
DescribeAppVersionResourcesResolutionStatus
newDescribeAppVersionResourcesResolutionStatus :: Text -> Text -> DescribeAppVersionResourcesResolutionStatus
newDescribeAppVersionResourcesResolutionStatus
Text
pAppArn_
Text
pAppVersion_ =
DescribeAppVersionResourcesResolutionStatus'
{ $sel:resolutionId:DescribeAppVersionResourcesResolutionStatus' :: Maybe Text
resolutionId =
forall a. Maybe a
Prelude.Nothing,
$sel:appArn:DescribeAppVersionResourcesResolutionStatus' :: Text
appArn = Text
pAppArn_,
$sel:appVersion:DescribeAppVersionResourcesResolutionStatus' :: Text
appVersion = Text
pAppVersion_
}
describeAppVersionResourcesResolutionStatus_resolutionId :: Lens.Lens' DescribeAppVersionResourcesResolutionStatus (Prelude.Maybe Prelude.Text)
describeAppVersionResourcesResolutionStatus_resolutionId :: Lens' DescribeAppVersionResourcesResolutionStatus (Maybe Text)
describeAppVersionResourcesResolutionStatus_resolutionId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeAppVersionResourcesResolutionStatus' {Maybe Text
resolutionId :: Maybe Text
$sel:resolutionId:DescribeAppVersionResourcesResolutionStatus' :: DescribeAppVersionResourcesResolutionStatus -> Maybe Text
resolutionId} -> Maybe Text
resolutionId) (\s :: DescribeAppVersionResourcesResolutionStatus
s@DescribeAppVersionResourcesResolutionStatus' {} Maybe Text
a -> DescribeAppVersionResourcesResolutionStatus
s {$sel:resolutionId:DescribeAppVersionResourcesResolutionStatus' :: Maybe Text
resolutionId = Maybe Text
a} :: DescribeAppVersionResourcesResolutionStatus)
describeAppVersionResourcesResolutionStatus_appArn :: Lens.Lens' DescribeAppVersionResourcesResolutionStatus Prelude.Text
describeAppVersionResourcesResolutionStatus_appArn :: Lens' DescribeAppVersionResourcesResolutionStatus Text
describeAppVersionResourcesResolutionStatus_appArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeAppVersionResourcesResolutionStatus' {Text
appArn :: Text
$sel:appArn:DescribeAppVersionResourcesResolutionStatus' :: DescribeAppVersionResourcesResolutionStatus -> Text
appArn} -> Text
appArn) (\s :: DescribeAppVersionResourcesResolutionStatus
s@DescribeAppVersionResourcesResolutionStatus' {} Text
a -> DescribeAppVersionResourcesResolutionStatus
s {$sel:appArn:DescribeAppVersionResourcesResolutionStatus' :: Text
appArn = Text
a} :: DescribeAppVersionResourcesResolutionStatus)
describeAppVersionResourcesResolutionStatus_appVersion :: Lens.Lens' DescribeAppVersionResourcesResolutionStatus Prelude.Text
describeAppVersionResourcesResolutionStatus_appVersion :: Lens' DescribeAppVersionResourcesResolutionStatus Text
describeAppVersionResourcesResolutionStatus_appVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeAppVersionResourcesResolutionStatus' {Text
appVersion :: Text
$sel:appVersion:DescribeAppVersionResourcesResolutionStatus' :: DescribeAppVersionResourcesResolutionStatus -> Text
appVersion} -> Text
appVersion) (\s :: DescribeAppVersionResourcesResolutionStatus
s@DescribeAppVersionResourcesResolutionStatus' {} Text
a -> DescribeAppVersionResourcesResolutionStatus
s {$sel:appVersion:DescribeAppVersionResourcesResolutionStatus' :: Text
appVersion = Text
a} :: DescribeAppVersionResourcesResolutionStatus)
instance
Core.AWSRequest
DescribeAppVersionResourcesResolutionStatus
where
type
AWSResponse
DescribeAppVersionResourcesResolutionStatus =
DescribeAppVersionResourcesResolutionStatusResponse
request :: (Service -> Service)
-> DescribeAppVersionResourcesResolutionStatus
-> Request DescribeAppVersionResourcesResolutionStatus
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 DescribeAppVersionResourcesResolutionStatus
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse
(AWSResponse DescribeAppVersionResourcesResolutionStatus)))
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 Text
-> Int
-> Text
-> Text
-> Text
-> ResourceResolutionStatusType
-> DescribeAppVersionResourcesResolutionStatusResponse
DescribeAppVersionResourcesResolutionStatusResponse'
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
"errorMessage")
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
"appArn")
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
"appVersion")
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
"resolutionId")
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
DescribeAppVersionResourcesResolutionStatus
where
hashWithSalt :: Int -> DescribeAppVersionResourcesResolutionStatus -> Int
hashWithSalt
Int
_salt
DescribeAppVersionResourcesResolutionStatus' {Maybe Text
Text
appVersion :: Text
appArn :: Text
resolutionId :: Maybe Text
$sel:appVersion:DescribeAppVersionResourcesResolutionStatus' :: DescribeAppVersionResourcesResolutionStatus -> Text
$sel:appArn:DescribeAppVersionResourcesResolutionStatus' :: DescribeAppVersionResourcesResolutionStatus -> Text
$sel:resolutionId:DescribeAppVersionResourcesResolutionStatus' :: DescribeAppVersionResourcesResolutionStatus -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
resolutionId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
appArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
appVersion
instance
Prelude.NFData
DescribeAppVersionResourcesResolutionStatus
where
rnf :: DescribeAppVersionResourcesResolutionStatus -> ()
rnf DescribeAppVersionResourcesResolutionStatus' {Maybe Text
Text
appVersion :: Text
appArn :: Text
resolutionId :: Maybe Text
$sel:appVersion:DescribeAppVersionResourcesResolutionStatus' :: DescribeAppVersionResourcesResolutionStatus -> Text
$sel:appArn:DescribeAppVersionResourcesResolutionStatus' :: DescribeAppVersionResourcesResolutionStatus -> Text
$sel:resolutionId:DescribeAppVersionResourcesResolutionStatus' :: DescribeAppVersionResourcesResolutionStatus -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
resolutionId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
appArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
appVersion
instance
Data.ToHeaders
DescribeAppVersionResourcesResolutionStatus
where
toHeaders :: DescribeAppVersionResourcesResolutionStatus -> 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.ToJSON
DescribeAppVersionResourcesResolutionStatus
where
toJSON :: DescribeAppVersionResourcesResolutionStatus -> Value
toJSON
DescribeAppVersionResourcesResolutionStatus' {Maybe Text
Text
appVersion :: Text
appArn :: Text
resolutionId :: Maybe Text
$sel:appVersion:DescribeAppVersionResourcesResolutionStatus' :: DescribeAppVersionResourcesResolutionStatus -> Text
$sel:appArn:DescribeAppVersionResourcesResolutionStatus' :: DescribeAppVersionResourcesResolutionStatus -> Text
$sel:resolutionId:DescribeAppVersionResourcesResolutionStatus' :: DescribeAppVersionResourcesResolutionStatus -> Maybe Text
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"resolutionId" 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
resolutionId,
forall a. a -> Maybe a
Prelude.Just (Key
"appArn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
appArn),
forall a. a -> Maybe a
Prelude.Just (Key
"appVersion" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
appVersion)
]
)
instance
Data.ToPath
DescribeAppVersionResourcesResolutionStatus
where
toPath :: DescribeAppVersionResourcesResolutionStatus -> ByteString
toPath =
forall a b. a -> b -> a
Prelude.const
ByteString
"/describe-app-version-resources-resolution-status"
instance
Data.ToQuery
DescribeAppVersionResourcesResolutionStatus
where
toQuery :: DescribeAppVersionResourcesResolutionStatus -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DescribeAppVersionResourcesResolutionStatusResponse = DescribeAppVersionResourcesResolutionStatusResponse'
{
DescribeAppVersionResourcesResolutionStatusResponse -> Maybe Text
errorMessage :: Prelude.Maybe Prelude.Text,
DescribeAppVersionResourcesResolutionStatusResponse -> Int
httpStatus :: Prelude.Int,
DescribeAppVersionResourcesResolutionStatusResponse -> Text
appArn :: Prelude.Text,
DescribeAppVersionResourcesResolutionStatusResponse -> Text
appVersion :: Prelude.Text,
DescribeAppVersionResourcesResolutionStatusResponse -> Text
resolutionId :: Prelude.Text,
DescribeAppVersionResourcesResolutionStatusResponse
-> ResourceResolutionStatusType
status :: ResourceResolutionStatusType
}
deriving (DescribeAppVersionResourcesResolutionStatusResponse
-> DescribeAppVersionResourcesResolutionStatusResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeAppVersionResourcesResolutionStatusResponse
-> DescribeAppVersionResourcesResolutionStatusResponse -> Bool
$c/= :: DescribeAppVersionResourcesResolutionStatusResponse
-> DescribeAppVersionResourcesResolutionStatusResponse -> Bool
== :: DescribeAppVersionResourcesResolutionStatusResponse
-> DescribeAppVersionResourcesResolutionStatusResponse -> Bool
$c== :: DescribeAppVersionResourcesResolutionStatusResponse
-> DescribeAppVersionResourcesResolutionStatusResponse -> Bool
Prelude.Eq, ReadPrec [DescribeAppVersionResourcesResolutionStatusResponse]
ReadPrec DescribeAppVersionResourcesResolutionStatusResponse
Int -> ReadS DescribeAppVersionResourcesResolutionStatusResponse
ReadS [DescribeAppVersionResourcesResolutionStatusResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeAppVersionResourcesResolutionStatusResponse]
$creadListPrec :: ReadPrec [DescribeAppVersionResourcesResolutionStatusResponse]
readPrec :: ReadPrec DescribeAppVersionResourcesResolutionStatusResponse
$creadPrec :: ReadPrec DescribeAppVersionResourcesResolutionStatusResponse
readList :: ReadS [DescribeAppVersionResourcesResolutionStatusResponse]
$creadList :: ReadS [DescribeAppVersionResourcesResolutionStatusResponse]
readsPrec :: Int -> ReadS DescribeAppVersionResourcesResolutionStatusResponse
$creadsPrec :: Int -> ReadS DescribeAppVersionResourcesResolutionStatusResponse
Prelude.Read, Int -> DescribeAppVersionResourcesResolutionStatusResponse -> ShowS
[DescribeAppVersionResourcesResolutionStatusResponse] -> ShowS
DescribeAppVersionResourcesResolutionStatusResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeAppVersionResourcesResolutionStatusResponse] -> ShowS
$cshowList :: [DescribeAppVersionResourcesResolutionStatusResponse] -> ShowS
show :: DescribeAppVersionResourcesResolutionStatusResponse -> String
$cshow :: DescribeAppVersionResourcesResolutionStatusResponse -> String
showsPrec :: Int -> DescribeAppVersionResourcesResolutionStatusResponse -> ShowS
$cshowsPrec :: Int -> DescribeAppVersionResourcesResolutionStatusResponse -> ShowS
Prelude.Show, forall x.
Rep DescribeAppVersionResourcesResolutionStatusResponse x
-> DescribeAppVersionResourcesResolutionStatusResponse
forall x.
DescribeAppVersionResourcesResolutionStatusResponse
-> Rep DescribeAppVersionResourcesResolutionStatusResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeAppVersionResourcesResolutionStatusResponse x
-> DescribeAppVersionResourcesResolutionStatusResponse
$cfrom :: forall x.
DescribeAppVersionResourcesResolutionStatusResponse
-> Rep DescribeAppVersionResourcesResolutionStatusResponse x
Prelude.Generic)
newDescribeAppVersionResourcesResolutionStatusResponse ::
Prelude.Int ->
Prelude.Text ->
Prelude.Text ->
Prelude.Text ->
ResourceResolutionStatusType ->
DescribeAppVersionResourcesResolutionStatusResponse
newDescribeAppVersionResourcesResolutionStatusResponse :: Int
-> Text
-> Text
-> Text
-> ResourceResolutionStatusType
-> DescribeAppVersionResourcesResolutionStatusResponse
newDescribeAppVersionResourcesResolutionStatusResponse
Int
pHttpStatus_
Text
pAppArn_
Text
pAppVersion_
Text
pResolutionId_
ResourceResolutionStatusType
pStatus_ =
DescribeAppVersionResourcesResolutionStatusResponse'
{ $sel:errorMessage:DescribeAppVersionResourcesResolutionStatusResponse' :: Maybe Text
errorMessage =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeAppVersionResourcesResolutionStatusResponse' :: Int
httpStatus =
Int
pHttpStatus_,
$sel:appArn:DescribeAppVersionResourcesResolutionStatusResponse' :: Text
appArn = Text
pAppArn_,
$sel:appVersion:DescribeAppVersionResourcesResolutionStatusResponse' :: Text
appVersion =
Text
pAppVersion_,
$sel:resolutionId:DescribeAppVersionResourcesResolutionStatusResponse' :: Text
resolutionId =
Text
pResolutionId_,
$sel:status:DescribeAppVersionResourcesResolutionStatusResponse' :: ResourceResolutionStatusType
status = ResourceResolutionStatusType
pStatus_
}
describeAppVersionResourcesResolutionStatusResponse_errorMessage :: Lens.Lens' DescribeAppVersionResourcesResolutionStatusResponse (Prelude.Maybe Prelude.Text)
describeAppVersionResourcesResolutionStatusResponse_errorMessage :: Lens'
DescribeAppVersionResourcesResolutionStatusResponse (Maybe Text)
describeAppVersionResourcesResolutionStatusResponse_errorMessage = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeAppVersionResourcesResolutionStatusResponse' {Maybe Text
errorMessage :: Maybe Text
$sel:errorMessage:DescribeAppVersionResourcesResolutionStatusResponse' :: DescribeAppVersionResourcesResolutionStatusResponse -> Maybe Text
errorMessage} -> Maybe Text
errorMessage) (\s :: DescribeAppVersionResourcesResolutionStatusResponse
s@DescribeAppVersionResourcesResolutionStatusResponse' {} Maybe Text
a -> DescribeAppVersionResourcesResolutionStatusResponse
s {$sel:errorMessage:DescribeAppVersionResourcesResolutionStatusResponse' :: Maybe Text
errorMessage = Maybe Text
a} :: DescribeAppVersionResourcesResolutionStatusResponse)
describeAppVersionResourcesResolutionStatusResponse_httpStatus :: Lens.Lens' DescribeAppVersionResourcesResolutionStatusResponse Prelude.Int
describeAppVersionResourcesResolutionStatusResponse_httpStatus :: Lens' DescribeAppVersionResourcesResolutionStatusResponse Int
describeAppVersionResourcesResolutionStatusResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeAppVersionResourcesResolutionStatusResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeAppVersionResourcesResolutionStatusResponse' :: DescribeAppVersionResourcesResolutionStatusResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeAppVersionResourcesResolutionStatusResponse
s@DescribeAppVersionResourcesResolutionStatusResponse' {} Int
a -> DescribeAppVersionResourcesResolutionStatusResponse
s {$sel:httpStatus:DescribeAppVersionResourcesResolutionStatusResponse' :: Int
httpStatus = Int
a} :: DescribeAppVersionResourcesResolutionStatusResponse)
describeAppVersionResourcesResolutionStatusResponse_appArn :: Lens.Lens' DescribeAppVersionResourcesResolutionStatusResponse Prelude.Text
describeAppVersionResourcesResolutionStatusResponse_appArn :: Lens' DescribeAppVersionResourcesResolutionStatusResponse Text
describeAppVersionResourcesResolutionStatusResponse_appArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeAppVersionResourcesResolutionStatusResponse' {Text
appArn :: Text
$sel:appArn:DescribeAppVersionResourcesResolutionStatusResponse' :: DescribeAppVersionResourcesResolutionStatusResponse -> Text
appArn} -> Text
appArn) (\s :: DescribeAppVersionResourcesResolutionStatusResponse
s@DescribeAppVersionResourcesResolutionStatusResponse' {} Text
a -> DescribeAppVersionResourcesResolutionStatusResponse
s {$sel:appArn:DescribeAppVersionResourcesResolutionStatusResponse' :: Text
appArn = Text
a} :: DescribeAppVersionResourcesResolutionStatusResponse)
describeAppVersionResourcesResolutionStatusResponse_appVersion :: Lens.Lens' DescribeAppVersionResourcesResolutionStatusResponse Prelude.Text
describeAppVersionResourcesResolutionStatusResponse_appVersion :: Lens' DescribeAppVersionResourcesResolutionStatusResponse Text
describeAppVersionResourcesResolutionStatusResponse_appVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeAppVersionResourcesResolutionStatusResponse' {Text
appVersion :: Text
$sel:appVersion:DescribeAppVersionResourcesResolutionStatusResponse' :: DescribeAppVersionResourcesResolutionStatusResponse -> Text
appVersion} -> Text
appVersion) (\s :: DescribeAppVersionResourcesResolutionStatusResponse
s@DescribeAppVersionResourcesResolutionStatusResponse' {} Text
a -> DescribeAppVersionResourcesResolutionStatusResponse
s {$sel:appVersion:DescribeAppVersionResourcesResolutionStatusResponse' :: Text
appVersion = Text
a} :: DescribeAppVersionResourcesResolutionStatusResponse)
describeAppVersionResourcesResolutionStatusResponse_resolutionId :: Lens.Lens' DescribeAppVersionResourcesResolutionStatusResponse Prelude.Text
describeAppVersionResourcesResolutionStatusResponse_resolutionId :: Lens' DescribeAppVersionResourcesResolutionStatusResponse Text
describeAppVersionResourcesResolutionStatusResponse_resolutionId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeAppVersionResourcesResolutionStatusResponse' {Text
resolutionId :: Text
$sel:resolutionId:DescribeAppVersionResourcesResolutionStatusResponse' :: DescribeAppVersionResourcesResolutionStatusResponse -> Text
resolutionId} -> Text
resolutionId) (\s :: DescribeAppVersionResourcesResolutionStatusResponse
s@DescribeAppVersionResourcesResolutionStatusResponse' {} Text
a -> DescribeAppVersionResourcesResolutionStatusResponse
s {$sel:resolutionId:DescribeAppVersionResourcesResolutionStatusResponse' :: Text
resolutionId = Text
a} :: DescribeAppVersionResourcesResolutionStatusResponse)
describeAppVersionResourcesResolutionStatusResponse_status :: Lens.Lens' DescribeAppVersionResourcesResolutionStatusResponse ResourceResolutionStatusType
describeAppVersionResourcesResolutionStatusResponse_status :: Lens'
DescribeAppVersionResourcesResolutionStatusResponse
ResourceResolutionStatusType
describeAppVersionResourcesResolutionStatusResponse_status = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeAppVersionResourcesResolutionStatusResponse' {ResourceResolutionStatusType
status :: ResourceResolutionStatusType
$sel:status:DescribeAppVersionResourcesResolutionStatusResponse' :: DescribeAppVersionResourcesResolutionStatusResponse
-> ResourceResolutionStatusType
status} -> ResourceResolutionStatusType
status) (\s :: DescribeAppVersionResourcesResolutionStatusResponse
s@DescribeAppVersionResourcesResolutionStatusResponse' {} ResourceResolutionStatusType
a -> DescribeAppVersionResourcesResolutionStatusResponse
s {$sel:status:DescribeAppVersionResourcesResolutionStatusResponse' :: ResourceResolutionStatusType
status = ResourceResolutionStatusType
a} :: DescribeAppVersionResourcesResolutionStatusResponse)
instance
Prelude.NFData
DescribeAppVersionResourcesResolutionStatusResponse
where
rnf :: DescribeAppVersionResourcesResolutionStatusResponse -> ()
rnf
DescribeAppVersionResourcesResolutionStatusResponse' {Int
Maybe Text
Text
ResourceResolutionStatusType
status :: ResourceResolutionStatusType
resolutionId :: Text
appVersion :: Text
appArn :: Text
httpStatus :: Int
errorMessage :: Maybe Text
$sel:status:DescribeAppVersionResourcesResolutionStatusResponse' :: DescribeAppVersionResourcesResolutionStatusResponse
-> ResourceResolutionStatusType
$sel:resolutionId:DescribeAppVersionResourcesResolutionStatusResponse' :: DescribeAppVersionResourcesResolutionStatusResponse -> Text
$sel:appVersion:DescribeAppVersionResourcesResolutionStatusResponse' :: DescribeAppVersionResourcesResolutionStatusResponse -> Text
$sel:appArn:DescribeAppVersionResourcesResolutionStatusResponse' :: DescribeAppVersionResourcesResolutionStatusResponse -> Text
$sel:httpStatus:DescribeAppVersionResourcesResolutionStatusResponse' :: DescribeAppVersionResourcesResolutionStatusResponse -> Int
$sel:errorMessage:DescribeAppVersionResourcesResolutionStatusResponse' :: DescribeAppVersionResourcesResolutionStatusResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
errorMessage
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
appArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
appVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
resolutionId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf ResourceResolutionStatusType
status