{-# 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.ListAccountsForProvisionedPermissionSet
(
ListAccountsForProvisionedPermissionSet (..),
newListAccountsForProvisionedPermissionSet,
listAccountsForProvisionedPermissionSet_maxResults,
listAccountsForProvisionedPermissionSet_nextToken,
listAccountsForProvisionedPermissionSet_provisioningStatus,
listAccountsForProvisionedPermissionSet_instanceArn,
listAccountsForProvisionedPermissionSet_permissionSetArn,
ListAccountsForProvisionedPermissionSetResponse (..),
newListAccountsForProvisionedPermissionSetResponse,
listAccountsForProvisionedPermissionSetResponse_accountIds,
listAccountsForProvisionedPermissionSetResponse_nextToken,
listAccountsForProvisionedPermissionSetResponse_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 ListAccountsForProvisionedPermissionSet = ListAccountsForProvisionedPermissionSet'
{
ListAccountsForProvisionedPermissionSet -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
ListAccountsForProvisionedPermissionSet -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListAccountsForProvisionedPermissionSet -> Maybe ProvisioningStatus
provisioningStatus :: Prelude.Maybe ProvisioningStatus,
ListAccountsForProvisionedPermissionSet -> Text
instanceArn :: Prelude.Text,
ListAccountsForProvisionedPermissionSet -> Text
permissionSetArn :: Prelude.Text
}
deriving (ListAccountsForProvisionedPermissionSet
-> ListAccountsForProvisionedPermissionSet -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListAccountsForProvisionedPermissionSet
-> ListAccountsForProvisionedPermissionSet -> Bool
$c/= :: ListAccountsForProvisionedPermissionSet
-> ListAccountsForProvisionedPermissionSet -> Bool
== :: ListAccountsForProvisionedPermissionSet
-> ListAccountsForProvisionedPermissionSet -> Bool
$c== :: ListAccountsForProvisionedPermissionSet
-> ListAccountsForProvisionedPermissionSet -> Bool
Prelude.Eq, ReadPrec [ListAccountsForProvisionedPermissionSet]
ReadPrec ListAccountsForProvisionedPermissionSet
Int -> ReadS ListAccountsForProvisionedPermissionSet
ReadS [ListAccountsForProvisionedPermissionSet]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListAccountsForProvisionedPermissionSet]
$creadListPrec :: ReadPrec [ListAccountsForProvisionedPermissionSet]
readPrec :: ReadPrec ListAccountsForProvisionedPermissionSet
$creadPrec :: ReadPrec ListAccountsForProvisionedPermissionSet
readList :: ReadS [ListAccountsForProvisionedPermissionSet]
$creadList :: ReadS [ListAccountsForProvisionedPermissionSet]
readsPrec :: Int -> ReadS ListAccountsForProvisionedPermissionSet
$creadsPrec :: Int -> ReadS ListAccountsForProvisionedPermissionSet
Prelude.Read, Int -> ListAccountsForProvisionedPermissionSet -> ShowS
[ListAccountsForProvisionedPermissionSet] -> ShowS
ListAccountsForProvisionedPermissionSet -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListAccountsForProvisionedPermissionSet] -> ShowS
$cshowList :: [ListAccountsForProvisionedPermissionSet] -> ShowS
show :: ListAccountsForProvisionedPermissionSet -> String
$cshow :: ListAccountsForProvisionedPermissionSet -> String
showsPrec :: Int -> ListAccountsForProvisionedPermissionSet -> ShowS
$cshowsPrec :: Int -> ListAccountsForProvisionedPermissionSet -> ShowS
Prelude.Show, forall x.
Rep ListAccountsForProvisionedPermissionSet x
-> ListAccountsForProvisionedPermissionSet
forall x.
ListAccountsForProvisionedPermissionSet
-> Rep ListAccountsForProvisionedPermissionSet x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListAccountsForProvisionedPermissionSet x
-> ListAccountsForProvisionedPermissionSet
$cfrom :: forall x.
ListAccountsForProvisionedPermissionSet
-> Rep ListAccountsForProvisionedPermissionSet x
Prelude.Generic)
newListAccountsForProvisionedPermissionSet ::
Prelude.Text ->
Prelude.Text ->
ListAccountsForProvisionedPermissionSet
newListAccountsForProvisionedPermissionSet :: Text -> Text -> ListAccountsForProvisionedPermissionSet
newListAccountsForProvisionedPermissionSet
Text
pInstanceArn_
Text
pPermissionSetArn_ =
ListAccountsForProvisionedPermissionSet'
{ $sel:maxResults:ListAccountsForProvisionedPermissionSet' :: Maybe Natural
maxResults =
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListAccountsForProvisionedPermissionSet' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:provisioningStatus:ListAccountsForProvisionedPermissionSet' :: Maybe ProvisioningStatus
provisioningStatus =
forall a. Maybe a
Prelude.Nothing,
$sel:instanceArn:ListAccountsForProvisionedPermissionSet' :: Text
instanceArn = Text
pInstanceArn_,
$sel:permissionSetArn:ListAccountsForProvisionedPermissionSet' :: Text
permissionSetArn =
Text
pPermissionSetArn_
}
listAccountsForProvisionedPermissionSet_maxResults :: Lens.Lens' ListAccountsForProvisionedPermissionSet (Prelude.Maybe Prelude.Natural)
listAccountsForProvisionedPermissionSet_maxResults :: Lens' ListAccountsForProvisionedPermissionSet (Maybe Natural)
listAccountsForProvisionedPermissionSet_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAccountsForProvisionedPermissionSet' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListAccountsForProvisionedPermissionSet
s@ListAccountsForProvisionedPermissionSet' {} Maybe Natural
a -> ListAccountsForProvisionedPermissionSet
s {$sel:maxResults:ListAccountsForProvisionedPermissionSet' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListAccountsForProvisionedPermissionSet)
listAccountsForProvisionedPermissionSet_nextToken :: Lens.Lens' ListAccountsForProvisionedPermissionSet (Prelude.Maybe Prelude.Text)
listAccountsForProvisionedPermissionSet_nextToken :: Lens' ListAccountsForProvisionedPermissionSet (Maybe Text)
listAccountsForProvisionedPermissionSet_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAccountsForProvisionedPermissionSet' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListAccountsForProvisionedPermissionSet
s@ListAccountsForProvisionedPermissionSet' {} Maybe Text
a -> ListAccountsForProvisionedPermissionSet
s {$sel:nextToken:ListAccountsForProvisionedPermissionSet' :: Maybe Text
nextToken = Maybe Text
a} :: ListAccountsForProvisionedPermissionSet)
listAccountsForProvisionedPermissionSet_provisioningStatus :: Lens.Lens' ListAccountsForProvisionedPermissionSet (Prelude.Maybe ProvisioningStatus)
listAccountsForProvisionedPermissionSet_provisioningStatus :: Lens'
ListAccountsForProvisionedPermissionSet (Maybe ProvisioningStatus)
listAccountsForProvisionedPermissionSet_provisioningStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAccountsForProvisionedPermissionSet' {Maybe ProvisioningStatus
provisioningStatus :: Maybe ProvisioningStatus
$sel:provisioningStatus:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> Maybe ProvisioningStatus
provisioningStatus} -> Maybe ProvisioningStatus
provisioningStatus) (\s :: ListAccountsForProvisionedPermissionSet
s@ListAccountsForProvisionedPermissionSet' {} Maybe ProvisioningStatus
a -> ListAccountsForProvisionedPermissionSet
s {$sel:provisioningStatus:ListAccountsForProvisionedPermissionSet' :: Maybe ProvisioningStatus
provisioningStatus = Maybe ProvisioningStatus
a} :: ListAccountsForProvisionedPermissionSet)
listAccountsForProvisionedPermissionSet_instanceArn :: Lens.Lens' ListAccountsForProvisionedPermissionSet Prelude.Text
listAccountsForProvisionedPermissionSet_instanceArn :: Lens' ListAccountsForProvisionedPermissionSet Text
listAccountsForProvisionedPermissionSet_instanceArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAccountsForProvisionedPermissionSet' {Text
instanceArn :: Text
$sel:instanceArn:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> Text
instanceArn} -> Text
instanceArn) (\s :: ListAccountsForProvisionedPermissionSet
s@ListAccountsForProvisionedPermissionSet' {} Text
a -> ListAccountsForProvisionedPermissionSet
s {$sel:instanceArn:ListAccountsForProvisionedPermissionSet' :: Text
instanceArn = Text
a} :: ListAccountsForProvisionedPermissionSet)
listAccountsForProvisionedPermissionSet_permissionSetArn :: Lens.Lens' ListAccountsForProvisionedPermissionSet Prelude.Text
listAccountsForProvisionedPermissionSet_permissionSetArn :: Lens' ListAccountsForProvisionedPermissionSet Text
listAccountsForProvisionedPermissionSet_permissionSetArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAccountsForProvisionedPermissionSet' {Text
permissionSetArn :: Text
$sel:permissionSetArn:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> Text
permissionSetArn} -> Text
permissionSetArn) (\s :: ListAccountsForProvisionedPermissionSet
s@ListAccountsForProvisionedPermissionSet' {} Text
a -> ListAccountsForProvisionedPermissionSet
s {$sel:permissionSetArn:ListAccountsForProvisionedPermissionSet' :: Text
permissionSetArn = Text
a} :: ListAccountsForProvisionedPermissionSet)
instance
Core.AWSPager
ListAccountsForProvisionedPermissionSet
where
page :: ListAccountsForProvisionedPermissionSet
-> AWSResponse ListAccountsForProvisionedPermissionSet
-> Maybe ListAccountsForProvisionedPermissionSet
page ListAccountsForProvisionedPermissionSet
rq AWSResponse ListAccountsForProvisionedPermissionSet
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse ListAccountsForProvisionedPermissionSet
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListAccountsForProvisionedPermissionSetResponse (Maybe Text)
listAccountsForProvisionedPermissionSetResponse_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 ListAccountsForProvisionedPermissionSet
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens'
ListAccountsForProvisionedPermissionSetResponse (Maybe [Text])
listAccountsForProvisionedPermissionSetResponse_accountIds
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.$ ListAccountsForProvisionedPermissionSet
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' ListAccountsForProvisionedPermissionSet (Maybe Text)
listAccountsForProvisionedPermissionSet_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse ListAccountsForProvisionedPermissionSet
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListAccountsForProvisionedPermissionSetResponse (Maybe Text)
listAccountsForProvisionedPermissionSetResponse_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
ListAccountsForProvisionedPermissionSet
where
type
AWSResponse
ListAccountsForProvisionedPermissionSet =
ListAccountsForProvisionedPermissionSetResponse
request :: (Service -> Service)
-> ListAccountsForProvisionedPermissionSet
-> Request ListAccountsForProvisionedPermissionSet
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 ListAccountsForProvisionedPermissionSet
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse
(AWSResponse ListAccountsForProvisionedPermissionSet)))
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
-> ListAccountsForProvisionedPermissionSetResponse
ListAccountsForProvisionedPermissionSetResponse'
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
"AccountIds" forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"NextToken")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance
Prelude.Hashable
ListAccountsForProvisionedPermissionSet
where
hashWithSalt :: Int -> ListAccountsForProvisionedPermissionSet -> Int
hashWithSalt
Int
_salt
ListAccountsForProvisionedPermissionSet' {Maybe Natural
Maybe Text
Maybe ProvisioningStatus
Text
permissionSetArn :: Text
instanceArn :: Text
provisioningStatus :: Maybe ProvisioningStatus
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:permissionSetArn:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> Text
$sel:instanceArn:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> Text
$sel:provisioningStatus:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> Maybe ProvisioningStatus
$sel:nextToken:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> Maybe Text
$sel:maxResults:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> 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
permissionSetArn
instance
Prelude.NFData
ListAccountsForProvisionedPermissionSet
where
rnf :: ListAccountsForProvisionedPermissionSet -> ()
rnf ListAccountsForProvisionedPermissionSet' {Maybe Natural
Maybe Text
Maybe ProvisioningStatus
Text
permissionSetArn :: Text
instanceArn :: Text
provisioningStatus :: Maybe ProvisioningStatus
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:permissionSetArn:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> Text
$sel:instanceArn:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> Text
$sel:provisioningStatus:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> Maybe ProvisioningStatus
$sel:nextToken:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> Maybe Text
$sel:maxResults:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> 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
permissionSetArn
instance
Data.ToHeaders
ListAccountsForProvisionedPermissionSet
where
toHeaders :: ListAccountsForProvisionedPermissionSet -> 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.ListAccountsForProvisionedPermissionSet" ::
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
ListAccountsForProvisionedPermissionSet
where
toJSON :: ListAccountsForProvisionedPermissionSet -> Value
toJSON ListAccountsForProvisionedPermissionSet' {Maybe Natural
Maybe Text
Maybe ProvisioningStatus
Text
permissionSetArn :: Text
instanceArn :: Text
provisioningStatus :: Maybe ProvisioningStatus
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:permissionSetArn:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> Text
$sel:instanceArn:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> Text
$sel:provisioningStatus:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> Maybe ProvisioningStatus
$sel:nextToken:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> Maybe Text
$sel:maxResults:ListAccountsForProvisionedPermissionSet' :: ListAccountsForProvisionedPermissionSet -> 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
"PermissionSetArn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
permissionSetArn)
]
)
instance
Data.ToPath
ListAccountsForProvisionedPermissionSet
where
toPath :: ListAccountsForProvisionedPermissionSet -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance
Data.ToQuery
ListAccountsForProvisionedPermissionSet
where
toQuery :: ListAccountsForProvisionedPermissionSet -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data ListAccountsForProvisionedPermissionSetResponse = ListAccountsForProvisionedPermissionSetResponse'
{
ListAccountsForProvisionedPermissionSetResponse -> Maybe [Text]
accountIds :: Prelude.Maybe [Prelude.Text],
ListAccountsForProvisionedPermissionSetResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListAccountsForProvisionedPermissionSetResponse -> Int
httpStatus :: Prelude.Int
}
deriving (ListAccountsForProvisionedPermissionSetResponse
-> ListAccountsForProvisionedPermissionSetResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListAccountsForProvisionedPermissionSetResponse
-> ListAccountsForProvisionedPermissionSetResponse -> Bool
$c/= :: ListAccountsForProvisionedPermissionSetResponse
-> ListAccountsForProvisionedPermissionSetResponse -> Bool
== :: ListAccountsForProvisionedPermissionSetResponse
-> ListAccountsForProvisionedPermissionSetResponse -> Bool
$c== :: ListAccountsForProvisionedPermissionSetResponse
-> ListAccountsForProvisionedPermissionSetResponse -> Bool
Prelude.Eq, ReadPrec [ListAccountsForProvisionedPermissionSetResponse]
ReadPrec ListAccountsForProvisionedPermissionSetResponse
Int -> ReadS ListAccountsForProvisionedPermissionSetResponse
ReadS [ListAccountsForProvisionedPermissionSetResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListAccountsForProvisionedPermissionSetResponse]
$creadListPrec :: ReadPrec [ListAccountsForProvisionedPermissionSetResponse]
readPrec :: ReadPrec ListAccountsForProvisionedPermissionSetResponse
$creadPrec :: ReadPrec ListAccountsForProvisionedPermissionSetResponse
readList :: ReadS [ListAccountsForProvisionedPermissionSetResponse]
$creadList :: ReadS [ListAccountsForProvisionedPermissionSetResponse]
readsPrec :: Int -> ReadS ListAccountsForProvisionedPermissionSetResponse
$creadsPrec :: Int -> ReadS ListAccountsForProvisionedPermissionSetResponse
Prelude.Read, Int -> ListAccountsForProvisionedPermissionSetResponse -> ShowS
[ListAccountsForProvisionedPermissionSetResponse] -> ShowS
ListAccountsForProvisionedPermissionSetResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListAccountsForProvisionedPermissionSetResponse] -> ShowS
$cshowList :: [ListAccountsForProvisionedPermissionSetResponse] -> ShowS
show :: ListAccountsForProvisionedPermissionSetResponse -> String
$cshow :: ListAccountsForProvisionedPermissionSetResponse -> String
showsPrec :: Int -> ListAccountsForProvisionedPermissionSetResponse -> ShowS
$cshowsPrec :: Int -> ListAccountsForProvisionedPermissionSetResponse -> ShowS
Prelude.Show, forall x.
Rep ListAccountsForProvisionedPermissionSetResponse x
-> ListAccountsForProvisionedPermissionSetResponse
forall x.
ListAccountsForProvisionedPermissionSetResponse
-> Rep ListAccountsForProvisionedPermissionSetResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListAccountsForProvisionedPermissionSetResponse x
-> ListAccountsForProvisionedPermissionSetResponse
$cfrom :: forall x.
ListAccountsForProvisionedPermissionSetResponse
-> Rep ListAccountsForProvisionedPermissionSetResponse x
Prelude.Generic)
newListAccountsForProvisionedPermissionSetResponse ::
Prelude.Int ->
ListAccountsForProvisionedPermissionSetResponse
newListAccountsForProvisionedPermissionSetResponse :: Int -> ListAccountsForProvisionedPermissionSetResponse
newListAccountsForProvisionedPermissionSetResponse
Int
pHttpStatus_ =
ListAccountsForProvisionedPermissionSetResponse'
{ $sel:accountIds:ListAccountsForProvisionedPermissionSetResponse' :: Maybe [Text]
accountIds =
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListAccountsForProvisionedPermissionSetResponse' :: Maybe Text
nextToken =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ListAccountsForProvisionedPermissionSetResponse' :: Int
httpStatus = Int
pHttpStatus_
}
listAccountsForProvisionedPermissionSetResponse_accountIds :: Lens.Lens' ListAccountsForProvisionedPermissionSetResponse (Prelude.Maybe [Prelude.Text])
listAccountsForProvisionedPermissionSetResponse_accountIds :: Lens'
ListAccountsForProvisionedPermissionSetResponse (Maybe [Text])
listAccountsForProvisionedPermissionSetResponse_accountIds = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAccountsForProvisionedPermissionSetResponse' {Maybe [Text]
accountIds :: Maybe [Text]
$sel:accountIds:ListAccountsForProvisionedPermissionSetResponse' :: ListAccountsForProvisionedPermissionSetResponse -> Maybe [Text]
accountIds} -> Maybe [Text]
accountIds) (\s :: ListAccountsForProvisionedPermissionSetResponse
s@ListAccountsForProvisionedPermissionSetResponse' {} Maybe [Text]
a -> ListAccountsForProvisionedPermissionSetResponse
s {$sel:accountIds:ListAccountsForProvisionedPermissionSetResponse' :: Maybe [Text]
accountIds = Maybe [Text]
a} :: ListAccountsForProvisionedPermissionSetResponse) 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
listAccountsForProvisionedPermissionSetResponse_nextToken :: Lens.Lens' ListAccountsForProvisionedPermissionSetResponse (Prelude.Maybe Prelude.Text)
listAccountsForProvisionedPermissionSetResponse_nextToken :: Lens' ListAccountsForProvisionedPermissionSetResponse (Maybe Text)
listAccountsForProvisionedPermissionSetResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAccountsForProvisionedPermissionSetResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListAccountsForProvisionedPermissionSetResponse' :: ListAccountsForProvisionedPermissionSetResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListAccountsForProvisionedPermissionSetResponse
s@ListAccountsForProvisionedPermissionSetResponse' {} Maybe Text
a -> ListAccountsForProvisionedPermissionSetResponse
s {$sel:nextToken:ListAccountsForProvisionedPermissionSetResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListAccountsForProvisionedPermissionSetResponse)
listAccountsForProvisionedPermissionSetResponse_httpStatus :: Lens.Lens' ListAccountsForProvisionedPermissionSetResponse Prelude.Int
listAccountsForProvisionedPermissionSetResponse_httpStatus :: Lens' ListAccountsForProvisionedPermissionSetResponse Int
listAccountsForProvisionedPermissionSetResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListAccountsForProvisionedPermissionSetResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListAccountsForProvisionedPermissionSetResponse' :: ListAccountsForProvisionedPermissionSetResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListAccountsForProvisionedPermissionSetResponse
s@ListAccountsForProvisionedPermissionSetResponse' {} Int
a -> ListAccountsForProvisionedPermissionSetResponse
s {$sel:httpStatus:ListAccountsForProvisionedPermissionSetResponse' :: Int
httpStatus = Int
a} :: ListAccountsForProvisionedPermissionSetResponse)
instance
Prelude.NFData
ListAccountsForProvisionedPermissionSetResponse
where
rnf :: ListAccountsForProvisionedPermissionSetResponse -> ()
rnf
ListAccountsForProvisionedPermissionSetResponse' {Int
Maybe [Text]
Maybe Text
httpStatus :: Int
nextToken :: Maybe Text
accountIds :: Maybe [Text]
$sel:httpStatus:ListAccountsForProvisionedPermissionSetResponse' :: ListAccountsForProvisionedPermissionSetResponse -> Int
$sel:nextToken:ListAccountsForProvisionedPermissionSetResponse' :: ListAccountsForProvisionedPermissionSetResponse -> Maybe Text
$sel:accountIds:ListAccountsForProvisionedPermissionSetResponse' :: ListAccountsForProvisionedPermissionSetResponse -> Maybe [Text]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [Text]
accountIds
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 Int
httpStatus