{-# 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.DevOpsGuru.ListOrganizationInsights
-- 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 a list of insights associated with the account or OU Id.
--
-- This operation returns paginated results.
module Amazonka.DevOpsGuru.ListOrganizationInsights
  ( -- * Creating a Request
    ListOrganizationInsights (..),
    newListOrganizationInsights,

    -- * Request Lenses
    listOrganizationInsights_accountIds,
    listOrganizationInsights_maxResults,
    listOrganizationInsights_nextToken,
    listOrganizationInsights_organizationalUnitIds,
    listOrganizationInsights_statusFilter,

    -- * Destructuring the Response
    ListOrganizationInsightsResponse (..),
    newListOrganizationInsightsResponse,

    -- * Response Lenses
    listOrganizationInsightsResponse_nextToken,
    listOrganizationInsightsResponse_proactiveInsights,
    listOrganizationInsightsResponse_reactiveInsights,
    listOrganizationInsightsResponse_httpStatus,
  )
where

import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.DevOpsGuru.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response

-- | /See:/ 'newListOrganizationInsights' smart constructor.
data ListOrganizationInsights = ListOrganizationInsights'
  { -- | The ID of the Amazon Web Services account.
    ListOrganizationInsights -> Maybe [Text]
accountIds :: Prelude.Maybe [Prelude.Text],
    -- | The maximum number of results to return with a single call. To retrieve
    -- the remaining results, make another call with the returned @nextToken@
    -- value.
    ListOrganizationInsights -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
    -- | The pagination token to use to retrieve the next page of results for
    -- this operation. If this value is null, it retrieves the first page.
    ListOrganizationInsights -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | The ID of the organizational unit.
    ListOrganizationInsights -> Maybe [Text]
organizationalUnitIds :: Prelude.Maybe [Prelude.Text],
    ListOrganizationInsights -> ListInsightsStatusFilter
statusFilter :: ListInsightsStatusFilter
  }
  deriving (ListOrganizationInsights -> ListOrganizationInsights -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListOrganizationInsights -> ListOrganizationInsights -> Bool
$c/= :: ListOrganizationInsights -> ListOrganizationInsights -> Bool
== :: ListOrganizationInsights -> ListOrganizationInsights -> Bool
$c== :: ListOrganizationInsights -> ListOrganizationInsights -> Bool
Prelude.Eq, ReadPrec [ListOrganizationInsights]
ReadPrec ListOrganizationInsights
Int -> ReadS ListOrganizationInsights
ReadS [ListOrganizationInsights]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListOrganizationInsights]
$creadListPrec :: ReadPrec [ListOrganizationInsights]
readPrec :: ReadPrec ListOrganizationInsights
$creadPrec :: ReadPrec ListOrganizationInsights
readList :: ReadS [ListOrganizationInsights]
$creadList :: ReadS [ListOrganizationInsights]
readsPrec :: Int -> ReadS ListOrganizationInsights
$creadsPrec :: Int -> ReadS ListOrganizationInsights
Prelude.Read, Int -> ListOrganizationInsights -> ShowS
[ListOrganizationInsights] -> ShowS
ListOrganizationInsights -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListOrganizationInsights] -> ShowS
$cshowList :: [ListOrganizationInsights] -> ShowS
show :: ListOrganizationInsights -> String
$cshow :: ListOrganizationInsights -> String
showsPrec :: Int -> ListOrganizationInsights -> ShowS
$cshowsPrec :: Int -> ListOrganizationInsights -> ShowS
Prelude.Show, forall x.
Rep ListOrganizationInsights x -> ListOrganizationInsights
forall x.
ListOrganizationInsights -> Rep ListOrganizationInsights x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListOrganizationInsights x -> ListOrganizationInsights
$cfrom :: forall x.
ListOrganizationInsights -> Rep ListOrganizationInsights x
Prelude.Generic)

-- |
-- Create a value of 'ListOrganizationInsights' 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:
--
-- 'accountIds', 'listOrganizationInsights_accountIds' - The ID of the Amazon Web Services account.
--
-- 'maxResults', 'listOrganizationInsights_maxResults' - The maximum number of results to return with a single call. To retrieve
-- the remaining results, make another call with the returned @nextToken@
-- value.
--
-- 'nextToken', 'listOrganizationInsights_nextToken' - The pagination token to use to retrieve the next page of results for
-- this operation. If this value is null, it retrieves the first page.
--
-- 'organizationalUnitIds', 'listOrganizationInsights_organizationalUnitIds' - The ID of the organizational unit.
--
-- 'statusFilter', 'listOrganizationInsights_statusFilter' - Undocumented member.
newListOrganizationInsights ::
  -- | 'statusFilter'
  ListInsightsStatusFilter ->
  ListOrganizationInsights
