{-# 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.ServiceCatalog.AssociateServiceActionWithProvisioningArtifact
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Associates a self-service action with a provisioning artifact.
module Amazonka.ServiceCatalog.AssociateServiceActionWithProvisioningArtifact
  ( -- * Creating a Request
    AssociateServiceActionWithProvisioningArtifact (..),
    newAssociateServiceActionWithProvisioningArtifact,

    -- * Request Lenses
    associateServiceActionWithProvisioningArtifact_acceptLanguage,
    associateServiceActionWithProvisioningArtifact_productId,
    associateServiceActionWithProvisioningArtifact_provisioningArtifactId,
    associateServiceActionWithProvisioningArtifact_serviceActionId,

    -- * Destructuring the Response
    AssociateServiceActionWithProvisioningArtifactResponse (..),
    newAssociateServiceActionWithProvisioningArtifactResponse,

    -- * Response Lenses
    associateServiceActionWithProvisioningArtifactResponse_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.ServiceCatalog.Types

-- | /See:/ 'newAssociateServiceActionWithProvisioningArtifact' smart constructor.
data AssociateServiceActionWithProvisioningArtifact = AssociateServiceActionWithProvisioningArtifact'
  { -- | The language code.
    --
    -- -   @en@ - English (default)
    --
    -- -   @jp@ - Japanese
    --
    -- -   @zh@ - Chinese
    AssociateServiceActionWithProvisioningArtifact -> Maybe Text
acceptLanguage :: Prelude.Maybe Prelude.Text,
    -- | The product identifier. For example, @prod-abcdzk7xy33qa@.
    AssociateServiceActionWithProvisioningArtifact -> Text
productId :: Prelude.Text,
    -- | The identifier of the provisioning artifact. For example,
    -- @pa-4abcdjnxjj6ne@.
    AssociateServiceActionWithProvisioningArtifact -> Text
provisioningArtifactId :: Prelude.Text,
    -- | The self-service action identifier. For example, @act-fs7abcd89wxyz@.
    AssociateServiceActionWithProvisioningArtifact -> Text
serviceActionId :: Prelude.Text
  }
  deriving (AssociateServiceActionWithProvisioningArtifact
-> AssociateServiceActionWithProvisioningArtifact -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: AssociateServiceActionWithProvisioningArtifact
-> AssociateServiceActionWithProvisioningArtifact -> Bool
$c/= :: AssociateServiceActionWithProvisioningArtifact
-> AssociateServiceActionWithProvisioningArtifact -> Bool
== :: AssociateServiceActionWithProvisioningArtifact
-> AssociateServiceActionWithProvisioningArtifact -> Bool
$c== :: AssociateServiceActionWithProvisioningArtifact
-> AssociateServiceActionWithProvisioningArtifact -> Bool
Prelude.Eq, ReadPrec [AssociateServiceActionWithProvisioningArtifact]
ReadPrec AssociateServiceActionWithProvisioningArtifact
Int -> ReadS AssociateServiceActionWithProvisioningArtifact
ReadS [AssociateServiceActionWithProvisioningArtifact]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [AssociateServiceActionWithProvisioningArtifact]
$creadListPrec :: ReadPrec [AssociateServiceActionWithProvisioningArtifact]
readPrec :: ReadPrec AssociateServiceActionWithProvisioningArtifact
$creadPrec :: ReadPrec AssociateServiceActionWithProvisioningArtifact
readList :: ReadS [AssociateServiceActionWithProvisioningArtifact]
$creadList :: ReadS [AssociateServiceActionWithProvisioningArtifact]
readsPrec :: Int -> ReadS AssociateServiceActionWithProvisioningArtifact
$creadsPrec :: Int -> ReadS AssociateServiceActionWithProvisioningArtifact
Prelude.Read, Int -> AssociateServiceActionWithProvisioningArtifact -> ShowS
[AssociateServiceActionWithProvisioningArtifact] -> ShowS
AssociateServiceActionWithProvisioningArtifact -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [AssociateServiceActionWithProvisioningArtifact] -> ShowS
$cshowList :: [AssociateServiceActionWithProvisioningArtifact] -> ShowS
show :: AssociateServiceActionWithProvisioningArtifact -> String
$cshow :: AssociateServiceActionWithProvisioningArtifact -> String
showsPrec :: Int -> AssociateServiceActionWithProvisioningArtifact -> ShowS
$cshowsPrec :: Int -> AssociateServiceActionWithProvisioningArtifact -> ShowS
Prelude.Show, forall x.
Rep AssociateServiceActionWithProvisioningArtifact x
-> AssociateServiceActionWithProvisioningArtifact
forall x.
AssociateServiceActionWithProvisioningArtifact
-> Rep AssociateServiceActionWithProvisioningArtifact x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep AssociateServiceActionWithProvisioningArtifact x
-> AssociateServiceActionWithProvisioningArtifact
$cfrom :: forall x.
AssociateServiceActionWithProvisioningArtifact
-> Rep AssociateServiceActionWithProvisioningArtifact x
Prelude.Generic)

-- |
-- Create a value of 'AssociateServiceActionWithProvisioningArtifact' 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:
--
-- 'acceptLanguage', 'associateServiceActionWithProvisioningArtifact_acceptLanguage' - The language code.
--
-- -   @en@ - English (default)
--
-- -   @jp@ - Japanese
--
-- -   @zh@ - Chinese
--
-- 'productId', 'associateServiceActionWithProvisioningArtifact_productId' - The product identifier. For example, @prod-abcdzk7xy33qa@.
--
-- 'provisioningArtifactId', 'associateServiceActionWithProvisioningArtifact_provisioningArtifactId' - The identifier of the provisioning artifact. For example,
-- @pa-4abcdjnxjj6ne@.
--
-- 'serviceActionId', 'associateServiceActionWithProvisioningArtifact_serviceActionId' - The self-service action identifier. For example, @act-fs7abcd89wxyz@.
newAssociateServiceActionWithProvisioningArtifact ::
  -- | 'productId'
  Prelude.Text ->
  -- | 'provisioningArtifactId'
  Prelude.Text ->
  -- | 'serviceActionId'
  Prelude.Text ->
  AssociateServiceActionWithProvisioningArtifact
newAssociateServiceActionWithProvisioningArtifact :: Text
-> Text -> Text -> AssociateServiceActionWithProvisioningArtifact
newAssociateServiceActionWithProvisioningArtifact
  Text
pProductId_
  Text
pProvisioningArtifactId_
  Text
pServiceActionId_ =
    AssociateServiceActionWithProvisioningArtifact'
      { $sel:acceptLanguage:AssociateServiceActionWithProvisioningArtifact' :: Maybe Text
acceptLanguage =
          forall a. Maybe a
Prelude.Nothing,
        $sel:productId:AssociateServiceActionWithProvisioningArtifact' :: Text
productId = Text
pProductId_,
        $sel:provisioningArtifactId:AssociateServiceActionWithProvisioningArtifact' :: Text
provisioningArtifactId =
          Text
pProvisioningArtifactId_,
        $sel:serviceActionId:AssociateServiceActionWithProvisioningArtifact' :: Text
serviceActionId =
          Text
pServiceActionId_
      }

-- | The language code.
--
-- -   @en@ - English (default)
--
-- -   @jp@ - Japanese
--
-- -   @zh@ - Chinese
associateServiceActionWithProvisioningArtifact_acceptLanguage :: Lens.Lens' AssociateServiceActionWithProvisioningArtifact (Prelude.Maybe Prelude.Text)
associateServiceActionWithProvisioningArtifact_acceptLanguage :: Lens' AssociateServiceActionWithProvisioningArtifact (Maybe Text)
associateServiceActionWithProvisioningArtifact_acceptLanguage = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AssociateServiceActionWithProvisioningArtifact' {Maybe Text
acceptLanguage :: Maybe Text
$sel:acceptLanguage:AssociateServiceActionWithProvisioningArtifact' :: AssociateServiceActionWithProvisioningArtifact -> Maybe Text
acceptLanguage} -> Maybe Text
acceptLanguage) (\s :: AssociateServiceActionWithProvisioningArtifact
s@AssociateServiceActionWithProvisioningArtifact' {} Maybe Text
a -> AssociateServiceActionWithProvisioningArtifact
s {$sel:acceptLanguage:AssociateServiceActionWithProvisioningArtifact' :: Maybe Text
acceptLanguage = Maybe Text
a} :: AssociateServiceActionWithProvisioningArtifact)

-- | The product identifier. For example, @prod-abcdzk7xy33qa@.
associateServiceActionWithProvisioningArtifact_productId :: Lens.Lens' AssociateServiceActionWithProvisioningArtifact Prelude.Text
associateServiceActionWithProvisioningArtifact_productId :: Lens' AssociateServiceActionWithProvisioningArtifact Text
associateServiceActionWithProvisioningArtifact_productId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AssociateServiceActionWithProvisioningArtifact' {Text
productId :: Text
$sel:productId:AssociateServiceActionWithProvisioningArtifact' :: AssociateServiceActionWithProvisioningArtifact -> Text
productId} -> Text
productId) (\s :: AssociateServiceActionWithProvisioningArtifact
s@AssociateServiceActionWithProvisioningArtifact' {} Text
a -> AssociateServiceActionWithProvisioningArtifact
s {$sel:productId:AssociateServiceActionWithProvisioningArtifact' :: Text
productId = Text
a} :: AssociateServiceActionWithProvisioningArtifact)

-- | The identifier of the provisioning artifact. For example,
-- @pa-4abcdjnxjj6ne@.
associateServiceActionWithProvisioningArtifact_provisioningArtifactId :: Lens.Lens' AssociateServiceActionWithProvisioningArtifact Prelude.Text
associateServiceActionWithProvisioningArtifact_provisioningArtifactId :: Lens' AssociateServiceActionWithProvisioningArtifact Text
associateServiceActionWithProvisioningArtifact_provisioningArtifactId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AssociateServiceActionWithProvisioningArtifact' {Text
provisioningArtifactId :: Text
$sel:provisioningArtifactId:AssociateServiceActionWithProvisioningArtifact' :: AssociateServiceActionWithProvisioningArtifact -> Text
provisioningArtifactId} -> Text
provisioningArtifactId) (\s :: AssociateServiceActionWithProvisioningArtifact
s@AssociateServiceActionWithProvisioningArtifact' {} Text
a -> AssociateServiceActionWithProvisioningArtifact
s {$sel:provisioningArtifactId:AssociateServiceActionWithProvisioningArtifact' :: Text
provisioningArtifactId = Text
a} :: AssociateServiceActionWithProvisioningArtifact)

-- | The self-service action identifier. For example, @act-fs7abcd89wxyz@.
associateServiceActionWithProvisioningArtifact_serviceActionId :: Lens.Lens' AssociateServiceActionWithProvisioningArtifact Prelude.Text
associateServiceActionWithProvisioningArtifact_serviceActionId :: Lens' AssociateServiceActionWithProvisioningArtifact Text
associateServiceActionWithProvisioningArtifact_serviceActionId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AssociateServiceActionWithProvisioningArtifact' {Text
serviceActionId :: Text
$sel:serviceActionId:AssociateServiceActionWithProvisioningArtifact' :: AssociateServiceActionWithProvisioningArtifact -> Text
serviceActionId} -> Text
serviceActionId) (\s :: AssociateServiceActionWithProvisioningArtifact
s@AssociateServiceActionWithProvisioningArtifact' {} Text
a -> AssociateServiceActionWithProvisioningArtifact
s {$sel:serviceActionId:AssociateServiceActionWithProvisioningArtifact' :: Text
serviceActionId = Text
a} :: AssociateServiceActionWithProvisioningArtifact)

instance
  Core.AWSRequest
    AssociateServiceActionWithProvisioningArtifact
  where
  type
    AWSResponse
      AssociateServiceActionWithProvisioningArtifact =
      AssociateServiceActionWithProvisioningArtifactResponse
  request :: (Service -> Service)
-> AssociateServiceActionWithProvisioningArtifact
-> Request AssociateServiceActionWithProvisioningArtifact
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 AssociateServiceActionWithProvisioningArtifact
-> ClientResponse ClientBody
-> m (Either
        Error
        (ClientResponse
           (AWSResponse AssociateServiceActionWithProvisioningArtifact)))
response =
    forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> () -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveEmpty
      ( \Int
s ResponseHeaders
h ()
x ->
          Int -> AssociateServiceActionWithProvisioningArtifactResponse
AssociateServiceActionWithProvisioningArtifactResponse'
            forall (f :: * -> *) a b. Functor 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
    AssociateServiceActionWithProvisioningArtifact
  where
  hashWithSalt :: Int -> AssociateServiceActionWithProvisioningArtifact -> Int
hashWithSalt
    Int
_salt
    AssociateServiceActionWithProvisioningArtifact' {Maybe Text
Text
serviceActionId :: Text
provisioningArtifactId :: Text
productId :: Text
acceptLanguage :: Maybe Text
$sel:serviceActionId:AssociateServiceActionWithProvisioningArtifact' :: AssociateServiceActionWithProvisioningArtifact -> Text
$sel:provisioningArtifactId:AssociateServiceActionWithProvisioningArtifact' :: AssociateServiceActionWithProvisioningArtifact -> Text
$sel:productId:AssociateServiceActionWithProvisioningArtifact' :: AssociateServiceActionWithProvisioningArtifact -> Text
$sel:acceptLanguage:AssociateServiceActionWithProvisioningArtifact' :: AssociateServiceActionWithProvisioningArtifact -> Maybe Text
..} =
      Int
_salt
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
acceptLanguage
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
productId
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
provisioningArtifactId
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
serviceActionId

instance
  Prelude.NFData
    AssociateServiceActionWithProvisioningArtifact
  where
  rnf :: AssociateServiceActionWithProvisioningArtifact -> ()
rnf
    AssociateServiceActionWithProvisioningArtifact' {Maybe Text
Text
serviceActionId :: Text
provisioningArtifactId :: Text
productId :: Text
acceptLanguage :: Maybe Text
$sel:serviceActionId:AssociateServiceActionWithProvisioningArtifact' :: AssociateServiceActionWithProvisioningArtifact -> Text
$sel:provisioningArtifactId:AssociateServiceActionWithProvisioningArtifact' :: AssociateServiceActionWithProvisioningArtifact -> Text
$sel:productId:AssociateServiceActionWithProvisioningArtifact' :: AssociateServiceActionWithProvisioningArtifact -> Text
$sel:acceptLanguage:AssociateServiceActionWithProvisioningArtifact' :: AssociateServiceActionWithProvisioningArtifact -> Maybe Text
..} =
      forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
acceptLanguage
        seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
productId
        seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
provisioningArtifactId
        seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
serviceActionId

instance
  Data.ToHeaders
    AssociateServiceActionWithProvisioningArtifact
  where
  toHeaders :: AssociateServiceActionWithProvisioningArtifact -> 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
"AWS242ServiceCatalogService.AssociateServiceActionWithProvisioningArtifact" ::
                          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
    AssociateServiceActionWithProvisioningArtifact
  where
  toJSON :: AssociateServiceActionWithProvisioningArtifact -> Value
toJSON
    AssociateServiceActionWithProvisioningArtifact' {Maybe Text
Text
serviceActionId :: Text
provisioningArtifactId :: Text
productId :: Text
acceptLanguage :: Maybe Text
$sel:serviceActionId:AssociateServiceActionWithProvisioningArtifact' :: AssociateServiceActionWithProvisioningArtifact -> Text
$sel:provisioningArtifactId:AssociateServiceActionWithProvisioningArtifact' :: AssociateServiceActionWithProvisioningArtifact -> Text
$sel:productId:AssociateServiceActionWithProvisioningArtifact' :: AssociateServiceActionWithProvisioningArtifact -> Text
$sel:acceptLanguage:AssociateServiceActionWithProvisioningArtifact' :: AssociateServiceActionWithProvisioningArtifact -> Maybe Text
..} =
      [Pair] -> Value
Data.object
        ( forall a. [Maybe a] -> [a]
Prelude.catMaybes
            [ (Key
"AcceptLanguage" 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
acceptLanguage,
              forall a. a -> Maybe a
Prelude.Just (Key
"ProductId" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
productId),
              forall a. a -> Maybe a
Prelude.Just
                ( Key
"ProvisioningArtifactId"
                    forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
provisioningArtifactId
                ),
              forall a. a -> Maybe a
Prelude.Just
                (Key
"ServiceActionId" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
serviceActionId)
            ]
        )

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

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

-- | /See:/ 'newAssociateServiceActionWithProvisioningArtifactResponse' smart constructor.
data AssociateServiceActionWithProvisioningArtifactResponse = AssociateServiceActionWithProvisioningArtifactResponse'
  { -- | The response's http status code.
    AssociateServiceActionWithProvisioningArtifactResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (AssociateServiceActionWithProvisioningArtifactResponse
-> AssociateServiceActionWithProvisioningArtifactResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: AssociateServiceActionWithProvisioningArtifactResponse
-> AssociateServiceActionWithProvisioningArtifactResponse -> Bool
$c/= :: AssociateServiceActionWithProvisioningArtifactResponse
-> AssociateServiceActionWithProvisioningArtifactResponse -> Bool
== :: AssociateServiceActionWithProvisioningArtifactResponse
-> AssociateServiceActionWithProvisioningArtifactResponse -> Bool
$c== :: AssociateServiceActionWithProvisioningArtifactResponse
-> AssociateServiceActionWithProvisioningArtifactResponse -> Bool
Prelude.Eq, ReadPrec [AssociateServiceActionWithProvisioningArtifactResponse]
ReadPrec AssociateServiceActionWithProvisioningArtifactResponse
Int -> ReadS AssociateServiceActionWithProvisioningArtifactResponse
ReadS [AssociateServiceActionWithProvisioningArtifactResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [AssociateServiceActionWithProvisioningArtifactResponse]
$creadListPrec :: ReadPrec [AssociateServiceActionWithProvisioningArtifactResponse]
readPrec :: ReadPrec AssociateServiceActionWithProvisioningArtifactResponse
$creadPrec :: ReadPrec AssociateServiceActionWithProvisioningArtifactResponse
readList :: ReadS [AssociateServiceActionWithProvisioningArtifactResponse]
$creadList :: ReadS [AssociateServiceActionWithProvisioningArtifactResponse]
readsPrec :: Int -> ReadS AssociateServiceActionWithProvisioningArtifactResponse
$creadsPrec :: Int -> ReadS AssociateServiceActionWithProvisioningArtifactResponse
Prelude.Read, Int
-> AssociateServiceActionWithProvisioningArtifactResponse -> ShowS
[AssociateServiceActionWithProvisioningArtifactResponse] -> ShowS
AssociateServiceActionWithProvisioningArtifactResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [AssociateServiceActionWithProvisioningArtifactResponse] -> ShowS
$cshowList :: [AssociateServiceActionWithProvisioningArtifactResponse] -> ShowS
show :: AssociateServiceActionWithProvisioningArtifactResponse -> String
$cshow :: AssociateServiceActionWithProvisioningArtifactResponse -> String
showsPrec :: Int
-> AssociateServiceActionWithProvisioningArtifactResponse -> ShowS
$cshowsPrec :: Int
-> AssociateServiceActionWithProvisioningArtifactResponse -> ShowS
Prelude.Show, forall x.
Rep AssociateServiceActionWithProvisioningArtifactResponse x
-> AssociateServiceActionWithProvisioningArtifactResponse
forall x.
AssociateServiceActionWithProvisioningArtifactResponse
-> Rep AssociateServiceActionWithProvisioningArtifactResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep AssociateServiceActionWithProvisioningArtifactResponse x
-> AssociateServiceActionWithProvisioningArtifactResponse
$cfrom :: forall x.
AssociateServiceActionWithProvisioningArtifactResponse
-> Rep AssociateServiceActionWithProvisioningArtifactResponse x
Prelude.Generic)

-- |
-- Create a value of 'AssociateServiceActionWithProvisioningArtifactResponse' 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:
--
-- 'httpStatus', 'associateServiceActionWithProvisioningArtifactResponse_httpStatus' - The response's http status code.
newAssociateServiceActionWithProvisioningArtifactResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  AssociateServiceActionWithProvisioningArtifactResponse
newAssociateServiceActionWithProvisioningArtifactResponse :: Int -> AssociateServiceActionWithProvisioningArtifactResponse
newAssociateServiceActionWithProvisioningArtifactResponse
  Int
pHttpStatus_ =
    AssociateServiceActionWithProvisioningArtifactResponse'
      { $sel:httpStatus:AssociateServiceActionWithProvisioningArtifactResponse' :: Int
httpStatus =
          Int
pHttpStatus_
      }

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

instance
  Prelude.NFData
    AssociateServiceActionWithProvisioningArtifactResponse
  where
  rnf :: AssociateServiceActionWithProvisioningArtifactResponse -> ()
rnf
    AssociateServiceActionWithProvisioningArtifactResponse' {Int
httpStatus :: Int
$sel:httpStatus:AssociateServiceActionWithProvisioningArtifactResponse' :: AssociateServiceActionWithProvisioningArtifactResponse -> Int
..} =
      forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus