{-# 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.ImportAsProvisionedProduct
(
ImportAsProvisionedProduct (..),
newImportAsProvisionedProduct,
importAsProvisionedProduct_acceptLanguage,
importAsProvisionedProduct_productId,
importAsProvisionedProduct_provisioningArtifactId,
importAsProvisionedProduct_provisionedProductName,
importAsProvisionedProduct_physicalId,
importAsProvisionedProduct_idempotencyToken,
ImportAsProvisionedProductResponse (..),
newImportAsProvisionedProductResponse,
importAsProvisionedProductResponse_recordDetail,
importAsProvisionedProductResponse_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 ImportAsProvisionedProduct = ImportAsProvisionedProduct'
{
ImportAsProvisionedProduct -> Maybe Text
acceptLanguage :: Prelude.Maybe Prelude.Text,
ImportAsProvisionedProduct -> Text
productId :: Prelude.Text,
ImportAsProvisionedProduct -> Text
provisioningArtifactId :: Prelude.Text,
ImportAsProvisionedProduct -> Text
provisionedProductName :: Prelude.Text,
ImportAsProvisionedProduct -> Text
physicalId :: Prelude.Text,
ImportAsProvisionedProduct -> Text
idempotencyToken :: Prelude.Text
}
deriving (ImportAsProvisionedProduct -> ImportAsProvisionedProduct -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ImportAsProvisionedProduct -> ImportAsProvisionedProduct -> Bool
$c/= :: ImportAsProvisionedProduct -> ImportAsProvisionedProduct -> Bool
== :: ImportAsProvisionedProduct -> ImportAsProvisionedProduct -> Bool
$c== :: ImportAsProvisionedProduct -> ImportAsProvisionedProduct -> Bool
Prelude.Eq, ReadPrec [ImportAsProvisionedProduct]
ReadPrec ImportAsProvisionedProduct
Int -> ReadS ImportAsProvisionedProduct
ReadS [ImportAsProvisionedProduct]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ImportAsProvisionedProduct]
$creadListPrec :: ReadPrec [ImportAsProvisionedProduct]
readPrec :: ReadPrec ImportAsProvisionedProduct
$creadPrec :: ReadPrec ImportAsProvisionedProduct
readList :: ReadS [ImportAsProvisionedProduct]
$creadList :: ReadS [ImportAsProvisionedProduct]
readsPrec :: Int -> ReadS ImportAsProvisionedProduct
$creadsPrec :: Int -> ReadS ImportAsProvisionedProduct
Prelude.Read, Int -> ImportAsProvisionedProduct -> ShowS
[ImportAsProvisionedProduct] -> ShowS
ImportAsProvisionedProduct -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ImportAsProvisionedProduct] -> ShowS
$cshowList :: [ImportAsProvisionedProduct] -> ShowS
show :: ImportAsProvisionedProduct -> String
$cshow :: ImportAsProvisionedProduct -> String
showsPrec :: Int -> ImportAsProvisionedProduct -> ShowS
$cshowsPrec :: Int -> ImportAsProvisionedProduct -> ShowS
Prelude.Show, forall x.
Rep ImportAsProvisionedProduct x -> ImportAsProvisionedProduct
forall x.
ImportAsProvisionedProduct -> Rep ImportAsProvisionedProduct x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ImportAsProvisionedProduct x -> ImportAsProvisionedProduct
$cfrom :: forall x.
ImportAsProvisionedProduct -> Rep ImportAsProvisionedProduct x
Prelude.Generic)
newImportAsProvisionedProduct ::
Prelude.Text ->
Prelude.Text ->
Prelude.Text ->
Prelude.Text ->
Prelude.Text ->
ImportAsProvisionedProduct
newImportAsProvisionedProduct :: Text -> Text -> Text -> Text -> Text -> ImportAsProvisionedProduct
newImportAsProvisionedProduct
Text
pProductId_
Text
pProvisioningArtifactId_
Text
pProvisionedProductName_
Text
pPhysicalId_
Text
pIdempotencyToken_ =
ImportAsProvisionedProduct'
{ $sel:acceptLanguage:ImportAsProvisionedProduct' :: Maybe Text
acceptLanguage =
forall a. Maybe a
Prelude.Nothing,
$sel:productId:ImportAsProvisionedProduct' :: Text
productId = Text
pProductId_,
$sel:provisioningArtifactId:ImportAsProvisionedProduct' :: Text
provisioningArtifactId =
Text
pProvisioningArtifactId_,
$sel:provisionedProductName:ImportAsProvisionedProduct' :: Text
provisionedProductName =
Text
pProvisionedProductName_,
$sel:physicalId:ImportAsProvisionedProduct' :: Text
physicalId = Text
pPhysicalId_,
$sel:idempotencyToken:ImportAsProvisionedProduct' :: Text
idempotencyToken = Text
pIdempotencyToken_
}
importAsProvisionedProduct_acceptLanguage :: Lens.Lens' ImportAsProvisionedProduct (Prelude.Maybe Prelude.Text)
importAsProvisionedProduct_acceptLanguage :: Lens' ImportAsProvisionedProduct (Maybe Text)
importAsProvisionedProduct_acceptLanguage = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImportAsProvisionedProduct' {Maybe Text
acceptLanguage :: Maybe Text
$sel:acceptLanguage:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Maybe Text
acceptLanguage} -> Maybe Text
acceptLanguage) (\s :: ImportAsProvisionedProduct
s@ImportAsProvisionedProduct' {} Maybe Text
a -> ImportAsProvisionedProduct
s {$sel:acceptLanguage:ImportAsProvisionedProduct' :: Maybe Text
acceptLanguage = Maybe Text
a} :: ImportAsProvisionedProduct)
importAsProvisionedProduct_productId :: Lens.Lens' ImportAsProvisionedProduct Prelude.Text
importAsProvisionedProduct_productId :: Lens' ImportAsProvisionedProduct Text
importAsProvisionedProduct_productId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImportAsProvisionedProduct' {Text
productId :: Text
$sel:productId:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
productId} -> Text
productId) (\s :: ImportAsProvisionedProduct
s@ImportAsProvisionedProduct' {} Text
a -> ImportAsProvisionedProduct
s {$sel:productId:ImportAsProvisionedProduct' :: Text
productId = Text
a} :: ImportAsProvisionedProduct)
importAsProvisionedProduct_provisioningArtifactId :: Lens.Lens' ImportAsProvisionedProduct Prelude.Text
importAsProvisionedProduct_provisioningArtifactId :: Lens' ImportAsProvisionedProduct Text
importAsProvisionedProduct_provisioningArtifactId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImportAsProvisionedProduct' {Text
provisioningArtifactId :: Text
$sel:provisioningArtifactId:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
provisioningArtifactId} -> Text
provisioningArtifactId) (\s :: ImportAsProvisionedProduct
s@ImportAsProvisionedProduct' {} Text
a -> ImportAsProvisionedProduct
s {$sel:provisioningArtifactId:ImportAsProvisionedProduct' :: Text
provisioningArtifactId = Text
a} :: ImportAsProvisionedProduct)
importAsProvisionedProduct_provisionedProductName :: Lens.Lens' ImportAsProvisionedProduct Prelude.Text
importAsProvisionedProduct_provisionedProductName :: Lens' ImportAsProvisionedProduct Text
importAsProvisionedProduct_provisionedProductName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImportAsProvisionedProduct' {Text
provisionedProductName :: Text
$sel:provisionedProductName:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
provisionedProductName} -> Text
provisionedProductName) (\s :: ImportAsProvisionedProduct
s@ImportAsProvisionedProduct' {} Text
a -> ImportAsProvisionedProduct
s {$sel:provisionedProductName:ImportAsProvisionedProduct' :: Text
provisionedProductName = Text
a} :: ImportAsProvisionedProduct)
importAsProvisionedProduct_physicalId :: Lens.Lens' ImportAsProvisionedProduct Prelude.Text
importAsProvisionedProduct_physicalId :: Lens' ImportAsProvisionedProduct Text
importAsProvisionedProduct_physicalId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImportAsProvisionedProduct' {Text
physicalId :: Text
$sel:physicalId:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
physicalId} -> Text
physicalId) (\s :: ImportAsProvisionedProduct
s@ImportAsProvisionedProduct' {} Text
a -> ImportAsProvisionedProduct
s {$sel:physicalId:ImportAsProvisionedProduct' :: Text
physicalId = Text
a} :: ImportAsProvisionedProduct)
importAsProvisionedProduct_idempotencyToken :: Lens.Lens' ImportAsProvisionedProduct Prelude.Text
importAsProvisionedProduct_idempotencyToken :: Lens' ImportAsProvisionedProduct Text
importAsProvisionedProduct_idempotencyToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImportAsProvisionedProduct' {Text
idempotencyToken :: Text
$sel:idempotencyToken:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
idempotencyToken} -> Text
idempotencyToken) (\s :: ImportAsProvisionedProduct
s@ImportAsProvisionedProduct' {} Text
a -> ImportAsProvisionedProduct
s {$sel:idempotencyToken:ImportAsProvisionedProduct' :: Text
idempotencyToken = Text
a} :: ImportAsProvisionedProduct)
instance Core.AWSRequest ImportAsProvisionedProduct where
type
AWSResponse ImportAsProvisionedProduct =
ImportAsProvisionedProductResponse
request :: (Service -> Service)
-> ImportAsProvisionedProduct -> Request ImportAsProvisionedProduct
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 ImportAsProvisionedProduct
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse ImportAsProvisionedProduct)))
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 RecordDetail -> Int -> ImportAsProvisionedProductResponse
ImportAsProvisionedProductResponse'
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
"RecordDetail")
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 ImportAsProvisionedProduct where
hashWithSalt :: Int -> ImportAsProvisionedProduct -> Int
hashWithSalt Int
_salt ImportAsProvisionedProduct' {Maybe Text
Text
idempotencyToken :: Text
physicalId :: Text
provisionedProductName :: Text
provisioningArtifactId :: Text
productId :: Text
acceptLanguage :: Maybe Text
$sel:idempotencyToken:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
$sel:physicalId:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
$sel:provisionedProductName:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
$sel:provisioningArtifactId:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
$sel:productId:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
$sel:acceptLanguage:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> 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
provisionedProductName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
physicalId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
idempotencyToken
instance Prelude.NFData ImportAsProvisionedProduct where
rnf :: ImportAsProvisionedProduct -> ()
rnf ImportAsProvisionedProduct' {Maybe Text
Text
idempotencyToken :: Text
physicalId :: Text
provisionedProductName :: Text
provisioningArtifactId :: Text
productId :: Text
acceptLanguage :: Maybe Text
$sel:idempotencyToken:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
$sel:physicalId:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
$sel:provisionedProductName:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
$sel:provisioningArtifactId:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
$sel:productId:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
$sel:acceptLanguage:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> 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
provisionedProductName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
physicalId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
idempotencyToken
instance Data.ToHeaders ImportAsProvisionedProduct where
toHeaders :: ImportAsProvisionedProduct -> 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.ImportAsProvisionedProduct" ::
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 ImportAsProvisionedProduct where
toJSON :: ImportAsProvisionedProduct -> Value
toJSON ImportAsProvisionedProduct' {Maybe Text
Text
idempotencyToken :: Text
physicalId :: Text
provisionedProductName :: Text
provisioningArtifactId :: Text
productId :: Text
acceptLanguage :: Maybe Text
$sel:idempotencyToken:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
$sel:physicalId:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
$sel:provisionedProductName:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
$sel:provisioningArtifactId:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
$sel:productId:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> Text
$sel:acceptLanguage:ImportAsProvisionedProduct' :: ImportAsProvisionedProduct -> 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
"ProvisionedProductName"
forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
provisionedProductName
),
forall a. a -> Maybe a
Prelude.Just (Key
"PhysicalId" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
physicalId),
forall a. a -> Maybe a
Prelude.Just
(Key
"IdempotencyToken" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
idempotencyToken)
]
)
instance Data.ToPath ImportAsProvisionedProduct where
toPath :: ImportAsProvisionedProduct -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery ImportAsProvisionedProduct where
toQuery :: ImportAsProvisionedProduct -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data ImportAsProvisionedProductResponse = ImportAsProvisionedProductResponse'
{ ImportAsProvisionedProductResponse -> Maybe RecordDetail
recordDetail :: Prelude.Maybe RecordDetail,
ImportAsProvisionedProductResponse -> Int
httpStatus :: Prelude.Int
}
deriving (ImportAsProvisionedProductResponse
-> ImportAsProvisionedProductResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ImportAsProvisionedProductResponse
-> ImportAsProvisionedProductResponse -> Bool
$c/= :: ImportAsProvisionedProductResponse
-> ImportAsProvisionedProductResponse -> Bool
== :: ImportAsProvisionedProductResponse
-> ImportAsProvisionedProductResponse -> Bool
$c== :: ImportAsProvisionedProductResponse
-> ImportAsProvisionedProductResponse -> Bool
Prelude.Eq, ReadPrec [ImportAsProvisionedProductResponse]
ReadPrec ImportAsProvisionedProductResponse
Int -> ReadS ImportAsProvisionedProductResponse
ReadS [ImportAsProvisionedProductResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ImportAsProvisionedProductResponse]
$creadListPrec :: ReadPrec [ImportAsProvisionedProductResponse]
readPrec :: ReadPrec ImportAsProvisionedProductResponse
$creadPrec :: ReadPrec ImportAsProvisionedProductResponse
readList :: ReadS [ImportAsProvisionedProductResponse]
$creadList :: ReadS [ImportAsProvisionedProductResponse]
readsPrec :: Int -> ReadS ImportAsProvisionedProductResponse
$creadsPrec :: Int -> ReadS ImportAsProvisionedProductResponse
Prelude.Read, Int -> ImportAsProvisionedProductResponse -> ShowS
[ImportAsProvisionedProductResponse] -> ShowS
ImportAsProvisionedProductResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ImportAsProvisionedProductResponse] -> ShowS
$cshowList :: [ImportAsProvisionedProductResponse] -> ShowS
show :: ImportAsProvisionedProductResponse -> String
$cshow :: ImportAsProvisionedProductResponse -> String
showsPrec :: Int -> ImportAsProvisionedProductResponse -> ShowS
$cshowsPrec :: Int -> ImportAsProvisionedProductResponse -> ShowS
Prelude.Show, forall x.
Rep ImportAsProvisionedProductResponse x
-> ImportAsProvisionedProductResponse
forall x.
ImportAsProvisionedProductResponse
-> Rep ImportAsProvisionedProductResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ImportAsProvisionedProductResponse x
-> ImportAsProvisionedProductResponse
$cfrom :: forall x.
ImportAsProvisionedProductResponse
-> Rep ImportAsProvisionedProductResponse x
Prelude.Generic)
newImportAsProvisionedProductResponse ::
Prelude.Int ->
ImportAsProvisionedProductResponse
newImportAsProvisionedProductResponse :: Int -> ImportAsProvisionedProductResponse
newImportAsProvisionedProductResponse Int
pHttpStatus_ =
ImportAsProvisionedProductResponse'
{ $sel:recordDetail:ImportAsProvisionedProductResponse' :: Maybe RecordDetail
recordDetail =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ImportAsProvisionedProductResponse' :: Int
httpStatus = Int
pHttpStatus_
}
importAsProvisionedProductResponse_recordDetail :: Lens.Lens' ImportAsProvisionedProductResponse (Prelude.Maybe RecordDetail)
importAsProvisionedProductResponse_recordDetail :: Lens' ImportAsProvisionedProductResponse (Maybe RecordDetail)
importAsProvisionedProductResponse_recordDetail = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImportAsProvisionedProductResponse' {Maybe RecordDetail
recordDetail :: Maybe RecordDetail
$sel:recordDetail:ImportAsProvisionedProductResponse' :: ImportAsProvisionedProductResponse -> Maybe RecordDetail
recordDetail} -> Maybe RecordDetail
recordDetail) (\s :: ImportAsProvisionedProductResponse
s@ImportAsProvisionedProductResponse' {} Maybe RecordDetail
a -> ImportAsProvisionedProductResponse
s {$sel:recordDetail:ImportAsProvisionedProductResponse' :: Maybe RecordDetail
recordDetail = Maybe RecordDetail
a} :: ImportAsProvisionedProductResponse)
importAsProvisionedProductResponse_httpStatus :: Lens.Lens' ImportAsProvisionedProductResponse Prelude.Int
importAsProvisionedProductResponse_httpStatus :: Lens' ImportAsProvisionedProductResponse Int
importAsProvisionedProductResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImportAsProvisionedProductResponse' {Int
httpStatus :: Int
$sel:httpStatus:ImportAsProvisionedProductResponse' :: ImportAsProvisionedProductResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ImportAsProvisionedProductResponse
s@ImportAsProvisionedProductResponse' {} Int
a -> ImportAsProvisionedProductResponse
s {$sel:httpStatus:ImportAsProvisionedProductResponse' :: Int
httpStatus = Int
a} :: ImportAsProvisionedProductResponse)
instance
Prelude.NFData
ImportAsProvisionedProductResponse
where
rnf :: ImportAsProvisionedProductResponse -> ()
rnf ImportAsProvisionedProductResponse' {Int
Maybe RecordDetail
httpStatus :: Int
recordDetail :: Maybe RecordDetail
$sel:httpStatus:ImportAsProvisionedProductResponse' :: ImportAsProvisionedProductResponse -> Int
$sel:recordDetail:ImportAsProvisionedProductResponse' :: ImportAsProvisionedProductResponse -> Maybe RecordDetail
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe RecordDetail
recordDetail
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus