{-# 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.DMS.DescribeApplicableIndividualAssessments
(
DescribeApplicableIndividualAssessments (..),
newDescribeApplicableIndividualAssessments,
describeApplicableIndividualAssessments_marker,
describeApplicableIndividualAssessments_maxRecords,
describeApplicableIndividualAssessments_migrationType,
describeApplicableIndividualAssessments_replicationInstanceArn,
describeApplicableIndividualAssessments_replicationTaskArn,
describeApplicableIndividualAssessments_sourceEngineName,
describeApplicableIndividualAssessments_targetEngineName,
DescribeApplicableIndividualAssessmentsResponse (..),
newDescribeApplicableIndividualAssessmentsResponse,
describeApplicableIndividualAssessmentsResponse_individualAssessmentNames,
describeApplicableIndividualAssessmentsResponse_marker,
describeApplicableIndividualAssessmentsResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import Amazonka.DMS.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 DescribeApplicableIndividualAssessments = DescribeApplicableIndividualAssessments'
{
DescribeApplicableIndividualAssessments -> Maybe Text
marker :: Prelude.Maybe Prelude.Text,
DescribeApplicableIndividualAssessments -> Maybe Int
maxRecords :: Prelude.Maybe Prelude.Int,
DescribeApplicableIndividualAssessments -> Maybe MigrationTypeValue
migrationType :: Prelude.Maybe MigrationTypeValue,
DescribeApplicableIndividualAssessments -> Maybe Text
replicationInstanceArn :: Prelude.Maybe Prelude.Text,
DescribeApplicableIndividualAssessments -> Maybe Text
replicationTaskArn :: Prelude.Maybe Prelude.Text,
DescribeApplicableIndividualAssessments -> Maybe Text
sourceEngineName :: Prelude.Maybe Prelude.Text,
DescribeApplicableIndividualAssessments -> Maybe Text
targetEngineName :: Prelude.Maybe Prelude.Text
}
deriving (DescribeApplicableIndividualAssessments
-> DescribeApplicableIndividualAssessments -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeApplicableIndividualAssessments
-> DescribeApplicableIndividualAssessments -> Bool
$c/= :: DescribeApplicableIndividualAssessments
-> DescribeApplicableIndividualAssessments -> Bool
== :: DescribeApplicableIndividualAssessments
-> DescribeApplicableIndividualAssessments -> Bool
$c== :: DescribeApplicableIndividualAssessments
-> DescribeApplicableIndividualAssessments -> Bool
Prelude.Eq, ReadPrec [DescribeApplicableIndividualAssessments]
ReadPrec DescribeApplicableIndividualAssessments
Int -> ReadS DescribeApplicableIndividualAssessments
ReadS [DescribeApplicableIndividualAssessments]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeApplicableIndividualAssessments]
$creadListPrec :: ReadPrec [DescribeApplicableIndividualAssessments]
readPrec :: ReadPrec DescribeApplicableIndividualAssessments
$creadPrec :: ReadPrec DescribeApplicableIndividualAssessments
readList :: ReadS [DescribeApplicableIndividualAssessments]
$creadList :: ReadS [DescribeApplicableIndividualAssessments]
readsPrec :: Int -> ReadS DescribeApplicableIndividualAssessments
$creadsPrec :: Int -> ReadS DescribeApplicableIndividualAssessments
Prelude.Read, Int -> DescribeApplicableIndividualAssessments -> ShowS
[DescribeApplicableIndividualAssessments] -> ShowS
DescribeApplicableIndividualAssessments -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeApplicableIndividualAssessments] -> ShowS
$cshowList :: [DescribeApplicableIndividualAssessments] -> ShowS
show :: DescribeApplicableIndividualAssessments -> String
$cshow :: DescribeApplicableIndividualAssessments -> String
showsPrec :: Int -> DescribeApplicableIndividualAssessments -> ShowS
$cshowsPrec :: Int -> DescribeApplicableIndividualAssessments -> ShowS
Prelude.Show, forall x.
Rep DescribeApplicableIndividualAssessments x
-> DescribeApplicableIndividualAssessments
forall x.
DescribeApplicableIndividualAssessments
-> Rep DescribeApplicableIndividualAssessments x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeApplicableIndividualAssessments x
-> DescribeApplicableIndividualAssessments
$cfrom :: forall x.
DescribeApplicableIndividualAssessments
-> Rep DescribeApplicableIndividualAssessments x
Prelude.Generic)
newDescribeApplicableIndividualAssessments ::
DescribeApplicableIndividualAssessments
newDescribeApplicableIndividualAssessments :: DescribeApplicableIndividualAssessments
newDescribeApplicableIndividualAssessments =
DescribeApplicableIndividualAssessments'
{ $sel:marker:DescribeApplicableIndividualAssessments' :: Maybe Text
marker =
forall a. Maybe a
Prelude.Nothing,
$sel:maxRecords:DescribeApplicableIndividualAssessments' :: Maybe Int
maxRecords = forall a. Maybe a
Prelude.Nothing,
$sel:migrationType:DescribeApplicableIndividualAssessments' :: Maybe MigrationTypeValue
migrationType = forall a. Maybe a
Prelude.Nothing,
$sel:replicationInstanceArn:DescribeApplicableIndividualAssessments' :: Maybe Text
replicationInstanceArn =
forall a. Maybe a
Prelude.Nothing,
$sel:replicationTaskArn:DescribeApplicableIndividualAssessments' :: Maybe Text
replicationTaskArn =
forall a. Maybe a
Prelude.Nothing,
$sel:sourceEngineName:DescribeApplicableIndividualAssessments' :: Maybe Text
sourceEngineName = forall a. Maybe a
Prelude.Nothing,
$sel:targetEngineName:DescribeApplicableIndividualAssessments' :: Maybe Text
targetEngineName = forall a. Maybe a
Prelude.Nothing
}
describeApplicableIndividualAssessments_marker :: Lens.Lens' DescribeApplicableIndividualAssessments (Prelude.Maybe Prelude.Text)
describeApplicableIndividualAssessments_marker :: Lens' DescribeApplicableIndividualAssessments (Maybe Text)
describeApplicableIndividualAssessments_marker = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeApplicableIndividualAssessments' {Maybe Text
marker :: Maybe Text
$sel:marker:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
marker} -> Maybe Text
marker) (\s :: DescribeApplicableIndividualAssessments
s@DescribeApplicableIndividualAssessments' {} Maybe Text
a -> DescribeApplicableIndividualAssessments
s {$sel:marker:DescribeApplicableIndividualAssessments' :: Maybe Text
marker = Maybe Text
a} :: DescribeApplicableIndividualAssessments)
describeApplicableIndividualAssessments_maxRecords :: Lens.Lens' DescribeApplicableIndividualAssessments (Prelude.Maybe Prelude.Int)
describeApplicableIndividualAssessments_maxRecords :: Lens' DescribeApplicableIndividualAssessments (Maybe Int)
describeApplicableIndividualAssessments_maxRecords = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeApplicableIndividualAssessments' {Maybe Int
maxRecords :: Maybe Int
$sel:maxRecords:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Int
maxRecords} -> Maybe Int
maxRecords) (\s :: DescribeApplicableIndividualAssessments
s@DescribeApplicableIndividualAssessments' {} Maybe Int
a -> DescribeApplicableIndividualAssessments
s {$sel:maxRecords:DescribeApplicableIndividualAssessments' :: Maybe Int
maxRecords = Maybe Int
a} :: DescribeApplicableIndividualAssessments)
describeApplicableIndividualAssessments_migrationType :: Lens.Lens' DescribeApplicableIndividualAssessments (Prelude.Maybe MigrationTypeValue)
describeApplicableIndividualAssessments_migrationType :: Lens'
DescribeApplicableIndividualAssessments (Maybe MigrationTypeValue)
describeApplicableIndividualAssessments_migrationType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeApplicableIndividualAssessments' {Maybe MigrationTypeValue
migrationType :: Maybe MigrationTypeValue
$sel:migrationType:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe MigrationTypeValue
migrationType} -> Maybe MigrationTypeValue
migrationType) (\s :: DescribeApplicableIndividualAssessments
s@DescribeApplicableIndividualAssessments' {} Maybe MigrationTypeValue
a -> DescribeApplicableIndividualAssessments
s {$sel:migrationType:DescribeApplicableIndividualAssessments' :: Maybe MigrationTypeValue
migrationType = Maybe MigrationTypeValue
a} :: DescribeApplicableIndividualAssessments)
describeApplicableIndividualAssessments_replicationInstanceArn :: Lens.Lens' DescribeApplicableIndividualAssessments (Prelude.Maybe Prelude.Text)
describeApplicableIndividualAssessments_replicationInstanceArn :: Lens' DescribeApplicableIndividualAssessments (Maybe Text)
describeApplicableIndividualAssessments_replicationInstanceArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeApplicableIndividualAssessments' {Maybe Text
replicationInstanceArn :: Maybe Text
$sel:replicationInstanceArn:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
replicationInstanceArn} -> Maybe Text
replicationInstanceArn) (\s :: DescribeApplicableIndividualAssessments
s@DescribeApplicableIndividualAssessments' {} Maybe Text
a -> DescribeApplicableIndividualAssessments
s {$sel:replicationInstanceArn:DescribeApplicableIndividualAssessments' :: Maybe Text
replicationInstanceArn = Maybe Text
a} :: DescribeApplicableIndividualAssessments)
describeApplicableIndividualAssessments_replicationTaskArn :: Lens.Lens' DescribeApplicableIndividualAssessments (Prelude.Maybe Prelude.Text)
describeApplicableIndividualAssessments_replicationTaskArn :: Lens' DescribeApplicableIndividualAssessments (Maybe Text)
describeApplicableIndividualAssessments_replicationTaskArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeApplicableIndividualAssessments' {Maybe Text
replicationTaskArn :: Maybe Text
$sel:replicationTaskArn:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
replicationTaskArn} -> Maybe Text
replicationTaskArn) (\s :: DescribeApplicableIndividualAssessments
s@DescribeApplicableIndividualAssessments' {} Maybe Text
a -> DescribeApplicableIndividualAssessments
s {$sel:replicationTaskArn:DescribeApplicableIndividualAssessments' :: Maybe Text
replicationTaskArn = Maybe Text
a} :: DescribeApplicableIndividualAssessments)
describeApplicableIndividualAssessments_sourceEngineName :: Lens.Lens' DescribeApplicableIndividualAssessments (Prelude.Maybe Prelude.Text)
describeApplicableIndividualAssessments_sourceEngineName :: Lens' DescribeApplicableIndividualAssessments (Maybe Text)
describeApplicableIndividualAssessments_sourceEngineName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeApplicableIndividualAssessments' {Maybe Text
sourceEngineName :: Maybe Text
$sel:sourceEngineName:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
sourceEngineName} -> Maybe Text
sourceEngineName) (\s :: DescribeApplicableIndividualAssessments
s@DescribeApplicableIndividualAssessments' {} Maybe Text
a -> DescribeApplicableIndividualAssessments
s {$sel:sourceEngineName:DescribeApplicableIndividualAssessments' :: Maybe Text
sourceEngineName = Maybe Text
a} :: DescribeApplicableIndividualAssessments)
describeApplicableIndividualAssessments_targetEngineName :: Lens.Lens' DescribeApplicableIndividualAssessments (Prelude.Maybe Prelude.Text)
describeApplicableIndividualAssessments_targetEngineName :: Lens' DescribeApplicableIndividualAssessments (Maybe Text)
describeApplicableIndividualAssessments_targetEngineName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeApplicableIndividualAssessments' {Maybe Text
targetEngineName :: Maybe Text
$sel:targetEngineName:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
targetEngineName} -> Maybe Text
targetEngineName) (\s :: DescribeApplicableIndividualAssessments
s@DescribeApplicableIndividualAssessments' {} Maybe Text
a -> DescribeApplicableIndividualAssessments
s {$sel:targetEngineName:DescribeApplicableIndividualAssessments' :: Maybe Text
targetEngineName = Maybe Text
a} :: DescribeApplicableIndividualAssessments)
instance
Core.AWSRequest
DescribeApplicableIndividualAssessments
where
type
AWSResponse
DescribeApplicableIndividualAssessments =
DescribeApplicableIndividualAssessmentsResponse
request :: (Service -> Service)
-> DescribeApplicableIndividualAssessments
-> Request DescribeApplicableIndividualAssessments
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 DescribeApplicableIndividualAssessments
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse
(AWSResponse DescribeApplicableIndividualAssessments)))
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]
-> Maybe Text
-> Int
-> DescribeApplicableIndividualAssessmentsResponse
DescribeApplicableIndividualAssessmentsResponse'
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
"IndividualAssessmentNames"
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
"Marker")
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
DescribeApplicableIndividualAssessments
where
hashWithSalt :: Int -> DescribeApplicableIndividualAssessments -> Int
hashWithSalt
Int
_salt
DescribeApplicableIndividualAssessments' {Maybe Int
Maybe Text
Maybe MigrationTypeValue
targetEngineName :: Maybe Text
sourceEngineName :: Maybe Text
replicationTaskArn :: Maybe Text
replicationInstanceArn :: Maybe Text
migrationType :: Maybe MigrationTypeValue
maxRecords :: Maybe Int
marker :: Maybe Text
$sel:targetEngineName:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
$sel:sourceEngineName:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
$sel:replicationTaskArn:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
$sel:replicationInstanceArn:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
$sel:migrationType:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe MigrationTypeValue
$sel:maxRecords:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Int
$sel:marker:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
marker
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
maxRecords
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe MigrationTypeValue
migrationType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
replicationInstanceArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
replicationTaskArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
sourceEngineName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
targetEngineName
instance
Prelude.NFData
DescribeApplicableIndividualAssessments
where
rnf :: DescribeApplicableIndividualAssessments -> ()
rnf DescribeApplicableIndividualAssessments' {Maybe Int
Maybe Text
Maybe MigrationTypeValue
targetEngineName :: Maybe Text
sourceEngineName :: Maybe Text
replicationTaskArn :: Maybe Text
replicationInstanceArn :: Maybe Text
migrationType :: Maybe MigrationTypeValue
maxRecords :: Maybe Int
marker :: Maybe Text
$sel:targetEngineName:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
$sel:sourceEngineName:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
$sel:replicationTaskArn:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
$sel:replicationInstanceArn:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
$sel:migrationType:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe MigrationTypeValue
$sel:maxRecords:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Int
$sel:marker:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
marker
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
maxRecords
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe MigrationTypeValue
migrationType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
replicationInstanceArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
replicationTaskArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
sourceEngineName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
targetEngineName
instance
Data.ToHeaders
DescribeApplicableIndividualAssessments
where
toHeaders :: DescribeApplicableIndividualAssessments -> 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
"AmazonDMSv20160101.DescribeApplicableIndividualAssessments" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance
Data.ToJSON
DescribeApplicableIndividualAssessments
where
toJSON :: DescribeApplicableIndividualAssessments -> Value
toJSON DescribeApplicableIndividualAssessments' {Maybe Int
Maybe Text
Maybe MigrationTypeValue
targetEngineName :: Maybe Text
sourceEngineName :: Maybe Text
replicationTaskArn :: Maybe Text
replicationInstanceArn :: Maybe Text
migrationType :: Maybe MigrationTypeValue
maxRecords :: Maybe Int
marker :: Maybe Text
$sel:targetEngineName:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
$sel:sourceEngineName:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
$sel:replicationTaskArn:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
$sel:replicationInstanceArn:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
$sel:migrationType:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe MigrationTypeValue
$sel:maxRecords:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Int
$sel:marker:DescribeApplicableIndividualAssessments' :: DescribeApplicableIndividualAssessments -> Maybe Text
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"Marker" 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
marker,
(Key
"MaxRecords" 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 Int
maxRecords,
(Key
"MigrationType" 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 MigrationTypeValue
migrationType,
(Key
"ReplicationInstanceArn" 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
replicationInstanceArn,
(Key
"ReplicationTaskArn" 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
replicationTaskArn,
(Key
"SourceEngineName" 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
sourceEngineName,
(Key
"TargetEngineName" 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
targetEngineName
]
)
instance
Data.ToPath
DescribeApplicableIndividualAssessments
where
toPath :: DescribeApplicableIndividualAssessments -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance
Data.ToQuery
DescribeApplicableIndividualAssessments
where
toQuery :: DescribeApplicableIndividualAssessments -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DescribeApplicableIndividualAssessmentsResponse = DescribeApplicableIndividualAssessmentsResponse'
{
DescribeApplicableIndividualAssessmentsResponse -> Maybe [Text]
individualAssessmentNames :: Prelude.Maybe [Prelude.Text],
DescribeApplicableIndividualAssessmentsResponse -> Maybe Text
marker :: Prelude.Maybe Prelude.Text,
DescribeApplicableIndividualAssessmentsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribeApplicableIndividualAssessmentsResponse
-> DescribeApplicableIndividualAssessmentsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeApplicableIndividualAssessmentsResponse
-> DescribeApplicableIndividualAssessmentsResponse -> Bool
$c/= :: DescribeApplicableIndividualAssessmentsResponse
-> DescribeApplicableIndividualAssessmentsResponse -> Bool
== :: DescribeApplicableIndividualAssessmentsResponse
-> DescribeApplicableIndividualAssessmentsResponse -> Bool
$c== :: DescribeApplicableIndividualAssessmentsResponse
-> DescribeApplicableIndividualAssessmentsResponse -> Bool
Prelude.Eq, ReadPrec [DescribeApplicableIndividualAssessmentsResponse]
ReadPrec DescribeApplicableIndividualAssessmentsResponse
Int -> ReadS DescribeApplicableIndividualAssessmentsResponse
ReadS [DescribeApplicableIndividualAssessmentsResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeApplicableIndividualAssessmentsResponse]
$creadListPrec :: ReadPrec [DescribeApplicableIndividualAssessmentsResponse]
readPrec :: ReadPrec DescribeApplicableIndividualAssessmentsResponse
$creadPrec :: ReadPrec DescribeApplicableIndividualAssessmentsResponse
readList :: ReadS [DescribeApplicableIndividualAssessmentsResponse]
$creadList :: ReadS [DescribeApplicableIndividualAssessmentsResponse]
readsPrec :: Int -> ReadS DescribeApplicableIndividualAssessmentsResponse
$creadsPrec :: Int -> ReadS DescribeApplicableIndividualAssessmentsResponse
Prelude.Read, Int -> DescribeApplicableIndividualAssessmentsResponse -> ShowS
[DescribeApplicableIndividualAssessmentsResponse] -> ShowS
DescribeApplicableIndividualAssessmentsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeApplicableIndividualAssessmentsResponse] -> ShowS
$cshowList :: [DescribeApplicableIndividualAssessmentsResponse] -> ShowS
show :: DescribeApplicableIndividualAssessmentsResponse -> String
$cshow :: DescribeApplicableIndividualAssessmentsResponse -> String
showsPrec :: Int -> DescribeApplicableIndividualAssessmentsResponse -> ShowS
$cshowsPrec :: Int -> DescribeApplicableIndividualAssessmentsResponse -> ShowS
Prelude.Show, forall x.
Rep DescribeApplicableIndividualAssessmentsResponse x
-> DescribeApplicableIndividualAssessmentsResponse
forall x.
DescribeApplicableIndividualAssessmentsResponse
-> Rep DescribeApplicableIndividualAssessmentsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeApplicableIndividualAssessmentsResponse x
-> DescribeApplicableIndividualAssessmentsResponse
$cfrom :: forall x.
DescribeApplicableIndividualAssessmentsResponse
-> Rep DescribeApplicableIndividualAssessmentsResponse x
Prelude.Generic)
newDescribeApplicableIndividualAssessmentsResponse ::
Prelude.Int ->
DescribeApplicableIndividualAssessmentsResponse
newDescribeApplicableIndividualAssessmentsResponse :: Int -> DescribeApplicableIndividualAssessmentsResponse
newDescribeApplicableIndividualAssessmentsResponse
Int
pHttpStatus_ =
DescribeApplicableIndividualAssessmentsResponse'
{ $sel:individualAssessmentNames:DescribeApplicableIndividualAssessmentsResponse' :: Maybe [Text]
individualAssessmentNames =
forall a. Maybe a
Prelude.Nothing,
$sel:marker:DescribeApplicableIndividualAssessmentsResponse' :: Maybe Text
marker = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeApplicableIndividualAssessmentsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describeApplicableIndividualAssessmentsResponse_individualAssessmentNames :: Lens.Lens' DescribeApplicableIndividualAssessmentsResponse (Prelude.Maybe [Prelude.Text])
describeApplicableIndividualAssessmentsResponse_individualAssessmentNames :: Lens'
DescribeApplicableIndividualAssessmentsResponse (Maybe [Text])
describeApplicableIndividualAssessmentsResponse_individualAssessmentNames = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeApplicableIndividualAssessmentsResponse' {Maybe [Text]
individualAssessmentNames :: Maybe [Text]
$sel:individualAssessmentNames:DescribeApplicableIndividualAssessmentsResponse' :: DescribeApplicableIndividualAssessmentsResponse -> Maybe [Text]
individualAssessmentNames} -> Maybe [Text]
individualAssessmentNames) (\s :: DescribeApplicableIndividualAssessmentsResponse
s@DescribeApplicableIndividualAssessmentsResponse' {} Maybe [Text]
a -> DescribeApplicableIndividualAssessmentsResponse
s {$sel:individualAssessmentNames:DescribeApplicableIndividualAssessmentsResponse' :: Maybe [Text]
individualAssessmentNames = Maybe [Text]
a} :: DescribeApplicableIndividualAssessmentsResponse) 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
describeApplicableIndividualAssessmentsResponse_marker :: Lens.Lens' DescribeApplicableIndividualAssessmentsResponse (Prelude.Maybe Prelude.Text)
describeApplicableIndividualAssessmentsResponse_marker :: Lens' DescribeApplicableIndividualAssessmentsResponse (Maybe Text)
describeApplicableIndividualAssessmentsResponse_marker = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeApplicableIndividualAssessmentsResponse' {Maybe Text
marker :: Maybe Text
$sel:marker:DescribeApplicableIndividualAssessmentsResponse' :: DescribeApplicableIndividualAssessmentsResponse -> Maybe Text
marker} -> Maybe Text
marker) (\s :: DescribeApplicableIndividualAssessmentsResponse
s@DescribeApplicableIndividualAssessmentsResponse' {} Maybe Text
a -> DescribeApplicableIndividualAssessmentsResponse
s {$sel:marker:DescribeApplicableIndividualAssessmentsResponse' :: Maybe Text
marker = Maybe Text
a} :: DescribeApplicableIndividualAssessmentsResponse)
describeApplicableIndividualAssessmentsResponse_httpStatus :: Lens.Lens' DescribeApplicableIndividualAssessmentsResponse Prelude.Int
describeApplicableIndividualAssessmentsResponse_httpStatus :: Lens' DescribeApplicableIndividualAssessmentsResponse Int
describeApplicableIndividualAssessmentsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeApplicableIndividualAssessmentsResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeApplicableIndividualAssessmentsResponse' :: DescribeApplicableIndividualAssessmentsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeApplicableIndividualAssessmentsResponse
s@DescribeApplicableIndividualAssessmentsResponse' {} Int
a -> DescribeApplicableIndividualAssessmentsResponse
s {$sel:httpStatus:DescribeApplicableIndividualAssessmentsResponse' :: Int
httpStatus = Int
a} :: DescribeApplicableIndividualAssessmentsResponse)
instance
Prelude.NFData
DescribeApplicableIndividualAssessmentsResponse
where
rnf :: DescribeApplicableIndividualAssessmentsResponse -> ()
rnf
DescribeApplicableIndividualAssessmentsResponse' {Int
Maybe [Text]
Maybe Text
httpStatus :: Int
marker :: Maybe Text
individualAssessmentNames :: Maybe [Text]
$sel:httpStatus:DescribeApplicableIndividualAssessmentsResponse' :: DescribeApplicableIndividualAssessmentsResponse -> Int
$sel:marker:DescribeApplicableIndividualAssessmentsResponse' :: DescribeApplicableIndividualAssessmentsResponse -> Maybe Text
$sel:individualAssessmentNames:DescribeApplicableIndividualAssessmentsResponse' :: DescribeApplicableIndividualAssessmentsResponse -> Maybe [Text]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [Text]
individualAssessmentNames
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
marker
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus