{-# 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.Personalize.CreateDatasetExportJob
(
CreateDatasetExportJob (..),
newCreateDatasetExportJob,
createDatasetExportJob_ingestionMode,
createDatasetExportJob_tags,
createDatasetExportJob_jobName,
createDatasetExportJob_datasetArn,
createDatasetExportJob_roleArn,
createDatasetExportJob_jobOutput,
CreateDatasetExportJobResponse (..),
newCreateDatasetExportJobResponse,
createDatasetExportJobResponse_datasetExportJobArn,
createDatasetExportJobResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.Personalize.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data CreateDatasetExportJob = CreateDatasetExportJob'
{
CreateDatasetExportJob -> Maybe IngestionMode
ingestionMode :: Prelude.Maybe IngestionMode,
CreateDatasetExportJob -> Maybe [Tag]
tags :: Prelude.Maybe [Tag],
CreateDatasetExportJob -> Text
jobName :: Prelude.Text,
CreateDatasetExportJob -> Text
datasetArn :: Prelude.Text,
CreateDatasetExportJob -> Text
roleArn :: Prelude.Text,
CreateDatasetExportJob -> DatasetExportJobOutput
jobOutput :: DatasetExportJobOutput
}
deriving (CreateDatasetExportJob -> CreateDatasetExportJob -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateDatasetExportJob -> CreateDatasetExportJob -> Bool
$c/= :: CreateDatasetExportJob -> CreateDatasetExportJob -> Bool
== :: CreateDatasetExportJob -> CreateDatasetExportJob -> Bool
$c== :: CreateDatasetExportJob -> CreateDatasetExportJob -> Bool
Prelude.Eq, ReadPrec [CreateDatasetExportJob]
ReadPrec CreateDatasetExportJob
Int -> ReadS CreateDatasetExportJob
ReadS [CreateDatasetExportJob]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateDatasetExportJob]
$creadListPrec :: ReadPrec [CreateDatasetExportJob]
readPrec :: ReadPrec CreateDatasetExportJob
$creadPrec :: ReadPrec CreateDatasetExportJob
readList :: ReadS [CreateDatasetExportJob]
$creadList :: ReadS [CreateDatasetExportJob]
readsPrec :: Int -> ReadS CreateDatasetExportJob
$creadsPrec :: Int -> ReadS CreateDatasetExportJob
Prelude.Read, Int -> CreateDatasetExportJob -> ShowS
[CreateDatasetExportJob] -> ShowS
CreateDatasetExportJob -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateDatasetExportJob] -> ShowS
$cshowList :: [CreateDatasetExportJob] -> ShowS
show :: CreateDatasetExportJob -> String
$cshow :: CreateDatasetExportJob -> String
showsPrec :: Int -> CreateDatasetExportJob -> ShowS
$cshowsPrec :: Int -> CreateDatasetExportJob -> ShowS
Prelude.Show, forall x. Rep CreateDatasetExportJob x -> CreateDatasetExportJob
forall x. CreateDatasetExportJob -> Rep CreateDatasetExportJob x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep CreateDatasetExportJob x -> CreateDatasetExportJob
$cfrom :: forall x. CreateDatasetExportJob -> Rep CreateDatasetExportJob x
Prelude.Generic)
newCreateDatasetExportJob ::
Prelude.Text ->
Prelude.Text ->
Prelude.Text ->
DatasetExportJobOutput ->
CreateDatasetExportJob
newCreateDatasetExportJob :: Text
-> Text -> Text -> DatasetExportJobOutput -> CreateDatasetExportJob
newCreateDatasetExportJob
Text
pJobName_
Text
pDatasetArn_
Text
pRoleArn_
DatasetExportJobOutput
pJobOutput_ =
CreateDatasetExportJob'
{ $sel:ingestionMode:CreateDatasetExportJob' :: Maybe IngestionMode
ingestionMode =
forall a. Maybe a
Prelude.Nothing,
$sel:tags:CreateDatasetExportJob' :: Maybe [Tag]
tags = forall a. Maybe a
Prelude.Nothing,
$sel:jobName:CreateDatasetExportJob' :: Text
jobName = Text
pJobName_,
$sel:datasetArn:CreateDatasetExportJob' :: Text
datasetArn = Text
pDatasetArn_,
$sel:roleArn:CreateDatasetExportJob' :: Text
roleArn = Text
pRoleArn_,
$sel:jobOutput:CreateDatasetExportJob' :: DatasetExportJobOutput
jobOutput = DatasetExportJobOutput
pJobOutput_
}
createDatasetExportJob_ingestionMode :: Lens.Lens' CreateDatasetExportJob (Prelude.Maybe IngestionMode)
createDatasetExportJob_ingestionMode :: Lens' CreateDatasetExportJob (Maybe IngestionMode)
createDatasetExportJob_ingestionMode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDatasetExportJob' {Maybe IngestionMode
ingestionMode :: Maybe IngestionMode
$sel:ingestionMode:CreateDatasetExportJob' :: CreateDatasetExportJob -> Maybe IngestionMode
ingestionMode} -> Maybe IngestionMode
ingestionMode) (\s :: CreateDatasetExportJob
s@CreateDatasetExportJob' {} Maybe IngestionMode
a -> CreateDatasetExportJob
s {$sel:ingestionMode:CreateDatasetExportJob' :: Maybe IngestionMode
ingestionMode = Maybe IngestionMode
a} :: CreateDatasetExportJob)
createDatasetExportJob_tags :: Lens.Lens' CreateDatasetExportJob (Prelude.Maybe [Tag])
createDatasetExportJob_tags :: Lens' CreateDatasetExportJob (Maybe [Tag])
createDatasetExportJob_tags = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDatasetExportJob' {Maybe [Tag]
tags :: Maybe [Tag]
$sel:tags:CreateDatasetExportJob' :: CreateDatasetExportJob -> Maybe [Tag]
tags} -> Maybe [Tag]
tags) (\s :: CreateDatasetExportJob
s@CreateDatasetExportJob' {} Maybe [Tag]
a -> CreateDatasetExportJob
s {$sel:tags:CreateDatasetExportJob' :: Maybe [Tag]
tags = Maybe [Tag]
a} :: CreateDatasetExportJob) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
createDatasetExportJob_jobName :: Lens.Lens' CreateDatasetExportJob Prelude.Text
createDatasetExportJob_jobName :: Lens' CreateDatasetExportJob Text
createDatasetExportJob_jobName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDatasetExportJob' {Text
jobName :: Text
$sel:jobName:CreateDatasetExportJob' :: CreateDatasetExportJob -> Text
jobName} -> Text
jobName) (\s :: CreateDatasetExportJob
s@CreateDatasetExportJob' {} Text
a -> CreateDatasetExportJob
s {$sel:jobName:CreateDatasetExportJob' :: Text
jobName = Text
a} :: CreateDatasetExportJob)
createDatasetExportJob_datasetArn :: Lens.Lens' CreateDatasetExportJob Prelude.Text
createDatasetExportJob_datasetArn :: Lens' CreateDatasetExportJob Text
createDatasetExportJob_datasetArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDatasetExportJob' {Text
datasetArn :: Text
$sel:datasetArn:CreateDatasetExportJob' :: CreateDatasetExportJob -> Text
datasetArn} -> Text
datasetArn) (\s :: CreateDatasetExportJob
s@CreateDatasetExportJob' {} Text
a -> CreateDatasetExportJob
s {$sel:datasetArn:CreateDatasetExportJob' :: Text
datasetArn = Text
a} :: CreateDatasetExportJob)
createDatasetExportJob_roleArn :: Lens.Lens' CreateDatasetExportJob Prelude.Text
createDatasetExportJob_roleArn :: Lens' CreateDatasetExportJob Text
createDatasetExportJob_roleArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDatasetExportJob' {Text
roleArn :: Text
$sel:roleArn:CreateDatasetExportJob' :: CreateDatasetExportJob -> Text
roleArn} -> Text
roleArn) (\s :: CreateDatasetExportJob
s@CreateDatasetExportJob' {} Text
a -> CreateDatasetExportJob
s {$sel:roleArn:CreateDatasetExportJob' :: Text
roleArn = Text
a} :: CreateDatasetExportJob)
createDatasetExportJob_jobOutput :: Lens.Lens' CreateDatasetExportJob DatasetExportJobOutput
createDatasetExportJob_jobOutput :: Lens' CreateDatasetExportJob DatasetExportJobOutput
createDatasetExportJob_jobOutput = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDatasetExportJob' {DatasetExportJobOutput
jobOutput :: DatasetExportJobOutput
$sel:jobOutput:CreateDatasetExportJob' :: CreateDatasetExportJob -> DatasetExportJobOutput
jobOutput} -> DatasetExportJobOutput
jobOutput) (\s :: CreateDatasetExportJob
s@CreateDatasetExportJob' {} DatasetExportJobOutput
a -> CreateDatasetExportJob
s {$sel:jobOutput:CreateDatasetExportJob' :: DatasetExportJobOutput
jobOutput = DatasetExportJobOutput
a} :: CreateDatasetExportJob)
instance Core.AWSRequest CreateDatasetExportJob where
type
AWSResponse CreateDatasetExportJob =
CreateDatasetExportJobResponse
request :: (Service -> Service)
-> CreateDatasetExportJob -> Request CreateDatasetExportJob
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 CreateDatasetExportJob
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse CreateDatasetExportJob)))
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 -> Int -> CreateDatasetExportJobResponse
CreateDatasetExportJobResponse'
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
"datasetExportJobArn")
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 CreateDatasetExportJob where
hashWithSalt :: Int -> CreateDatasetExportJob -> Int
hashWithSalt Int
_salt CreateDatasetExportJob' {Maybe [Tag]
Maybe IngestionMode
Text
DatasetExportJobOutput
jobOutput :: DatasetExportJobOutput
roleArn :: Text
datasetArn :: Text
jobName :: Text
tags :: Maybe [Tag]
ingestionMode :: Maybe IngestionMode
$sel:jobOutput:CreateDatasetExportJob' :: CreateDatasetExportJob -> DatasetExportJobOutput
$sel:roleArn:CreateDatasetExportJob' :: CreateDatasetExportJob -> Text
$sel:datasetArn:CreateDatasetExportJob' :: CreateDatasetExportJob -> Text
$sel:jobName:CreateDatasetExportJob' :: CreateDatasetExportJob -> Text
$sel:tags:CreateDatasetExportJob' :: CreateDatasetExportJob -> Maybe [Tag]
$sel:ingestionMode:CreateDatasetExportJob' :: CreateDatasetExportJob -> Maybe IngestionMode
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe IngestionMode
ingestionMode
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Tag]
tags
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
jobName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
datasetArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
roleArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` DatasetExportJobOutput
jobOutput
instance Prelude.NFData CreateDatasetExportJob where
rnf :: CreateDatasetExportJob -> ()
rnf CreateDatasetExportJob' {Maybe [Tag]
Maybe IngestionMode
Text
DatasetExportJobOutput
jobOutput :: DatasetExportJobOutput
roleArn :: Text
datasetArn :: Text
jobName :: Text
tags :: Maybe [Tag]
ingestionMode :: Maybe IngestionMode
$sel:jobOutput:CreateDatasetExportJob' :: CreateDatasetExportJob -> DatasetExportJobOutput
$sel:roleArn:CreateDatasetExportJob' :: CreateDatasetExportJob -> Text
$sel:datasetArn:CreateDatasetExportJob' :: CreateDatasetExportJob -> Text
$sel:jobName:CreateDatasetExportJob' :: CreateDatasetExportJob -> Text
$sel:tags:CreateDatasetExportJob' :: CreateDatasetExportJob -> Maybe [Tag]
$sel:ingestionMode:CreateDatasetExportJob' :: CreateDatasetExportJob -> Maybe IngestionMode
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe IngestionMode
ingestionMode
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Tag]
tags
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
jobName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
datasetArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
roleArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf DatasetExportJobOutput
jobOutput
instance Data.ToHeaders CreateDatasetExportJob where
toHeaders :: CreateDatasetExportJob -> 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
"AmazonPersonalize.CreateDatasetExportJob" ::
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 CreateDatasetExportJob where
toJSON :: CreateDatasetExportJob -> Value
toJSON CreateDatasetExportJob' {Maybe [Tag]
Maybe IngestionMode
Text
DatasetExportJobOutput
jobOutput :: DatasetExportJobOutput
roleArn :: Text
datasetArn :: Text
jobName :: Text
tags :: Maybe [Tag]
ingestionMode :: Maybe IngestionMode
$sel:jobOutput:CreateDatasetExportJob' :: CreateDatasetExportJob -> DatasetExportJobOutput
$sel:roleArn:CreateDatasetExportJob' :: CreateDatasetExportJob -> Text
$sel:datasetArn:CreateDatasetExportJob' :: CreateDatasetExportJob -> Text
$sel:jobName:CreateDatasetExportJob' :: CreateDatasetExportJob -> Text
$sel:tags:CreateDatasetExportJob' :: CreateDatasetExportJob -> Maybe [Tag]
$sel:ingestionMode:CreateDatasetExportJob' :: CreateDatasetExportJob -> Maybe IngestionMode
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"ingestionMode" 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 IngestionMode
ingestionMode,
(Key
"tags" 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 [Tag]
tags,
forall a. a -> Maybe a
Prelude.Just (Key
"jobName" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
jobName),
forall a. a -> Maybe a
Prelude.Just (Key
"datasetArn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
datasetArn),
forall a. a -> Maybe a
Prelude.Just (Key
"roleArn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
roleArn),
forall a. a -> Maybe a
Prelude.Just (Key
"jobOutput" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= DatasetExportJobOutput
jobOutput)
]
)
instance Data.ToPath CreateDatasetExportJob where
toPath :: CreateDatasetExportJob -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery CreateDatasetExportJob where
toQuery :: CreateDatasetExportJob -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data CreateDatasetExportJobResponse = CreateDatasetExportJobResponse'
{
CreateDatasetExportJobResponse -> Maybe Text
datasetExportJobArn :: Prelude.Maybe Prelude.Text,
CreateDatasetExportJobResponse -> Int
httpStatus :: Prelude.Int
}
deriving (CreateDatasetExportJobResponse
-> CreateDatasetExportJobResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateDatasetExportJobResponse
-> CreateDatasetExportJobResponse -> Bool
$c/= :: CreateDatasetExportJobResponse
-> CreateDatasetExportJobResponse -> Bool
== :: CreateDatasetExportJobResponse
-> CreateDatasetExportJobResponse -> Bool
$c== :: CreateDatasetExportJobResponse
-> CreateDatasetExportJobResponse -> Bool
Prelude.Eq, ReadPrec [CreateDatasetExportJobResponse]
ReadPrec CreateDatasetExportJobResponse
Int -> ReadS CreateDatasetExportJobResponse
ReadS [CreateDatasetExportJobResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateDatasetExportJobResponse]
$creadListPrec :: ReadPrec [CreateDatasetExportJobResponse]
readPrec :: ReadPrec CreateDatasetExportJobResponse
$creadPrec :: ReadPrec CreateDatasetExportJobResponse
readList :: ReadS [CreateDatasetExportJobResponse]
$creadList :: ReadS [CreateDatasetExportJobResponse]
readsPrec :: Int -> ReadS CreateDatasetExportJobResponse
$creadsPrec :: Int -> ReadS CreateDatasetExportJobResponse
Prelude.Read, Int -> CreateDatasetExportJobResponse -> ShowS
[CreateDatasetExportJobResponse] -> ShowS
CreateDatasetExportJobResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateDatasetExportJobResponse] -> ShowS
$cshowList :: [CreateDatasetExportJobResponse] -> ShowS
show :: CreateDatasetExportJobResponse -> String
$cshow :: CreateDatasetExportJobResponse -> String
showsPrec :: Int -> CreateDatasetExportJobResponse -> ShowS
$cshowsPrec :: Int -> CreateDatasetExportJobResponse -> ShowS
Prelude.Show, forall x.
Rep CreateDatasetExportJobResponse x
-> CreateDatasetExportJobResponse
forall x.
CreateDatasetExportJobResponse
-> Rep CreateDatasetExportJobResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep CreateDatasetExportJobResponse x
-> CreateDatasetExportJobResponse
$cfrom :: forall x.
CreateDatasetExportJobResponse
-> Rep CreateDatasetExportJobResponse x
Prelude.Generic)
newCreateDatasetExportJobResponse ::
Prelude.Int ->
CreateDatasetExportJobResponse
newCreateDatasetExportJobResponse :: Int -> CreateDatasetExportJobResponse
newCreateDatasetExportJobResponse Int
pHttpStatus_ =
CreateDatasetExportJobResponse'
{ $sel:datasetExportJobArn:CreateDatasetExportJobResponse' :: Maybe Text
datasetExportJobArn =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:CreateDatasetExportJobResponse' :: Int
httpStatus = Int
pHttpStatus_
}
createDatasetExportJobResponse_datasetExportJobArn :: Lens.Lens' CreateDatasetExportJobResponse (Prelude.Maybe Prelude.Text)
createDatasetExportJobResponse_datasetExportJobArn :: Lens' CreateDatasetExportJobResponse (Maybe Text)
createDatasetExportJobResponse_datasetExportJobArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDatasetExportJobResponse' {Maybe Text
datasetExportJobArn :: Maybe Text
$sel:datasetExportJobArn:CreateDatasetExportJobResponse' :: CreateDatasetExportJobResponse -> Maybe Text
datasetExportJobArn} -> Maybe Text
datasetExportJobArn) (\s :: CreateDatasetExportJobResponse
s@CreateDatasetExportJobResponse' {} Maybe Text
a -> CreateDatasetExportJobResponse
s {$sel:datasetExportJobArn:CreateDatasetExportJobResponse' :: Maybe Text
datasetExportJobArn = Maybe Text
a} :: CreateDatasetExportJobResponse)
createDatasetExportJobResponse_httpStatus :: Lens.Lens' CreateDatasetExportJobResponse Prelude.Int
createDatasetExportJobResponse_httpStatus :: Lens' CreateDatasetExportJobResponse Int
createDatasetExportJobResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDatasetExportJobResponse' {Int
httpStatus :: Int
$sel:httpStatus:CreateDatasetExportJobResponse' :: CreateDatasetExportJobResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: CreateDatasetExportJobResponse
s@CreateDatasetExportJobResponse' {} Int
a -> CreateDatasetExportJobResponse
s {$sel:httpStatus:CreateDatasetExportJobResponse' :: Int
httpStatus = Int
a} :: CreateDatasetExportJobResponse)
instance
Prelude.NFData
CreateDatasetExportJobResponse
where
rnf :: CreateDatasetExportJobResponse -> ()
rnf CreateDatasetExportJobResponse' {Int
Maybe Text
httpStatus :: Int
datasetExportJobArn :: Maybe Text
$sel:httpStatus:CreateDatasetExportJobResponse' :: CreateDatasetExportJobResponse -> Int
$sel:datasetExportJobArn:CreateDatasetExportJobResponse' :: CreateDatasetExportJobResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
datasetExportJobArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus