{-# 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.LexV2Models.StopBotRecommendation
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Stop an already running Bot Recommendation request.
module Amazonka.LexV2Models.StopBotRecommendation
  ( -- * Creating a Request
    StopBotRecommendation (..),
    newStopBotRecommendation,

    -- * Request Lenses
    stopBotRecommendation_botId,
    stopBotRecommendation_botVersion,
    stopBotRecommendation_localeId,
    stopBotRecommendation_botRecommendationId,

    -- * Destructuring the Response
    StopBotRecommendationResponse (..),
    newStopBotRecommendationResponse,

    -- * Response Lenses
    stopBotRecommendationResponse_botId,
    stopBotRecommendationResponse_botRecommendationId,
    stopBotRecommendationResponse_botRecommendationStatus,
    stopBotRecommendationResponse_botVersion,
    stopBotRecommendationResponse_localeId,
    stopBotRecommendationResponse_httpStatus,
  )
where

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

-- | /See:/ 'newStopBotRecommendation' smart constructor.
data StopBotRecommendation = StopBotRecommendation'
  { -- | The unique identifier of the bot containing the bot recommendation to be
    -- stopped.
    StopBotRecommendation -> Text
botId :: Prelude.Text,
    -- | The version of the bot containing the bot recommendation.
    StopBotRecommendation -> Text
botVersion :: Prelude.Text,
    -- | The identifier of the language and locale of the bot recommendation to
    -- stop. The string must match one of the supported locales. For more
    -- information, see
    -- <https://docs.aws.amazon.com/lexv2/latest/dg/how-languages.html Supported languages>
    StopBotRecommendation -> Text
localeId :: Prelude.Text,
    -- | The unique identifier of the bot recommendation to be stopped.
    StopBotRecommendation -> Text
botRecommendationId :: Prelude.Text
  }
  deriving (StopBotRecommendation -> StopBotRecommendation -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: StopBotRecommendation -> StopBotRecommendation -> Bool
$c/= :: StopBotRecommendation -> StopBotRecommendation -> Bool
== :: StopBotRecommendation -> StopBotRecommendation -> Bool
$c== :: StopBotRecommendation -> StopBotRecommendation -> Bool
Prelude.Eq, ReadPrec [StopBotRecommendation]
ReadPrec StopBotRecommendation
Int -> ReadS StopBotRecommendation
ReadS [StopBotRecommendation]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [StopBotRecommendation]
$creadListPrec :: ReadPrec [StopBotRecommendation]
readPrec :: ReadPrec StopBotRecommendation
$creadPrec :: ReadPrec StopBotRecommendation
readList :: ReadS [StopBotRecommendation]
$creadList :: ReadS [StopBotRecommendation]
readsPrec :: Int -> ReadS StopBotRecommendation
$creadsPrec :: Int -> ReadS StopBotRecommendation
Prelude.Read, Int -> StopBotRecommendation -> ShowS
[StopBotRecommendation] -> ShowS
StopBotRecommendation -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [StopBotRecommendation] -> ShowS
$cshowList :: [StopBotRecommendation] -> ShowS
show :: StopBotRecommendation -> String
$cshow :: StopBotRecommendation -> String
showsPrec :: Int -> StopBotRecommendation -> ShowS
$cshowsPrec :: Int -> StopBotRecommendation -> ShowS
Prelude.Show, forall x. Rep StopBotRecommendation x -> StopBotRecommendation
forall x. StopBotRecommendation -> Rep StopBotRecommendation x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep StopBotRecommendation x -> StopBotRecommendation
$cfrom :: forall x. StopBotRecommendation -> Rep StopBotRecommendation x
Prelude.Generic)

-- |
-- Create a value of 'StopBotRecommendation' 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:
--
-- 'botId', 'stopBotRecommendation_botId' - The unique identifier of the bot containing the bot recommendation to be
-- stopped.
--
-- 'botVersion', 'stopBotRecommendation_botVersion' - The version of the bot containing the bot recommendation.
--
-- 'localeId', 'stopBotRecommendation_localeId' - The identifier of the language and locale of the bot recommendation to
-- stop. The string must match one of the supported locales. For more
-- information, see
-- <https://docs.aws.amazon.com/lexv2/latest/dg/how-languages.html Supported languages>
--
-- 'botRecommendationId', 'stopBotRecommendation_botRecommendationId' - The unique identifier of the bot recommendation to be stopped.
newStopBotRecommendation ::
  -- | 'botId'
  Prelude.Text ->
  -- | 'botVersion'
  Prelude.Text ->
  -- | 'localeId'
  Prelude.Text ->
  -- | 'botRecommendationId'
  Prelude.Text ->
  StopBotRecommendation
newStopBotRecommendation :: Text -> Text -> Text -> Text -> StopBotRecommendation
newStopBotRecommendation
  Text
pBotId_
  Text
pBotVersion_
  Text
pLocaleId_
  Text
pBotRecommendationId_ =
    StopBotRecommendation'
      { $sel:botId:StopBotRecommendation' :: Text
botId = Text
pBotId_,
        $sel:botVersion:StopBotRecommendation' :: Text
botVersion = Text
pBotVersion_,
        $sel:localeId:StopBotRecommendation' :: Text
localeId = Text
pLocaleId_,
        $sel:botRecommendationId:StopBotRecommendation' :: Text
botRecommendationId = Text
pBotRecommendationId_
      }

-- | The unique identifier of the bot containing the bot recommendation to be
-- stopped.
stopBotRecommendation_botId :: Lens.Lens' StopBotRecommendation Prelude.Text
stopBotRecommendation_botId :: Lens' StopBotRecommendation Text
stopBotRecommendation_botId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StopBotRecommendation' {Text
botId :: Text
$sel:botId:StopBotRecommendation' :: StopBotRecommendation -> Text
botId} -> Text
botId) (\s :: StopBotRecommendation
s@StopBotRecommendation' {} Text
a -> StopBotRecommendation
s {$sel:botId:StopBotRecommendation' :: Text
botId = Text
a} :: StopBotRecommendation)

-- | The version of the bot containing the bot recommendation.
stopBotRecommendation_botVersion :: Lens.Lens' StopBotRecommendation Prelude.Text
stopBotRecommendation_botVersion :: Lens' StopBotRecommendation Text
stopBotRecommendation_botVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StopBotRecommendation' {Text
botVersion :: Text
$sel:botVersion:StopBotRecommendation' :: StopBotRecommendation -> Text
botVersion} -> Text
botVersion) (\s :: StopBotRecommendation
s@StopBotRecommendation' {} Text
a -> StopBotRecommendation
s {$sel:botVersion:StopBotRecommendation' :: Text
botVersion = Text
a} :: StopBotRecommendation)

-- | The identifier of the language and locale of the bot recommendation to
-- stop. The string must match one of the supported locales. For more
-- information, see
-- <https://docs.aws.amazon.com/lexv2/latest/dg/how-languages.html Supported languages>
stopBotRecommendation_localeId :: Lens.Lens' StopBotRecommendation Prelude.Text
stopBotRecommendation_localeId :: Lens' StopBotRecommendation Text
stopBotRecommendation_localeId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StopBotRecommendation' {Text
localeId :: Text
$sel:localeId:StopBotRecommendation' :: StopBotRecommendation -> Text
localeId} -> Text
localeId) (\s :: StopBotRecommendation
s@StopBotRecommendation' {} Text
a -> StopBotRecommendation
s {$sel:localeId:StopBotRecommendation' :: Text
localeId = Text
a} :: StopBotRecommendation)

-- | The unique identifier of the bot recommendation to be stopped.
stopBotRecommendation_botRecommendationId :: Lens.Lens' StopBotRecommendation Prelude.Text
stopBotRecommendation_botRecommendationId :: Lens' StopBotRecommendation Text
stopBotRecommendation_botRecommendationId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StopBotRecommendation' {Text
botRecommendationId :: Text
$sel:botRecommendationId:StopBotRecommendation' :: StopBotRecommendation -> Text
botRecommendationId} -> Text
botRecommendationId) (\s :: StopBotRecommendation
s@StopBotRecommendation' {} Text
a -> StopBotRecommendation
s {$sel:botRecommendationId:StopBotRecommendation' :: Text
botRecommendationId = Text
a} :: StopBotRecommendation)

instance Core.AWSRequest StopBotRecommendation where
  type
    AWSResponse StopBotRecommendation =
      StopBotRecommendationResponse
  request :: (Service -> Service)
-> StopBotRecommendation -> Request StopBotRecommendation
request Service -> Service
overrides =
    forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.putJSON (Service -> Service
overrides Service
defaultService)
  response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy StopBotRecommendation
-> ClientResponse ClientBody
-> m (Either
        Error (ClientResponse (AWSResponse StopBotRecommendation)))
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
-> Maybe BotRecommendationStatus
-> Maybe Text
-> Maybe Text
-> Int
-> StopBotRecommendationResponse
StopBotRecommendationResponse'
            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
"botId")
            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
"botRecommendationId")
            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
"botRecommendationStatus")
            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
"botVersion")
            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
"localeId")
            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 StopBotRecommendation where
  hashWithSalt :: Int -> StopBotRecommendation -> Int
hashWithSalt Int
_salt StopBotRecommendation' {Text
botRecommendationId :: Text
localeId :: Text
botVersion :: Text
botId :: Text
$sel:botRecommendationId:StopBotRecommendation' :: StopBotRecommendation -> Text
$sel:localeId:StopBotRecommendation' :: StopBotRecommendation -> Text
$sel:botVersion:StopBotRecommendation' :: StopBotRecommendation -> Text
$sel:botId:StopBotRecommendation' :: StopBotRecommendation -> Text
..} =
    Int
_salt
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
botId
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
botVersion
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
localeId
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
botRecommendationId

instance Prelude.NFData StopBotRecommendation where
  rnf :: StopBotRecommendation -> ()
rnf StopBotRecommendation' {Text
botRecommendationId :: Text
localeId :: Text
botVersion :: Text
botId :: Text
$sel:botRecommendationId:StopBotRecommendation' :: StopBotRecommendation -> Text
$sel:localeId:StopBotRecommendation' :: StopBotRecommendation -> Text
$sel:botVersion:StopBotRecommendation' :: StopBotRecommendation -> Text
$sel:botId:StopBotRecommendation' :: StopBotRecommendation -> Text
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Text
botId
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
botVersion
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
localeId
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
botRecommendationId

instance Data.ToHeaders StopBotRecommendation where
  toHeaders :: StopBotRecommendation -> 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 StopBotRecommendation where
  toJSON :: StopBotRecommendation -> Value
toJSON = forall a b. a -> b -> a
Prelude.const (Object -> Value
Data.Object forall a. Monoid a => a
Prelude.mempty)

instance Data.ToPath StopBotRecommendation where
  toPath :: StopBotRecommendation -> ByteString
toPath StopBotRecommendation' {Text
botRecommendationId :: Text
localeId :: Text
botVersion :: Text
botId :: Text
$sel:botRecommendationId:StopBotRecommendation' :: StopBotRecommendation -> Text
$sel:localeId:StopBotRecommendation' :: StopBotRecommendation -> Text
$sel:botVersion:StopBotRecommendation' :: StopBotRecommendation -> Text
$sel:botId:StopBotRecommendation' :: StopBotRecommendation -> Text
..} =
    forall a. Monoid a => [a] -> a
Prelude.mconcat
      [ ByteString
"/bots/",
        forall a. ToByteString a => a -> ByteString
Data.toBS Text
botId,
        ByteString
"/botversions/",
        forall a. ToByteString a => a -> ByteString
Data.toBS Text
botVersion,
        ByteString
"/botlocales/",
        forall a. ToByteString a => a -> ByteString
Data.toBS Text
localeId,
        ByteString
"/botrecommendations/",
        forall a. ToByteString a => a -> ByteString
Data.toBS Text
botRecommendationId,
        ByteString
"/stopbotrecommendation"
      ]

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

-- | /See:/ 'newStopBotRecommendationResponse' smart constructor.
data StopBotRecommendationResponse = StopBotRecommendationResponse'
  { -- | The unique identifier of the bot containing the bot recommendation that
    -- is being stopped.
    StopBotRecommendationResponse -> Maybe Text
botId :: Prelude.Maybe Prelude.Text,
    -- | The unique identifier of the bot recommendation that is being stopped.
    StopBotRecommendationResponse -> Maybe Text
botRecommendationId :: Prelude.Maybe Prelude.Text,
    -- | The status of the bot recommendation. If the status is Failed, then the
    -- reasons for the failure are listed in the failureReasons field.
    StopBotRecommendationResponse -> Maybe BotRecommendationStatus
botRecommendationStatus :: Prelude.Maybe BotRecommendationStatus,
    -- | The version of the bot containing the recommendation that is being
    -- stopped.
    StopBotRecommendationResponse -> Maybe Text
botVersion :: Prelude.Maybe Prelude.Text,
    -- | The identifier of the language and locale of the bot response to stop.
    -- The string must match one of the supported locales. For more
    -- information, see
    -- <https://docs.aws.amazon.com/lexv2/latest/dg/how-languages.html Supported languages>
    StopBotRecommendationResponse -> Maybe Text
localeId :: Prelude.Maybe Prelude.Text,
    -- | The response's http status code.
    StopBotRecommendationResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (StopBotRecommendationResponse
-> StopBotRecommendationResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: StopBotRecommendationResponse
-> StopBotRecommendationResponse -> Bool
$c/= :: StopBotRecommendationResponse
-> StopBotRecommendationResponse -> Bool
== :: StopBotRecommendationResponse
-> StopBotRecommendationResponse -> Bool
$c== :: StopBotRecommendationResponse
-> StopBotRecommendationResponse -> Bool
Prelude.Eq, ReadPrec [StopBotRecommendationResponse]
ReadPrec StopBotRecommendationResponse
Int -> ReadS StopBotRecommendationResponse
ReadS [StopBotRecommendationResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [StopBotRecommendationResponse]
$creadListPrec :: ReadPrec [StopBotRecommendationResponse]
readPrec :: ReadPrec StopBotRecommendationResponse
$creadPrec :: ReadPrec StopBotRecommendationResponse
readList :: ReadS [StopBotRecommendationResponse]
$creadList :: ReadS [StopBotRecommendationResponse]
readsPrec :: Int -> ReadS StopBotRecommendationResponse
$creadsPrec :: Int -> ReadS StopBotRecommendationResponse
Prelude.Read, Int -> StopBotRecommendationResponse -> ShowS
[StopBotRecommendationResponse] -> ShowS
StopBotRecommendationResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [StopBotRecommendationResponse] -> ShowS
$cshowList :: [StopBotRecommendationResponse] -> ShowS
show :: StopBotRecommendationResponse -> String
$cshow :: StopBotRecommendationResponse -> String
showsPrec :: Int -> StopBotRecommendationResponse -> ShowS
$cshowsPrec :: Int -> StopBotRecommendationResponse -> ShowS
Prelude.Show, forall x.
Rep StopBotRecommendationResponse x
-> StopBotRecommendationResponse
forall x.
StopBotRecommendationResponse
-> Rep StopBotRecommendationResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep StopBotRecommendationResponse x
-> StopBotRecommendationResponse
$cfrom :: forall x.
StopBotRecommendationResponse
-> Rep StopBotRecommendationResponse x
Prelude.Generic)

-- |
-- Create a value of 'StopBotRecommendationResponse' 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:
--
-- 'botId', 'stopBotRecommendationResponse_botId' - The unique identifier of the bot containing the bot recommendation that
-- is being stopped.
--
-- 'botRecommendationId', 'stopBotRecommendationResponse_botRecommendationId' - The unique identifier of the bot recommendation that is being stopped.
--
-- 'botRecommendationStatus', 'stopBotRecommendationResponse_botRecommendationStatus' - The status of the bot recommendation. If the status is Failed, then the
-- reasons for the failure are listed in the failureReasons field.
--
-- 'botVersion', 'stopBotRecommendationResponse_botVersion' - The version of the bot containing the recommendation that is being
-- stopped.
--
-- 'localeId', 'stopBotRecommendationResponse_localeId' - The identifier of the language and locale of the bot response to stop.
-- The string must match one of the supported locales. For more
-- information, see
-- <https://docs.aws.amazon.com/lexv2/latest/dg/how-languages.html Supported languages>
--
-- 'httpStatus', 'stopBotRecommendationResponse_httpStatus' - The response's http status code.
newStopBotRecommendationResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  StopBotRecommendationResponse
newStopBotRecommendationResponse :: Int -> StopBotRecommendationResponse
newStopBotRecommendationResponse Int
pHttpStatus_ =
  StopBotRecommendationResponse'
    { $sel:botId:StopBotRecommendationResponse' :: Maybe Text
botId =
        forall a. Maybe a
Prelude.Nothing,
      $sel:botRecommendationId:StopBotRecommendationResponse' :: Maybe Text
botRecommendationId = forall a. Maybe a
Prelude.Nothing,
      $sel:botRecommendationStatus:StopBotRecommendationResponse' :: Maybe BotRecommendationStatus
botRecommendationStatus = forall a. Maybe a
Prelude.Nothing,
      $sel:botVersion:StopBotRecommendationResponse' :: Maybe Text
botVersion = forall a. Maybe a
Prelude.Nothing,
      $sel:localeId:StopBotRecommendationResponse' :: Maybe Text
localeId = forall a. Maybe a
Prelude.Nothing,
      $sel:httpStatus:StopBotRecommendationResponse' :: Int
httpStatus = Int
pHttpStatus_
    }

-- | The unique identifier of the bot containing the bot recommendation that
-- is being stopped.
stopBotRecommendationResponse_botId :: Lens.Lens' StopBotRecommendationResponse (Prelude.Maybe Prelude.Text)
stopBotRecommendationResponse_botId :: Lens' StopBotRecommendationResponse (Maybe Text)
stopBotRecommendationResponse_botId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StopBotRecommendationResponse' {Maybe Text
botId :: Maybe Text
$sel:botId:StopBotRecommendationResponse' :: StopBotRecommendationResponse -> Maybe Text
botId} -> Maybe Text
botId) (\s :: StopBotRecommendationResponse
s@StopBotRecommendationResponse' {} Maybe Text
a -> StopBotRecommendationResponse
s {$sel:botId:StopBotRecommendationResponse' :: Maybe Text
botId = Maybe Text
a} :: StopBotRecommendationResponse)

-- | The unique identifier of the bot recommendation that is being stopped.
stopBotRecommendationResponse_botRecommendationId :: Lens.Lens' StopBotRecommendationResponse (Prelude.Maybe Prelude.Text)
stopBotRecommendationResponse_botRecommendationId :: Lens' StopBotRecommendationResponse (Maybe Text)
stopBotRecommendationResponse_botRecommendationId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StopBotRecommendationResponse' {Maybe Text
botRecommendationId :: Maybe Text
$sel:botRecommendationId:StopBotRecommendationResponse' :: StopBotRecommendationResponse -> Maybe Text
botRecommendationId} -> Maybe Text
botRecommendationId) (\s :: StopBotRecommendationResponse
s@StopBotRecommendationResponse' {} Maybe Text
a -> StopBotRecommendationResponse
s {$sel:botRecommendationId:StopBotRecommendationResponse' :: Maybe Text
botRecommendationId = Maybe Text
a} :: StopBotRecommendationResponse)

-- | The status of the bot recommendation. If the status is Failed, then the
-- reasons for the failure are listed in the failureReasons field.
stopBotRecommendationResponse_botRecommendationStatus :: Lens.Lens' StopBotRecommendationResponse (Prelude.Maybe BotRecommendationStatus)
stopBotRecommendationResponse_botRecommendationStatus :: Lens' StopBotRecommendationResponse (Maybe BotRecommendationStatus)
stopBotRecommendationResponse_botRecommendationStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StopBotRecommendationResponse' {Maybe BotRecommendationStatus
botRecommendationStatus :: Maybe BotRecommendationStatus
$sel:botRecommendationStatus:StopBotRecommendationResponse' :: StopBotRecommendationResponse -> Maybe BotRecommendationStatus
botRecommendationStatus} -> Maybe BotRecommendationStatus
botRecommendationStatus) (\s :: StopBotRecommendationResponse
s@StopBotRecommendationResponse' {} Maybe BotRecommendationStatus
a -> StopBotRecommendationResponse
s {$sel:botRecommendationStatus:StopBotRecommendationResponse' :: Maybe BotRecommendationStatus
botRecommendationStatus = Maybe BotRecommendationStatus
a} :: StopBotRecommendationResponse)

-- | The version of the bot containing the recommendation that is being
-- stopped.
stopBotRecommendationResponse_botVersion :: Lens.Lens' StopBotRecommendationResponse (Prelude.Maybe Prelude.Text)
stopBotRecommendationResponse_botVersion :: Lens' StopBotRecommendationResponse (Maybe Text)
stopBotRecommendationResponse_botVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StopBotRecommendationResponse' {Maybe Text
botVersion :: Maybe Text
$sel:botVersion:StopBotRecommendationResponse' :: StopBotRecommendationResponse -> Maybe Text
botVersion} -> Maybe Text
botVersion) (\s :: StopBotRecommendationResponse
s@StopBotRecommendationResponse' {} Maybe Text
a -> StopBotRecommendationResponse
s {$sel:botVersion:StopBotRecommendationResponse' :: Maybe Text
botVersion = Maybe Text
a} :: StopBotRecommendationResponse)

-- | The identifier of the language and locale of the bot response to stop.
-- The string must match one of the supported locales. For more
-- information, see
-- <https://docs.aws.amazon.com/lexv2/latest/dg/how-languages.html Supported languages>
stopBotRecommendationResponse_localeId :: Lens.Lens' StopBotRecommendationResponse (Prelude.Maybe Prelude.Text)
stopBotRecommendationResponse_localeId :: Lens' StopBotRecommendationResponse (Maybe Text)
stopBotRecommendationResponse_localeId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StopBotRecommendationResponse' {Maybe Text
localeId :: Maybe Text
$sel:localeId:StopBotRecommendationResponse' :: StopBotRecommendationResponse -> Maybe Text
localeId} -> Maybe Text
localeId) (\s :: StopBotRecommendationResponse
s@StopBotRecommendationResponse' {} Maybe Text
a -> StopBotRecommendationResponse
s {$sel:localeId:StopBotRecommendationResponse' :: Maybe Text
localeId = Maybe Text
a} :: StopBotRecommendationResponse)

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

instance Prelude.NFData StopBotRecommendationResponse where
  rnf :: StopBotRecommendationResponse -> ()
rnf StopBotRecommendationResponse' {Int
Maybe Text
Maybe BotRecommendationStatus
httpStatus :: Int
localeId :: Maybe Text
botVersion :: Maybe Text
botRecommendationStatus :: Maybe BotRecommendationStatus
botRecommendationId :: Maybe Text
botId :: Maybe Text
$sel:httpStatus:StopBotRecommendationResponse' :: StopBotRecommendationResponse -> Int
$sel:localeId:StopBotRecommendationResponse' :: StopBotRecommendationResponse -> Maybe Text
$sel:botVersion:StopBotRecommendationResponse' :: StopBotRecommendationResponse -> Maybe Text
$sel:botRecommendationStatus:StopBotRecommendationResponse' :: StopBotRecommendationResponse -> Maybe BotRecommendationStatus
$sel:botRecommendationId:StopBotRecommendationResponse' :: StopBotRecommendationResponse -> Maybe Text
$sel:botId:StopBotRecommendationResponse' :: StopBotRecommendationResponse -> Maybe Text
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
botId
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
botRecommendationId
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BotRecommendationStatus
botRecommendationStatus
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
botVersion
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
localeId
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus