{-# 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 #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.ComputeOptimizer.GetEnrollmentStatusesForOrganization
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Returns the Compute Optimizer enrollment (opt-in) status of organization
-- member accounts, if your account is an organization management account.
--
-- To get the enrollment status of standalone accounts, use the
-- GetEnrollmentStatus action.
--
-- This operation returns paginated results.
module Amazonka.ComputeOptimizer.GetEnrollmentStatusesForOrganization
  ( -- * Creating a Request
    GetEnrollmentStatusesForOrganization (..),
    newGetEnrollmentStatusesForOrganization,

    -- * Request Lenses
    getEnrollmentStatusesForOrganization_filters,
    getEnrollmentStatusesForOrganization_maxResults,
    getEnrollmentStatusesForOrganization_nextToken,

    -- * Destructuring the Response
    GetEnrollmentStatusesForOrganizationResponse (..),
    newGetEnrollmentStatusesForOrganizationResponse,

    -- * Response Lenses
    getEnrollmentStatusesForOrganizationResponse_accountEnrollmentStatuses,
    getEnrollmentStatusesForOrganizationResponse_nextToken,
    getEnrollmentStatusesForOrganizationResponse_httpStatus,
  )
where

import Amazonka.ComputeOptimizer.Types
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

-- | /See:/ 'newGetEnrollmentStatusesForOrganization' smart constructor.
data GetEnrollmentStatusesForOrganization = GetEnrollmentStatusesForOrganization'
  { -- | An array of objects to specify a filter that returns a more specific
    -- list of account enrollment statuses.
    GetEnrollmentStatusesForOrganization -> Maybe [EnrollmentFilter]
filters :: Prelude.Maybe [EnrollmentFilter],
    -- | The maximum number of account enrollment statuses to return with a
    -- single request. You can specify up to 100 statuses to return with each
    -- request.
    --
    -- To retrieve the remaining results, make another request with the
    -- returned @nextToken@ value.
    GetEnrollmentStatusesForOrganization -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
    -- | The token to advance to the next page of account enrollment statuses.
    GetEnrollmentStatusesForOrganization -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text
  }
  deriving (GetEnrollmentStatusesForOrganization
-> GetEnrollmentStatusesForOrganization -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetEnrollmentStatusesForOrganization
-> GetEnrollmentStatusesForOrganization -> Bool
$c/= :: GetEnrollmentStatusesForOrganization
-> GetEnrollmentStatusesForOrganization -> Bool
== :: GetEnrollmentStatusesForOrganization
-> GetEnrollmentStatusesForOrganization -> Bool
$c== :: GetEnrollmentStatusesForOrganization
-> GetEnrollmentStatusesForOrganization -> Bool
Prelude.Eq, ReadPrec [GetEnrollmentStatusesForOrganization]
ReadPrec GetEnrollmentStatusesForOrganization
Int -> ReadS GetEnrollmentStatusesForOrganization
ReadS [GetEnrollmentStatusesForOrganization]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetEnrollmentStatusesForOrganization]
$creadListPrec :: ReadPrec [GetEnrollmentStatusesForOrganization]
readPrec :: ReadPrec GetEnrollmentStatusesForOrganization
$creadPrec :: ReadPrec GetEnrollmentStatusesForOrganization
readList :: ReadS [GetEnrollmentStatusesForOrganization]
$creadList :: ReadS [GetEnrollmentStatusesForOrganization]
readsPrec :: Int -> ReadS GetEnrollmentStatusesForOrganization
$creadsPrec :: Int -> ReadS GetEnrollmentStatusesForOrganization
Prelude.Read, Int -> GetEnrollmentStatusesForOrganization -> ShowS
[GetEnrollmentStatusesForOrganization] -> ShowS
GetEnrollmentStatusesForOrganization -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetEnrollmentStatusesForOrganization] -> ShowS
$cshowList :: [GetEnrollmentStatusesForOrganization] -> ShowS
show :: GetEnrollmentStatusesForOrganization -> String
$cshow :: GetEnrollmentStatusesForOrganization -> String
showsPrec :: Int -> GetEnrollmentStatusesForOrganization -> ShowS
$cshowsPrec :: Int -> GetEnrollmentStatusesForOrganization -> ShowS
Prelude.Show, forall x.
Rep GetEnrollmentStatusesForOrganization x
-> GetEnrollmentStatusesForOrganization
forall x.
GetEnrollmentStatusesForOrganization
-> Rep GetEnrollmentStatusesForOrganization x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetEnrollmentStatusesForOrganization x
-> GetEnrollmentStatusesForOrganization
$cfrom :: forall x.
GetEnrollmentStatusesForOrganization
-> Rep GetEnrollmentStatusesForOrganization x
Prelude.Generic)

-- |
-- Create a value of 'GetEnrollmentStatusesForOrganization' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'filters', 'getEnrollmentStatusesForOrganization_filters' - An array of objects to specify a filter that returns a more specific
-- list of account enrollment statuses.
--
-- 'maxResults', 'getEnrollmentStatusesForOrganization_maxResults' - The maximum number of account enrollment statuses to return with a
-- single request. You can specify up to 100 statuses to return with each
-- request.
--
-- To retrieve the remaining results, make another request with the
-- returned @nextToken@ value.
--
-- 'nextToken', 'getEnrollmentStatusesForOrganization_nextToken' - The token to advance to the next page of account enrollment statuses.
newGetEnrollmentStatusesForOrganization ::
  GetEnrollmentStatusesForOrganization
newGetEnrollmentStatusesForOrganization :: GetEnrollmentStatusesForOrganization
newGetEnrollmentStatusesForOrganization =
  GetEnrollmentStatusesForOrganization'
    { $sel:filters:GetEnrollmentStatusesForOrganization' :: Maybe [EnrollmentFilter]
filters =
        forall a. Maybe a
Prelude.Nothing,
      $sel:maxResults:GetEnrollmentStatusesForOrganization' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
      $sel:nextToken:GetEnrollmentStatusesForOrganization' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing
    }

-- | An array of objects to specify a filter that returns a more specific
-- list of account enrollment statuses.
getEnrollmentStatusesForOrganization_filters :: Lens.Lens' GetEnrollmentStatusesForOrganization (Prelude.Maybe [EnrollmentFilter])
getEnrollmentStatusesForOrganization_filters :: Lens'
  GetEnrollmentStatusesForOrganization (Maybe [EnrollmentFilter])
getEnrollmentStatusesForOrganization_filters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetEnrollmentStatusesForOrganization' {Maybe [EnrollmentFilter]
filters :: Maybe [EnrollmentFilter]
$sel:filters:GetEnrollmentStatusesForOrganization' :: GetEnrollmentStatusesForOrganization -> Maybe [EnrollmentFilter]
filters} -> Maybe [EnrollmentFilter]
filters) (\s :: GetEnrollmentStatusesForOrganization
s@GetEnrollmentStatusesForOrganization' {} Maybe [EnrollmentFilter]
a -> GetEnrollmentStatusesForOrganization
s {$sel:filters:GetEnrollmentStatusesForOrganization' :: Maybe [EnrollmentFilter]
filters = Maybe [EnrollmentFilter]
a} :: GetEnrollmentStatusesForOrganization) 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

-- | The maximum number of account enrollment statuses to return with a
-- single request. You can specify up to 100 statuses to return with each
-- request.
--
-- To retrieve the remaining results, make another request with the
-- returned @nextToken@ value.
getEnrollmentStatusesForOrganization_maxResults :: Lens.Lens' GetEnrollmentStatusesForOrganization (Prelude.Maybe Prelude.Natural)
getEnrollmentStatusesForOrganization_maxResults :: Lens' GetEnrollmentStatusesForOrganization (Maybe Natural)
getEnrollmentStatusesForOrganization_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetEnrollmentStatusesForOrganization' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:GetEnrollmentStatusesForOrganization' :: GetEnrollmentStatusesForOrganization -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: GetEnrollmentStatusesForOrganization
s@GetEnrollmentStatusesForOrganization' {} Maybe Natural
a -> GetEnrollmentStatusesForOrganization
s {$sel:maxResults:GetEnrollmentStatusesForOrganization' :: Maybe Natural
maxResults = Maybe Natural
a} :: GetEnrollmentStatusesForOrganization)

-- | The token to advance to the next page of account enrollment statuses.
getEnrollmentStatusesForOrganization_nextToken :: Lens.Lens' GetEnrollmentStatusesForOrganization (Prelude.Maybe Prelude.Text)
getEnrollmentStatusesForOrganization_nextToken :: Lens' GetEnrollmentStatusesForOrganization (Maybe Text)
getEnrollmentStatusesForOrganization_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetEnrollmentStatusesForOrganization' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:GetEnrollmentStatusesForOrganization' :: GetEnrollmentStatusesForOrganization -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: GetEnrollmentStatusesForOrganization
s@GetEnrollmentStatusesForOrganization' {} Maybe Text
a -> GetEnrollmentStatusesForOrganization
s {$sel:nextToken:GetEnrollmentStatusesForOrganization' :: Maybe Text
nextToken = Maybe Text
a} :: GetEnrollmentStatusesForOrganization)

instance
  Core.AWSPager
    GetEnrollmentStatusesForOrganization
  where
  page :: GetEnrollmentStatusesForOrganization
-> AWSResponse GetEnrollmentStatusesForOrganization
-> Maybe GetEnrollmentStatusesForOrganization
page GetEnrollmentStatusesForOrganization
rq AWSResponse GetEnrollmentStatusesForOrganization
rs
    | forall a. AWSTruncated a => a -> Bool
Core.stop
        ( AWSResponse GetEnrollmentStatusesForOrganization
rs
            forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' GetEnrollmentStatusesForOrganizationResponse (Maybe Text)
getEnrollmentStatusesForOrganizationResponse_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 GetEnrollmentStatusesForOrganization
rs
            forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens'
  GetEnrollmentStatusesForOrganizationResponse
  (Maybe [AccountEnrollmentStatus])
getEnrollmentStatusesForOrganizationResponse_accountEnrollmentStatuses
            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.$ GetEnrollmentStatusesForOrganization
rq
          forall a b. a -> (a -> b) -> b
Prelude.& Lens' GetEnrollmentStatusesForOrganization (Maybe Text)
getEnrollmentStatusesForOrganization_nextToken
          forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse GetEnrollmentStatusesForOrganization
rs
          forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' GetEnrollmentStatusesForOrganizationResponse (Maybe Text)
getEnrollmentStatusesForOrganizationResponse_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
    GetEnrollmentStatusesForOrganization
  where
  type
    AWSResponse GetEnrollmentStatusesForOrganization =
      GetEnrollmentStatusesForOrganizationResponse
  request :: (Service -> Service)
-> GetEnrollmentStatusesForOrganization
-> Request GetEnrollmentStatusesForOrganization
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 GetEnrollmentStatusesForOrganization
-> ClientResponse ClientBody
-> m (Either
        Error
        (ClientResponse
           (AWSResponse GetEnrollmentStatusesForOrganization)))
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 [AccountEnrollmentStatus]
-> Maybe Text
-> Int
-> GetEnrollmentStatusesForOrganizationResponse
GetEnrollmentStatusesForOrganizationResponse'
            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
"accountEnrollmentStatuses"
                            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
    GetEnrollmentStatusesForOrganization
  where
  hashWithSalt :: Int -> GetEnrollmentStatusesForOrganization -> Int
hashWithSalt
    Int
_salt
    GetEnrollmentStatusesForOrganization' {Maybe Natural
Maybe [EnrollmentFilter]
Maybe Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
filters :: Maybe [EnrollmentFilter]
$sel:nextToken:GetEnrollmentStatusesForOrganization' :: GetEnrollmentStatusesForOrganization -> Maybe Text
$sel:maxResults:GetEnrollmentStatusesForOrganization' :: GetEnrollmentStatusesForOrganization -> Maybe Natural
$sel:filters:GetEnrollmentStatusesForOrganization' :: GetEnrollmentStatusesForOrganization -> Maybe [EnrollmentFilter]
..} =
      Int
_salt
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [EnrollmentFilter]
filters
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxResults
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken

instance
  Prelude.NFData
    GetEnrollmentStatusesForOrganization
  where
  rnf :: GetEnrollmentStatusesForOrganization -> ()
rnf GetEnrollmentStatusesForOrganization' {Maybe Natural
Maybe [EnrollmentFilter]
Maybe Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
filters :: Maybe [EnrollmentFilter]
$sel:nextToken:GetEnrollmentStatusesForOrganization' :: GetEnrollmentStatusesForOrganization -> Maybe Text
$sel:maxResults:GetEnrollmentStatusesForOrganization' :: GetEnrollmentStatusesForOrganization -> Maybe Natural
$sel:filters:GetEnrollmentStatusesForOrganization' :: GetEnrollmentStatusesForOrganization -> Maybe [EnrollmentFilter]
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe [EnrollmentFilter]
filters
      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

instance
  Data.ToHeaders
    GetEnrollmentStatusesForOrganization
  where
  toHeaders :: GetEnrollmentStatusesForOrganization -> 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
"ComputeOptimizerService.GetEnrollmentStatusesForOrganization" ::
                          Prelude.ByteString
                      ),
            HeaderName
"Content-Type"
              forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.0" ::
                          Prelude.ByteString
                      )
          ]
      )

instance
  Data.ToJSON
    GetEnrollmentStatusesForOrganization
  where
  toJSON :: GetEnrollmentStatusesForOrganization -> Value
toJSON GetEnrollmentStatusesForOrganization' {Maybe Natural
Maybe [EnrollmentFilter]
Maybe Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
filters :: Maybe [EnrollmentFilter]
$sel:nextToken:GetEnrollmentStatusesForOrganization' :: GetEnrollmentStatusesForOrganization -> Maybe Text
$sel:maxResults:GetEnrollmentStatusesForOrganization' :: GetEnrollmentStatusesForOrganization -> Maybe Natural
$sel:filters:GetEnrollmentStatusesForOrganization' :: GetEnrollmentStatusesForOrganization -> Maybe [EnrollmentFilter]
..} =
    [Pair] -> Value
Data.object
      ( forall a. [Maybe a] -> [a]
Prelude.catMaybes
          [ (Key
"filters" 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 [EnrollmentFilter]
filters,
            (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
          ]
      )

instance
  Data.ToPath
    GetEnrollmentStatusesForOrganization
  where
  toPath :: GetEnrollmentStatusesForOrganization -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"

instance
  Data.ToQuery
    GetEnrollmentStatusesForOrganization
  where
  toQuery :: GetEnrollmentStatusesForOrganization -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty

-- | /See:/ 'newGetEnrollmentStatusesForOrganizationResponse' smart constructor.
data GetEnrollmentStatusesForOrganizationResponse = GetEnrollmentStatusesForOrganizationResponse'
  { -- | An array of objects that describe the enrollment statuses of
    -- organization member accounts.
    GetEnrollmentStatusesForOrganizationResponse
-> Maybe [AccountEnrollmentStatus]
accountEnrollmentStatuses :: Prelude.Maybe [AccountEnrollmentStatus],
    -- | The token to use to advance to the next page of account enrollment
    -- statuses.
    --
    -- This value is null when there are no more pages of account enrollment
    -- statuses to return.
    GetEnrollmentStatusesForOrganizationResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | The response's http status code.
    GetEnrollmentStatusesForOrganizationResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (GetEnrollmentStatusesForOrganizationResponse
-> GetEnrollmentStatusesForOrganizationResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetEnrollmentStatusesForOrganizationResponse
-> GetEnrollmentStatusesForOrganizationResponse -> Bool
$c/= :: GetEnrollmentStatusesForOrganizationResponse
-> GetEnrollmentStatusesForOrganizationResponse -> Bool
== :: GetEnrollmentStatusesForOrganizationResponse
-> GetEnrollmentStatusesForOrganizationResponse -> Bool
$c== :: GetEnrollmentStatusesForOrganizationResponse
-> GetEnrollmentStatusesForOrganizationResponse -> Bool
Prelude.Eq, ReadPrec [GetEnrollmentStatusesForOrganizationResponse]
ReadPrec GetEnrollmentStatusesForOrganizationResponse
Int -> ReadS GetEnrollmentStatusesForOrganizationResponse
ReadS [GetEnrollmentStatusesForOrganizationResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetEnrollmentStatusesForOrganizationResponse]
$creadListPrec :: ReadPrec [GetEnrollmentStatusesForOrganizationResponse]
readPrec :: ReadPrec GetEnrollmentStatusesForOrganizationResponse
$creadPrec :: ReadPrec GetEnrollmentStatusesForOrganizationResponse
readList :: ReadS [GetEnrollmentStatusesForOrganizationResponse]
$creadList :: ReadS [GetEnrollmentStatusesForOrganizationResponse]
readsPrec :: Int -> ReadS GetEnrollmentStatusesForOrganizationResponse
$creadsPrec :: Int -> ReadS GetEnrollmentStatusesForOrganizationResponse
Prelude.Read, Int -> GetEnrollmentStatusesForOrganizationResponse -> ShowS
[GetEnrollmentStatusesForOrganizationResponse] -> ShowS
GetEnrollmentStatusesForOrganizationResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetEnrollmentStatusesForOrganizationResponse] -> ShowS
$cshowList :: [GetEnrollmentStatusesForOrganizationResponse] -> ShowS
show :: GetEnrollmentStatusesForOrganizationResponse -> String
$cshow :: GetEnrollmentStatusesForOrganizationResponse -> String
showsPrec :: Int -> GetEnrollmentStatusesForOrganizationResponse -> ShowS
$cshowsPrec :: Int -> GetEnrollmentStatusesForOrganizationResponse -> ShowS
Prelude.Show, forall x.
Rep GetEnrollmentStatusesForOrganizationResponse x
-> GetEnrollmentStatusesForOrganizationResponse
forall x.
GetEnrollmentStatusesForOrganizationResponse
-> Rep GetEnrollmentStatusesForOrganizationResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetEnrollmentStatusesForOrganizationResponse x
-> GetEnrollmentStatusesForOrganizationResponse
$cfrom :: forall x.
GetEnrollmentStatusesForOrganizationResponse
-> Rep GetEnrollmentStatusesForOrganizationResponse x
Prelude.Generic)

-- |
-- Create a value of 'GetEnrollmentStatusesForOrganizationResponse' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'accountEnrollmentStatuses', 'getEnrollmentStatusesForOrganizationResponse_accountEnrollmentStatuses' - An array of objects that describe the enrollment statuses of
-- organization member accounts.
--
-- 'nextToken', 'getEnrollmentStatusesForOrganizationResponse_nextToken' - The token to use to advance to the next page of account enrollment
-- statuses.
--
-- This value is null when there are no more pages of account enrollment
-- statuses to return.
--
-- 'httpStatus', 'getEnrollmentStatusesForOrganizationResponse_httpStatus' - The response's http status code.
newGetEnrollmentStatusesForOrganizationResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  GetEnrollmentStatusesForOrganizationResponse
newGetEnrollmentStatusesForOrganizationResponse :: Int -> GetEnrollmentStatusesForOrganizationResponse
newGetEnrollmentStatusesForOrganizationResponse
  Int
pHttpStatus_ =
    GetEnrollmentStatusesForOrganizationResponse'
      { $sel:accountEnrollmentStatuses:GetEnrollmentStatusesForOrganizationResponse' :: Maybe [AccountEnrollmentStatus]
accountEnrollmentStatuses =
          forall a. Maybe a
Prelude.Nothing,
        $sel:nextToken:GetEnrollmentStatusesForOrganizationResponse' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
        $sel:httpStatus:GetEnrollmentStatusesForOrganizationResponse' :: Int
httpStatus = Int
pHttpStatus_
      }

-- | An array of objects that describe the enrollment statuses of
-- organization member accounts.
getEnrollmentStatusesForOrganizationResponse_accountEnrollmentStatuses :: Lens.Lens' GetEnrollmentStatusesForOrganizationResponse (Prelude.Maybe [AccountEnrollmentStatus])
getEnrollmentStatusesForOrganizationResponse_accountEnrollmentStatuses :: Lens'
  GetEnrollmentStatusesForOrganizationResponse
  (Maybe [AccountEnrollmentStatus])
getEnrollmentStatusesForOrganizationResponse_accountEnrollmentStatuses = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetEnrollmentStatusesForOrganizationResponse' {Maybe [AccountEnrollmentStatus]
accountEnrollmentStatuses :: Maybe [AccountEnrollmentStatus]
$sel:accountEnrollmentStatuses:GetEnrollmentStatusesForOrganizationResponse' :: GetEnrollmentStatusesForOrganizationResponse
-> Maybe [AccountEnrollmentStatus]
accountEnrollmentStatuses} -> Maybe [AccountEnrollmentStatus]
accountEnrollmentStatuses) (\s :: GetEnrollmentStatusesForOrganizationResponse
s@GetEnrollmentStatusesForOrganizationResponse' {} Maybe [AccountEnrollmentStatus]
a -> GetEnrollmentStatusesForOrganizationResponse
s {$sel:accountEnrollmentStatuses:GetEnrollmentStatusesForOrganizationResponse' :: Maybe [AccountEnrollmentStatus]
accountEnrollmentStatuses = Maybe [AccountEnrollmentStatus]
a} :: GetEnrollmentStatusesForOrganizationResponse) 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

-- | The token to use to advance to the next page of account enrollment
-- statuses.
--
-- This value is null when there are no more pages of account enrollment
-- statuses to return.
getEnrollmentStatusesForOrganizationResponse_nextToken :: Lens.Lens' GetEnrollmentStatusesForOrganizationResponse (Prelude.Maybe Prelude.Text)
getEnrollmentStatusesForOrganizationResponse_nextToken :: Lens' GetEnrollmentStatusesForOrganizationResponse (Maybe Text)
getEnrollmentStatusesForOrganizationResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetEnrollmentStatusesForOrganizationResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:GetEnrollmentStatusesForOrganizationResponse' :: GetEnrollmentStatusesForOrganizationResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: GetEnrollmentStatusesForOrganizationResponse
s@GetEnrollmentStatusesForOrganizationResponse' {} Maybe Text
a -> GetEnrollmentStatusesForOrganizationResponse
s {$sel:nextToken:GetEnrollmentStatusesForOrganizationResponse' :: Maybe Text
nextToken = Maybe Text
a} :: GetEnrollmentStatusesForOrganizationResponse)

-- | The response's http status code.
getEnrollmentStatusesForOrganizationResponse_httpStatus :: Lens.Lens' GetEnrollmentStatusesForOrganizationResponse Prelude.Int
getEnrollmentStatusesForOrganizationResponse_httpStatus :: Lens' GetEnrollmentStatusesForOrganizationResponse Int
getEnrollmentStatusesForOrganizationResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetEnrollmentStatusesForOrganizationResponse' {Int
httpStatus :: Int
$sel:httpStatus:GetEnrollmentStatusesForOrganizationResponse' :: GetEnrollmentStatusesForOrganizationResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: GetEnrollmentStatusesForOrganizationResponse
s@GetEnrollmentStatusesForOrganizationResponse' {} Int
a -> GetEnrollmentStatusesForOrganizationResponse
s {$sel:httpStatus:GetEnrollmentStatusesForOrganizationResponse' :: Int
httpStatus = Int
a} :: GetEnrollmentStatusesForOrganizationResponse)

instance
  Prelude.NFData
    GetEnrollmentStatusesForOrganizationResponse
  where
  rnf :: GetEnrollmentStatusesForOrganizationResponse -> ()
rnf GetEnrollmentStatusesForOrganizationResponse' {Int
Maybe [AccountEnrollmentStatus]
Maybe Text
httpStatus :: Int
nextToken :: Maybe Text
accountEnrollmentStatuses :: Maybe [AccountEnrollmentStatus]
$sel:httpStatus:GetEnrollmentStatusesForOrganizationResponse' :: GetEnrollmentStatusesForOrganizationResponse -> Int
$sel:nextToken:GetEnrollmentStatusesForOrganizationResponse' :: GetEnrollmentStatusesForOrganizationResponse -> Maybe Text
$sel:accountEnrollmentStatuses:GetEnrollmentStatusesForOrganizationResponse' :: GetEnrollmentStatusesForOrganizationResponse
-> Maybe [AccountEnrollmentStatus]
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe [AccountEnrollmentStatus]
accountEnrollmentStatuses
      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