{-# 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.SSOAdmin.ListPermissionSetProvisioningStatus
(
ListPermissionSetProvisioningStatus (..),
newListPermissionSetProvisioningStatus,
listPermissionSetProvisioningStatus_filter,
listPermissionSetProvisioningStatus_maxResults,
listPermissionSetProvisioningStatus_nextToken,
listPermissionSetProvisioningStatus_instanceArn,
ListPermissionSetProvisioningStatusResponse (..),
newListPermissionSetProvisioningStatusResponse,
listPermissionSetProvisioningStatusResponse_nextToken,
listPermissionSetProvisioningStatusResponse_permissionSetsProvisioningStatus,
listPermissionSetProvisioningStatusResponse_httpStatus,
)
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.SSOAdmin.Types
data ListPermissionSetProvisioningStatus = ListPermissionSetProvisioningStatus'
{
ListPermissionSetProvisioningStatus -> Maybe OperationStatusFilter
filter' :: Prelude.Maybe OperationStatusFilter,
ListPermissionSetProvisioningStatus -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
ListPermissionSetProvisioningStatus -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListPermissionSetProvisioningStatus -> Text
instanceArn :: Prelude.Text
}
deriving (ListPermissionSetProvisioningStatus
-> ListPermissionSetProvisioningStatus -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListPermissionSetProvisioningStatus
-> ListPermissionSetProvisioningStatus -> Bool
$c/= :: ListPermissionSetProvisioningStatus
-> ListPermissionSetProvisioningStatus -> Bool
== :: ListPermissionSetProvisioningStatus
-> ListPermissionSetProvisioningStatus -> Bool
$c== :: ListPermissionSetProvisioningStatus
-> ListPermissionSetProvisioningStatus -> Bool
Prelude.Eq, ReadPrec [ListPermissionSetProvisioningStatus]
ReadPrec ListPermissionSetProvisioningStatus
Int -> ReadS ListPermissionSetProvisioningStatus
ReadS [ListPermissionSetProvisioningStatus]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListPermissionSetProvisioningStatus]
$creadListPrec :: ReadPrec [ListPermissionSetProvisioningStatus]
readPrec :: ReadPrec ListPermissionSetProvisioningStatus
$creadPrec :: ReadPrec ListPermissionSetProvisioningStatus
readList :: ReadS [ListPermissionSetProvisioningStatus]
$creadList :: ReadS [ListPermissionSetProvisioningStatus]
readsPrec :: Int -> ReadS ListPermissionSetProvisioningStatus
$creadsPrec :: Int -> ReadS ListPermissionSetProvisioningStatus
Prelude.Read, Int -> ListPermissionSetProvisioningStatus -> ShowS
[ListPermissionSetProvisioningStatus] -> ShowS
ListPermissionSetProvisioningStatus -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListPermissionSetProvisioningStatus] -> ShowS
$cshowList :: [ListPermissionSetProvisioningStatus] -> ShowS
show :: ListPermissionSetProvisioningStatus -> String
$cshow :: ListPermissionSetProvisioningStatus -> String
showsPrec :: Int -> ListPermissionSetProvisioningStatus -> ShowS
$cshowsPrec :: Int -> ListPermissionSetProvisioningStatus -> ShowS
Prelude.Show, forall x.
Rep ListPermissionSetProvisioningStatus x
-> ListPermissionSetProvisioningStatus
forall x.
ListPermissionSetProvisioningStatus
-> Rep ListPermissionSetProvisioningStatus x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListPermissionSetProvisioningStatus x
-> ListPermissionSetProvisioningStatus
$cfrom :: forall x.
ListPermissionSetProvisioningStatus
-> Rep ListPermissionSetProvisioningStatus x
Prelude.Generic)
newListPermissionSetProvisioningStatus ::
Prelude.Text ->
ListPermissionSetProvisioningStatus
newListPermissionSetProvisioningStatus :: Text -> ListPermissionSetProvisioningStatus
newListPermissionSetProvisioningStatus Text
pInstanceArn_ =
ListPermissionSetProvisioningStatus'
{ $sel:filter':ListPermissionSetProvisioningStatus' :: Maybe OperationStatusFilter
filter' =
forall a. Maybe a
Prelude.Nothing,
$sel:maxResults:ListPermissionSetProvisioningStatus' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListPermissionSetProvisioningStatus' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:instanceArn:ListPermissionSetProvisioningStatus' :: Text
instanceArn = Text
pInstanceArn_
}
listPermissionSetProvisioningStatus_filter :: Lens.Lens' ListPermissionSetProvisioningStatus (Prelude.Maybe OperationStatusFilter)
listPermissionSetProvisioningStatus_filter :: Lens'
ListPermissionSetProvisioningStatus (Maybe OperationStatusFilter)
listPermissionSetProvisioningStatus_filter = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPermissionSetProvisioningStatus' {Maybe OperationStatusFilter
filter' :: Maybe OperationStatusFilter
$sel:filter':ListPermissionSetProvisioningStatus' :: ListPermissionSetProvisioningStatus -> Maybe OperationStatusFilter
filter'} -> Maybe OperationStatusFilter
filter') (\s :: ListPermissionSetProvisioningStatus
s@ListPermissionSetProvisioningStatus' {} Maybe OperationStatusFilter
a -> ListPermissionSetProvisioningStatus
s {$sel:filter':ListPermissionSetProvisioningStatus' :: Maybe OperationStatusFilter
filter' = Maybe OperationStatusFilter
a} :: ListPermissionSetProvisioningStatus)
listPermissionSetProvisioningStatus_maxResults :: Lens.Lens' ListPermissionSetProvisioningStatus (Prelude.Maybe Prelude.Natural)
listPermissionSetProvisioningStatus_maxResults :: Lens' ListPermissionSetProvisioningStatus (Maybe Natural)
listPermissionSetProvisioningStatus_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPermissionSetProvisioningStatus' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListPermissionSetProvisioningStatus' :: ListPermissionSetProvisioningStatus -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListPermissionSetProvisioningStatus
s@ListPermissionSetProvisioningStatus' {} Maybe Natural
a -> ListPermissionSetProvisioningStatus
s {$sel:maxResults:ListPermissionSetProvisioningStatus' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListPermissionSetProvisioningStatus)
listPermissionSetProvisioningStatus_nextToken :: Lens.Lens' ListPermissionSetProvisioningStatus (Prelude.Maybe Prelude.Text)
listPermissionSetProvisioningStatus_nextToken :: Lens' ListPermissionSetProvisioningStatus (Maybe Text)
listPermissionSetProvisioningStatus_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPermissionSetProvisioningStatus' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListPermissionSetProvisioningStatus' :: ListPermissionSetProvisioningStatus -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListPermissionSetProvisioningStatus
s@ListPermissionSetProvisioningStatus' {} Maybe Text
a -> ListPermissionSetProvisioningStatus
s {$sel:nextToken:ListPermissionSetProvisioningStatus' :: Maybe Text
nextToken = Maybe Text
a} :: ListPermissionSetProvisioningStatus)
listPermissionSetProvisioningStatus_instanceArn :: Lens.Lens' ListPermissionSetProvisioningStatus Prelude.Text
listPermissionSetProvisioningStatus_instanceArn :: Lens' ListPermissionSetProvisioningStatus Text
listPermissionSetProvisioningStatus_instanceArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPermissionSetProvisioningStatus' {Text
instanceArn :: Text
$sel:instanceArn:ListPermissionSetProvisioningStatus' :: ListPermissionSetProvisioningStatus -> Text
instanceArn} -> Text
instanceArn) (\s :: ListPermissionSetProvisioningStatus
s@ListPermissionSetProvisioningStatus' {} Text
a -> ListPermissionSetProvisioningStatus
s {$sel:instanceArn:ListPermissionSetProvisioningStatus' :: Text
instanceArn = Text
a} :: ListPermissionSetProvisioningStatus)
instance
Core.AWSPager
ListPermissionSetProvisioningStatus
where
page :: ListPermissionSetProvisioningStatus
-> AWSResponse ListPermissionSetProvisioningStatus
-> Maybe ListPermissionSetProvisioningStatus
page ListPermissionSetProvisioningStatus
rq AWSResponse ListPermissionSetProvisioningStatus
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse ListPermissionSetProvisioningStatus
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListPermissionSetProvisioningStatusResponse (Maybe Text)
listPermissionSetProvisioningStatusResponse_nextToken
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse ListPermissionSetProvisioningStatus
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens'
ListPermissionSetProvisioningStatusResponse
(Maybe [PermissionSetProvisioningStatusMetadata])
listPermissionSetProvisioningStatusResponse_permissionSetsProvisioningStatus
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| Bool
Prelude.otherwise =
forall a. a -> Maybe a
Prelude.Just
forall a b. (a -> b) -> a -> b
Prelude.$ ListPermissionSetProvisioningStatus
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' ListPermissionSetProvisioningStatus (Maybe Text)
listPermissionSetProvisioningStatus_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse ListPermissionSetProvisioningStatus
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListPermissionSetProvisioningStatusResponse (Maybe Text)
listPermissionSetProvisioningStatusResponse_nextToken
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
instance
Core.AWSRequest
ListPermissionSetProvisioningStatus
where
type
AWSResponse ListPermissionSetProvisioningStatus =
ListPermissionSetProvisioningStatusResponse
request :: (Service -> Service)
-> ListPermissionSetProvisioningStatus
-> Request ListPermissionSetProvisioningStatus
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 ListPermissionSetProvisioningStatus
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse (AWSResponse ListPermissionSetProvisioningStatus)))
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 [PermissionSetProvisioningStatusMetadata]
-> Int
-> ListPermissionSetProvisioningStatusResponse
ListPermissionSetProvisioningStatusResponse'
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
"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
"PermissionSetsProvisioningStatus"
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.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance
Prelude.Hashable
ListPermissionSetProvisioningStatus
where
hashWithSalt :: Int -> ListPermissionSetProvisioningStatus -> Int
hashWithSalt
Int
_salt
ListPermissionSetProvisioningStatus' {Maybe Natural
Maybe Text
Maybe OperationStatusFilter
Text
instanceArn :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
filter' :: Maybe OperationStatusFilter
$sel:instanceArn:ListPermissionSetProvisioningStatus' :: ListPermissionSetProvisioningStatus -> Text
$sel:nextToken:ListPermissionSetProvisioningStatus' :: ListPermissionSetProvisioningStatus -> Maybe Text
$sel:maxResults:ListPermissionSetProvisioningStatus' :: ListPermissionSetProvisioningStatus -> Maybe Natural
$sel:filter':ListPermissionSetProvisioningStatus' :: ListPermissionSetProvisioningStatus -> Maybe OperationStatusFilter
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe OperationStatusFilter
filter'
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
instanceArn
instance
Prelude.NFData
ListPermissionSetProvisioningStatus
where
rnf :: ListPermissionSetProvisioningStatus -> ()
rnf ListPermissionSetProvisioningStatus' {Maybe Natural
Maybe Text
Maybe OperationStatusFilter
Text
instanceArn :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
filter' :: Maybe OperationStatusFilter
$sel:instanceArn:ListPermissionSetProvisioningStatus' :: ListPermissionSetProvisioningStatus -> Text
$sel:nextToken:ListPermissionSetProvisioningStatus' :: ListPermissionSetProvisioningStatus -> Maybe Text
$sel:maxResults:ListPermissionSetProvisioningStatus' :: ListPermissionSetProvisioningStatus -> Maybe Natural
$sel:filter':ListPermissionSetProvisioningStatus' :: ListPermissionSetProvisioningStatus -> Maybe OperationStatusFilter
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe OperationStatusFilter
filter'
seq :: forall a b. a -> b -> b
`Prelude.seq` 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
instanceArn
instance
Data.ToHeaders
ListPermissionSetProvisioningStatus
where
toHeaders :: ListPermissionSetProvisioningStatus -> 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
"SWBExternalService.ListPermissionSetProvisioningStatus" ::
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
ListPermissionSetProvisioningStatus
where
toJSON :: ListPermissionSetProvisioningStatus -> Value
toJSON ListPermissionSetProvisioningStatus' {Maybe Natural
Maybe Text
Maybe OperationStatusFilter
Text
instanceArn :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
filter' :: Maybe OperationStatusFilter
$sel:instanceArn:ListPermissionSetProvisioningStatus' :: ListPermissionSetProvisioningStatus -> Text
$sel:nextToken:ListPermissionSetProvisioningStatus' :: ListPermissionSetProvisioningStatus -> Maybe Text
$sel:maxResults:ListPermissionSetProvisioningStatus' :: ListPermissionSetProvisioningStatus -> Maybe Natural
$sel:filter':ListPermissionSetProvisioningStatus' :: ListPermissionSetProvisioningStatus -> Maybe OperationStatusFilter
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"Filter" 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 OperationStatusFilter
filter',
(Key
"MaxResults" 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 Natural
maxResults,
(Key
"NextToken" 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
nextToken,
forall a. a -> Maybe a
Prelude.Just (Key
"InstanceArn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
instanceArn)
]
)
instance
Data.ToPath
ListPermissionSetProvisioningStatus
where
toPath :: ListPermissionSetProvisioningStatus -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance
Data.ToQuery
ListPermissionSetProvisioningStatus
where
toQuery :: ListPermissionSetProvisioningStatus -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data ListPermissionSetProvisioningStatusResponse = ListPermissionSetProvisioningStatusResponse'
{
ListPermissionSetProvisioningStatusResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListPermissionSetProvisioningStatusResponse
-> Maybe [PermissionSetProvisioningStatusMetadata]
permissionSetsProvisioningStatus :: Prelude.Maybe [PermissionSetProvisioningStatusMetadata],
ListPermissionSetProvisioningStatusResponse -> Int
httpStatus :: Prelude.Int
}
deriving (ListPermissionSetProvisioningStatusResponse
-> ListPermissionSetProvisioningStatusResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListPermissionSetProvisioningStatusResponse
-> ListPermissionSetProvisioningStatusResponse -> Bool
$c/= :: ListPermissionSetProvisioningStatusResponse
-> ListPermissionSetProvisioningStatusResponse -> Bool
== :: ListPermissionSetProvisioningStatusResponse
-> ListPermissionSetProvisioningStatusResponse -> Bool
$c== :: ListPermissionSetProvisioningStatusResponse
-> ListPermissionSetProvisioningStatusResponse -> Bool
Prelude.Eq, ReadPrec [ListPermissionSetProvisioningStatusResponse]
ReadPrec ListPermissionSetProvisioningStatusResponse
Int -> ReadS ListPermissionSetProvisioningStatusResponse
ReadS [ListPermissionSetProvisioningStatusResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListPermissionSetProvisioningStatusResponse]
$creadListPrec :: ReadPrec [ListPermissionSetProvisioningStatusResponse]
readPrec :: ReadPrec ListPermissionSetProvisioningStatusResponse
$creadPrec :: ReadPrec ListPermissionSetProvisioningStatusResponse
readList :: ReadS [ListPermissionSetProvisioningStatusResponse]
$creadList :: ReadS [ListPermissionSetProvisioningStatusResponse]
readsPrec :: Int -> ReadS ListPermissionSetProvisioningStatusResponse
$creadsPrec :: Int -> ReadS ListPermissionSetProvisioningStatusResponse
Prelude.Read, Int -> ListPermissionSetProvisioningStatusResponse -> ShowS
[ListPermissionSetProvisioningStatusResponse] -> ShowS
ListPermissionSetProvisioningStatusResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListPermissionSetProvisioningStatusResponse] -> ShowS
$cshowList :: [ListPermissionSetProvisioningStatusResponse] -> ShowS
show :: ListPermissionSetProvisioningStatusResponse -> String
$cshow :: ListPermissionSetProvisioningStatusResponse -> String
showsPrec :: Int -> ListPermissionSetProvisioningStatusResponse -> ShowS
$cshowsPrec :: Int -> ListPermissionSetProvisioningStatusResponse -> ShowS
Prelude.Show, forall x.
Rep ListPermissionSetProvisioningStatusResponse x
-> ListPermissionSetProvisioningStatusResponse
forall x.
ListPermissionSetProvisioningStatusResponse
-> Rep ListPermissionSetProvisioningStatusResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListPermissionSetProvisioningStatusResponse x
-> ListPermissionSetProvisioningStatusResponse
$cfrom :: forall x.
ListPermissionSetProvisioningStatusResponse
-> Rep ListPermissionSetProvisioningStatusResponse x
Prelude.Generic)
newListPermissionSetProvisioningStatusResponse ::
Prelude.Int ->
ListPermissionSetProvisioningStatusResponse
newListPermissionSetProvisioningStatusResponse :: Int -> ListPermissionSetProvisioningStatusResponse
newListPermissionSetProvisioningStatusResponse
Int
pHttpStatus_ =
ListPermissionSetProvisioningStatusResponse'
{ $sel:nextToken:ListPermissionSetProvisioningStatusResponse' :: Maybe Text
nextToken =
forall a. Maybe a
Prelude.Nothing,
$sel:permissionSetsProvisioningStatus:ListPermissionSetProvisioningStatusResponse' :: Maybe [PermissionSetProvisioningStatusMetadata]
permissionSetsProvisioningStatus =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ListPermissionSetProvisioningStatusResponse' :: Int
httpStatus = Int
pHttpStatus_
}
listPermissionSetProvisioningStatusResponse_nextToken :: Lens.Lens' ListPermissionSetProvisioningStatusResponse (Prelude.Maybe Prelude.Text)
listPermissionSetProvisioningStatusResponse_nextToken :: Lens' ListPermissionSetProvisioningStatusResponse (Maybe Text)
listPermissionSetProvisioningStatusResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPermissionSetProvisioningStatusResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListPermissionSetProvisioningStatusResponse' :: ListPermissionSetProvisioningStatusResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListPermissionSetProvisioningStatusResponse
s@ListPermissionSetProvisioningStatusResponse' {} Maybe Text
a -> ListPermissionSetProvisioningStatusResponse
s {$sel:nextToken:ListPermissionSetProvisioningStatusResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListPermissionSetProvisioningStatusResponse)
listPermissionSetProvisioningStatusResponse_permissionSetsProvisioningStatus :: Lens.Lens' ListPermissionSetProvisioningStatusResponse (Prelude.Maybe [PermissionSetProvisioningStatusMetadata])
listPermissionSetProvisioningStatusResponse_permissionSetsProvisioningStatus :: Lens'
ListPermissionSetProvisioningStatusResponse
(Maybe [PermissionSetProvisioningStatusMetadata])
listPermissionSetProvisioningStatusResponse_permissionSetsProvisioningStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPermissionSetProvisioningStatusResponse' {Maybe [PermissionSetProvisioningStatusMetadata]
permissionSetsProvisioningStatus :: Maybe [PermissionSetProvisioningStatusMetadata]
$sel:permissionSetsProvisioningStatus:ListPermissionSetProvisioningStatusResponse' :: ListPermissionSetProvisioningStatusResponse
-> Maybe [PermissionSetProvisioningStatusMetadata]
permissionSetsProvisioningStatus} -> Maybe [PermissionSetProvisioningStatusMetadata]
permissionSetsProvisioningStatus) (\s :: ListPermissionSetProvisioningStatusResponse
s@ListPermissionSetProvisioningStatusResponse' {} Maybe [PermissionSetProvisioningStatusMetadata]
a -> ListPermissionSetProvisioningStatusResponse
s {$sel:permissionSetsProvisioningStatus:ListPermissionSetProvisioningStatusResponse' :: Maybe [PermissionSetProvisioningStatusMetadata]
permissionSetsProvisioningStatus = Maybe [PermissionSetProvisioningStatusMetadata]
a} :: ListPermissionSetProvisioningStatusResponse) 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
listPermissionSetProvisioningStatusResponse_httpStatus :: Lens.Lens' ListPermissionSetProvisioningStatusResponse Prelude.Int
listPermissionSetProvisioningStatusResponse_httpStatus :: Lens' ListPermissionSetProvisioningStatusResponse Int
listPermissionSetProvisioningStatusResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPermissionSetProvisioningStatusResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListPermissionSetProvisioningStatusResponse' :: ListPermissionSetProvisioningStatusResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListPermissionSetProvisioningStatusResponse
s@ListPermissionSetProvisioningStatusResponse' {} Int
a -> ListPermissionSetProvisioningStatusResponse
s {$sel:httpStatus:ListPermissionSetProvisioningStatusResponse' :: Int
httpStatus = Int
a} :: ListPermissionSetProvisioningStatusResponse)
instance
Prelude.NFData
ListPermissionSetProvisioningStatusResponse
where
rnf :: ListPermissionSetProvisioningStatusResponse -> ()
rnf ListPermissionSetProvisioningStatusResponse' {Int
Maybe [PermissionSetProvisioningStatusMetadata]
Maybe Text
httpStatus :: Int
permissionSetsProvisioningStatus :: Maybe [PermissionSetProvisioningStatusMetadata]
nextToken :: Maybe Text
$sel:httpStatus:ListPermissionSetProvisioningStatusResponse' :: ListPermissionSetProvisioningStatusResponse -> Int
$sel:permissionSetsProvisioningStatus:ListPermissionSetProvisioningStatusResponse' :: ListPermissionSetProvisioningStatusResponse
-> Maybe [PermissionSetProvisioningStatusMetadata]
$sel:nextToken:ListPermissionSetProvisioningStatusResponse' :: ListPermissionSetProvisioningStatusResponse -> Maybe Text
..} =
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 [PermissionSetProvisioningStatusMetadata]
permissionSetsProvisioningStatus
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus