{-# 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.SageMaker.DescribeTransformJob
-- Copyright   : (c) 2013-2021 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Returns information about a transform job.
module Amazonka.SageMaker.DescribeTransformJob
  ( -- * Creating a Request
    DescribeTransformJob (..),
    newDescribeTransformJob,

    -- * Request Lenses
    describeTransformJob_transformJobName,

    -- * Destructuring the Response
    DescribeTransformJobResponse (..),
    newDescribeTransformJobResponse,

    -- * Response Lenses
    describeTransformJobResponse_labelingJobArn,
    describeTransformJobResponse_failureReason,
    describeTransformJobResponse_modelClientConfig,
    describeTransformJobResponse_batchStrategy,
    describeTransformJobResponse_maxPayloadInMB,
    describeTransformJobResponse_environment,
    describeTransformJobResponse_experimentConfig,
    describeTransformJobResponse_transformEndTime,
    describeTransformJobResponse_transformStartTime,
    describeTransformJobResponse_autoMLJobArn,
    describeTransformJobResponse_maxConcurrentTransforms,
    describeTransformJobResponse_transformOutput,
    describeTransformJobResponse_dataProcessing,
    describeTransformJobResponse_httpStatus,
    describeTransformJobResponse_transformJobName,
    describeTransformJobResponse_transformJobArn,
    describeTransformJobResponse_transformJobStatus,
    describeTransformJobResponse_modelName,
    describeTransformJobResponse_transformInput,
    describeTransformJobResponse_transformResources,
    describeTransformJobResponse_creationTime,
  )
where

import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
import Amazonka.SageMaker.Types

-- | /See:/ 'newDescribeTransformJob' smart constructor.
data DescribeTransformJob = DescribeTransformJob'
  { -- | The name of the transform job that you want to view details of.
    DescribeTransformJob -> Text
transformJobName :: Prelude.Text
  }
  deriving (DescribeTransformJob -> DescribeTransformJob -> Bool
(DescribeTransformJob -> DescribeTransformJob -> Bool)
-> (DescribeTransformJob -> DescribeTransformJob -> Bool)
-> Eq DescribeTransformJob
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeTransformJob -> DescribeTransformJob -> Bool
$c/= :: DescribeTransformJob -> DescribeTransformJob -> Bool
== :: DescribeTransformJob -> DescribeTransformJob -> Bool
$c== :: DescribeTransformJob -> DescribeTransformJob -> Bool
Prelude.Eq, ReadPrec [DescribeTransformJob]
ReadPrec DescribeTransformJob
Int -> ReadS DescribeTransformJob
ReadS [DescribeTransformJob]
(Int -> ReadS DescribeTransformJob)
-> ReadS [DescribeTransformJob]
-> ReadPrec DescribeTransformJob
-> ReadPrec [DescribeTransformJob]
-> Read DescribeTransformJob
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeTransformJob]
$creadListPrec :: ReadPrec [DescribeTransformJob]
readPrec :: ReadPrec DescribeTransformJob
$creadPrec :: ReadPrec DescribeTransformJob
readList :: ReadS [DescribeTransformJob]
$creadList :: ReadS [DescribeTransformJob]
readsPrec :: Int -> ReadS DescribeTransformJob
$creadsPrec :: Int -> ReadS DescribeTransformJob
Prelude.Read, Int -> DescribeTransformJob -> ShowS
[DescribeTransformJob] -> ShowS
DescribeTransformJob -> String
(Int -> DescribeTransformJob -> ShowS)
-> (DescribeTransformJob -> String)
-> ([DescribeTransformJob] -> ShowS)
-> Show DescribeTransformJob
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeTransformJob] -> ShowS
$cshowList :: [DescribeTransformJob] -> ShowS
show :: DescribeTransformJob -> String
$cshow :: DescribeTransformJob -> String
showsPrec :: Int -> DescribeTransformJob -> ShowS
$cshowsPrec :: Int -> DescribeTransformJob -> ShowS
Prelude.Show, (forall x. DescribeTransformJob -> Rep DescribeTransformJob x)
-> (forall x. Rep DescribeTransformJob x -> DescribeTransformJob)
-> Generic DescribeTransformJob
forall x. Rep DescribeTransformJob x -> DescribeTransformJob
forall x. DescribeTransformJob -> Rep DescribeTransformJob x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep DescribeTransformJob x -> DescribeTransformJob
$cfrom :: forall x. DescribeTransformJob -> Rep DescribeTransformJob x
Prelude.Generic)

-- |
-- Create a value of 'DescribeTransformJob' 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:
--
-- 'transformJobName', 'describeTransformJob_transformJobName' - The name of the transform job that you want to view details of.
newDescribeTransformJob ::
  -- | 'transformJobName'
  Prelude.Text ->
  DescribeTransformJob
newDescribeTransformJob :: Text -> DescribeTransformJob
newDescribeTransformJob Text
pTransformJobName_ =
  DescribeTransformJob' :: Text -> DescribeTransformJob
DescribeTransformJob'
    { $sel:transformJobName:DescribeTransformJob' :: Text
transformJobName =
        Text
pTransformJobName_
    }

-- | The name of the transform job that you want to view details of.
describeTransformJob_transformJobName :: Lens.Lens' DescribeTransformJob Prelude.Text
describeTransformJob_transformJobName :: (Text -> f Text) -> DescribeTransformJob -> f DescribeTransformJob
describeTransformJob_transformJobName = (DescribeTransformJob -> Text)
-> (DescribeTransformJob -> Text -> DescribeTransformJob)
-> Lens DescribeTransformJob DescribeTransformJob Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJob' {Text
transformJobName :: Text
$sel:transformJobName:DescribeTransformJob' :: DescribeTransformJob -> Text
transformJobName} -> Text
transformJobName) (\s :: DescribeTransformJob
s@DescribeTransformJob' {} Text
a -> DescribeTransformJob
s {$sel:transformJobName:DescribeTransformJob' :: Text
transformJobName = Text
a} :: DescribeTransformJob)

instance Core.AWSRequest DescribeTransformJob where
  type
    AWSResponse DescribeTransformJob =
      DescribeTransformJobResponse
  request :: DescribeTransformJob -> Request DescribeTransformJob
request = Service -> DescribeTransformJob -> Request DescribeTransformJob
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON Service
defaultService
  response :: Logger
-> Service
-> Proxy DescribeTransformJob
-> ClientResponse ClientBody
-> m (Either
        Error (ClientResponse (AWSResponse DescribeTransformJob)))
response =
    (Int
 -> ResponseHeaders
 -> Object
 -> Either String (AWSResponse DescribeTransformJob))
-> Logger
-> Service
-> Proxy DescribeTransformJob
-> ClientResponse ClientBody
-> m (Either
        Error (ClientResponse (AWSResponse DescribeTransformJob)))
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> Logger
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
      ( \Int
s ResponseHeaders
h Object
x ->
          Maybe Text
-> Maybe Text
-> Maybe ModelClientConfig
-> Maybe BatchStrategy
-> Maybe Natural
-> Maybe (HashMap Text Text)
-> Maybe ExperimentConfig
-> Maybe POSIX
-> Maybe POSIX
-> Maybe Text
-> Maybe Natural
-> Maybe TransformOutput
-> Maybe DataProcessing
-> Int
-> Text
-> Text
-> TransformJobStatus
-> Text
-> TransformInput
-> TransformResources
-> POSIX
-> DescribeTransformJobResponse
DescribeTransformJobResponse'
            (Maybe Text
 -> Maybe Text
 -> Maybe ModelClientConfig
 -> Maybe BatchStrategy
 -> Maybe Natural
 -> Maybe (HashMap Text Text)
 -> Maybe ExperimentConfig
 -> Maybe POSIX
 -> Maybe POSIX
 -> Maybe Text
 -> Maybe Natural
 -> Maybe TransformOutput
 -> Maybe DataProcessing
 -> Int
 -> Text
 -> Text
 -> TransformJobStatus
 -> Text
 -> TransformInput
 -> TransformResources
 -> POSIX
 -> DescribeTransformJobResponse)
-> Either String (Maybe Text)
-> Either
     String
     (Maybe Text
      -> Maybe ModelClientConfig
      -> Maybe BatchStrategy
      -> Maybe Natural
      -> Maybe (HashMap Text Text)
      -> Maybe ExperimentConfig
      -> Maybe POSIX
      -> Maybe POSIX
      -> Maybe Text
      -> Maybe Natural
      -> Maybe TransformOutput
      -> Maybe DataProcessing
      -> Int
      -> Text
      -> Text
      -> TransformJobStatus
      -> Text
      -> TransformInput
      -> TransformResources
      -> POSIX
      -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"LabelingJobArn")
            Either
  String
  (Maybe Text
   -> Maybe ModelClientConfig
   -> Maybe BatchStrategy
   -> Maybe Natural
   -> Maybe (HashMap Text Text)
   -> Maybe ExperimentConfig
   -> Maybe POSIX
   -> Maybe POSIX
   -> Maybe Text
   -> Maybe Natural
   -> Maybe TransformOutput
   -> Maybe DataProcessing
   -> Int
   -> Text
   -> Text
   -> TransformJobStatus
   -> Text
   -> TransformInput
   -> TransformResources
   -> POSIX
   -> DescribeTransformJobResponse)
-> Either String (Maybe Text)
-> Either
     String
     (Maybe ModelClientConfig
      -> Maybe BatchStrategy
      -> Maybe Natural
      -> Maybe (HashMap Text Text)
      -> Maybe ExperimentConfig
      -> Maybe POSIX
      -> Maybe POSIX
      -> Maybe Text
      -> Maybe Natural
      -> Maybe TransformOutput
      -> Maybe DataProcessing
      -> Int
      -> Text
      -> Text
      -> TransformJobStatus
      -> Text
      -> TransformInput
      -> TransformResources
      -> POSIX
      -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"FailureReason")
            Either
  String
  (Maybe ModelClientConfig
   -> Maybe BatchStrategy
   -> Maybe Natural
   -> Maybe (HashMap Text Text)
   -> Maybe ExperimentConfig
   -> Maybe POSIX
   -> Maybe POSIX
   -> Maybe Text
   -> Maybe Natural
   -> Maybe TransformOutput
   -> Maybe DataProcessing
   -> Int
   -> Text
   -> Text
   -> TransformJobStatus
   -> Text
   -> TransformInput
   -> TransformResources
   -> POSIX
   -> DescribeTransformJobResponse)
-> Either String (Maybe ModelClientConfig)
-> Either
     String
     (Maybe BatchStrategy
      -> Maybe Natural
      -> Maybe (HashMap Text Text)
      -> Maybe ExperimentConfig
      -> Maybe POSIX
      -> Maybe POSIX
      -> Maybe Text
      -> Maybe Natural
      -> Maybe TransformOutput
      -> Maybe DataProcessing
      -> Int
      -> Text
      -> Text
      -> TransformJobStatus
      -> Text
      -> TransformInput
      -> TransformResources
      -> POSIX
      -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe ModelClientConfig)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"ModelClientConfig")
            Either
  String
  (Maybe BatchStrategy
   -> Maybe Natural
   -> Maybe (HashMap Text Text)
   -> Maybe ExperimentConfig
   -> Maybe POSIX
   -> Maybe POSIX
   -> Maybe Text
   -> Maybe Natural
   -> Maybe TransformOutput
   -> Maybe DataProcessing
   -> Int
   -> Text
   -> Text
   -> TransformJobStatus
   -> Text
   -> TransformInput
   -> TransformResources
   -> POSIX
   -> DescribeTransformJobResponse)
-> Either String (Maybe BatchStrategy)
-> Either
     String
     (Maybe Natural
      -> Maybe (HashMap Text Text)
      -> Maybe ExperimentConfig
      -> Maybe POSIX
      -> Maybe POSIX
      -> Maybe Text
      -> Maybe Natural
      -> Maybe TransformOutput
      -> Maybe DataProcessing
      -> Int
      -> Text
      -> Text
      -> TransformJobStatus
      -> Text
      -> TransformInput
      -> TransformResources
      -> POSIX
      -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe BatchStrategy)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"BatchStrategy")
            Either
  String
  (Maybe Natural
   -> Maybe (HashMap Text Text)
   -> Maybe ExperimentConfig
   -> Maybe POSIX
   -> Maybe POSIX
   -> Maybe Text
   -> Maybe Natural
   -> Maybe TransformOutput
   -> Maybe DataProcessing
   -> Int
   -> Text
   -> Text
   -> TransformJobStatus
   -> Text
   -> TransformInput
   -> TransformResources
   -> POSIX
   -> DescribeTransformJobResponse)
-> Either String (Maybe Natural)
-> Either
     String
     (Maybe (HashMap Text Text)
      -> Maybe ExperimentConfig
      -> Maybe POSIX
      -> Maybe POSIX
      -> Maybe Text
      -> Maybe Natural
      -> Maybe TransformOutput
      -> Maybe DataProcessing
      -> Int
      -> Text
      -> Text
      -> TransformJobStatus
      -> Text
      -> TransformInput
      -> TransformResources
      -> POSIX
      -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Natural)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"MaxPayloadInMB")
            Either
  String
  (Maybe (HashMap Text Text)
   -> Maybe ExperimentConfig
   -> Maybe POSIX
   -> Maybe POSIX
   -> Maybe Text
   -> Maybe Natural
   -> Maybe TransformOutput
   -> Maybe DataProcessing
   -> Int
   -> Text
   -> Text
   -> TransformJobStatus
   -> Text
   -> TransformInput
   -> TransformResources
   -> POSIX
   -> DescribeTransformJobResponse)
-> Either String (Maybe (HashMap Text Text))
-> Either
     String
     (Maybe ExperimentConfig
      -> Maybe POSIX
      -> Maybe POSIX
      -> Maybe Text
      -> Maybe Natural
      -> Maybe TransformOutput
      -> Maybe DataProcessing
      -> Int
      -> Text
      -> Text
      -> TransformJobStatus
      -> Text
      -> TransformInput
      -> TransformResources
      -> POSIX
      -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe (Maybe (HashMap Text Text)))
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"Environment" Either String (Maybe (Maybe (HashMap Text Text)))
-> Maybe (HashMap Text Text)
-> Either String (Maybe (HashMap Text Text))
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ Maybe (HashMap Text Text)
forall a. Monoid a => a
Prelude.mempty)
            Either
  String
  (Maybe ExperimentConfig
   -> Maybe POSIX
   -> Maybe POSIX
   -> Maybe Text
   -> Maybe Natural
   -> Maybe TransformOutput
   -> Maybe DataProcessing
   -> Int
   -> Text
   -> Text
   -> TransformJobStatus
   -> Text
   -> TransformInput
   -> TransformResources
   -> POSIX
   -> DescribeTransformJobResponse)
-> Either String (Maybe ExperimentConfig)
-> Either
     String
     (Maybe POSIX
      -> Maybe POSIX
      -> Maybe Text
      -> Maybe Natural
      -> Maybe TransformOutput
      -> Maybe DataProcessing
      -> Int
      -> Text
      -> Text
      -> TransformJobStatus
      -> Text
      -> TransformInput
      -> TransformResources
      -> POSIX
      -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe ExperimentConfig)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"ExperimentConfig")
            Either
  String
  (Maybe POSIX
   -> Maybe POSIX
   -> Maybe Text
   -> Maybe Natural
   -> Maybe TransformOutput
   -> Maybe DataProcessing
   -> Int
   -> Text
   -> Text
   -> TransformJobStatus
   -> Text
   -> TransformInput
   -> TransformResources
   -> POSIX
   -> DescribeTransformJobResponse)
-> Either String (Maybe POSIX)
-> Either
     String
     (Maybe POSIX
      -> Maybe Text
      -> Maybe Natural
      -> Maybe TransformOutput
      -> Maybe DataProcessing
      -> Int
      -> Text
      -> Text
      -> TransformJobStatus
      -> Text
      -> TransformInput
      -> TransformResources
      -> POSIX
      -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe POSIX)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"TransformEndTime")
            Either
  String
  (Maybe POSIX
   -> Maybe Text
   -> Maybe Natural
   -> Maybe TransformOutput
   -> Maybe DataProcessing
   -> Int
   -> Text
   -> Text
   -> TransformJobStatus
   -> Text
   -> TransformInput
   -> TransformResources
   -> POSIX
   -> DescribeTransformJobResponse)
-> Either String (Maybe POSIX)
-> Either
     String
     (Maybe Text
      -> Maybe Natural
      -> Maybe TransformOutput
      -> Maybe DataProcessing
      -> Int
      -> Text
      -> Text
      -> TransformJobStatus
      -> Text
      -> TransformInput
      -> TransformResources
      -> POSIX
      -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe POSIX)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"TransformStartTime")
            Either
  String
  (Maybe Text
   -> Maybe Natural
   -> Maybe TransformOutput
   -> Maybe DataProcessing
   -> Int
   -> Text
   -> Text
   -> TransformJobStatus
   -> Text
   -> TransformInput
   -> TransformResources
   -> POSIX
   -> DescribeTransformJobResponse)
-> Either String (Maybe Text)
-> Either
     String
     (Maybe Natural
      -> Maybe TransformOutput
      -> Maybe DataProcessing
      -> Int
      -> Text
      -> Text
      -> TransformJobStatus
      -> Text
      -> TransformInput
      -> TransformResources
      -> POSIX
      -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"AutoMLJobArn")
            Either
  String
  (Maybe Natural
   -> Maybe TransformOutput
   -> Maybe DataProcessing
   -> Int
   -> Text
   -> Text
   -> TransformJobStatus
   -> Text
   -> TransformInput
   -> TransformResources
   -> POSIX
   -> DescribeTransformJobResponse)
-> Either String (Maybe Natural)
-> Either
     String
     (Maybe TransformOutput
      -> Maybe DataProcessing
      -> Int
      -> Text
      -> Text
      -> TransformJobStatus
      -> Text
      -> TransformInput
      -> TransformResources
      -> POSIX
      -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Natural)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"MaxConcurrentTransforms")
            Either
  String
  (Maybe TransformOutput
   -> Maybe DataProcessing
   -> Int
   -> Text
   -> Text
   -> TransformJobStatus
   -> Text
   -> TransformInput
   -> TransformResources
   -> POSIX
   -> DescribeTransformJobResponse)
-> Either String (Maybe TransformOutput)
-> Either
     String
     (Maybe DataProcessing
      -> Int
      -> Text
      -> Text
      -> TransformJobStatus
      -> Text
      -> TransformInput
      -> TransformResources
      -> POSIX
      -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe TransformOutput)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"TransformOutput")
            Either
  String
  (Maybe DataProcessing
   -> Int
   -> Text
   -> Text
   -> TransformJobStatus
   -> Text
   -> TransformInput
   -> TransformResources
   -> POSIX
   -> DescribeTransformJobResponse)
-> Either String (Maybe DataProcessing)
-> Either
     String
     (Int
      -> Text
      -> Text
      -> TransformJobStatus
      -> Text
      -> TransformInput
      -> TransformResources
      -> POSIX
      -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe DataProcessing)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"DataProcessing")
            Either
  String
  (Int
   -> Text
   -> Text
   -> TransformJobStatus
   -> Text
   -> TransformInput
   -> TransformResources
   -> POSIX
   -> DescribeTransformJobResponse)
-> Either String Int
-> Either
     String
     (Text
      -> Text
      -> TransformJobStatus
      -> Text
      -> TransformInput
      -> TransformResources
      -> POSIX
      -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Int -> Either String Int
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (Int -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
            Either
  String
  (Text
   -> Text
   -> TransformJobStatus
   -> Text
   -> TransformInput
   -> TransformResources
   -> POSIX
   -> DescribeTransformJobResponse)
-> Either String Text
-> Either
     String
     (Text
      -> TransformJobStatus
      -> Text
      -> TransformInput
      -> TransformResources
      -> POSIX
      -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String Text
forall a. FromJSON a => Object -> Text -> Either String a
Core..:> Text
"TransformJobName")
            Either
  String
  (Text
   -> TransformJobStatus
   -> Text
   -> TransformInput
   -> TransformResources
   -> POSIX
   -> DescribeTransformJobResponse)
-> Either String Text
-> Either
     String
     (TransformJobStatus
      -> Text
      -> TransformInput
      -> TransformResources
      -> POSIX
      -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String Text
forall a. FromJSON a => Object -> Text -> Either String a
Core..:> Text
"TransformJobArn")
            Either
  String
  (TransformJobStatus
   -> Text
   -> TransformInput
   -> TransformResources
   -> POSIX
   -> DescribeTransformJobResponse)
-> Either String TransformJobStatus
-> Either
     String
     (Text
      -> TransformInput
      -> TransformResources
      -> POSIX
      -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String TransformJobStatus
forall a. FromJSON a => Object -> Text -> Either String a
Core..:> Text
"TransformJobStatus")
            Either
  String
  (Text
   -> TransformInput
   -> TransformResources
   -> POSIX
   -> DescribeTransformJobResponse)
-> Either String Text
-> Either
     String
     (TransformInput
      -> TransformResources -> POSIX -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String Text
forall a. FromJSON a => Object -> Text -> Either String a
Core..:> Text
"ModelName")
            Either
  String
  (TransformInput
   -> TransformResources -> POSIX -> DescribeTransformJobResponse)
-> Either String TransformInput
-> Either
     String
     (TransformResources -> POSIX -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String TransformInput
forall a. FromJSON a => Object -> Text -> Either String a
Core..:> Text
"TransformInput")
            Either
  String
  (TransformResources -> POSIX -> DescribeTransformJobResponse)
-> Either String TransformResources
-> Either String (POSIX -> DescribeTransformJobResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String TransformResources
forall a. FromJSON a => Object -> Text -> Either String a
Core..:> Text
"TransformResources")
            Either String (POSIX -> DescribeTransformJobResponse)
-> Either String POSIX
-> Either String DescribeTransformJobResponse
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String POSIX
forall a. FromJSON a => Object -> Text -> Either String a
Core..:> Text
"CreationTime")
      )

instance Prelude.Hashable DescribeTransformJob

instance Prelude.NFData DescribeTransformJob

instance Core.ToHeaders DescribeTransformJob where
  toHeaders :: DescribeTransformJob -> ResponseHeaders
toHeaders =
    ResponseHeaders -> DescribeTransformJob -> ResponseHeaders
forall a b. a -> b -> a
Prelude.const
      ( [ResponseHeaders] -> ResponseHeaders
forall a. Monoid a => [a] -> a
Prelude.mconcat
          [ HeaderName
"X-Amz-Target"
              HeaderName -> ByteString -> ResponseHeaders
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Core.=# ( ByteString
"SageMaker.DescribeTransformJob" ::
                          Prelude.ByteString
                      ),
            HeaderName
"Content-Type"
              HeaderName -> ByteString -> ResponseHeaders
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Core.=# ( ByteString
"application/x-amz-json-1.1" ::
                          Prelude.ByteString
                      )
          ]
      )

instance Core.ToJSON DescribeTransformJob where
  toJSON :: DescribeTransformJob -> Value
toJSON DescribeTransformJob' {Text
transformJobName :: Text
$sel:transformJobName:DescribeTransformJob' :: DescribeTransformJob -> Text
..} =
    [Pair] -> Value
Core.object
      ( [Maybe Pair] -> [Pair]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
          [ Pair -> Maybe Pair
forall a. a -> Maybe a
Prelude.Just
              (Text
"TransformJobName" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..= Text
transformJobName)
          ]
      )

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

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

-- | /See:/ 'newDescribeTransformJobResponse' smart constructor.
data DescribeTransformJobResponse = DescribeTransformJobResponse'
  { -- | The Amazon Resource Name (ARN) of the Amazon SageMaker Ground Truth
    -- labeling job that created the transform or training job.
    DescribeTransformJobResponse -> Maybe Text
labelingJobArn :: Prelude.Maybe Prelude.Text,
    -- | If the transform job failed, @FailureReason@ describes why it failed. A
    -- transform job creates a log file, which includes error messages, and
    -- stores it as an Amazon S3 object. For more information, see
    -- <https://docs.aws.amazon.com/sagemaker/latest/dg/logging-cloudwatch.html Log Amazon SageMaker Events with Amazon CloudWatch>.
    DescribeTransformJobResponse -> Maybe Text
failureReason :: Prelude.Maybe Prelude.Text,
    -- | The timeout and maximum number of retries for processing a transform job
    -- invocation.
    DescribeTransformJobResponse -> Maybe ModelClientConfig
modelClientConfig :: Prelude.Maybe ModelClientConfig,
    -- | Specifies the number of records to include in a mini-batch for an HTTP
    -- inference request. A /record/ // is a single unit of input data that
    -- inference can be made on. For example, a single line in a CSV file is a
    -- record.
    --
    -- To enable the batch strategy, you must set @SplitType@ to @Line@,
    -- @RecordIO@, or @TFRecord@.
    DescribeTransformJobResponse -> Maybe BatchStrategy
batchStrategy :: Prelude.Maybe BatchStrategy,
    -- | The maximum payload size, in MB, used in the transform job.
    DescribeTransformJobResponse -> Maybe Natural
maxPayloadInMB :: Prelude.Maybe Prelude.Natural,
    -- | The environment variables to set in the Docker container. We support up
    -- to 16 key and values entries in the map.
    DescribeTransformJobResponse -> Maybe (HashMap Text Text)
environment :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
    DescribeTransformJobResponse -> Maybe ExperimentConfig
experimentConfig :: Prelude.Maybe ExperimentConfig,
    -- | Indicates when the transform job has been completed, or has stopped or
    -- failed. You are billed for the time interval between this time and the
    -- value of @TransformStartTime@.
    DescribeTransformJobResponse -> Maybe POSIX
transformEndTime :: Prelude.Maybe Core.POSIX,
    -- | Indicates when the transform job starts on ML instances. You are billed
    -- for the time interval between this time and the value of
    -- @TransformEndTime@.
    DescribeTransformJobResponse -> Maybe POSIX
transformStartTime :: Prelude.Maybe Core.POSIX,
    -- | The Amazon Resource Name (ARN) of the AutoML transform job.
    DescribeTransformJobResponse -> Maybe Text
autoMLJobArn :: Prelude.Maybe Prelude.Text,
    -- | The maximum number of parallel requests on each instance node that can
    -- be launched in a transform job. The default value is 1.
    DescribeTransformJobResponse -> Maybe Natural
maxConcurrentTransforms :: Prelude.Maybe Prelude.Natural,
    -- | Identifies the Amazon S3 location where you want Amazon SageMaker to
    -- save the results from the transform job.
    DescribeTransformJobResponse -> Maybe TransformOutput
transformOutput :: Prelude.Maybe TransformOutput,
    DescribeTransformJobResponse -> Maybe DataProcessing
dataProcessing :: Prelude.Maybe DataProcessing,
    -- | The response's http status code.
    DescribeTransformJobResponse -> Int
httpStatus :: Prelude.Int,
    -- | The name of the transform job.
    DescribeTransformJobResponse -> Text
transformJobName :: Prelude.Text,
    -- | The Amazon Resource Name (ARN) of the transform job.
    DescribeTransformJobResponse -> Text
transformJobArn :: Prelude.Text,
    -- | The status of the transform job. If the transform job failed, the reason
    -- is returned in the @FailureReason@ field.
    DescribeTransformJobResponse -> TransformJobStatus
transformJobStatus :: TransformJobStatus,
    -- | The name of the model used in the transform job.
    DescribeTransformJobResponse -> Text
modelName :: Prelude.Text,
    -- | Describes the dataset to be transformed and the Amazon S3 location where
    -- it is stored.
    DescribeTransformJobResponse -> TransformInput
transformInput :: TransformInput,
    -- | Describes the resources, including ML instance types and ML instance
    -- count, to use for the transform job.
    DescribeTransformJobResponse -> TransformResources
transformResources :: TransformResources,
    -- | A timestamp that shows when the transform Job was created.
    DescribeTransformJobResponse -> POSIX
creationTime :: Core.POSIX
  }
  deriving (DescribeTransformJobResponse
-> DescribeTransformJobResponse -> Bool
(DescribeTransformJobResponse
 -> DescribeTransformJobResponse -> Bool)
-> (DescribeTransformJobResponse
    -> DescribeTransformJobResponse -> Bool)
-> Eq DescribeTransformJobResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeTransformJobResponse
-> DescribeTransformJobResponse -> Bool
$c/= :: DescribeTransformJobResponse
-> DescribeTransformJobResponse -> Bool
== :: DescribeTransformJobResponse
-> DescribeTransformJobResponse -> Bool
$c== :: DescribeTransformJobResponse
-> DescribeTransformJobResponse -> Bool
Prelude.Eq, ReadPrec [DescribeTransformJobResponse]
ReadPrec DescribeTransformJobResponse
Int -> ReadS DescribeTransformJobResponse
ReadS [DescribeTransformJobResponse]
(Int -> ReadS DescribeTransformJobResponse)
-> ReadS [DescribeTransformJobResponse]
-> ReadPrec DescribeTransformJobResponse
-> ReadPrec [DescribeTransformJobResponse]
-> Read DescribeTransformJobResponse
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeTransformJobResponse]
$creadListPrec :: ReadPrec [DescribeTransformJobResponse]
readPrec :: ReadPrec DescribeTransformJobResponse
$creadPrec :: ReadPrec DescribeTransformJobResponse
readList :: ReadS [DescribeTransformJobResponse]
$creadList :: ReadS [DescribeTransformJobResponse]
readsPrec :: Int -> ReadS DescribeTransformJobResponse
$creadsPrec :: Int -> ReadS DescribeTransformJobResponse
Prelude.Read, Int -> DescribeTransformJobResponse -> ShowS
[DescribeTransformJobResponse] -> ShowS
DescribeTransformJobResponse -> String
(Int -> DescribeTransformJobResponse -> ShowS)
-> (DescribeTransformJobResponse -> String)
-> ([DescribeTransformJobResponse] -> ShowS)
-> Show DescribeTransformJobResponse
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeTransformJobResponse] -> ShowS
$cshowList :: [DescribeTransformJobResponse] -> ShowS
show :: DescribeTransformJobResponse -> String
$cshow :: DescribeTransformJobResponse -> String
showsPrec :: Int -> DescribeTransformJobResponse -> ShowS
$cshowsPrec :: Int -> DescribeTransformJobResponse -> ShowS
Prelude.Show, (forall x.
 DescribeTransformJobResponse -> Rep DescribeTransformJobResponse x)
-> (forall x.
    Rep DescribeTransformJobResponse x -> DescribeTransformJobResponse)
-> Generic DescribeTransformJobResponse
forall x.
Rep DescribeTransformJobResponse x -> DescribeTransformJobResponse
forall x.
DescribeTransformJobResponse -> Rep DescribeTransformJobResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeTransformJobResponse x -> DescribeTransformJobResponse
$cfrom :: forall x.
DescribeTransformJobResponse -> Rep DescribeTransformJobResponse x
Prelude.Generic)

-- |
-- Create a value of 'DescribeTransformJobResponse' 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:
--
-- 'labelingJobArn', 'describeTransformJobResponse_labelingJobArn' - The Amazon Resource Name (ARN) of the Amazon SageMaker Ground Truth
-- labeling job that created the transform or training job.
--
-- 'failureReason', 'describeTransformJobResponse_failureReason' - If the transform job failed, @FailureReason@ describes why it failed. A
-- transform job creates a log file, which includes error messages, and
-- stores it as an Amazon S3 object. For more information, see
-- <https://docs.aws.amazon.com/sagemaker/latest/dg/logging-cloudwatch.html Log Amazon SageMaker Events with Amazon CloudWatch>.
--
-- 'modelClientConfig', 'describeTransformJobResponse_modelClientConfig' - The timeout and maximum number of retries for processing a transform job
-- invocation.
--
-- 'batchStrategy', 'describeTransformJobResponse_batchStrategy' - Specifies the number of records to include in a mini-batch for an HTTP
-- inference request. A /record/ // is a single unit of input data that
-- inference can be made on. For example, a single line in a CSV file is a
-- record.
--
-- To enable the batch strategy, you must set @SplitType@ to @Line@,
-- @RecordIO@, or @TFRecord@.
--
-- 'maxPayloadInMB', 'describeTransformJobResponse_maxPayloadInMB' - The maximum payload size, in MB, used in the transform job.
--
-- 'environment', 'describeTransformJobResponse_environment' - The environment variables to set in the Docker container. We support up
-- to 16 key and values entries in the map.
--
-- 'experimentConfig', 'describeTransformJobResponse_experimentConfig' - Undocumented member.
--
-- 'transformEndTime', 'describeTransformJobResponse_transformEndTime' - Indicates when the transform job has been completed, or has stopped or
-- failed. You are billed for the time interval between this time and the
-- value of @TransformStartTime@.
--
-- 'transformStartTime', 'describeTransformJobResponse_transformStartTime' - Indicates when the transform job starts on ML instances. You are billed
-- for the time interval between this time and the value of
-- @TransformEndTime@.
--
-- 'autoMLJobArn', 'describeTransformJobResponse_autoMLJobArn' - The Amazon Resource Name (ARN) of the AutoML transform job.
--
-- 'maxConcurrentTransforms', 'describeTransformJobResponse_maxConcurrentTransforms' - The maximum number of parallel requests on each instance node that can
-- be launched in a transform job. The default value is 1.
--
-- 'transformOutput', 'describeTransformJobResponse_transformOutput' - Identifies the Amazon S3 location where you want Amazon SageMaker to
-- save the results from the transform job.
--
-- 'dataProcessing', 'describeTransformJobResponse_dataProcessing' - Undocumented member.
--
-- 'httpStatus', 'describeTransformJobResponse_httpStatus' - The response's http status code.
--
-- 'transformJobName', 'describeTransformJobResponse_transformJobName' - The name of the transform job.
--
-- 'transformJobArn', 'describeTransformJobResponse_transformJobArn' - The Amazon Resource Name (ARN) of the transform job.
--
-- 'transformJobStatus', 'describeTransformJobResponse_transformJobStatus' - The status of the transform job. If the transform job failed, the reason
-- is returned in the @FailureReason@ field.
--
-- 'modelName', 'describeTransformJobResponse_modelName' - The name of the model used in the transform job.
--
-- 'transformInput', 'describeTransformJobResponse_transformInput' - Describes the dataset to be transformed and the Amazon S3 location where
-- it is stored.
--
-- 'transformResources', 'describeTransformJobResponse_transformResources' - Describes the resources, including ML instance types and ML instance
-- count, to use for the transform job.
--
-- 'creationTime', 'describeTransformJobResponse_creationTime' - A timestamp that shows when the transform Job was created.
newDescribeTransformJobResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  -- | 'transformJobName'
  Prelude.Text ->
  -- | 'transformJobArn'
  Prelude.Text ->
  -- | 'transformJobStatus'
  TransformJobStatus ->
  -- | 'modelName'
  Prelude.Text ->
  -- | 'transformInput'
  TransformInput ->
  -- | 'transformResources'
  TransformResources ->
  -- | 'creationTime'
  Prelude.UTCTime ->
  DescribeTransformJobResponse
newDescribeTransformJobResponse :: Int
-> Text
-> Text
-> TransformJobStatus
-> Text
-> TransformInput
-> TransformResources
-> UTCTime
-> DescribeTransformJobResponse
newDescribeTransformJobResponse
  Int
pHttpStatus_
  Text
pTransformJobName_
  Text
pTransformJobArn_
  TransformJobStatus
pTransformJobStatus_
  Text
pModelName_
  TransformInput
pTransformInput_
  TransformResources
pTransformResources_
  UTCTime
pCreationTime_ =
    DescribeTransformJobResponse' :: Maybe Text
-> Maybe Text
-> Maybe ModelClientConfig
-> Maybe BatchStrategy
-> Maybe Natural
-> Maybe (HashMap Text Text)
-> Maybe ExperimentConfig
-> Maybe POSIX
-> Maybe POSIX
-> Maybe Text
-> Maybe Natural
-> Maybe TransformOutput
-> Maybe DataProcessing
-> Int
-> Text
-> Text
-> TransformJobStatus
-> Text
-> TransformInput
-> TransformResources
-> POSIX
-> DescribeTransformJobResponse
DescribeTransformJobResponse'
      { $sel:labelingJobArn:DescribeTransformJobResponse' :: Maybe Text
labelingJobArn =
          Maybe Text
forall a. Maybe a
Prelude.Nothing,
        $sel:failureReason:DescribeTransformJobResponse' :: Maybe Text
failureReason = Maybe Text
forall a. Maybe a
Prelude.Nothing,
        $sel:modelClientConfig:DescribeTransformJobResponse' :: Maybe ModelClientConfig
modelClientConfig = Maybe ModelClientConfig
forall a. Maybe a
Prelude.Nothing,
        $sel:batchStrategy:DescribeTransformJobResponse' :: Maybe BatchStrategy
batchStrategy = Maybe BatchStrategy
forall a. Maybe a
Prelude.Nothing,
        $sel:maxPayloadInMB:DescribeTransformJobResponse' :: Maybe Natural
maxPayloadInMB = Maybe Natural
forall a. Maybe a
Prelude.Nothing,
        $sel:environment:DescribeTransformJobResponse' :: Maybe (HashMap Text Text)
environment = Maybe (HashMap Text Text)
forall a. Maybe a
Prelude.Nothing,
        $sel:experimentConfig:DescribeTransformJobResponse' :: Maybe ExperimentConfig
experimentConfig = Maybe ExperimentConfig
forall a. Maybe a
Prelude.Nothing,
        $sel:transformEndTime:DescribeTransformJobResponse' :: Maybe POSIX
transformEndTime = Maybe POSIX
forall a. Maybe a
Prelude.Nothing,
        $sel:transformStartTime:DescribeTransformJobResponse' :: Maybe POSIX
transformStartTime = Maybe POSIX
forall a. Maybe a
Prelude.Nothing,
        $sel:autoMLJobArn:DescribeTransformJobResponse' :: Maybe Text
autoMLJobArn = Maybe Text
forall a. Maybe a
Prelude.Nothing,
        $sel:maxConcurrentTransforms:DescribeTransformJobResponse' :: Maybe Natural
maxConcurrentTransforms = Maybe Natural
forall a. Maybe a
Prelude.Nothing,
        $sel:transformOutput:DescribeTransformJobResponse' :: Maybe TransformOutput
transformOutput = Maybe TransformOutput
forall a. Maybe a
Prelude.Nothing,
        $sel:dataProcessing:DescribeTransformJobResponse' :: Maybe DataProcessing
dataProcessing = Maybe DataProcessing
forall a. Maybe a
Prelude.Nothing,
        $sel:httpStatus:DescribeTransformJobResponse' :: Int
httpStatus = Int
pHttpStatus_,
        $sel:transformJobName:DescribeTransformJobResponse' :: Text
transformJobName = Text
pTransformJobName_,
        $sel:transformJobArn:DescribeTransformJobResponse' :: Text
transformJobArn = Text
pTransformJobArn_,
        $sel:transformJobStatus:DescribeTransformJobResponse' :: TransformJobStatus
transformJobStatus = TransformJobStatus
pTransformJobStatus_,
        $sel:modelName:DescribeTransformJobResponse' :: Text
modelName = Text
pModelName_,
        $sel:transformInput:DescribeTransformJobResponse' :: TransformInput
transformInput = TransformInput
pTransformInput_,
        $sel:transformResources:DescribeTransformJobResponse' :: TransformResources
transformResources = TransformResources
pTransformResources_,
        $sel:creationTime:DescribeTransformJobResponse' :: POSIX
creationTime =
          Tagged UTCTime (Identity UTCTime) -> Tagged POSIX (Identity POSIX)
forall (a :: Format). Iso' (Time a) UTCTime
Core._Time (Tagged UTCTime (Identity UTCTime)
 -> Tagged POSIX (Identity POSIX))
-> UTCTime -> POSIX
forall t b. AReview t b -> b -> t
Lens.# UTCTime
pCreationTime_
      }

-- | The Amazon Resource Name (ARN) of the Amazon SageMaker Ground Truth
-- labeling job that created the transform or training job.
describeTransformJobResponse_labelingJobArn :: Lens.Lens' DescribeTransformJobResponse (Prelude.Maybe Prelude.Text)
describeTransformJobResponse_labelingJobArn :: (Maybe Text -> f (Maybe Text))
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_labelingJobArn = (DescribeTransformJobResponse -> Maybe Text)
-> (DescribeTransformJobResponse
    -> Maybe Text -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse
     DescribeTransformJobResponse
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {Maybe Text
labelingJobArn :: Maybe Text
$sel:labelingJobArn:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> Maybe Text
labelingJobArn} -> Maybe Text
labelingJobArn) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} Maybe Text
a -> DescribeTransformJobResponse
s {$sel:labelingJobArn:DescribeTransformJobResponse' :: Maybe Text
labelingJobArn = Maybe Text
a} :: DescribeTransformJobResponse)

-- | If the transform job failed, @FailureReason@ describes why it failed. A
-- transform job creates a log file, which includes error messages, and
-- stores it as an Amazon S3 object. For more information, see
-- <https://docs.aws.amazon.com/sagemaker/latest/dg/logging-cloudwatch.html Log Amazon SageMaker Events with Amazon CloudWatch>.
describeTransformJobResponse_failureReason :: Lens.Lens' DescribeTransformJobResponse (Prelude.Maybe Prelude.Text)
describeTransformJobResponse_failureReason :: (Maybe Text -> f (Maybe Text))
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_failureReason = (DescribeTransformJobResponse -> Maybe Text)
-> (DescribeTransformJobResponse
    -> Maybe Text -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse
     DescribeTransformJobResponse
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {Maybe Text
failureReason :: Maybe Text
$sel:failureReason:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> Maybe Text
failureReason} -> Maybe Text
failureReason) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} Maybe Text
a -> DescribeTransformJobResponse
s {$sel:failureReason:DescribeTransformJobResponse' :: Maybe Text
failureReason = Maybe Text
a} :: DescribeTransformJobResponse)

-- | The timeout and maximum number of retries for processing a transform job
-- invocation.
describeTransformJobResponse_modelClientConfig :: Lens.Lens' DescribeTransformJobResponse (Prelude.Maybe ModelClientConfig)
describeTransformJobResponse_modelClientConfig :: (Maybe ModelClientConfig -> f (Maybe ModelClientConfig))
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_modelClientConfig = (DescribeTransformJobResponse -> Maybe ModelClientConfig)
-> (DescribeTransformJobResponse
    -> Maybe ModelClientConfig -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse
     DescribeTransformJobResponse
     (Maybe ModelClientConfig)
     (Maybe ModelClientConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {Maybe ModelClientConfig
modelClientConfig :: Maybe ModelClientConfig
$sel:modelClientConfig:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> Maybe ModelClientConfig
modelClientConfig} -> Maybe ModelClientConfig
modelClientConfig) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} Maybe ModelClientConfig
a -> DescribeTransformJobResponse
s {$sel:modelClientConfig:DescribeTransformJobResponse' :: Maybe ModelClientConfig
modelClientConfig = Maybe ModelClientConfig
a} :: DescribeTransformJobResponse)

-- | Specifies the number of records to include in a mini-batch for an HTTP
-- inference request. A /record/ // is a single unit of input data that
-- inference can be made on. For example, a single line in a CSV file is a
-- record.
--
-- To enable the batch strategy, you must set @SplitType@ to @Line@,
-- @RecordIO@, or @TFRecord@.
describeTransformJobResponse_batchStrategy :: Lens.Lens' DescribeTransformJobResponse (Prelude.Maybe BatchStrategy)
describeTransformJobResponse_batchStrategy :: (Maybe BatchStrategy -> f (Maybe BatchStrategy))
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_batchStrategy = (DescribeTransformJobResponse -> Maybe BatchStrategy)
-> (DescribeTransformJobResponse
    -> Maybe BatchStrategy -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse
     DescribeTransformJobResponse
     (Maybe BatchStrategy)
     (Maybe BatchStrategy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {Maybe BatchStrategy
batchStrategy :: Maybe BatchStrategy
$sel:batchStrategy:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> Maybe BatchStrategy
batchStrategy} -> Maybe BatchStrategy
batchStrategy) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} Maybe BatchStrategy
a -> DescribeTransformJobResponse
s {$sel:batchStrategy:DescribeTransformJobResponse' :: Maybe BatchStrategy
batchStrategy = Maybe BatchStrategy
a} :: DescribeTransformJobResponse)

-- | The maximum payload size, in MB, used in the transform job.
describeTransformJobResponse_maxPayloadInMB :: Lens.Lens' DescribeTransformJobResponse (Prelude.Maybe Prelude.Natural)
describeTransformJobResponse_maxPayloadInMB :: (Maybe Natural -> f (Maybe Natural))
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_maxPayloadInMB = (DescribeTransformJobResponse -> Maybe Natural)
-> (DescribeTransformJobResponse
    -> Maybe Natural -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse
     DescribeTransformJobResponse
     (Maybe Natural)
     (Maybe Natural)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {Maybe Natural
maxPayloadInMB :: Maybe Natural
$sel:maxPayloadInMB:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> Maybe Natural
maxPayloadInMB} -> Maybe Natural
maxPayloadInMB) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} Maybe Natural
a -> DescribeTransformJobResponse
s {$sel:maxPayloadInMB:DescribeTransformJobResponse' :: Maybe Natural
maxPayloadInMB = Maybe Natural
a} :: DescribeTransformJobResponse)

-- | The environment variables to set in the Docker container. We support up
-- to 16 key and values entries in the map.
describeTransformJobResponse_environment :: Lens.Lens' DescribeTransformJobResponse (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
describeTransformJobResponse_environment :: (Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_environment = (DescribeTransformJobResponse -> Maybe (HashMap Text Text))
-> (DescribeTransformJobResponse
    -> Maybe (HashMap Text Text) -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse
     DescribeTransformJobResponse
     (Maybe (HashMap Text Text))
     (Maybe (HashMap Text Text))
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {Maybe (HashMap Text Text)
environment :: Maybe (HashMap Text Text)
$sel:environment:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> Maybe (HashMap Text Text)
environment} -> Maybe (HashMap Text Text)
environment) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} Maybe (HashMap Text Text)
a -> DescribeTransformJobResponse
s {$sel:environment:DescribeTransformJobResponse' :: Maybe (HashMap Text Text)
environment = Maybe (HashMap Text Text)
a} :: DescribeTransformJobResponse) ((Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
 -> DescribeTransformJobResponse -> f DescribeTransformJobResponse)
-> ((Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
    -> Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> (Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> DescribeTransformJobResponse
-> f DescribeTransformJobResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso
  (HashMap Text Text)
  (HashMap Text Text)
  (HashMap Text Text)
  (HashMap Text Text)
-> Iso
     (Maybe (HashMap Text Text))
     (Maybe (HashMap Text Text))
     (Maybe (HashMap Text Text))
     (Maybe (HashMap Text Text))
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 AnIso
  (HashMap Text Text)
  (HashMap Text Text)
  (HashMap Text Text)
  (HashMap Text Text)
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced

-- | Undocumented member.
describeTransformJobResponse_experimentConfig :: Lens.Lens' DescribeTransformJobResponse (Prelude.Maybe ExperimentConfig)
describeTransformJobResponse_experimentConfig :: (Maybe ExperimentConfig -> f (Maybe ExperimentConfig))
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_experimentConfig = (DescribeTransformJobResponse -> Maybe ExperimentConfig)
-> (DescribeTransformJobResponse
    -> Maybe ExperimentConfig -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse
     DescribeTransformJobResponse
     (Maybe ExperimentConfig)
     (Maybe ExperimentConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {Maybe ExperimentConfig
experimentConfig :: Maybe ExperimentConfig
$sel:experimentConfig:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> Maybe ExperimentConfig
experimentConfig} -> Maybe ExperimentConfig
experimentConfig) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} Maybe ExperimentConfig
a -> DescribeTransformJobResponse
s {$sel:experimentConfig:DescribeTransformJobResponse' :: Maybe ExperimentConfig
experimentConfig = Maybe ExperimentConfig
a} :: DescribeTransformJobResponse)

-- | Indicates when the transform job has been completed, or has stopped or
-- failed. You are billed for the time interval between this time and the
-- value of @TransformStartTime@.
describeTransformJobResponse_transformEndTime :: Lens.Lens' DescribeTransformJobResponse (Prelude.Maybe Prelude.UTCTime)
describeTransformJobResponse_transformEndTime :: (Maybe UTCTime -> f (Maybe UTCTime))
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_transformEndTime = (DescribeTransformJobResponse -> Maybe POSIX)
-> (DescribeTransformJobResponse
    -> Maybe POSIX -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse
     DescribeTransformJobResponse
     (Maybe POSIX)
     (Maybe POSIX)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {Maybe POSIX
transformEndTime :: Maybe POSIX
$sel:transformEndTime:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> Maybe POSIX
transformEndTime} -> Maybe POSIX
transformEndTime) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} Maybe POSIX
a -> DescribeTransformJobResponse
s {$sel:transformEndTime:DescribeTransformJobResponse' :: Maybe POSIX
transformEndTime = Maybe POSIX
a} :: DescribeTransformJobResponse) ((Maybe POSIX -> f (Maybe POSIX))
 -> DescribeTransformJobResponse -> f DescribeTransformJobResponse)
-> ((Maybe UTCTime -> f (Maybe UTCTime))
    -> Maybe POSIX -> f (Maybe POSIX))
-> (Maybe UTCTime -> f (Maybe UTCTime))
-> DescribeTransformJobResponse
-> f DescribeTransformJobResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso POSIX POSIX UTCTime UTCTime
-> Iso (Maybe POSIX) (Maybe POSIX) (Maybe UTCTime) (Maybe UTCTime)
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 AnIso POSIX POSIX UTCTime UTCTime
forall (a :: Format). Iso' (Time a) UTCTime
Core._Time

-- | Indicates when the transform job starts on ML instances. You are billed
-- for the time interval between this time and the value of
-- @TransformEndTime@.
describeTransformJobResponse_transformStartTime :: Lens.Lens' DescribeTransformJobResponse (Prelude.Maybe Prelude.UTCTime)
describeTransformJobResponse_transformStartTime :: (Maybe UTCTime -> f (Maybe UTCTime))
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_transformStartTime = (DescribeTransformJobResponse -> Maybe POSIX)
-> (DescribeTransformJobResponse
    -> Maybe POSIX -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse
     DescribeTransformJobResponse
     (Maybe POSIX)
     (Maybe POSIX)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {Maybe POSIX
transformStartTime :: Maybe POSIX
$sel:transformStartTime:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> Maybe POSIX
transformStartTime} -> Maybe POSIX
transformStartTime) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} Maybe POSIX
a -> DescribeTransformJobResponse
s {$sel:transformStartTime:DescribeTransformJobResponse' :: Maybe POSIX
transformStartTime = Maybe POSIX
a} :: DescribeTransformJobResponse) ((Maybe POSIX -> f (Maybe POSIX))
 -> DescribeTransformJobResponse -> f DescribeTransformJobResponse)
-> ((Maybe UTCTime -> f (Maybe UTCTime))
    -> Maybe POSIX -> f (Maybe POSIX))
-> (Maybe UTCTime -> f (Maybe UTCTime))
-> DescribeTransformJobResponse
-> f DescribeTransformJobResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso POSIX POSIX UTCTime UTCTime
-> Iso (Maybe POSIX) (Maybe POSIX) (Maybe UTCTime) (Maybe UTCTime)
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 AnIso POSIX POSIX UTCTime UTCTime
forall (a :: Format). Iso' (Time a) UTCTime
Core._Time

-- | The Amazon Resource Name (ARN) of the AutoML transform job.
describeTransformJobResponse_autoMLJobArn :: Lens.Lens' DescribeTransformJobResponse (Prelude.Maybe Prelude.Text)
describeTransformJobResponse_autoMLJobArn :: (Maybe Text -> f (Maybe Text))
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_autoMLJobArn = (DescribeTransformJobResponse -> Maybe Text)
-> (DescribeTransformJobResponse
    -> Maybe Text -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse
     DescribeTransformJobResponse
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {Maybe Text
autoMLJobArn :: Maybe Text
$sel:autoMLJobArn:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> Maybe Text
autoMLJobArn} -> Maybe Text
autoMLJobArn) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} Maybe Text
a -> DescribeTransformJobResponse
s {$sel:autoMLJobArn:DescribeTransformJobResponse' :: Maybe Text
autoMLJobArn = Maybe Text
a} :: DescribeTransformJobResponse)

-- | The maximum number of parallel requests on each instance node that can
-- be launched in a transform job. The default value is 1.
describeTransformJobResponse_maxConcurrentTransforms :: Lens.Lens' DescribeTransformJobResponse (Prelude.Maybe Prelude.Natural)
describeTransformJobResponse_maxConcurrentTransforms :: (Maybe Natural -> f (Maybe Natural))
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_maxConcurrentTransforms = (DescribeTransformJobResponse -> Maybe Natural)
-> (DescribeTransformJobResponse
    -> Maybe Natural -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse
     DescribeTransformJobResponse
     (Maybe Natural)
     (Maybe Natural)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {Maybe Natural
maxConcurrentTransforms :: Maybe Natural
$sel:maxConcurrentTransforms:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> Maybe Natural
maxConcurrentTransforms} -> Maybe Natural
maxConcurrentTransforms) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} Maybe Natural
a -> DescribeTransformJobResponse
s {$sel:maxConcurrentTransforms:DescribeTransformJobResponse' :: Maybe Natural
maxConcurrentTransforms = Maybe Natural
a} :: DescribeTransformJobResponse)

-- | Identifies the Amazon S3 location where you want Amazon SageMaker to
-- save the results from the transform job.
describeTransformJobResponse_transformOutput :: Lens.Lens' DescribeTransformJobResponse (Prelude.Maybe TransformOutput)
describeTransformJobResponse_transformOutput :: (Maybe TransformOutput -> f (Maybe TransformOutput))
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_transformOutput = (DescribeTransformJobResponse -> Maybe TransformOutput)
-> (DescribeTransformJobResponse
    -> Maybe TransformOutput -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse
     DescribeTransformJobResponse
     (Maybe TransformOutput)
     (Maybe TransformOutput)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {Maybe TransformOutput
transformOutput :: Maybe TransformOutput
$sel:transformOutput:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> Maybe TransformOutput
transformOutput} -> Maybe TransformOutput
transformOutput) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} Maybe TransformOutput
a -> DescribeTransformJobResponse
s {$sel:transformOutput:DescribeTransformJobResponse' :: Maybe TransformOutput
transformOutput = Maybe TransformOutput
a} :: DescribeTransformJobResponse)

-- | Undocumented member.
describeTransformJobResponse_dataProcessing :: Lens.Lens' DescribeTransformJobResponse (Prelude.Maybe DataProcessing)
describeTransformJobResponse_dataProcessing :: (Maybe DataProcessing -> f (Maybe DataProcessing))
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_dataProcessing = (DescribeTransformJobResponse -> Maybe DataProcessing)
-> (DescribeTransformJobResponse
    -> Maybe DataProcessing -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse
     DescribeTransformJobResponse
     (Maybe DataProcessing)
     (Maybe DataProcessing)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {Maybe DataProcessing
dataProcessing :: Maybe DataProcessing
$sel:dataProcessing:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> Maybe DataProcessing
dataProcessing} -> Maybe DataProcessing
dataProcessing) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} Maybe DataProcessing
a -> DescribeTransformJobResponse
s {$sel:dataProcessing:DescribeTransformJobResponse' :: Maybe DataProcessing
dataProcessing = Maybe DataProcessing
a} :: DescribeTransformJobResponse)

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

-- | The name of the transform job.
describeTransformJobResponse_transformJobName :: Lens.Lens' DescribeTransformJobResponse Prelude.Text
describeTransformJobResponse_transformJobName :: (Text -> f Text)
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_transformJobName = (DescribeTransformJobResponse -> Text)
-> (DescribeTransformJobResponse
    -> Text -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse DescribeTransformJobResponse Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {Text
transformJobName :: Text
$sel:transformJobName:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> Text
transformJobName} -> Text
transformJobName) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} Text
a -> DescribeTransformJobResponse
s {$sel:transformJobName:DescribeTransformJobResponse' :: Text
transformJobName = Text
a} :: DescribeTransformJobResponse)

-- | The Amazon Resource Name (ARN) of the transform job.
describeTransformJobResponse_transformJobArn :: Lens.Lens' DescribeTransformJobResponse Prelude.Text
describeTransformJobResponse_transformJobArn :: (Text -> f Text)
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_transformJobArn = (DescribeTransformJobResponse -> Text)
-> (DescribeTransformJobResponse
    -> Text -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse DescribeTransformJobResponse Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {Text
transformJobArn :: Text
$sel:transformJobArn:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> Text
transformJobArn} -> Text
transformJobArn) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} Text
a -> DescribeTransformJobResponse
s {$sel:transformJobArn:DescribeTransformJobResponse' :: Text
transformJobArn = Text
a} :: DescribeTransformJobResponse)

-- | The status of the transform job. If the transform job failed, the reason
-- is returned in the @FailureReason@ field.
describeTransformJobResponse_transformJobStatus :: Lens.Lens' DescribeTransformJobResponse TransformJobStatus
describeTransformJobResponse_transformJobStatus :: (TransformJobStatus -> f TransformJobStatus)
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_transformJobStatus = (DescribeTransformJobResponse -> TransformJobStatus)
-> (DescribeTransformJobResponse
    -> TransformJobStatus -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse
     DescribeTransformJobResponse
     TransformJobStatus
     TransformJobStatus
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {TransformJobStatus
transformJobStatus :: TransformJobStatus
$sel:transformJobStatus:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> TransformJobStatus
transformJobStatus} -> TransformJobStatus
transformJobStatus) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} TransformJobStatus
a -> DescribeTransformJobResponse
s {$sel:transformJobStatus:DescribeTransformJobResponse' :: TransformJobStatus
transformJobStatus = TransformJobStatus
a} :: DescribeTransformJobResponse)

-- | The name of the model used in the transform job.
describeTransformJobResponse_modelName :: Lens.Lens' DescribeTransformJobResponse Prelude.Text
describeTransformJobResponse_modelName :: (Text -> f Text)
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_modelName = (DescribeTransformJobResponse -> Text)
-> (DescribeTransformJobResponse
    -> Text -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse DescribeTransformJobResponse Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {Text
modelName :: Text
$sel:modelName:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> Text
modelName} -> Text
modelName) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} Text
a -> DescribeTransformJobResponse
s {$sel:modelName:DescribeTransformJobResponse' :: Text
modelName = Text
a} :: DescribeTransformJobResponse)

-- | Describes the dataset to be transformed and the Amazon S3 location where
-- it is stored.
describeTransformJobResponse_transformInput :: Lens.Lens' DescribeTransformJobResponse TransformInput
describeTransformJobResponse_transformInput :: (TransformInput -> f TransformInput)
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_transformInput = (DescribeTransformJobResponse -> TransformInput)
-> (DescribeTransformJobResponse
    -> TransformInput -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse
     DescribeTransformJobResponse
     TransformInput
     TransformInput
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {TransformInput
transformInput :: TransformInput
$sel:transformInput:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> TransformInput
transformInput} -> TransformInput
transformInput) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} TransformInput
a -> DescribeTransformJobResponse
s {$sel:transformInput:DescribeTransformJobResponse' :: TransformInput
transformInput = TransformInput
a} :: DescribeTransformJobResponse)

-- | Describes the resources, including ML instance types and ML instance
-- count, to use for the transform job.
describeTransformJobResponse_transformResources :: Lens.Lens' DescribeTransformJobResponse TransformResources
describeTransformJobResponse_transformResources :: (TransformResources -> f TransformResources)
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_transformResources = (DescribeTransformJobResponse -> TransformResources)
-> (DescribeTransformJobResponse
    -> TransformResources -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse
     DescribeTransformJobResponse
     TransformResources
     TransformResources
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {TransformResources
transformResources :: TransformResources
$sel:transformResources:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> TransformResources
transformResources} -> TransformResources
transformResources) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} TransformResources
a -> DescribeTransformJobResponse
s {$sel:transformResources:DescribeTransformJobResponse' :: TransformResources
transformResources = TransformResources
a} :: DescribeTransformJobResponse)

-- | A timestamp that shows when the transform Job was created.
describeTransformJobResponse_creationTime :: Lens.Lens' DescribeTransformJobResponse Prelude.UTCTime
describeTransformJobResponse_creationTime :: (UTCTime -> f UTCTime)
-> DescribeTransformJobResponse -> f DescribeTransformJobResponse
describeTransformJobResponse_creationTime = (DescribeTransformJobResponse -> POSIX)
-> (DescribeTransformJobResponse
    -> POSIX -> DescribeTransformJobResponse)
-> Lens
     DescribeTransformJobResponse
     DescribeTransformJobResponse
     POSIX
     POSIX
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTransformJobResponse' {POSIX
creationTime :: POSIX
$sel:creationTime:DescribeTransformJobResponse' :: DescribeTransformJobResponse -> POSIX
creationTime} -> POSIX
creationTime) (\s :: DescribeTransformJobResponse
s@DescribeTransformJobResponse' {} POSIX
a -> DescribeTransformJobResponse
s {$sel:creationTime:DescribeTransformJobResponse' :: POSIX
creationTime = POSIX
a} :: DescribeTransformJobResponse) ((POSIX -> f POSIX)
 -> DescribeTransformJobResponse -> f DescribeTransformJobResponse)
-> ((UTCTime -> f UTCTime) -> POSIX -> f POSIX)
-> (UTCTime -> f UTCTime)
-> DescribeTransformJobResponse
-> f DescribeTransformJobResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. (UTCTime -> f UTCTime) -> POSIX -> f POSIX
forall (a :: Format). Iso' (Time a) UTCTime
Core._Time

instance Prelude.NFData DescribeTransformJobResponse