newListOrganizationInsights :: ListInsightsStatusFilter -> ListOrganizationInsights
newListOrganizationInsights ListInsightsStatusFilter
pStatusFilter_ =
  ListOrganizationInsights'
    { $sel:accountIds:ListOrganizationInsights' :: Maybe [Text]
accountIds =
        forall a. Maybe a
Prelude.Nothing,
      $sel:maxResults:ListOrganizationInsights' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
      $sel:nextToken:ListOrganizationInsights' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
      $sel:organizationalUnitIds:ListOrganizationInsights' :: Maybe [Text]
organizationalUnitIds = forall a. Maybe a
Prelude.Nothing,
      $sel:statusFilter:ListOrganizationInsights' :: ListInsightsStatusFilter
statusFilter = ListInsightsStatusFilter
pStatusFilter_
    }

-- | The ID of the Amazon Web Services account.
listOrganizationInsights_accountIds :: Lens.Lens' ListOrganizationInsights (Prelude.Maybe [Prelude.Text])
listOrganizationInsights_accountIds :: Lens' ListOrganizationInsights (Maybe [Text])
listOrganizationInsights_accountIds = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListOrganizationInsights' {Maybe [Text]
accountIds :: Maybe [Text]
$sel:accountIds:ListOrganizationInsights' :: ListOrganizationInsights -> Maybe [Text]
accountIds} -> Maybe [Text]
accountIds) (\s :: ListOrganizationInsights
s@ListOrganizationInsights' {} Maybe [Text]
a -> ListOrganizationInsights
s {$sel:accountIds:ListOrganizationInsights' :: Maybe [Text]
accountIds = Maybe [Text]
a} :: ListOrganizationInsights) 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 results to return with a single call. To retrieve
-- the remaining results, make another call with the returned @nextToken@
-- value.
listOrganizationInsights_maxResults :: Lens.Lens' ListOrganizationInsights (Prelude.Maybe Prelude.Natural)
listOrganizationInsights_maxResults :: Lens' ListOrganizationInsights (Maybe Natural)
listOrganizationInsights_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListOrganizationInsights' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListOrganizationInsights' :: ListOrganizationInsights -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListOrganizationInsights
s@ListOrganizationInsights' {} Maybe Natural
a -> ListOrganizationInsights
s {$sel:maxResults:ListOrganizationInsights' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListOrganizationInsights)

-- | The pagination token to use to retrieve the next page of results for
-- this operation. If this value is null, it retrieves the first page.
listOrganizationInsights_nextToken :: Lens.Lens' ListOrganizationInsights (Prelude.Maybe Prelude.Text)
listOrganizationInsights_nextToken :: Lens' ListOrganizationInsights (Maybe Text)
listOrganizationInsights_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListOrganizationInsights' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListOrganizationInsights' :: ListOrganizationInsights -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListOrganizationInsights
s@ListOrganizationInsights' {} Maybe Text
a -> ListOrganizationInsights
s {$sel:nextToken:ListOrganizationInsights' :: Maybe Text
nextToken = Maybe Text
a} :: ListOrganizationInsights)

-- | The ID of the organizational unit.
listOrganizationInsights_organizationalUnitIds :: Lens.Lens' ListOrganizationInsights (Prelude.Maybe [Prelude.Text])
listOrganizationInsights_organizationalUnitIds :: Lens' ListOrganizationInsights (Maybe [Text])
listOrganizationInsights_organizationalUnitIds = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListOrganizationInsights' {Maybe [Text]
organizationalUnitIds :: Maybe [Text]
$sel:organizationalUnitIds:ListOrganizationInsights' :: ListOrganizationInsights -> Maybe [Text]
organizationalUnitIds} -> Maybe [Text]
organizationalUnitIds) (\s :: ListOrganizationInsights
s@ListOrganizationInsights' {} Maybe [Text]
a -> ListOrganizationInsights
s {$sel:organizationalUnitIds:ListOrganizationInsights' :: Maybe [Text]
organizationalUnitIds = Maybe [Text]
a} :: ListOrganizationInsights) 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

-- | Undocumented member.
listOrganizationInsights_statusFilter :: Lens.Lens' ListOrganizationInsights ListInsightsStatusFilter
listOrganizationInsights_statusFilter :: Lens' ListOrganizationInsights ListInsightsStatusFilter
listOrganizationInsights_statusFilter = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListOrganizationInsights' {ListInsightsStatusFilter
statusFilter :: ListInsightsStatusFilter
$sel:statusFilter:ListOrganizationInsights' :: ListOrganizationInsights -> ListInsightsStatusFilter
statusFilter} -> ListInsightsStatusFilter
statusFilter) (\s :: ListOrganizationInsights
s@ListOrganizationInsights' {} ListInsightsStatusFilter
a -> ListOrganizationInsights
s {$sel:statusFilter:ListOrganizationInsights' :: ListInsightsStatusFilter
statusFilter = ListInsightsStatusFilter
a} :: ListOrganizationInsights)

instance Core.AWSPager ListOrganizationInsights where
  page :: ListOrganizationInsights
-> AWSResponse ListOrganizationInsights
-> Maybe ListOrganizationInsights
page ListOrganizationInsights
rq AWSResponse ListOrganizationInsights
rs
    | forall a. AWSTruncated a => a -> Bool
Core.stop
        ( AWSResponse ListOrganizationInsights
rs
            forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListOrganizationInsightsResponse (Maybe Text)
listOrganizationInsightsResponse_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 ListOrganizationInsights
rs
            forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens'
  ListOrganizationInsightsResponse
  (Maybe [ProactiveOrganizationInsightSummary])
listOrganizationInsightsResponse_proactiveInsights
            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 ListOrganizationInsights
rs
            forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens'
  ListOrganizationInsightsResponse
  (Maybe [ReactiveOrganizationInsightSummary])
listOrganizationInsightsResponse_reactiveInsights
            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.$ ListOrganizationInsights
rq
          forall a b. a -> (a -> b) -> b
Prelude.& Lens' ListOrganizationInsights (Maybe Text)
listOrganizationInsights_nextToken
          forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse ListOrganizationInsights
rs
          forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListOrganizationInsightsResponse (Maybe Text)
listOrganizationInsightsResponse_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 ListOrganizationInsights where
  type
    AWSResponse ListOrganizationInsights =
      ListOrganizationInsightsResponse
  request :: (Service -> Service)
-> ListOrganizationInsights -> Request ListOrganizationInsights
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 ListOrganizationInsights
-> ClientResponse ClientBody
-> m (Either
        Error (ClientResponse (AWSResponse ListOrganizationInsights)))
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 [ProactiveOrganizationInsightSummary]
-> Maybe [ReactiveOrganizationInsightSummary]
-> Int
-> ListOrganizationInsightsResponse
ListOrganizationInsightsResponse'
            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
"ProactiveInsights"
                            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
"ReactiveInsights"
                            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 ListOrganizationInsights where
  hashWithSalt :: Int -> ListOrganizationInsights -> Int
hashWithSalt Int
_salt ListOrganizationInsights' {Maybe Natural
Maybe [Text]
Maybe Text
ListInsightsStatusFilter
statusFilter :: ListInsightsStatusFilter
organizationalUnitIds :: Maybe [Text]
nextToken :: Maybe Text
maxResults :: Maybe Natural
accountIds :: Maybe [Text]
$sel:statusFilter:ListOrganizationInsights' :: ListOrganizationInsights -> ListInsightsStatusFilter
$sel:organizationalUnitIds:ListOrganizationInsights' :: ListOrganizationInsights -> Maybe [Text]
$sel:nextToken:ListOrganizationInsights' :: ListOrganizationInsights -> Maybe Text
$sel:maxResults:ListOrganizationInsights' :: ListOrganizationInsights -> Maybe Natural
$sel:accountIds:ListOrganizationInsights' :: ListOrganizationInsights -> Maybe [Text]
..} =
    Int
_salt
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Text]
accountIds
      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 [Text]
organizationalUnitIds
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` ListInsightsStatusFilter
statusFilter

instance Prelude.NFData ListOrganizationInsights where
  rnf :: ListOrganizationInsights -> ()
rnf ListOrganizationInsights' {Maybe Natural
Maybe [Text]
Maybe Text
ListInsightsStatusFilter
statusFilter :: ListInsightsStatusFilter
organizationalUnitIds :: Maybe [Text]
nextToken :: Maybe Text
maxResults :: Maybe Natural
accountIds :: Maybe [Text]
$sel:statusFilter:ListOrganizationInsights' :: ListOrganizationInsights -> ListInsightsStatusFilter
$sel:organizationalUnitIds:ListOrganizationInsights' :: ListOrganizationInsights -> Maybe [Text]
$sel:nextToken:ListOrganizationInsights' :: ListOrganizationInsights -> Maybe Text
$sel:maxResults:ListOrganizationInsights' :: ListOrganizationInsights -> Maybe Natural
$sel:accountIds:ListOrganizationInsights' :: ListOrganizationInsights -> 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 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 [Text]
organizationalUnitIds
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf ListInsightsStatusFilter
statusFilter

instance Data.ToHeaders ListOrganizationInsights where
  toHeaders :: ListOrganizationInsights -> ResponseHeaders
toHeaders =
    forall a b. a -> b -> a
Prelude.const
      ( forall a. Monoid a => [a] -> a
Prelude.mconcat
          [ HeaderName
"Content-Type"
              forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
                          Prelude.ByteString
                      )
          ]
      )

instance Data.ToJSON ListOrganizationInsights where
  toJSON :: ListOrganizationInsights -> Value
toJSON ListOrganizationInsights' {Maybe Natural
Maybe [Text]
Maybe Text
ListInsightsStatusFilter
statusFilter :: ListInsightsStatusFilter
organizationalUnitIds :: Maybe [Text]
nextToken :: Maybe Text
maxResults :: Maybe Natural
accountIds :: Maybe [Text]
$sel:statusFilter:ListOrganizationInsights' :: ListOrganizationInsights -> ListInsightsStatusFilter
$sel:organizationalUnitIds:ListOrganizationInsights' :: ListOrganizationInsights -> Maybe [Text]
$sel:nextToken:ListOrganizationInsights' :: ListOrganizationInsights -> Maybe Text
$sel:maxResults:ListOrganizationInsights' :: ListOrganizationInsights -> Maybe Natural
$sel:accountIds:ListOrganizationInsights' :: ListOrganizationInsights -> Maybe [Text]
..} =
    [Pair] -> Value
Data.object
      ( forall a. [Maybe a] -> [a]
Prelude.catMaybes
          [ (Key
"AccountIds" 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]
accountIds,
            (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
"OrganizationalUnitIds" 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]
organizationalUnitIds,
            forall a. a -> Maybe a
Prelude.Just (Key
"StatusFilter" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= ListInsightsStatusFilter
statusFilter)
          ]
      )

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

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

-- | /See:/ 'newListOrganizationInsightsResponse' smart constructor.
data ListOrganizationInsightsResponse = ListOrganizationInsightsResponse'
  { -- | The pagination token to use to retrieve the next page of results for
    -- this operation. If there are no more pages, this value is null.
    ListOrganizationInsightsResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | An integer that specifies the number of open proactive insights in your
    -- Amazon Web Services account.
    ListOrganizationInsightsResponse
-> Maybe [ProactiveOrganizationInsightSummary]
proactiveInsights :: Prelude.Maybe [ProactiveOrganizationInsightSummary],
    -- | An integer that specifies the number of open reactive insights in your
    -- Amazon Web Services account.
    ListOrganizationInsightsResponse
-> Maybe [ReactiveOrganizationInsightSummary]
reactiveInsights :: Prelude.Maybe [ReactiveOrganizationInsightSummary],
    -- | The response's http status code.
    ListOrganizationInsightsResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (ListOrganizationInsightsResponse
-> ListOrganizationInsightsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListOrganizationInsightsResponse
-> ListOrganizationInsightsResponse -> Bool
$c/= :: ListOrganizationInsightsResponse
-> ListOrganizationInsightsResponse -> Bool
== :: ListOrganizationInsightsResponse
-> ListOrganizationInsightsResponse -> Bool
$c== :: ListOrganizationInsightsResponse
-> ListOrganizationInsightsResponse -> Bool
Prelude.Eq, ReadPrec [ListOrganizationInsightsResponse]
ReadPrec ListOrganizationInsightsResponse
Int -> ReadS ListOrganizationInsightsResponse
ReadS [ListOrganizationInsightsResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListOrganizationInsightsResponse]
$creadListPrec :: ReadPrec [ListOrganizationInsightsResponse]
readPrec :: ReadPrec ListOrganizationInsightsResponse
$creadPrec :: ReadPrec ListOrganizationInsightsResponse
readList :: ReadS [ListOrganizationInsightsResponse]
$creadList :: ReadS [ListOrganizationInsightsResponse]
readsPrec :: Int -> ReadS ListOrganizationInsightsResponse
$creadsPrec :: Int -> ReadS ListOrganizationInsightsResponse
Prelude.Read, Int -> ListOrganizationInsightsResponse -> ShowS
[ListOrganizationInsightsResponse] -> ShowS
ListOrganizationInsightsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListOrganizationInsightsResponse] -> ShowS
$cshowList :: [ListOrganizationInsightsResponse] -> ShowS
show :: ListOrganizationInsightsResponse -> String
$cshow :: ListOrganizationInsightsResponse -> String
showsPrec :: Int -> ListOrganizationInsightsResponse -> ShowS
$cshowsPrec :: Int -> ListOrganizationInsightsResponse -> ShowS
Prelude.Show, forall x.
Rep ListOrganizationInsightsResponse x
-> ListOrganizationInsightsResponse
forall x.
ListOrganizationInsightsResponse
-> Rep ListOrganizationInsightsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListOrganizationInsightsResponse x
-> ListOrganizationInsightsResponse
$cfrom :: forall x.
ListOrganizationInsightsResponse
-> Rep ListOrganizationInsightsResponse x
Prelude.Generic)

-- |
-- Create a value of 'ListOrganizationInsightsResponse' 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:
--
-- 'nextToken', 'listOrganizationInsightsResponse_nextToken' - The pagination token to use to retrieve the next page of results for
-- this operation. If there are no more pages, this value is null.
--
-- 'proactiveInsights', 'listOrganizationInsightsResponse_proactiveInsights' - An integer that specifies the number of open proactive insights in your
-- Amazon Web Services account.
--
-- 'reactiveInsights', 'listOrganizationInsightsResponse_reactiveInsights' - An integer that specifies the number of open reactive insights in your
-- Amazon Web Services account.
--
-- 'httpStatus', 'listOrganizationInsightsResponse_httpStatus' - The response's http status code.
newListOrganizationInsightsResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  ListOrganizationInsightsResponse
newListOrganizationInsightsResponse :: Int -> ListOrganizationInsightsResponse
newListOrganizationInsightsResponse Int
pHttpStatus_ =
  ListOrganizationInsightsResponse'
    { $sel:nextToken:ListOrganizationInsightsResponse' :: Maybe Text
nextToken =
        forall a. Maybe a
Prelude.Nothing,
      $sel:proactiveInsights:ListOrganizationInsightsResponse' :: Maybe [ProactiveOrganizationInsightSummary]
proactiveInsights = forall a. Maybe a
Prelude.Nothing,
      $sel:reactiveInsights:ListOrganizationInsightsResponse' :: Maybe [ReactiveOrganizationInsightSummary]
reactiveInsights = forall a. Maybe a
Prelude.Nothing,
      $sel:httpStatus:ListOrganizationInsightsResponse' :: Int
httpStatus = Int
pHttpStatus_
    }

-- | The pagination token to use to retrieve the next page of results for
-- this operation. If there are no more pages, this value is null.
listOrganizationInsightsResponse_nextToken :: Lens.Lens' ListOrganizationInsightsResponse (Prelude.Maybe Prelude.Text)
listOrganizationInsightsResponse_nextToken :: Lens' ListOrganizationInsightsResponse (Maybe Text)
listOrganizationInsightsResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListOrganizationInsightsResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListOrganizationInsightsResponse' :: ListOrganizationInsightsResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListOrganizationInsightsResponse
s@ListOrganizationInsightsResponse' {} Maybe Text
a -> ListOrganizationInsightsResponse
s {$sel:nextToken:ListOrganizationInsightsResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListOrganizationInsightsResponse)

-- | An integer that specifies the number of open proactive insights in your
-- Amazon Web Services account.
listOrganizationInsightsResponse_proactiveInsights :: Lens.Lens' ListOrganizationInsightsResponse (Prelude.Maybe [ProactiveOrganizationInsightSummary])
listOrganizationInsightsResponse_proactiveInsights :: Lens'
  ListOrganizationInsightsResponse
  (Maybe [ProactiveOrganizationInsightSummary])
listOrganizationInsightsResponse_proactiveInsights = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListOrganizationInsightsResponse' {Maybe [ProactiveOrganizationInsightSummary]
proactiveInsights :: Maybe [ProactiveOrganizationInsightSummary]
$sel:proactiveInsights:ListOrganizationInsightsResponse' :: ListOrganizationInsightsResponse
-> Maybe [ProactiveOrganizationInsightSummary]
proactiveInsights} -> Maybe [ProactiveOrganizationInsightSummary]
proactiveInsights) (\s :: ListOrganizationInsightsResponse
s@ListOrganizationInsightsResponse' {} Maybe [ProactiveOrganizationInsightSummary]
a -> ListOrganizationInsightsResponse
s {$sel:proactiveInsights:ListOrganizationInsightsResponse' :: Maybe [ProactiveOrganizationInsightSummary]
proactiveInsights = Maybe [ProactiveOrganizationInsightSummary]
a} :: ListOrganizationInsightsResponse) 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

-- | An integer that specifies the number of open reactive insights in your
-- Amazon Web Services account.
listOrganizationInsightsResponse_reactiveInsights :: Lens.Lens' ListOrganizationInsightsResponse (Prelude.Maybe [ReactiveOrganizationInsightSummary])
listOrganizationInsightsResponse_reactiveInsights :: Lens'
  ListOrganizationInsightsResponse
  (Maybe [ReactiveOrganizationInsightSummary])
listOrganizationInsightsResponse_reactiveInsights = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListOrganizationInsightsResponse' {Maybe [ReactiveOrganizationInsightSummary]
reactiveInsights :: Maybe [ReactiveOrganizationInsightSummary]
$sel:reactiveInsights:ListOrganizationInsightsResponse' :: ListOrganizationInsightsResponse
-> Maybe [ReactiveOrganizationInsightSummary]
reactiveInsights} -> Maybe [ReactiveOrganizationInsightSummary]
reactiveInsights) (\s :: ListOrganizationInsightsResponse
s@ListOrganizationInsightsResponse' {} Maybe [ReactiveOrganizationInsightSummary]
a -> ListOrganizationInsightsResponse
s {$sel:reactiveInsights:ListOrganizationInsightsResponse' :: Maybe [ReactiveOrganizationInsightSummary]
reactiveInsights = Maybe [ReactiveOrganizationInsightSummary]
a} :: ListOrganizationInsightsResponse) 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 response's http status code.
listOrganizationInsightsResponse_httpStatus :: Lens.Lens' ListOrganizationInsightsResponse Prelude.Int
listOrganizationInsightsResponse_httpStatus :: Lens' ListOrganizationInsightsResponse Int
listOrganizationInsightsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListOrganizationInsightsResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListOrganizationInsightsResponse' :: ListOrganizationInsightsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListOrganizationInsightsResponse
s@ListOrganizationInsightsResponse' {} Int
a -> ListOrganizationInsightsResponse
s {$sel:httpStatus:ListOrganizationInsightsResponse' :: Int
httpStatus = Int
a} :: ListOrganizationInsightsResponse)

instance
  Prelude.NFData
    ListOrganizationInsightsResponse
  where
  rnf :: ListOrganizationInsightsResponse -> ()
rnf ListOrganizationInsightsResponse' {Int
Maybe [ReactiveOrganizationInsightSummary]
Maybe [ProactiveOrganizationInsightSummary]
Maybe Text
httpStatus :: Int
reactiveInsights :: Maybe [ReactiveOrganizationInsightSummary]
proactiveInsights :: Maybe [ProactiveOrganizationInsightSummary]
nextToken :: Maybe Text
$sel:httpStatus:ListOrganizationInsightsResponse' :: ListOrganizationInsightsResponse -> Int
$sel:reactiveInsights:ListOrganizationInsightsResponse' :: ListOrganizationInsightsResponse
-> Maybe [ReactiveOrganizationInsightSummary]
$sel:proactiveInsights:ListOrganizationInsightsResponse' :: ListOrganizationInsightsResponse
-> Maybe [ProactiveOrganizationInsightSummary]
$sel:nextToken:ListOrganizationInsightsResponse' :: ListOrganizationInsightsResponse -> 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 [ProactiveOrganizationInsightSummary]
proactiveInsights
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [ReactiveOrganizationInsightSummary]
reactiveInsights
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus