{-# 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.Personalize.CreateDatasetImportJob
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Creates a job that imports training data from your data source (an
-- Amazon S3 bucket) to an Amazon Personalize dataset. To allow Amazon
-- Personalize to import the training data, you must specify an IAM service
-- role that has permission to read from the data source, as Amazon
-- Personalize makes a copy of your data and processes it internally. For
-- information on granting access to your Amazon S3 bucket, see
-- <https://docs.aws.amazon.com/personalize/latest/dg/granting-personalize-s3-access.html Giving Amazon Personalize Access to Amazon S3 Resources>.
--
-- By default, a dataset import job replaces any existing data in the
-- dataset that you imported in bulk. To add new records without replacing
-- existing data, specify INCREMENTAL for the import mode in the
-- CreateDatasetImportJob operation.
--
-- __Status__
--
-- A dataset import job can be in one of the following states:
--
-- -   CREATE PENDING > CREATE IN_PROGRESS > ACTIVE -or- CREATE FAILED
--
-- To get the status of the import job, call
-- <https://docs.aws.amazon.com/personalize/latest/dg/API_DescribeDatasetImportJob.html DescribeDatasetImportJob>,
-- providing the Amazon Resource Name (ARN) of the dataset import job. The
-- dataset import is complete when the status shows as ACTIVE. If the
-- status shows as CREATE FAILED, the response includes a @failureReason@
-- key, which describes why the job failed.
--
-- Importing takes time. You must wait until the status shows as ACTIVE
-- before training a model using the dataset.
--
-- __Related APIs__
--
-- -   <https://docs.aws.amazon.com/personalize/latest/dg/API_ListDatasetImportJobs.html ListDatasetImportJobs>
--
-- -   <https://docs.aws.amazon.com/personalize/latest/dg/API_DescribeDatasetImportJob.html DescribeDatasetImportJob>
module Amazonka.Personalize.CreateDatasetImportJob
  ( -- * Creating a Request
    CreateDatasetImportJob (..),
    newCreateDatasetImportJob,

    -- * Request Lenses
    createDatasetImportJob_importMode,
    createDatasetImportJob_publishAttributionMetricsToS3,
    createDatasetImportJob_tags,
    createDatasetImportJob_jobName,
    createDatasetImportJob_datasetArn,
    createDatasetImportJob_dataSource,
    createDatasetImportJob_roleArn,

    -- * Destructuring the Response
    CreateDatasetImportJobResponse (..),
    newCreateDatasetImportJobResponse,

    -- * Response Lenses
    createDatasetImportJobResponse_datasetImportJobArn,
    createDatasetImportJobResponse_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

-- | /See:/ 'newCreateDatasetImportJob' smart constructor.
data CreateDatasetImportJob = CreateDatasetImportJob'
  { -- | Specify how to add the new records to an existing dataset. The default
    -- import mode is @FULL@. If you haven\'t imported bulk records into the
    -- dataset previously, you can only specify @FULL@.
    --
    -- -   Specify @FULL@ to overwrite all existing bulk data in your dataset.
    --     Data you imported individually is not replaced.
    --
    -- -   Specify @INCREMENTAL@ to append the new records to the existing data
    --     in your dataset. Amazon Personalize replaces any record with the
    --     same ID with the new one.
    CreateDatasetImportJob -> Maybe ImportMode
importMode :: Prelude.Maybe ImportMode,
    -- | If you created a metric attribution, specify whether to publish metrics
    -- for this import job to Amazon S3
    CreateDatasetImportJob -> Maybe Bool
publishAttributionMetricsToS3 :: Prelude.Maybe Prelude.Bool,
    -- | A list of
    -- <https://docs.aws.amazon.com/personalize/latest/dev/tagging-resources.html tags>
    -- to apply to the dataset import job.
    CreateDatasetImportJob -> Maybe [Tag]
tags :: Prelude.Maybe [Tag],
    -- | The name for the dataset import job.
    CreateDatasetImportJob -> Text
jobName :: Prelude.Text,
    -- | The ARN of the dataset that receives the imported data.
    CreateDatasetImportJob -> Text
datasetArn :: Prelude.Text,
    -- | The Amazon S3 bucket that contains the training data to import.
    CreateDatasetImportJob -> DataSource
dataSource :: DataSource,
    -- | The ARN of the IAM role that has permissions to read from the Amazon S3
    -- data source.
    CreateDatasetImportJob -> Text
roleArn :: Prelude.Text
  }
  deriving (CreateDatasetImportJob -> CreateDatasetImportJob -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateDatasetImportJob -> CreateDatasetImportJob -> Bool
$c/= :: CreateDatasetImportJob -> CreateDatasetImportJob -> Bool
== :: CreateDatasetImportJob -> CreateDatasetImportJob -> Bool
$c== :: CreateDatasetImportJob -> CreateDatasetImportJob -> Bool
Prelude.Eq, ReadPrec [CreateDatasetImportJob]
ReadPrec CreateDatasetImportJob
Int -> ReadS CreateDatasetImportJob
ReadS [CreateDatasetImportJob]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateDatasetImportJob]
$creadListPrec :: ReadPrec [CreateDatasetImportJob]
readPrec :: ReadPrec CreateDatasetImportJob
$creadPrec :: ReadPrec CreateDatasetImportJob
readList :: ReadS [CreateDatasetImportJob]
$creadList :: ReadS [CreateDatasetImportJob]
readsPrec :: Int -> ReadS CreateDatasetImportJob
$creadsPrec :: Int -> ReadS CreateDatasetImportJob
Prelude.Read, Int -> CreateDatasetImportJob -> ShowS
[CreateDatasetImportJob] -> ShowS
CreateDatasetImportJob -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateDatasetImportJob] -> ShowS
$cshowList :: [CreateDatasetImportJob] -> ShowS
show :: CreateDatasetImportJob -> String
$cshow :: CreateDatasetImportJob -> String
showsPrec :: Int -> CreateDatasetImportJob -> ShowS
$cshowsPrec :: Int -> CreateDatasetImportJob -> ShowS
Prelude.Show, forall x. Rep CreateDatasetImportJob x -> CreateDatasetImportJob
forall x. CreateDatasetImportJob -> Rep CreateDatasetImportJob x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep CreateDatasetImportJob x -> CreateDatasetImportJob
$cfrom :: forall x. CreateDatasetImportJob -> Rep CreateDatasetImportJob x
Prelude.Generic)

-- |
-- Create a value of 'CreateDatasetImportJob' 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:
--
-- 'importMode', 'createDatasetImportJob_importMode' - Specify how to add the new records to an existing dataset. The default
-- import mode is @FULL@. If you haven\'t imported bulk records into the
-- dataset previously, you can only specify @FULL@.
--
-- -   Specify @FULL@ to overwrite all existing bulk data in your dataset.
--     Data you imported individually is not replaced.
--
-- -   Specify @INCREMENTAL@ to append the new records to the existing data
--     in your dataset. Amazon Personalize replaces any record with the
--     same ID with the new one.
--
-- 'publishAttributionMetricsToS3', 'createDatasetImportJob_publishAttributionMetricsToS3' - If you created a metric attribution, specify whether to publish metrics
-- for this import job to Amazon S3
--
-- 'tags', 'createDatasetImportJob_tags' - A list of
-- <https://docs.aws.amazon.com/personalize/latest/dev/tagging-resources.html tags>
-- to apply to the dataset import job.
--
-- 'jobName', 'createDatasetImportJob_jobName' - The name for the dataset import job.
--
-- 'datasetArn', 'createDatasetImportJob_datasetArn' - The ARN of the dataset that receives the imported data.
--
-- 'dataSource', 'createDatasetImportJob_dataSource' - The Amazon S3 bucket that contains the training data to import.
--
-- 'roleArn', 'createDatasetImportJob_roleArn' - The ARN of the IAM role that has permissions to read from the Amazon S3
-- data source.
newCreateDatasetImportJob ::
  -- | 'jobName'
  Prelude.Text ->
  -- | 'datasetArn'
  Prelude.Text ->
  -- | 'dataSource'
  DataSource ->
  -- | 'roleArn'
  Prelude.Text ->
  CreateDatasetImportJob
newCreateDatasetImportJob :: Text -> Text -> DataSource -> Text -> CreateDatasetImportJob
newCreateDatasetImportJob
  Text
pJobName_
  Text
pDatasetArn_
  DataSource
pDataSource_
  Text
pRoleArn_ =
    CreateDatasetImportJob'
      { $sel:importMode:CreateDatasetImportJob' :: Maybe ImportMode
importMode =
          forall a. Maybe a
Prelude.Nothing,
        $sel:publishAttributionMetricsToS3:CreateDatasetImportJob' :: Maybe Bool
publishAttributionMetricsToS3 = forall a. Maybe a
Prelude.Nothing,
        $sel:tags:CreateDatasetImportJob' :: Maybe [Tag]
tags = forall a. Maybe a
Prelude.Nothing,
        $sel:jobName:CreateDatasetImportJob' :: Text
jobName = Text
pJobName_,
        $sel:datasetArn:CreateDatasetImportJob' :: Text
datasetArn = Text
pDatasetArn_,
        $sel:dataSource:CreateDatasetImportJob' :: DataSource
dataSource = DataSource
pDataSource_,
        $sel:roleArn:CreateDatasetImportJob' :: Text
roleArn = Text
pRoleArn_
      }

-- | Specify how to add the new records to an existing dataset. The default
-- import mode is @FULL@. If you haven\'t imported bulk records into the
-- dataset previously, you can only specify @FULL@.
--
-- -   Specify @FULL@ to overwrite all existing bulk data in your dataset.
--     Data you imported individually is not replaced.
--
-- -   Specify @INCREMENTAL@ to append the new records to the existing data
--     in your dataset. Amazon Personalize replaces any record with the
--     same ID with the new one.
createDatasetImportJob_importMode :: Lens.Lens' CreateDatasetImportJob (Prelude.Maybe ImportMode)
createDatasetImportJob_importMode :: Lens' CreateDatasetImportJob (Maybe ImportMode)
createDatasetImportJob_importMode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDatasetImportJob' {Maybe ImportMode
importMode :: Maybe ImportMode
$sel:importMode:CreateDatasetImportJob' :: CreateDatasetImportJob -> Maybe ImportMode
importMode} -> Maybe ImportMode
importMode) (\s :: CreateDatasetImportJob
s@CreateDatasetImportJob' {} Maybe ImportMode
a -> CreateDatasetImportJob
s {$sel:importMode:CreateDatasetImportJob' :: Maybe ImportMode
importMode = Maybe ImportMode
a} :: CreateDatasetImportJob)

-- | If you created a metric attribution, specify whether to publish metrics
-- for this import job to Amazon S3
createDatasetImportJob_publishAttributionMetricsToS3 :: Lens.Lens' CreateDatasetImportJob (Prelude.Maybe Prelude.Bool)
createDatasetImportJob_publishAttributionMetricsToS3 :: Lens' CreateDatasetImportJob (Maybe Bool)
createDatasetImportJob_publishAttributionMetricsToS3 = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDatasetImportJob' {Maybe Bool
publishAttributionMetricsToS3 :: Maybe Bool
$sel:publishAttributionMetricsToS3:CreateDatasetImportJob' :: CreateDatasetImportJob -> Maybe Bool
publishAttributionMetricsToS3} -> Maybe Bool
publishAttributionMetricsToS3) (\s :: CreateDatasetImportJob
s@CreateDatasetImportJob' {} Maybe Bool
a -> CreateDatasetImportJob
s {$sel:publishAttributionMetricsToS3:CreateDatasetImportJob' :: Maybe Bool
publishAttributionMetricsToS3 = Maybe Bool
a} :: CreateDatasetImportJob)

-- | A list of
-- <https://docs.aws.amazon.com/personalize/latest/dev/tagging-resources.html tags>
-- to apply to the dataset import job.
createDatasetImportJob_tags :: Lens.Lens' CreateDatasetImportJob (Prelude.Maybe [Tag])
createDatasetImportJob_tags :: Lens' CreateDatasetImportJob (Maybe [Tag])
createDatasetImportJob_tags = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDatasetImportJob' {Maybe [Tag]
tags :: Maybe [Tag]
$sel:tags:CreateDatasetImportJob' :: CreateDatasetImportJob -> Maybe [Tag]
tags} -> Maybe [Tag]
tags) (\s :: CreateDatasetImportJob
s@CreateDatasetImportJob' {} Maybe [Tag]
a -> CreateDatasetImportJob
s {$sel:tags:CreateDatasetImportJob' :: Maybe [Tag]
tags = Maybe [Tag]
a} :: CreateDatasetImportJob) 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

-- | The name for the dataset import job.
createDatasetImportJob_jobName :: Lens.Lens' CreateDatasetImportJob Prelude.Text
createDatasetImportJob_jobName :: Lens' CreateDatasetImportJob Text
createDatasetImportJob_jobName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDatasetImportJob' {Text
jobName :: Text
$sel:jobName:CreateDatasetImportJob' :: CreateDatasetImportJob -> Text
jobName} -> Text
jobName) (\s :: CreateDatasetImportJob
s@CreateDatasetImportJob' {} Text
a -> CreateDatasetImportJob
s {$sel:jobName:CreateDatasetImportJob' :: Text
jobName = Text
a} :: CreateDatasetImportJob)

-- | The ARN of the dataset that receives the imported data.
createDatasetImportJob_datasetArn :: Lens.Lens' CreateDatasetImportJob Prelude.Text
createDatasetImportJob_datasetArn :: Lens' CreateDatasetImportJob Text
createDatasetImportJob_datasetArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDatasetImportJob' {Text
datasetArn :: Text
$sel:datasetArn:CreateDatasetImportJob' :: CreateDatasetImportJob -> Text
datasetArn} -> Text
datasetArn) (\s :: CreateDatasetImportJob
s@CreateDatasetImportJob' {} Text
a -> CreateDatasetImportJob
s {$sel:datasetArn:CreateDatasetImportJob' :: Text
datasetArn = Text
a} :: CreateDatasetImportJob)

-- | The Amazon S3 bucket that contains the training data to import.
createDatasetImportJob_dataSource :: Lens.Lens' CreateDatasetImportJob DataSource
createDatasetImportJob_dataSource :: Lens' CreateDatasetImportJob DataSource
createDatasetImportJob_dataSource = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDatasetImportJob' {DataSource
dataSource :: DataSource
$sel:dataSource:CreateDatasetImportJob' :: CreateDatasetImportJob -> DataSource
dataSource} -> DataSource
dataSource) (\s :: CreateDatasetImportJob
s@CreateDatasetImportJob' {} DataSource
a -> CreateDatasetImportJob
s {$sel:dataSource:CreateDatasetImportJob' :: DataSource
dataSource = DataSource
a} :: CreateDatasetImportJob)

-- | The ARN of the IAM role that has permissions to read from the Amazon S3
-- data source.
createDatasetImportJob_roleArn :: Lens.Lens' CreateDatasetImportJob Prelude.Text
createDatasetImportJob_roleArn :: Lens' CreateDatasetImportJob Text
createDatasetImportJob_roleArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDatasetImportJob' {Text
roleArn :: Text
$sel:roleArn:CreateDatasetImportJob' :: CreateDatasetImportJob -> Text
roleArn} -> Text
roleArn) (\s :: CreateDatasetImportJob
s@CreateDatasetImportJob' {} Text
a -> CreateDatasetImportJob
s {$sel:roleArn:CreateDatasetImportJob' :: Text
roleArn = Text
a} :: CreateDatasetImportJob)

instance Core.AWSRequest CreateDatasetImportJob where
  type
    AWSResponse CreateDatasetImportJob =
      CreateDatasetImportJobResponse
  request :: (Service -> Service)
-> CreateDatasetImportJob -> Request CreateDatasetImportJob
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 CreateDatasetImportJob
-> ClientResponse ClientBody
-> m (Either
        Error (ClientResponse (AWSResponse CreateDatasetImportJob)))
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 -> CreateDatasetImportJobResponse
CreateDatasetImportJobResponse'
            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
"datasetImportJobArn")
            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 CreateDatasetImportJob where
  hashWithSalt :: Int -> CreateDatasetImportJob -> Int
hashWithSalt Int
_salt CreateDatasetImportJob' {Maybe Bool
Maybe [Tag]
Maybe ImportMode
Text
DataSource
roleArn :: Text
dataSource :: DataSource
datasetArn :: Text
jobName :: Text
tags :: Maybe [Tag]
publishAttributionMetricsToS3 :: Maybe Bool
importMode :: Maybe ImportMode
$sel:roleArn:CreateDatasetImportJob' :: CreateDatasetImportJob -> Text
$sel:dataSource:CreateDatasetImportJob' :: CreateDatasetImportJob -> DataSource
$sel:datasetArn:CreateDatasetImportJob' :: CreateDatasetImportJob -> Text
$sel:jobName:CreateDatasetImportJob' :: CreateDatasetImportJob -> Text
$sel:tags:CreateDatasetImportJob' :: CreateDatasetImportJob -> Maybe [Tag]
$sel:publishAttributionMetricsToS3:CreateDatasetImportJob' :: CreateDatasetImportJob -> Maybe Bool
$sel:importMode:CreateDatasetImportJob' :: CreateDatasetImportJob -> Maybe ImportMode
..} =
    Int
_salt
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ImportMode
importMode
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
publishAttributionMetricsToS3
      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` DataSource
dataSource
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
roleArn

instance Prelude.NFData CreateDatasetImportJob where
  rnf :: CreateDatasetImportJob -> ()
rnf CreateDatasetImportJob' {Maybe Bool
Maybe [Tag]
Maybe ImportMode
Text
DataSource
roleArn :: Text
dataSource :: DataSource
datasetArn :: Text
jobName :: Text
tags :: Maybe [Tag]
publishAttributionMetricsToS3 :: Maybe Bool
importMode :: Maybe ImportMode
$sel:roleArn:CreateDatasetImportJob' :: CreateDatasetImportJob -> Text
$sel:dataSource:CreateDatasetImportJob' :: CreateDatasetImportJob -> DataSource
$sel:datasetArn:CreateDatasetImportJob' :: CreateDatasetImportJob -> Text
$sel:jobName:CreateDatasetImportJob' :: CreateDatasetImportJob -> Text
$sel:tags:CreateDatasetImportJob' :: CreateDatasetImportJob -> Maybe [Tag]
$sel:publishAttributionMetricsToS3:CreateDatasetImportJob' :: CreateDatasetImportJob -> Maybe Bool
$sel:importMode:CreateDatasetImportJob' :: CreateDatasetImportJob -> Maybe ImportMode
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe ImportMode
importMode
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
publishAttributionMetricsToS3
      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 DataSource
dataSource
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
roleArn

instance Data.ToHeaders CreateDatasetImportJob where
  toHeaders :: CreateDatasetImportJob -> 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.CreateDatasetImportJob" ::
                          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 CreateDatasetImportJob where
  toJSON :: CreateDatasetImportJob -> Value
toJSON CreateDatasetImportJob' {Maybe Bool
Maybe [Tag]
Maybe ImportMode
Text
DataSource
roleArn :: Text
dataSource :: DataSource
datasetArn :: Text
jobName :: Text
tags :: Maybe [Tag]
publishAttributionMetricsToS3 :: Maybe Bool
importMode :: Maybe ImportMode
$sel:roleArn:CreateDatasetImportJob' :: CreateDatasetImportJob -> Text
$sel:dataSource:CreateDatasetImportJob' :: CreateDatasetImportJob -> DataSource
$sel:datasetArn:CreateDatasetImportJob' :: CreateDatasetImportJob -> Text
$sel:jobName:CreateDatasetImportJob' :: CreateDatasetImportJob -> Text
$sel:tags:CreateDatasetImportJob' :: CreateDatasetImportJob -> Maybe [Tag]
$sel:publishAttributionMetricsToS3:CreateDatasetImportJob' :: CreateDatasetImportJob -> Maybe Bool
$sel:importMode:CreateDatasetImportJob' :: CreateDatasetImportJob -> Maybe ImportMode
..} =
    [Pair] -> Value
Data.object
      ( forall a. [Maybe a] -> [a]
Prelude.catMaybes
          [ (Key
"importMode" 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 ImportMode
importMode,
            (Key
"publishAttributionMetricsToS3" 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 Bool
publishAttributionMetricsToS3,
            (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
"dataSource" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= DataSource
dataSource),
            forall a. a -> Maybe a
Prelude.Just (Key
"roleArn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
roleArn)
          ]
      )

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

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

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

-- |
-- Create a value of 'CreateDatasetImportJobResponse' 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:
--
-- 'datasetImportJobArn', 'createDatasetImportJobResponse_datasetImportJobArn' - The ARN of the dataset import job.
--
-- 'httpStatus', 'createDatasetImportJobResponse_httpStatus' - The response's http status code.
newCreateDatasetImportJobResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  CreateDatasetImportJobResponse
newCreateDatasetImportJobResponse :: Int -> CreateDatasetImportJobResponse
newCreateDatasetImportJobResponse Int
pHttpStatus_ =
  CreateDatasetImportJobResponse'
    { $sel:datasetImportJobArn:CreateDatasetImportJobResponse' :: Maybe Text
datasetImportJobArn =
        forall a. Maybe a
Prelude.Nothing,
      $sel:httpStatus:CreateDatasetImportJobResponse' :: Int
httpStatus = Int
pHttpStatus_
    }

-- | The ARN of the dataset import job.
createDatasetImportJobResponse_datasetImportJobArn :: Lens.Lens' CreateDatasetImportJobResponse (Prelude.Maybe Prelude.Text)
createDatasetImportJobResponse_datasetImportJobArn :: Lens' CreateDatasetImportJobResponse (Maybe Text)
createDatasetImportJobResponse_datasetImportJobArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDatasetImportJobResponse' {Maybe Text
datasetImportJobArn :: Maybe Text
$sel:datasetImportJobArn:CreateDatasetImportJobResponse' :: CreateDatasetImportJobResponse -> Maybe Text
datasetImportJobArn} -> Maybe Text
datasetImportJobArn) (\s :: CreateDatasetImportJobResponse
s@CreateDatasetImportJobResponse' {} Maybe Text
a -> CreateDatasetImportJobResponse
s {$sel:datasetImportJobArn:CreateDatasetImportJobResponse' :: Maybe Text
datasetImportJobArn = Maybe Text
a} :: CreateDatasetImportJobResponse)

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

instance
  Prelude.NFData
    CreateDatasetImportJobResponse
  where
  rnf :: CreateDatasetImportJobResponse -> ()
rnf CreateDatasetImportJobResponse' {Int
Maybe Text
httpStatus :: Int
datasetImportJobArn :: Maybe Text
$sel:httpStatus:CreateDatasetImportJobResponse' :: CreateDatasetImportJobResponse -> Int
$sel:datasetImportJobArn:CreateDatasetImportJobResponse' :: CreateDatasetImportJobResponse -> Maybe Text
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
datasetImportJobArn
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus