{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.ServiceCatalog.AssociateServiceActionWithProvisioningArtifact
(
AssociateServiceActionWithProvisioningArtifact (..),
newAssociateServiceActionWithProvisioningArtifact,
associateServiceActionWithProvisioningArtifact_acceptLanguage,
associateServiceActionWithProvisioningArtifact_productId,
associateServiceActionWithProvisioningArtifact_provisioningArtifactId,
associateServiceActionWithProvisioningArtifact_serviceActionId,
AssociateServiceActionWithProvisioningArtifactResponse (..),
newAssociateServiceActionWithProvisioningArtifactResponse,
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
data AssociateServiceActionWithProvisioningArtifact = AssociateServiceActionWithProvisioningArtifact'
{
AssociateServiceActionWithProvisioningArtifact -> Maybe Text
acceptLanguage :: Prelude.Maybe Prelude.Text,
AssociateServiceActionWithProvisioningArtifact -> Text
productId :: Prelude.Text,
AssociateServiceActionWithProvisioningArtifact -> Text
provisioningArtifactId :: Prelude.Text,
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)
newAssociateServiceActionWithProvisioningArtifact ::
Prelude.Text ->
Prelude.Text ->
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_
}
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)
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)
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)
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
data AssociateServiceActionWithProvisioningArtifactResponse = AssociateServiceActionWithProvisioningArtifactResponse'
{
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)
newAssociateServiceActionWithProvisioningArtifactResponse ::
Prelude.Int ->
AssociateServiceActionWithProvisioningArtifactResponse
newAssociateServiceActionWithProvisioningArtifactResponse :: Int -> AssociateServiceActionWithProvisioningArtifactResponse
newAssociateServiceActionWithProvisioningArtifactResponse
Int
pHttpStatus_ =
AssociateServiceActionWithProvisioningArtifactResponse'
{ $sel:httpStatus:AssociateServiceActionWithProvisioningArtifactResponse' :: Int
httpStatus =
Int
pHttpStatus_
}
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