{-# 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.Omics.GetReadSetActivationJob
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Gets information about a read set activation job.
module Amazonka.Omics.GetReadSetActivationJob
  ( -- * Creating a Request
    GetReadSetActivationJob (..),
    newGetReadSetActivationJob,

    -- * Request Lenses
    getReadSetActivationJob_id,
    getReadSetActivationJob_sequenceStoreId,

    -- * Destructuring the Response
    GetReadSetActivationJobResponse (..),
    newGetReadSetActivationJobResponse,

    -- * Response Lenses
    getReadSetActivationJobResponse_completionTime,
    getReadSetActivationJobResponse_sources,
    getReadSetActivationJobResponse_statusMessage,
    getReadSetActivationJobResponse_httpStatus,
    getReadSetActivationJobResponse_creationTime,
    getReadSetActivationJobResponse_id,
    getReadSetActivationJobResponse_sequenceStoreId,
    getReadSetActivationJobResponse_status,
  )
where

import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.Omics.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response

-- | /See:/ 'newGetReadSetActivationJob' smart constructor.
data GetReadSetActivationJob = GetReadSetActivationJob'
  { -- | The job\'s ID.
    GetReadSetActivationJob -> Text
id :: Prelude.Text,
    -- | The job\'s sequence store ID.
    GetReadSetActivationJob -> Text
sequenceStoreId :: Prelude.Text
  }
  deriving (GetReadSetActivationJob -> GetReadSetActivationJob -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetReadSetActivationJob -> GetReadSetActivationJob -> Bool
$c/= :: GetReadSetActivationJob -> GetReadSetActivationJob -> Bool
== :: GetReadSetActivationJob -> GetReadSetActivationJob -> Bool
$c== :: GetReadSetActivationJob -> GetReadSetActivationJob -> Bool
Prelude.Eq, ReadPrec [GetReadSetActivationJob]
ReadPrec GetReadSetActivationJob
Int -> ReadS GetReadSetActivationJob
ReadS [GetReadSetActivationJob]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetReadSetActivationJob]
$creadListPrec :: ReadPrec [GetReadSetActivationJob]
readPrec :: ReadPrec GetReadSetActivationJob
$creadPrec :: ReadPrec GetReadSetActivationJob
readList :: ReadS [GetReadSetActivationJob]
$creadList :: ReadS [GetReadSetActivationJob]
readsPrec :: Int -> ReadS GetReadSetActivationJob
$creadsPrec :: Int -> ReadS GetReadSetActivationJob
Prelude.Read, Int -> GetReadSetActivationJob -> ShowS
[GetReadSetActivationJob] -> ShowS
GetReadSetActivationJob -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetReadSetActivationJob] -> ShowS
$cshowList :: [GetReadSetActivationJob] -> ShowS
show :: GetReadSetActivationJob -> String
$cshow :: GetReadSetActivationJob -> String
showsPrec :: Int -> GetReadSetActivationJob -> ShowS
$cshowsPrec :: Int -> GetReadSetActivationJob -> ShowS
Prelude.Show, forall x. Rep GetReadSetActivationJob x -> GetReadSetActivationJob
forall x. GetReadSetActivationJob -> Rep GetReadSetActivationJob x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep GetReadSetActivationJob x -> GetReadSetActivationJob
$cfrom :: forall x. GetReadSetActivationJob -> Rep GetReadSetActivationJob x
Prelude.Generic)

-- |
-- Create a value of 'GetReadSetActivationJob' 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:
--
-- 'id', 'getReadSetActivationJob_id' - The job\'s ID.
--
-- 'sequenceStoreId', 'getReadSetActivationJob_sequenceStoreId' - The job\'s sequence store ID.
newGetReadSetActivationJob ::
  -- | 'id'
  Prelude.Text ->
  -- | 'sequenceStoreId'
  Prelude.Text ->
  GetReadSetActivationJob
newGetReadSetActivationJob :: Text -> Text -> GetReadSetActivationJob
newGetReadSetActivationJob Text
pId_ Text
pSequenceStoreId_ =
  GetReadSetActivationJob'
    { $sel:id:GetReadSetActivationJob' :: Text
id = Text
pId_,
      $sel:sequenceStoreId:GetReadSetActivationJob' :: Text
sequenceStoreId = Text
pSequenceStoreId_
    }

-- | The job\'s ID.
getReadSetActivationJob_id :: Lens.Lens' GetReadSetActivationJob Prelude.Text
getReadSetActivationJob_id :: Lens' GetReadSetActivationJob Text
getReadSetActivationJob_id = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetReadSetActivationJob' {Text
id :: Text
$sel:id:GetReadSetActivationJob' :: GetReadSetActivationJob -> Text
id} -> Text
id) (\s :: GetReadSetActivationJob
s@GetReadSetActivationJob' {} Text
a -> GetReadSetActivationJob
s {$sel:id:GetReadSetActivationJob' :: Text
id = Text
a} :: GetReadSetActivationJob)

-- | The job\'s sequence store ID.
getReadSetActivationJob_sequenceStoreId :: Lens.Lens' GetReadSetActivationJob Prelude.Text
getReadSetActivationJob_sequenceStoreId :: Lens' GetReadSetActivationJob Text
getReadSetActivationJob_sequenceStoreId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetReadSetActivationJob' {Text
sequenceStoreId :: Text
$sel:sequenceStoreId:GetReadSetActivationJob' :: GetReadSetActivationJob -> Text
sequenceStoreId} -> Text
sequenceStoreId) (\s :: GetReadSetActivationJob
s@GetReadSetActivationJob' {} Text
a -> GetReadSetActivationJob
s {$sel:sequenceStoreId:GetReadSetActivationJob' :: Text
sequenceStoreId = Text
a} :: GetReadSetActivationJob)

instance Core.AWSRequest GetReadSetActivationJob where
  type
    AWSResponse GetReadSetActivationJob =
      GetReadSetActivationJobResponse
  request :: (Service -> Service)
-> GetReadSetActivationJob -> Request GetReadSetActivationJob
request Service -> Service
overrides =
    forall a. ToRequest a => Service -> a -> Request a
Request.get (Service -> Service
overrides Service
defaultService)
  response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy GetReadSetActivationJob
-> ClientResponse ClientBody
-> m (Either
        Error (ClientResponse (AWSResponse GetReadSetActivationJob)))
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 ISO8601
-> Maybe [ActivateReadSetSourceItem]
-> Maybe Text
-> Int
-> ISO8601
-> Text
-> Text
-> ReadSetActivationJobStatus
-> GetReadSetActivationJobResponse
GetReadSetActivationJobResponse'
            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
"completionTime")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"sources" forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty)
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"statusMessage")
            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))
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"creationTime")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"id")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"sequenceStoreId")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"status")
      )

instance Prelude.Hashable GetReadSetActivationJob where
  hashWithSalt :: Int -> GetReadSetActivationJob -> Int
hashWithSalt Int
_salt GetReadSetActivationJob' {Text
sequenceStoreId :: Text
id :: Text
$sel:sequenceStoreId:GetReadSetActivationJob' :: GetReadSetActivationJob -> Text
$sel:id:GetReadSetActivationJob' :: GetReadSetActivationJob -> Text
..} =
    Int
_salt
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
id
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
sequenceStoreId

instance Prelude.NFData GetReadSetActivationJob where
  rnf :: GetReadSetActivationJob -> ()
rnf GetReadSetActivationJob' {Text
sequenceStoreId :: Text
id :: Text
$sel:sequenceStoreId:GetReadSetActivationJob' :: GetReadSetActivationJob -> Text
$sel:id:GetReadSetActivationJob' :: GetReadSetActivationJob -> Text
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Text
id
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
sequenceStoreId

instance Data.ToHeaders GetReadSetActivationJob where
  toHeaders :: GetReadSetActivationJob -> ResponseHeaders
toHeaders =
    forall a b. a -> b -> a
Prelude.const
      ( forall a. Monoid a => [a] -> a
Prelude.mconcat
          [ HeaderName
"Content-Type"
              forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
                          Prelude.ByteString
                      )
          ]
      )

instance Data.ToPath GetReadSetActivationJob where
  toPath :: GetReadSetActivationJob -> ByteString
toPath GetReadSetActivationJob' {Text
sequenceStoreId :: Text
id :: Text
$sel:sequenceStoreId:GetReadSetActivationJob' :: GetReadSetActivationJob -> Text
$sel:id:GetReadSetActivationJob' :: GetReadSetActivationJob -> Text
..} =
    forall a. Monoid a => [a] -> a
Prelude.mconcat
      [ ByteString
"/sequencestore/",
        forall a. ToByteString a => a -> ByteString
Data.toBS Text
sequenceStoreId,
        ByteString
"/activationjob/",
        forall a. ToByteString a => a -> ByteString
Data.toBS Text
id
      ]

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

-- | /See:/ 'newGetReadSetActivationJobResponse' smart constructor.
data GetReadSetActivationJobResponse = GetReadSetActivationJobResponse'
  { -- | When the job completed.
    GetReadSetActivationJobResponse -> Maybe ISO8601
completionTime :: Prelude.Maybe Data.ISO8601,
    -- | The job\'s sources.
    GetReadSetActivationJobResponse
-> Maybe [ActivateReadSetSourceItem]
sources :: Prelude.Maybe [ActivateReadSetSourceItem],
    -- | The job\'s status message.
    GetReadSetActivationJobResponse -> Maybe Text
statusMessage :: Prelude.Maybe Prelude.Text,
    -- | The response's http status code.
    GetReadSetActivationJobResponse -> Int
httpStatus :: Prelude.Int,
    -- | When the job was created.
    GetReadSetActivationJobResponse -> ISO8601
creationTime :: Data.ISO8601,
    -- | The job\'s ID.
    GetReadSetActivationJobResponse -> Text
id :: Prelude.Text,
    -- | The job\'s sequence store ID.
    GetReadSetActivationJobResponse -> Text
sequenceStoreId :: Prelude.Text,
    -- | The job\'s status.
    GetReadSetActivationJobResponse -> ReadSetActivationJobStatus
status :: ReadSetActivationJobStatus
  }
  deriving (GetReadSetActivationJobResponse
-> GetReadSetActivationJobResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetReadSetActivationJobResponse
-> GetReadSetActivationJobResponse -> Bool
$c/= :: GetReadSetActivationJobResponse
-> GetReadSetActivationJobResponse -> Bool
== :: GetReadSetActivationJobResponse
-> GetReadSetActivationJobResponse -> Bool
$c== :: GetReadSetActivationJobResponse
-> GetReadSetActivationJobResponse -> Bool
Prelude.Eq, ReadPrec [GetReadSetActivationJobResponse]
ReadPrec GetReadSetActivationJobResponse
Int -> ReadS GetReadSetActivationJobResponse
ReadS [GetReadSetActivationJobResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetReadSetActivationJobResponse]
$creadListPrec :: ReadPrec [GetReadSetActivationJobResponse]
readPrec :: ReadPrec GetReadSetActivationJobResponse
$creadPrec :: ReadPrec GetReadSetActivationJobResponse
readList :: ReadS [GetReadSetActivationJobResponse]
$creadList :: ReadS [GetReadSetActivationJobResponse]
readsPrec :: Int -> ReadS GetReadSetActivationJobResponse
$creadsPrec :: Int -> ReadS GetReadSetActivationJobResponse
Prelude.Read, Int -> GetReadSetActivationJobResponse -> ShowS
[GetReadSetActivationJobResponse] -> ShowS
GetReadSetActivationJobResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetReadSetActivationJobResponse] -> ShowS
$cshowList :: [GetReadSetActivationJobResponse] -> ShowS
show :: GetReadSetActivationJobResponse -> String
$cshow :: GetReadSetActivationJobResponse -> String
showsPrec :: Int -> GetReadSetActivationJobResponse -> ShowS
$cshowsPrec :: Int -> GetReadSetActivationJobResponse -> ShowS
Prelude.Show, forall x.
Rep GetReadSetActivationJobResponse x
-> GetReadSetActivationJobResponse
forall x.
GetReadSetActivationJobResponse
-> Rep GetReadSetActivationJobResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetReadSetActivationJobResponse x
-> GetReadSetActivationJobResponse
$cfrom :: forall x.
GetReadSetActivationJobResponse
-> Rep GetReadSetActivationJobResponse x
Prelude.Generic)

-- |
-- Create a value of 'GetReadSetActivationJobResponse' 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:
--
-- 'completionTime', 'getReadSetActivationJobResponse_completionTime' - When the job completed.
--
-- 'sources', 'getReadSetActivationJobResponse_sources' - The job\'s sources.
--
-- 'statusMessage', 'getReadSetActivationJobResponse_statusMessage' - The job\'s status message.
--
-- 'httpStatus', 'getReadSetActivationJobResponse_httpStatus' - The response's http status code.
--
-- 'creationTime', 'getReadSetActivationJobResponse_creationTime' - When the job was created.
--
-- 'id', 'getReadSetActivationJobResponse_id' - The job\'s ID.
--
-- 'sequenceStoreId', 'getReadSetActivationJobResponse_sequenceStoreId' - The job\'s sequence store ID.
--
-- 'status', 'getReadSetActivationJobResponse_status' - The job\'s status.
newGetReadSetActivationJobResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  -- | 'creationTime'
  Prelude.UTCTime ->
  -- | 'id'
  Prelude.Text ->
  -- | 'sequenceStoreId'
  Prelude.Text ->
  -- | 'status'
  ReadSetActivationJobStatus ->
  GetReadSetActivationJobResponse
newGetReadSetActivationJobResponse :: Int
-> UTCTime
-> Text
-> Text
-> ReadSetActivationJobStatus
-> GetReadSetActivationJobResponse
newGetReadSetActivationJobResponse
  Int
pHttpStatus_
  UTCTime
pCreationTime_
  Text
pId_
  Text
pSequenceStoreId_
  ReadSetActivationJobStatus
pStatus_ =
    GetReadSetActivationJobResponse'
      { $sel:completionTime:GetReadSetActivationJobResponse' :: Maybe ISO8601
completionTime =
          forall a. Maybe a
Prelude.Nothing,
        $sel:sources:GetReadSetActivationJobResponse' :: Maybe [ActivateReadSetSourceItem]
sources = forall a. Maybe a
Prelude.Nothing,
        $sel:statusMessage:GetReadSetActivationJobResponse' :: Maybe Text
statusMessage = forall a. Maybe a
Prelude.Nothing,
        $sel:httpStatus:GetReadSetActivationJobResponse' :: Int
httpStatus = Int
pHttpStatus_,
        $sel:creationTime:GetReadSetActivationJobResponse' :: ISO8601
creationTime =
          forall (a :: Format). Iso' (Time a) UTCTime
Data._Time forall t b. AReview t b -> b -> t
Lens.# UTCTime
pCreationTime_,
        $sel:id:GetReadSetActivationJobResponse' :: Text
id = Text
pId_,
        $sel:sequenceStoreId:GetReadSetActivationJobResponse' :: Text
sequenceStoreId = Text
pSequenceStoreId_,
        $sel:status:GetReadSetActivationJobResponse' :: ReadSetActivationJobStatus
status = ReadSetActivationJobStatus
pStatus_
      }

-- | When the job completed.
getReadSetActivationJobResponse_completionTime :: Lens.Lens' GetReadSetActivationJobResponse (Prelude.Maybe Prelude.UTCTime)
getReadSetActivationJobResponse_completionTime :: Lens' GetReadSetActivationJobResponse (Maybe UTCTime)
getReadSetActivationJobResponse_completionTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetReadSetActivationJobResponse' {Maybe ISO8601
completionTime :: Maybe ISO8601
$sel:completionTime:GetReadSetActivationJobResponse' :: GetReadSetActivationJobResponse -> Maybe ISO8601
completionTime} -> Maybe ISO8601
completionTime) (\s :: GetReadSetActivationJobResponse
s@GetReadSetActivationJobResponse' {} Maybe ISO8601
a -> GetReadSetActivationJobResponse
s {$sel:completionTime:GetReadSetActivationJobResponse' :: Maybe ISO8601
completionTime = Maybe ISO8601
a} :: GetReadSetActivationJobResponse) 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 (a :: Format). Iso' (Time a) UTCTime
Data._Time

-- | The job\'s sources.
getReadSetActivationJobResponse_sources :: Lens.Lens' GetReadSetActivationJobResponse (Prelude.Maybe [ActivateReadSetSourceItem])
getReadSetActivationJobResponse_sources :: Lens'
  GetReadSetActivationJobResponse (Maybe [ActivateReadSetSourceItem])
getReadSetActivationJobResponse_sources = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetReadSetActivationJobResponse' {Maybe [ActivateReadSetSourceItem]
sources :: Maybe [ActivateReadSetSourceItem]
$sel:sources:GetReadSetActivationJobResponse' :: GetReadSetActivationJobResponse
-> Maybe [ActivateReadSetSourceItem]
sources} -> Maybe [ActivateReadSetSourceItem]
sources) (\s :: GetReadSetActivationJobResponse
s@GetReadSetActivationJobResponse' {} Maybe [ActivateReadSetSourceItem]
a -> GetReadSetActivationJobResponse
s {$sel:sources:GetReadSetActivationJobResponse' :: Maybe [ActivateReadSetSourceItem]
sources = Maybe [ActivateReadSetSourceItem]
a} :: GetReadSetActivationJobResponse) 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 job\'s status message.
getReadSetActivationJobResponse_statusMessage :: Lens.Lens' GetReadSetActivationJobResponse (Prelude.Maybe Prelude.Text)
getReadSetActivationJobResponse_statusMessage :: Lens' GetReadSetActivationJobResponse (Maybe Text)
getReadSetActivationJobResponse_statusMessage = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetReadSetActivationJobResponse' {Maybe Text
statusMessage :: Maybe Text
$sel:statusMessage:GetReadSetActivationJobResponse' :: GetReadSetActivationJobResponse -> Maybe Text
statusMessage} -> Maybe Text
statusMessage) (\s :: GetReadSetActivationJobResponse
s@GetReadSetActivationJobResponse' {} Maybe Text
a -> GetReadSetActivationJobResponse
s {$sel:statusMessage:GetReadSetActivationJobResponse' :: Maybe Text
statusMessage = Maybe Text
a} :: GetReadSetActivationJobResponse)

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

-- | When the job was created.
getReadSetActivationJobResponse_creationTime :: Lens.Lens' GetReadSetActivationJobResponse Prelude.UTCTime
getReadSetActivationJobResponse_creationTime :: Lens' GetReadSetActivationJobResponse UTCTime
getReadSetActivationJobResponse_creationTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetReadSetActivationJobResponse' {ISO8601
creationTime :: ISO8601
$sel:creationTime:GetReadSetActivationJobResponse' :: GetReadSetActivationJobResponse -> ISO8601
creationTime} -> ISO8601
creationTime) (\s :: GetReadSetActivationJobResponse
s@GetReadSetActivationJobResponse' {} ISO8601
a -> GetReadSetActivationJobResponse
s {$sel:creationTime:GetReadSetActivationJobResponse' :: ISO8601
creationTime = ISO8601
a} :: GetReadSetActivationJobResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (a :: Format). Iso' (Time a) UTCTime
Data._Time

-- | The job\'s ID.
getReadSetActivationJobResponse_id :: Lens.Lens' GetReadSetActivationJobResponse Prelude.Text
getReadSetActivationJobResponse_id :: Lens' GetReadSetActivationJobResponse Text
getReadSetActivationJobResponse_id = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetReadSetActivationJobResponse' {Text
id :: Text
$sel:id:GetReadSetActivationJobResponse' :: GetReadSetActivationJobResponse -> Text
id} -> Text
id) (\s :: GetReadSetActivationJobResponse
s@GetReadSetActivationJobResponse' {} Text
a -> GetReadSetActivationJobResponse
s {$sel:id:GetReadSetActivationJobResponse' :: Text
id = Text
a} :: GetReadSetActivationJobResponse)

-- | The job\'s sequence store ID.
getReadSetActivationJobResponse_sequenceStoreId :: Lens.Lens' GetReadSetActivationJobResponse Prelude.Text
getReadSetActivationJobResponse_sequenceStoreId :: Lens' GetReadSetActivationJobResponse Text
getReadSetActivationJobResponse_sequenceStoreId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetReadSetActivationJobResponse' {Text
sequenceStoreId :: Text
$sel:sequenceStoreId:GetReadSetActivationJobResponse' :: GetReadSetActivationJobResponse -> Text
sequenceStoreId} -> Text
sequenceStoreId) (\s :: GetReadSetActivationJobResponse
s@GetReadSetActivationJobResponse' {} Text
a -> GetReadSetActivationJobResponse
s {$sel:sequenceStoreId:GetReadSetActivationJobResponse' :: Text
sequenceStoreId = Text
a} :: GetReadSetActivationJobResponse)

-- | The job\'s status.
getReadSetActivationJobResponse_status :: Lens.Lens' GetReadSetActivationJobResponse ReadSetActivationJobStatus
getReadSetActivationJobResponse_status :: Lens' GetReadSetActivationJobResponse ReadSetActivationJobStatus
getReadSetActivationJobResponse_status = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetReadSetActivationJobResponse' {ReadSetActivationJobStatus
status :: ReadSetActivationJobStatus
$sel:status:GetReadSetActivationJobResponse' :: GetReadSetActivationJobResponse -> ReadSetActivationJobStatus
status} -> ReadSetActivationJobStatus
status) (\s :: GetReadSetActivationJobResponse
s@GetReadSetActivationJobResponse' {} ReadSetActivationJobStatus
a -> GetReadSetActivationJobResponse
s {$sel:status:GetReadSetActivationJobResponse' :: ReadSetActivationJobStatus
status = ReadSetActivationJobStatus
a} :: GetReadSetActivationJobResponse)

instance
  Prelude.NFData
    GetReadSetActivationJobResponse
  where
  rnf :: GetReadSetActivationJobResponse -> ()
rnf GetReadSetActivationJobResponse' {Int
Maybe [ActivateReadSetSourceItem]
Maybe Text
Maybe ISO8601
Text
ISO8601
ReadSetActivationJobStatus
status :: ReadSetActivationJobStatus
sequenceStoreId :: Text
id :: Text
creationTime :: ISO8601
httpStatus :: Int
statusMessage :: Maybe Text
sources :: Maybe [ActivateReadSetSourceItem]
completionTime :: Maybe ISO8601
$sel:status:GetReadSetActivationJobResponse' :: GetReadSetActivationJobResponse -> ReadSetActivationJobStatus
$sel:sequenceStoreId:GetReadSetActivationJobResponse' :: GetReadSetActivationJobResponse -> Text
$sel:id:GetReadSetActivationJobResponse' :: GetReadSetActivationJobResponse -> Text
$sel:creationTime:GetReadSetActivationJobResponse' :: GetReadSetActivationJobResponse -> ISO8601
$sel:httpStatus:GetReadSetActivationJobResponse' :: GetReadSetActivationJobResponse -> Int
$sel:statusMessage:GetReadSetActivationJobResponse' :: GetReadSetActivationJobResponse -> Maybe Text
$sel:sources:GetReadSetActivationJobResponse' :: GetReadSetActivationJobResponse
-> Maybe [ActivateReadSetSourceItem]
$sel:completionTime:GetReadSetActivationJobResponse' :: GetReadSetActivationJobResponse -> Maybe ISO8601
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe ISO8601
completionTime
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [ActivateReadSetSourceItem]
sources
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
statusMessage
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf ISO8601
creationTime
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
id
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
sequenceStoreId
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf ReadSetActivationJobStatus
status