{-# 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.ListPermissionSetsProvisionedToAccount
(
ListPermissionSetsProvisionedToAccount (..),
newListPermissionSetsProvisionedToAccount,
listPermissionSetsProvisionedToAccount_maxResults,
listPermissionSetsProvisionedToAccount_nextToken,
listPermissionSetsProvisionedToAccount_provisioningStatus,
listPermissionSetsProvisionedToAccount_instanceArn,
listPermissionSetsProvisionedToAccount_accountId,
ListPermissionSetsProvisionedToAccountResponse (..),
newListPermissionSetsProvisionedToAccountResponse,
listPermissionSetsProvisionedToAccountResponse_nextToken,
listPermissionSetsProvisionedToAccountResponse_permissionSets,
listPermissionSetsProvisionedToAccountResponse_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 ListPermissionSetsProvisionedToAccount = ListPermissionSetsProvisionedToAccount'
{
ListPermissionSetsProvisionedToAccount -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
ListPermissionSetsProvisionedToAccount -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListPermissionSetsProvisionedToAccount -> Maybe ProvisioningStatus
provisioningStatus :: Prelude.Maybe ProvisioningStatus,
ListPermissionSetsProvisionedToAccount -> Text
instanceArn :: Prelude.Text,
ListPermissionSetsProvisionedToAccount -> Text
accountId :: Prelude.Text
}
deriving (ListPermissionSetsProvisionedToAccount
-> ListPermissionSetsProvisionedToAccount -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListPermissionSetsProvisionedToAccount
-> ListPermissionSetsProvisionedToAccount -> Bool
$c/= :: ListPermissionSetsProvisionedToAccount
-> ListPermissionSetsProvisionedToAccount -> Bool
== :: ListPermissionSetsProvisionedToAccount
-> ListPermissionSetsProvisionedToAccount -> Bool
$c== :: ListPermissionSetsProvisionedToAccount
-> ListPermissionSetsProvisionedToAccount -> Bool
Prelude.Eq, ReadPrec [ListPermissionSetsProvisionedToAccount]
ReadPrec ListPermissionSetsProvisionedToAccount
Int -> ReadS ListPermissionSetsProvisionedToAccount
ReadS [ListPermissionSetsProvisionedToAccount]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListPermissionSetsProvisionedToAccount]
$creadListPrec :: ReadPrec [ListPermissionSetsProvisionedToAccount]
readPrec :: ReadPrec ListPermissionSetsProvisionedToAccount
$creadPrec :: ReadPrec ListPermissionSetsProvisionedToAccount
readList :: ReadS [ListPermissionSetsProvisionedToAccount]
$creadList :: ReadS [ListPermissionSetsProvisionedToAccount]
readsPrec :: Int -> ReadS ListPermissionSetsProvisionedToAccount
$creadsPrec :: Int -> ReadS ListPermissionSetsProvisionedToAccount
Prelude.Read, Int -> ListPermissionSetsProvisionedToAccount -> ShowS
[ListPermissionSetsProvisionedToAccount] -> ShowS
ListPermissionSetsProvisionedToAccount -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListPermissionSetsProvisionedToAccount] -> ShowS
$cshowList :: [ListPermissionSetsProvisionedToAccount] -> ShowS
show :: ListPermissionSetsProvisionedToAccount -> String
$cshow :: ListPermissionSetsProvisionedToAccount -> String
showsPrec :: Int -> ListPermissionSetsProvisionedToAccount -> ShowS
$cshowsPrec :: Int -> ListPermissionSetsProvisionedToAccount -> ShowS
Prelude.Show, forall x.
Rep ListPermissionSetsProvisionedToAccount x
-> ListPermissionSetsProvisionedToAccount
forall x.
ListPermissionSetsProvisionedToAccount
-> Rep ListPermissionSetsProvisionedToAccount x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListPermissionSetsProvisionedToAccount x
-> ListPermissionSetsProvisionedToAccount
$cfrom :: forall x.
ListPermissionSetsProvisionedToAccount
-> Rep ListPermissionSetsProvisionedToAccount x
Prelude.Generic)
newListPermissionSetsProvisionedToAccount ::
Prelude.Text ->
Prelude.Text ->
ListPermissionSetsProvisionedToAccount
newListPermissionSetsProvisionedToAccount :: Text -> Text -> ListPermissionSetsProvisionedToAccount
newListPermissionSetsProvisionedToAccount
Text
pInstanceArn_
Text
pAccountId_ =
ListPermissionSetsProvisionedToAccount'
{ $sel:maxResults:ListPermissionSetsProvisionedToAccount' :: Maybe Natural
maxResults =
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListPermissionSetsProvisionedToAccount' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:provisioningStatus:ListPermissionSetsProvisionedToAccount' :: Maybe ProvisioningStatus
provisioningStatus =
forall a. Maybe a
Prelude.Nothing,
$sel:instanceArn:ListPermissionSetsProvisionedToAccount' :: Text
instanceArn = Text
pInstanceArn_,
$sel:accountId:ListPermissionSetsProvisionedToAccount' :: Text
accountId = Text
pAccountId_
}
listPermissionSetsProvisionedToAccount_maxResults :: Lens.Lens' ListPermissionSetsProvisionedToAccount (Prelude.Maybe Prelude.Natural)
listPermissionSetsProvisionedToAccount_maxResults :: Lens' ListPermissionSetsProvisionedToAccount (Maybe Natural)
listPermissionSetsProvisionedToAccount_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPermissionSetsProvisionedToAccount' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListPermissionSetsProvisionedToAccount
s@ListPermissionSetsProvisionedToAccount' {} Maybe Natural
a -> ListPermissionSetsProvisionedToAccount
s {$sel:maxResults:ListPermissionSetsProvisionedToAccount' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListPermissionSetsProvisionedToAccount)
listPermissionSetsProvisionedToAccount_nextToken :: Lens.Lens' ListPermissionSetsProvisionedToAccount (Prelude.Maybe Prelude.Text)
listPermissionSetsProvisionedToAccount_nextToken :: Lens' ListPermissionSetsProvisionedToAccount (Maybe Text)
listPermissionSetsProvisionedToAccount_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPermissionSetsProvisionedToAccount' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListPermissionSetsProvisionedToAccount
s@ListPermissionSetsProvisionedToAccount' {} Maybe Text
a -> ListPermissionSetsProvisionedToAccount
s {$sel:nextToken:ListPermissionSetsProvisionedToAccount' :: Maybe Text
nextToken = Maybe Text
a} :: ListPermissionSetsProvisionedToAccount)
listPermissionSetsProvisionedToAccount_provisioningStatus :: Lens.Lens' ListPermissionSetsProvisionedToAccount (Prelude.Maybe ProvisioningStatus)
listPermissionSetsProvisionedToAccount_provisioningStatus :: Lens'
ListPermissionSetsProvisionedToAccount (Maybe ProvisioningStatus)
listPermissionSetsProvisionedToAccount_provisioningStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPermissionSetsProvisionedToAccount' {Maybe ProvisioningStatus
provisioningStatus :: Maybe ProvisioningStatus
$sel:provisioningStatus:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> Maybe ProvisioningStatus
provisioningStatus} -> Maybe ProvisioningStatus
provisioningStatus) (\s :: ListPermissionSetsProvisionedToAccount
s@ListPermissionSetsProvisionedToAccount' {} Maybe ProvisioningStatus
a -> ListPermissionSetsProvisionedToAccount
s {$sel:provisioningStatus:ListPermissionSetsProvisionedToAccount' :: Maybe ProvisioningStatus
provisioningStatus = Maybe ProvisioningStatus
a} :: ListPermissionSetsProvisionedToAccount)
listPermissionSetsProvisionedToAccount_instanceArn :: Lens.Lens' ListPermissionSetsProvisionedToAccount Prelude.Text
listPermissionSetsProvisionedToAccount_instanceArn :: Lens' ListPermissionSetsProvisionedToAccount Text
listPermissionSetsProvisionedToAccount_instanceArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPermissionSetsProvisionedToAccount' {Text
instanceArn :: Text
$sel:instanceArn:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> Text
instanceArn} -> Text
instanceArn) (\s :: ListPermissionSetsProvisionedToAccount
s@ListPermissionSetsProvisionedToAccount' {} Text
a -> ListPermissionSetsProvisionedToAccount
s {$sel:instanceArn:ListPermissionSetsProvisionedToAccount' :: Text
instanceArn = Text
a} :: ListPermissionSetsProvisionedToAccount)
listPermissionSetsProvisionedToAccount_accountId :: Lens.Lens' ListPermissionSetsProvisionedToAccount Prelude.Text
listPermissionSetsProvisionedToAccount_accountId :: Lens' ListPermissionSetsProvisionedToAccount Text
listPermissionSetsProvisionedToAccount_accountId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPermissionSetsProvisionedToAccount' {Text
accountId :: Text
$sel:accountId:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> Text
accountId} -> Text
accountId) (\s :: ListPermissionSetsProvisionedToAccount
s@ListPermissionSetsProvisionedToAccount' {} Text
a -> ListPermissionSetsProvisionedToAccount
s {$sel:accountId:ListPermissionSetsProvisionedToAccount' :: Text
accountId = Text
a} :: ListPermissionSetsProvisionedToAccount)
instance
Core.AWSPager
ListPermissionSetsProvisionedToAccount
where
page :: ListPermissionSetsProvisionedToAccount
-> AWSResponse ListPermissionSetsProvisionedToAccount
-> Maybe ListPermissionSetsProvisionedToAccount
page ListPermissionSetsProvisionedToAccount
rq AWSResponse ListPermissionSetsProvisionedToAccount
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse ListPermissionSetsProvisionedToAccount
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListPermissionSetsProvisionedToAccountResponse (Maybe Text)
listPermissionSetsProvisionedToAccountResponse_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 ListPermissionSetsProvisionedToAccount
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListPermissionSetsProvisionedToAccountResponse (Maybe [Text])
listPermissionSetsProvisionedToAccountResponse_permissionSets
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.$ ListPermissionSetsProvisionedToAccount
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' ListPermissionSetsProvisionedToAccount (Maybe Text)
listPermissionSetsProvisionedToAccount_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse ListPermissionSetsProvisionedToAccount
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListPermissionSetsProvisionedToAccountResponse (Maybe Text)
listPermissionSetsProvisionedToAccountResponse_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
ListPermissionSetsProvisionedToAccount
where
type
AWSResponse
ListPermissionSetsProvisionedToAccount =
ListPermissionSetsProvisionedToAccountResponse
request :: (Service -> Service)
-> ListPermissionSetsProvisionedToAccount
-> Request ListPermissionSetsProvisionedToAccount
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 ListPermissionSetsProvisionedToAccount
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse
(AWSResponse ListPermissionSetsProvisionedToAccount)))
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
-> ListPermissionSetsProvisionedToAccountResponse
ListPermissionSetsProvisionedToAccountResponse'
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
"PermissionSets" 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
ListPermissionSetsProvisionedToAccount
where
hashWithSalt :: Int -> ListPermissionSetsProvisionedToAccount -> Int
hashWithSalt
Int
_salt
ListPermissionSetsProvisionedToAccount' {Maybe Natural
Maybe Text
Maybe ProvisioningStatus
Text
accountId :: Text
instanceArn :: Text
provisioningStatus :: Maybe ProvisioningStatus
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:accountId:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> Text
$sel:instanceArn:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> Text
$sel:provisioningStatus:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> Maybe ProvisioningStatus
$sel:nextToken:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> Maybe Text
$sel:maxResults:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> 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` Maybe ProvisioningStatus
provisioningStatus
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
instanceArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
accountId
instance
Prelude.NFData
ListPermissionSetsProvisionedToAccount
where
rnf :: ListPermissionSetsProvisionedToAccount -> ()
rnf ListPermissionSetsProvisionedToAccount' {Maybe Natural
Maybe Text
Maybe ProvisioningStatus
Text
accountId :: Text
instanceArn :: Text
provisioningStatus :: Maybe ProvisioningStatus
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:accountId:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> Text
$sel:instanceArn:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> Text
$sel:provisioningStatus:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> Maybe ProvisioningStatus
$sel:nextToken:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> Maybe Text
$sel:maxResults:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> 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 Maybe ProvisioningStatus
provisioningStatus
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
instanceArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
accountId
instance
Data.ToHeaders
ListPermissionSetsProvisionedToAccount
where
toHeaders :: ListPermissionSetsProvisionedToAccount -> 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.ListPermissionSetsProvisionedToAccount" ::
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
ListPermissionSetsProvisionedToAccount
where
toJSON :: ListPermissionSetsProvisionedToAccount -> Value
toJSON ListPermissionSetsProvisionedToAccount' {Maybe Natural
Maybe Text
Maybe ProvisioningStatus
Text
accountId :: Text
instanceArn :: Text
provisioningStatus :: Maybe ProvisioningStatus
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:accountId:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> Text
$sel:instanceArn:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> Text
$sel:provisioningStatus:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> Maybe ProvisioningStatus
$sel:nextToken:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> Maybe Text
$sel:maxResults:ListPermissionSetsProvisionedToAccount' :: ListPermissionSetsProvisionedToAccount -> Maybe Natural
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (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,
(Key
"ProvisioningStatus" 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 ProvisioningStatus
provisioningStatus,
forall a. a -> Maybe a
Prelude.Just (Key
"InstanceArn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
instanceArn),
forall a. a -> Maybe a
Prelude.Just (Key
"AccountId" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
accountId)
]
)
instance
Data.ToPath
ListPermissionSetsProvisionedToAccount
where
toPath :: ListPermissionSetsProvisionedToAccount -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance
Data.ToQuery
ListPermissionSetsProvisionedToAccount
where
toQuery :: ListPermissionSetsProvisionedToAccount -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data ListPermissionSetsProvisionedToAccountResponse = ListPermissionSetsProvisionedToAccountResponse'
{
ListPermissionSetsProvisionedToAccountResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListPermissionSetsProvisionedToAccountResponse -> Maybe [Text]
permissionSets :: Prelude.Maybe [Prelude.Text],
ListPermissionSetsProvisionedToAccountResponse -> Int
httpStatus :: Prelude.Int
}
deriving (ListPermissionSetsProvisionedToAccountResponse
-> ListPermissionSetsProvisionedToAccountResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListPermissionSetsProvisionedToAccountResponse
-> ListPermissionSetsProvisionedToAccountResponse -> Bool
$c/= :: ListPermissionSetsProvisionedToAccountResponse
-> ListPermissionSetsProvisionedToAccountResponse -> Bool
== :: ListPermissionSetsProvisionedToAccountResponse
-> ListPermissionSetsProvisionedToAccountResponse -> Bool
$c== :: ListPermissionSetsProvisionedToAccountResponse
-> ListPermissionSetsProvisionedToAccountResponse -> Bool
Prelude.Eq, ReadPrec [ListPermissionSetsProvisionedToAccountResponse]
ReadPrec ListPermissionSetsProvisionedToAccountResponse
Int -> ReadS ListPermissionSetsProvisionedToAccountResponse
ReadS [ListPermissionSetsProvisionedToAccountResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListPermissionSetsProvisionedToAccountResponse]
$creadListPrec :: ReadPrec [ListPermissionSetsProvisionedToAccountResponse]
readPrec :: ReadPrec ListPermissionSetsProvisionedToAccountResponse
$creadPrec :: ReadPrec ListPermissionSetsProvisionedToAccountResponse
readList :: ReadS [ListPermissionSetsProvisionedToAccountResponse]
$creadList :: ReadS [ListPermissionSetsProvisionedToAccountResponse]
readsPrec :: Int -> ReadS ListPermissionSetsProvisionedToAccountResponse
$creadsPrec :: Int -> ReadS ListPermissionSetsProvisionedToAccountResponse
Prelude.Read, Int -> ListPermissionSetsProvisionedToAccountResponse -> ShowS
[ListPermissionSetsProvisionedToAccountResponse] -> ShowS
ListPermissionSetsProvisionedToAccountResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListPermissionSetsProvisionedToAccountResponse] -> ShowS
$cshowList :: [ListPermissionSetsProvisionedToAccountResponse] -> ShowS
show :: ListPermissionSetsProvisionedToAccountResponse -> String
$cshow :: ListPermissionSetsProvisionedToAccountResponse -> String
showsPrec :: Int -> ListPermissionSetsProvisionedToAccountResponse -> ShowS
$cshowsPrec :: Int -> ListPermissionSetsProvisionedToAccountResponse -> ShowS
Prelude.Show, forall x.
Rep ListPermissionSetsProvisionedToAccountResponse x
-> ListPermissionSetsProvisionedToAccountResponse
forall x.
ListPermissionSetsProvisionedToAccountResponse
-> Rep ListPermissionSetsProvisionedToAccountResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListPermissionSetsProvisionedToAccountResponse x
-> ListPermissionSetsProvisionedToAccountResponse
$cfrom :: forall x.
ListPermissionSetsProvisionedToAccountResponse
-> Rep ListPermissionSetsProvisionedToAccountResponse x
Prelude.Generic)
newListPermissionSetsProvisionedToAccountResponse ::
Prelude.Int ->
ListPermissionSetsProvisionedToAccountResponse
newListPermissionSetsProvisionedToAccountResponse :: Int -> ListPermissionSetsProvisionedToAccountResponse
newListPermissionSetsProvisionedToAccountResponse
Int
pHttpStatus_ =
ListPermissionSetsProvisionedToAccountResponse'
{ $sel:nextToken:ListPermissionSetsProvisionedToAccountResponse' :: Maybe Text
nextToken =
forall a. Maybe a
Prelude.Nothing,
$sel:permissionSets:ListPermissionSetsProvisionedToAccountResponse' :: Maybe [Text]
permissionSets =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ListPermissionSetsProvisionedToAccountResponse' :: Int
httpStatus = Int
pHttpStatus_
}
listPermissionSetsProvisionedToAccountResponse_nextToken :: Lens.Lens' ListPermissionSetsProvisionedToAccountResponse (Prelude.Maybe Prelude.Text)
listPermissionSetsProvisionedToAccountResponse_nextToken :: Lens' ListPermissionSetsProvisionedToAccountResponse (Maybe Text)
listPermissionSetsProvisionedToAccountResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPermissionSetsProvisionedToAccountResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListPermissionSetsProvisionedToAccountResponse' :: ListPermissionSetsProvisionedToAccountResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListPermissionSetsProvisionedToAccountResponse
s@ListPermissionSetsProvisionedToAccountResponse' {} Maybe Text
a -> ListPermissionSetsProvisionedToAccountResponse
s {$sel:nextToken:ListPermissionSetsProvisionedToAccountResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListPermissionSetsProvisionedToAccountResponse)
listPermissionSetsProvisionedToAccountResponse_permissionSets :: Lens.Lens' ListPermissionSetsProvisionedToAccountResponse (Prelude.Maybe [Prelude.Text])
listPermissionSetsProvisionedToAccountResponse_permissionSets :: Lens' ListPermissionSetsProvisionedToAccountResponse (Maybe [Text])
listPermissionSetsProvisionedToAccountResponse_permissionSets = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPermissionSetsProvisionedToAccountResponse' {Maybe [Text]
permissionSets :: Maybe [Text]
$sel:permissionSets:ListPermissionSetsProvisionedToAccountResponse' :: ListPermissionSetsProvisionedToAccountResponse -> Maybe [Text]
permissionSets} -> Maybe [Text]
permissionSets) (\s :: ListPermissionSetsProvisionedToAccountResponse
s@ListPermissionSetsProvisionedToAccountResponse' {} Maybe [Text]
a -> ListPermissionSetsProvisionedToAccountResponse
s {$sel:permissionSets:ListPermissionSetsProvisionedToAccountResponse' :: Maybe [Text]
permissionSets = Maybe [Text]
a} :: ListPermissionSetsProvisionedToAccountResponse) 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
listPermissionSetsProvisionedToAccountResponse_httpStatus :: Lens.Lens' ListPermissionSetsProvisionedToAccountResponse Prelude.Int
listPermissionSetsProvisionedToAccountResponse_httpStatus :: Lens' ListPermissionSetsProvisionedToAccountResponse Int
listPermissionSetsProvisionedToAccountResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListPermissionSetsProvisionedToAccountResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListPermissionSetsProvisionedToAccountResponse' :: ListPermissionSetsProvisionedToAccountResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListPermissionSetsProvisionedToAccountResponse
s@ListPermissionSetsProvisionedToAccountResponse' {} Int
a -> ListPermissionSetsProvisionedToAccountResponse
s {$sel:httpStatus:ListPermissionSetsProvisionedToAccountResponse' :: Int
httpStatus = Int
a} :: ListPermissionSetsProvisionedToAccountResponse)
instance
Prelude.NFData
ListPermissionSetsProvisionedToAccountResponse
where
rnf :: ListPermissionSetsProvisionedToAccountResponse -> ()
rnf
ListPermissionSetsProvisionedToAccountResponse' {Int
Maybe [Text]
Maybe Text
httpStatus :: Int
permissionSets :: Maybe [Text]
nextToken :: Maybe Text
$sel:httpStatus:ListPermissionSetsProvisionedToAccountResponse' :: ListPermissionSetsProvisionedToAccountResponse -> Int
$sel:permissionSets:ListPermissionSetsProvisionedToAccountResponse' :: ListPermissionSetsProvisionedToAccountResponse -> Maybe [Text]
$sel:nextToken:ListPermissionSetsProvisionedToAccountResponse' :: ListPermissionSetsProvisionedToAccountResponse -> 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 [Text]
permissionSets
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus