{-# 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.FinSpaceData.GetChangeset
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Get information about a Changeset.
module Amazonka.FinSpaceData.GetChangeset
  ( -- * Creating a Request
    GetChangeset (..),
    newGetChangeset,

    -- * Request Lenses
    getChangeset_datasetId,
    getChangeset_changesetId,

    -- * Destructuring the Response
    GetChangesetResponse (..),
    newGetChangesetResponse,

    -- * Response Lenses
    getChangesetResponse_activeFromTimestamp,
    getChangesetResponse_activeUntilTimestamp,
    getChangesetResponse_changeType,
    getChangesetResponse_changesetArn,
    getChangesetResponse_changesetId,
    getChangesetResponse_createTime,
    getChangesetResponse_datasetId,
    getChangesetResponse_errorInfo,
    getChangesetResponse_formatParams,
    getChangesetResponse_sourceParams,
    getChangesetResponse_status,
    getChangesetResponse_updatedByChangesetId,
    getChangesetResponse_updatesChangesetId,
    getChangesetResponse_httpStatus,
  )
where

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

-- | Request to describe a changeset.
--
-- /See:/ 'newGetChangeset' smart constructor.
data GetChangeset = GetChangeset'
  { -- | The unique identifier for the FinSpace Dataset where the Changeset is
    -- created.
    GetChangeset -> Text
datasetId :: Prelude.Text,
    -- | The unique identifier of the Changeset for which to get data.
    GetChangeset -> Text
changesetId :: Prelude.Text
  }
  deriving (GetChangeset -> GetChangeset -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetChangeset -> GetChangeset -> Bool
$c/= :: GetChangeset -> GetChangeset -> Bool
== :: GetChangeset -> GetChangeset -> Bool
$c== :: GetChangeset -> GetChangeset -> Bool
Prelude.Eq, ReadPrec [GetChangeset]
ReadPrec GetChangeset
Int -> ReadS GetChangeset
ReadS [GetChangeset]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetChangeset]
$creadListPrec :: ReadPrec [GetChangeset]
readPrec :: ReadPrec GetChangeset
$creadPrec :: ReadPrec GetChangeset
readList :: ReadS [GetChangeset]
$creadList :: ReadS [GetChangeset]
readsPrec :: Int -> ReadS GetChangeset
$creadsPrec :: Int -> ReadS GetChangeset
Prelude.Read, Int -> GetChangeset -> ShowS
[GetChangeset] -> ShowS
GetChangeset -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetChangeset] -> ShowS
$cshowList :: [GetChangeset] -> ShowS
show :: GetChangeset -> String
$cshow :: GetChangeset -> String
showsPrec :: Int -> GetChangeset -> ShowS
$cshowsPrec :: Int -> GetChangeset -> ShowS
Prelude.Show, forall x. Rep GetChangeset x -> GetChangeset
forall x. GetChangeset -> Rep GetChangeset x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep GetChangeset x -> GetChangeset
$cfrom :: forall x. GetChangeset -> Rep GetChangeset x
Prelude.Generic)

-- |
-- Create a value of 'GetChangeset' 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:
--
-- 'datasetId', 'getChangeset_datasetId' - The unique identifier for the FinSpace Dataset where the Changeset is
-- created.
--
-- 'changesetId', 'getChangeset_changesetId' - The unique identifier of the Changeset for which to get data.
newGetChangeset ::
  -- | 'datasetId'
  Prelude.Text ->
  -- | 'changesetId'
  Prelude.Text ->
  GetChangeset
newGetChangeset :: Text -> Text -> GetChangeset
newGetChangeset Text
pDatasetId_ Text
pChangesetId_ =
  GetChangeset'
    { $sel:datasetId:GetChangeset' :: Text
datasetId = Text
pDatasetId_,
      $sel:changesetId:GetChangeset' :: Text
changesetId = Text
pChangesetId_
    }

-- | The unique identifier for the FinSpace Dataset where the Changeset is
-- created.
getChangeset_datasetId :: Lens.Lens' GetChangeset Prelude.Text
getChangeset_datasetId :: Lens' GetChangeset Text
getChangeset_datasetId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetChangeset' {Text
datasetId :: Text
$sel:datasetId:GetChangeset' :: GetChangeset -> Text
datasetId} -> Text
datasetId) (\s :: GetChangeset
s@GetChangeset' {} Text
a -> GetChangeset
s {$sel:datasetId:GetChangeset' :: Text
datasetId = Text
a} :: GetChangeset)

-- | The unique identifier of the Changeset for which to get data.
getChangeset_changesetId :: Lens.Lens' GetChangeset Prelude.Text
getChangeset_changesetId :: Lens' GetChangeset Text
getChangeset_changesetId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetChangeset' {Text
changesetId :: Text
$sel:changesetId:GetChangeset' :: GetChangeset -> Text
changesetId} -> Text
changesetId) (\s :: GetChangeset
s@GetChangeset' {} Text
a -> GetChangeset
s {$sel:changesetId:GetChangeset' :: Text
changesetId = Text
a} :: GetChangeset)

instance Core.AWSRequest GetChangeset where
  type AWSResponse GetChangeset = GetChangesetResponse
  request :: (Service -> Service) -> GetChangeset -> Request GetChangeset
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 GetChangeset
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse GetChangeset)))
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 Integer
-> Maybe Integer
-> Maybe ChangeType
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Text
-> Maybe ChangesetErrorInfo
-> Maybe (HashMap Text Text)
-> Maybe (HashMap Text Text)
-> Maybe IngestionStatus
-> Maybe Text
-> Maybe Text
-> Int
-> GetChangesetResponse
GetChangesetResponse'
            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
"activeFromTimestamp")
            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
"activeUntilTimestamp")
            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
"changeType")
            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
"changesetArn")
            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
"changesetId")
            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
"createTime")
            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
"datasetId")
            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
"errorInfo")
            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
"formatParams" 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
"sourceParams" 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
"status")
            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
"updatedByChangesetId")
            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
"updatesChangesetId")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
      )

instance Prelude.Hashable GetChangeset where
  hashWithSalt :: Int -> GetChangeset -> Int
hashWithSalt Int
_salt GetChangeset' {Text
changesetId :: Text
datasetId :: Text
$sel:changesetId:GetChangeset' :: GetChangeset -> Text
$sel:datasetId:GetChangeset' :: GetChangeset -> Text
..} =
    Int
_salt
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
datasetId
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
changesetId

instance Prelude.NFData GetChangeset where
  rnf :: GetChangeset -> ()
rnf GetChangeset' {Text
changesetId :: Text
datasetId :: Text
$sel:changesetId:GetChangeset' :: GetChangeset -> Text
$sel:datasetId:GetChangeset' :: GetChangeset -> Text
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Text
datasetId
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
changesetId

instance Data.ToHeaders GetChangeset where
  toHeaders :: GetChangeset -> 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 GetChangeset where
  toPath :: GetChangeset -> ByteString
toPath GetChangeset' {Text
changesetId :: Text
datasetId :: Text
$sel:changesetId:GetChangeset' :: GetChangeset -> Text
$sel:datasetId:GetChangeset' :: GetChangeset -> Text
..} =
    forall a. Monoid a => [a] -> a
Prelude.mconcat
      [ ByteString
"/datasets/",
        forall a. ToByteString a => a -> ByteString
Data.toBS Text
datasetId,
        ByteString
"/changesetsv2/",
        forall a. ToByteString a => a -> ByteString
Data.toBS Text
changesetId
      ]

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

-- | The response from a describe changeset operation
--
-- /See:/ 'newGetChangesetResponse' smart constructor.
data GetChangesetResponse = GetChangesetResponse'
  { -- | Beginning time from which the Changeset is active. The value is
    -- determined as epoch time in milliseconds. For example, the value for
    -- Monday, November 1, 2021 12:00:00 PM UTC is specified as 1635768000000.
    GetChangesetResponse -> Maybe Integer
activeFromTimestamp :: Prelude.Maybe Prelude.Integer,
    -- | Time until which the Changeset is active. The value is determined as
    -- epoch time in milliseconds. For example, the value for Monday, November
    -- 1, 2021 12:00:00 PM UTC is specified as 1635768000000.
    GetChangesetResponse -> Maybe Integer
activeUntilTimestamp :: Prelude.Maybe Prelude.Integer,
    -- | Type that indicates how a Changeset is applied to a Dataset.
    --
    -- -   @REPLACE@ – Changeset is considered as a replacement to all prior
    --     loaded Changesets.
    --
    -- -   @APPEND@ – Changeset is considered as an addition to the end of all
    --     prior loaded Changesets.
    --
    -- -   @MODIFY@ – Changeset is considered as a replacement to a specific
    --     prior ingested Changeset.
    GetChangesetResponse -> Maybe ChangeType
changeType :: Prelude.Maybe ChangeType,
    -- | The ARN identifier of the Changeset.
    GetChangesetResponse -> Maybe Text
changesetArn :: Prelude.Maybe Prelude.Text,
    -- | The unique identifier for a Changeset.
    GetChangesetResponse -> Maybe Text
changesetId :: Prelude.Maybe Prelude.Text,
    -- | The timestamp at which the Changeset was created in FinSpace. The value
    -- is determined as epoch time in milliseconds. For example, the value for
    -- Monday, November 1, 2021 12:00:00 PM UTC is specified as 1635768000000.
    GetChangesetResponse -> Maybe Integer
createTime :: Prelude.Maybe Prelude.Integer,
    -- | The unique identifier for the FinSpace Dataset where the Changeset is
    -- created.
    GetChangesetResponse -> Maybe Text
datasetId :: Prelude.Maybe Prelude.Text,
    -- | The structure with error messages.
    GetChangesetResponse -> Maybe ChangesetErrorInfo
errorInfo :: Prelude.Maybe ChangesetErrorInfo,
    -- | Structure of the source file(s).
    GetChangesetResponse -> Maybe (HashMap Text Text)
formatParams :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
    -- | Options that define the location of the data being ingested.
    GetChangesetResponse -> Maybe (HashMap Text Text)
sourceParams :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
    -- | The status of Changeset creation operation.
    GetChangesetResponse -> Maybe IngestionStatus
status :: Prelude.Maybe IngestionStatus,
    -- | The unique identifier of the updated Changeset.
    GetChangesetResponse -> Maybe Text
updatedByChangesetId :: Prelude.Maybe Prelude.Text,
    -- | The unique identifier of the Changeset that is being updated.
    GetChangesetResponse -> Maybe Text
updatesChangesetId :: Prelude.Maybe Prelude.Text,
    -- | The response's http status code.
    GetChangesetResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (GetChangesetResponse -> GetChangesetResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetChangesetResponse -> GetChangesetResponse -> Bool
$c/= :: GetChangesetResponse -> GetChangesetResponse -> Bool
== :: GetChangesetResponse -> GetChangesetResponse -> Bool
$c== :: GetChangesetResponse -> GetChangesetResponse -> Bool
Prelude.Eq, ReadPrec [GetChangesetResponse]
ReadPrec GetChangesetResponse
Int -> ReadS GetChangesetResponse
ReadS [GetChangesetResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetChangesetResponse]
$creadListPrec :: ReadPrec [GetChangesetResponse]
readPrec :: ReadPrec GetChangesetResponse
$creadPrec :: ReadPrec GetChangesetResponse
readList :: ReadS [GetChangesetResponse]
$creadList :: ReadS [GetChangesetResponse]
readsPrec :: Int -> ReadS GetChangesetResponse
$creadsPrec :: Int -> ReadS GetChangesetResponse
Prelude.Read, Int -> GetChangesetResponse -> ShowS
[GetChangesetResponse] -> ShowS
GetChangesetResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetChangesetResponse] -> ShowS
$cshowList :: [GetChangesetResponse] -> ShowS
show :: GetChangesetResponse -> String
$cshow :: GetChangesetResponse -> String
showsPrec :: Int -> GetChangesetResponse -> ShowS
$cshowsPrec :: Int -> GetChangesetResponse -> ShowS
Prelude.Show, forall x. Rep GetChangesetResponse x -> GetChangesetResponse
forall x. GetChangesetResponse -> Rep GetChangesetResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep GetChangesetResponse x -> GetChangesetResponse
$cfrom :: forall x. GetChangesetResponse -> Rep GetChangesetResponse x
Prelude.Generic)

-- |
-- Create a value of 'GetChangesetResponse' 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:
--
-- 'activeFromTimestamp', 'getChangesetResponse_activeFromTimestamp' - Beginning time from which the Changeset is active. The value is
-- determined as epoch time in milliseconds. For example, the value for
-- Monday, November 1, 2021 12:00:00 PM UTC is specified as 1635768000000.
--
-- 'activeUntilTimestamp', 'getChangesetResponse_activeUntilTimestamp' - Time until which the Changeset is active. The value is determined as
-- epoch time in milliseconds. For example, the value for Monday, November
-- 1, 2021 12:00:00 PM UTC is specified as 1635768000000.
--
-- 'changeType', 'getChangesetResponse_changeType' - Type that indicates how a Changeset is applied to a Dataset.
--
-- -   @REPLACE@ – Changeset is considered as a replacement to all prior
--     loaded Changesets.
--
-- -   @APPEND@ – Changeset is considered as an addition to the end of all
--     prior loaded Changesets.
--
-- -   @MODIFY@ – Changeset is considered as a replacement to a specific
--     prior ingested Changeset.
--
-- 'changesetArn', 'getChangesetResponse_changesetArn' - The ARN identifier of the Changeset.
--
-- 'changesetId', 'getChangesetResponse_changesetId' - The unique identifier for a Changeset.
--
-- 'createTime', 'getChangesetResponse_createTime' - The timestamp at which the Changeset was created in FinSpace. The value
-- is determined as epoch time in milliseconds. For example, the value for
-- Monday, November 1, 2021 12:00:00 PM UTC is specified as 1635768000000.
--
-- 'datasetId', 'getChangesetResponse_datasetId' - The unique identifier for the FinSpace Dataset where the Changeset is
-- created.
--
-- 'errorInfo', 'getChangesetResponse_errorInfo' - The structure with error messages.
--
-- 'formatParams', 'getChangesetResponse_formatParams' - Structure of the source file(s).
--
-- 'sourceParams', 'getChangesetResponse_sourceParams' - Options that define the location of the data being ingested.
--
-- 'status', 'getChangesetResponse_status' - The status of Changeset creation operation.
--
-- 'updatedByChangesetId', 'getChangesetResponse_updatedByChangesetId' - The unique identifier of the updated Changeset.
--
-- 'updatesChangesetId', 'getChangesetResponse_updatesChangesetId' - The unique identifier of the Changeset that is being updated.
--
-- 'httpStatus', 'getChangesetResponse_httpStatus' - The response's http status code.
newGetChangesetResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  GetChangesetResponse
newGetChangesetResponse :: Int -> GetChangesetResponse
newGetChangesetResponse Int
pHttpStatus_ =
  GetChangesetResponse'
    { $sel:activeFromTimestamp:GetChangesetResponse' :: Maybe Integer
activeFromTimestamp =
        forall a. Maybe a
Prelude.Nothing,
      $sel:activeUntilTimestamp:GetChangesetResponse' :: Maybe Integer
activeUntilTimestamp = forall a. Maybe a
Prelude.Nothing,
      $sel:changeType:GetChangesetResponse' :: Maybe ChangeType
changeType = forall a. Maybe a
Prelude.Nothing,
      $sel:changesetArn:GetChangesetResponse' :: Maybe Text
changesetArn = forall a. Maybe a
Prelude.Nothing,
      $sel:changesetId:GetChangesetResponse' :: Maybe Text
changesetId = forall a. Maybe a
Prelude.Nothing,
      $sel:createTime:GetChangesetResponse' :: Maybe Integer
createTime = forall a. Maybe a
Prelude.Nothing,
      $sel:datasetId:GetChangesetResponse' :: Maybe Text
datasetId = forall a. Maybe a
Prelude.Nothing,
      $sel:errorInfo:GetChangesetResponse' :: Maybe ChangesetErrorInfo
errorInfo = forall a. Maybe a
Prelude.Nothing,
      $sel:formatParams:GetChangesetResponse' :: Maybe (HashMap Text Text)
formatParams = forall a. Maybe a
Prelude.Nothing,
      $sel:sourceParams:GetChangesetResponse' :: Maybe (HashMap Text Text)
sourceParams = forall a. Maybe a
Prelude.Nothing,
      $sel:status:GetChangesetResponse' :: Maybe IngestionStatus
status = forall a. Maybe a
Prelude.Nothing,
      $sel:updatedByChangesetId:GetChangesetResponse' :: Maybe Text
updatedByChangesetId = forall a. Maybe a
Prelude.Nothing,
      $sel:updatesChangesetId:GetChangesetResponse' :: Maybe Text
updatesChangesetId = forall a. Maybe a
Prelude.Nothing,
      $sel:httpStatus:GetChangesetResponse' :: Int
httpStatus = Int
pHttpStatus_
    }

-- | Beginning time from which the Changeset is active. The value is
-- determined as epoch time in milliseconds. For example, the value for
-- Monday, November 1, 2021 12:00:00 PM UTC is specified as 1635768000000.
getChangesetResponse_activeFromTimestamp :: Lens.Lens' GetChangesetResponse (Prelude.Maybe Prelude.Integer)
getChangesetResponse_activeFromTimestamp :: Lens' GetChangesetResponse (Maybe Integer)
getChangesetResponse_activeFromTimestamp = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetChangesetResponse' {Maybe Integer
activeFromTimestamp :: Maybe Integer
$sel:activeFromTimestamp:GetChangesetResponse' :: GetChangesetResponse -> Maybe Integer
activeFromTimestamp} -> Maybe Integer
activeFromTimestamp) (\s :: GetChangesetResponse
s@GetChangesetResponse' {} Maybe Integer
a -> GetChangesetResponse
s {$sel:activeFromTimestamp:GetChangesetResponse' :: Maybe Integer
activeFromTimestamp = Maybe Integer
a} :: GetChangesetResponse)

-- | Time until which the Changeset is active. The value is determined as
-- epoch time in milliseconds. For example, the value for Monday, November
-- 1, 2021 12:00:00 PM UTC is specified as 1635768000000.
getChangesetResponse_activeUntilTimestamp :: Lens.Lens' GetChangesetResponse (Prelude.Maybe Prelude.Integer)
getChangesetResponse_activeUntilTimestamp :: Lens' GetChangesetResponse (Maybe Integer)
getChangesetResponse_activeUntilTimestamp = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetChangesetResponse' {Maybe Integer
activeUntilTimestamp :: Maybe Integer
$sel:activeUntilTimestamp:GetChangesetResponse' :: GetChangesetResponse -> Maybe Integer
activeUntilTimestamp} -> Maybe Integer
activeUntilTimestamp) (\s :: GetChangesetResponse
s@GetChangesetResponse' {} Maybe Integer
a -> GetChangesetResponse
s {$sel:activeUntilTimestamp:GetChangesetResponse' :: Maybe Integer
activeUntilTimestamp = Maybe Integer
a} :: GetChangesetResponse)

-- | Type that indicates how a Changeset is applied to a Dataset.
--
-- -   @REPLACE@ – Changeset is considered as a replacement to all prior
--     loaded Changesets.
--
-- -   @APPEND@ – Changeset is considered as an addition to the end of all
--     prior loaded Changesets.
--
-- -   @MODIFY@ – Changeset is considered as a replacement to a specific
--     prior ingested Changeset.
getChangesetResponse_changeType :: Lens.Lens' GetChangesetResponse (Prelude.Maybe ChangeType)
getChangesetResponse_changeType :: Lens' GetChangesetResponse (Maybe ChangeType)
getChangesetResponse_changeType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetChangesetResponse' {Maybe ChangeType
changeType :: Maybe ChangeType
$sel:changeType:GetChangesetResponse' :: GetChangesetResponse -> Maybe ChangeType
changeType} -> Maybe ChangeType
changeType) (\s :: GetChangesetResponse
s@GetChangesetResponse' {} Maybe ChangeType
a -> GetChangesetResponse
s {$sel:changeType:GetChangesetResponse' :: Maybe ChangeType
changeType = Maybe ChangeType
a} :: GetChangesetResponse)

-- | The ARN identifier of the Changeset.
getChangesetResponse_changesetArn :: Lens.Lens' GetChangesetResponse (Prelude.Maybe Prelude.Text)
getChangesetResponse_changesetArn :: Lens' GetChangesetResponse (Maybe Text)
getChangesetResponse_changesetArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetChangesetResponse' {Maybe Text
changesetArn :: Maybe Text
$sel:changesetArn:GetChangesetResponse' :: GetChangesetResponse -> Maybe Text
changesetArn} -> Maybe Text
changesetArn) (\s :: GetChangesetResponse
s@GetChangesetResponse' {} Maybe Text
a -> GetChangesetResponse
s {$sel:changesetArn:GetChangesetResponse' :: Maybe Text
changesetArn = Maybe Text
a} :: GetChangesetResponse)

-- | The unique identifier for a Changeset.
getChangesetResponse_changesetId :: Lens.Lens' GetChangesetResponse (Prelude.Maybe Prelude.Text)
getChangesetResponse_changesetId :: Lens' GetChangesetResponse (Maybe Text)
getChangesetResponse_changesetId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetChangesetResponse' {Maybe Text
changesetId :: Maybe Text
$sel:changesetId:GetChangesetResponse' :: GetChangesetResponse -> Maybe Text
changesetId} -> Maybe Text
changesetId) (\s :: GetChangesetResponse
s@GetChangesetResponse' {} Maybe Text
a -> GetChangesetResponse
s {$sel:changesetId:GetChangesetResponse' :: Maybe Text
changesetId = Maybe Text
a} :: GetChangesetResponse)

-- | The timestamp at which the Changeset was created in FinSpace. The value
-- is determined as epoch time in milliseconds. For example, the value for
-- Monday, November 1, 2021 12:00:00 PM UTC is specified as 1635768000000.
getChangesetResponse_createTime :: Lens.Lens' GetChangesetResponse (Prelude.Maybe Prelude.Integer)
getChangesetResponse_createTime :: Lens' GetChangesetResponse (Maybe Integer)
getChangesetResponse_createTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetChangesetResponse' {Maybe Integer
createTime :: Maybe Integer
$sel:createTime:GetChangesetResponse' :: GetChangesetResponse -> Maybe Integer
createTime} -> Maybe Integer
createTime) (\s :: GetChangesetResponse
s@GetChangesetResponse' {} Maybe Integer
a -> GetChangesetResponse
s {$sel:createTime:GetChangesetResponse' :: Maybe Integer
createTime = Maybe Integer
a} :: GetChangesetResponse)

-- | The unique identifier for the FinSpace Dataset where the Changeset is
-- created.
getChangesetResponse_datasetId :: Lens.Lens' GetChangesetResponse (Prelude.Maybe Prelude.Text)
getChangesetResponse_datasetId :: Lens' GetChangesetResponse (Maybe Text)
getChangesetResponse_datasetId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetChangesetResponse' {Maybe Text
datasetId :: Maybe Text
$sel:datasetId:GetChangesetResponse' :: GetChangesetResponse -> Maybe Text
datasetId} -> Maybe Text
datasetId) (\s :: GetChangesetResponse
s@GetChangesetResponse' {} Maybe Text
a -> GetChangesetResponse
s {$sel:datasetId:GetChangesetResponse' :: Maybe Text
datasetId = Maybe Text
a} :: GetChangesetResponse)

-- | The structure with error messages.
getChangesetResponse_errorInfo :: Lens.Lens' GetChangesetResponse (Prelude.Maybe ChangesetErrorInfo)
getChangesetResponse_errorInfo :: Lens' GetChangesetResponse (Maybe ChangesetErrorInfo)
getChangesetResponse_errorInfo = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetChangesetResponse' {Maybe ChangesetErrorInfo
errorInfo :: Maybe ChangesetErrorInfo
$sel:errorInfo:GetChangesetResponse' :: GetChangesetResponse -> Maybe ChangesetErrorInfo
errorInfo} -> Maybe ChangesetErrorInfo
errorInfo) (\s :: GetChangesetResponse
s@GetChangesetResponse' {} Maybe ChangesetErrorInfo
a -> GetChangesetResponse
s {$sel:errorInfo:GetChangesetResponse' :: Maybe ChangesetErrorInfo
errorInfo = Maybe ChangesetErrorInfo
a} :: GetChangesetResponse)

-- | Structure of the source file(s).
getChangesetResponse_formatParams :: Lens.Lens' GetChangesetResponse (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
getChangesetResponse_formatParams :: Lens' GetChangesetResponse (Maybe (HashMap Text Text))
getChangesetResponse_formatParams = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetChangesetResponse' {Maybe (HashMap Text Text)
formatParams :: Maybe (HashMap Text Text)
$sel:formatParams:GetChangesetResponse' :: GetChangesetResponse -> Maybe (HashMap Text Text)
formatParams} -> Maybe (HashMap Text Text)
formatParams) (\s :: GetChangesetResponse
s@GetChangesetResponse' {} Maybe (HashMap Text Text)
a -> GetChangesetResponse
s {$sel:formatParams:GetChangesetResponse' :: Maybe (HashMap Text Text)
formatParams = Maybe (HashMap Text Text)
a} :: GetChangesetResponse) 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

-- | Options that define the location of the data being ingested.
getChangesetResponse_sourceParams :: Lens.Lens' GetChangesetResponse (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
getChangesetResponse_sourceParams :: Lens' GetChangesetResponse (Maybe (HashMap Text Text))
getChangesetResponse_sourceParams = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetChangesetResponse' {Maybe (HashMap Text Text)
sourceParams :: Maybe (HashMap Text Text)
$sel:sourceParams:GetChangesetResponse' :: GetChangesetResponse -> Maybe (HashMap Text Text)
sourceParams} -> Maybe (HashMap Text Text)
sourceParams) (\s :: GetChangesetResponse
s@GetChangesetResponse' {} Maybe (HashMap Text Text)
a -> GetChangesetResponse
s {$sel:sourceParams:GetChangesetResponse' :: Maybe (HashMap Text Text)
sourceParams = Maybe (HashMap Text Text)
a} :: GetChangesetResponse) 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 status of Changeset creation operation.
getChangesetResponse_status :: Lens.Lens' GetChangesetResponse (Prelude.Maybe IngestionStatus)
getChangesetResponse_status :: Lens' GetChangesetResponse (Maybe IngestionStatus)
getChangesetResponse_status = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetChangesetResponse' {Maybe IngestionStatus
status :: Maybe IngestionStatus
$sel:status:GetChangesetResponse' :: GetChangesetResponse -> Maybe IngestionStatus
status} -> Maybe IngestionStatus
status) (\s :: GetChangesetResponse
s@GetChangesetResponse' {} Maybe IngestionStatus
a -> GetChangesetResponse
s {$sel:status:GetChangesetResponse' :: Maybe IngestionStatus
status = Maybe IngestionStatus
a} :: GetChangesetResponse)

-- | The unique identifier of the updated Changeset.
getChangesetResponse_updatedByChangesetId :: Lens.Lens' GetChangesetResponse (Prelude.Maybe Prelude.Text)
getChangesetResponse_updatedByChangesetId :: Lens' GetChangesetResponse (Maybe Text)
getChangesetResponse_updatedByChangesetId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetChangesetResponse' {Maybe Text
updatedByChangesetId :: Maybe Text
$sel:updatedByChangesetId:GetChangesetResponse' :: GetChangesetResponse -> Maybe Text
updatedByChangesetId} -> Maybe Text
updatedByChangesetId) (\s :: GetChangesetResponse
s@GetChangesetResponse' {} Maybe Text
a -> GetChangesetResponse
s {$sel:updatedByChangesetId:GetChangesetResponse' :: Maybe Text
updatedByChangesetId = Maybe Text
a} :: GetChangesetResponse)

-- | The unique identifier of the Changeset that is being updated.
getChangesetResponse_updatesChangesetId :: Lens.Lens' GetChangesetResponse (Prelude.Maybe Prelude.Text)
getChangesetResponse_updatesChangesetId :: Lens' GetChangesetResponse (Maybe Text)
getChangesetResponse_updatesChangesetId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetChangesetResponse' {Maybe Text
updatesChangesetId :: Maybe Text
$sel:updatesChangesetId:GetChangesetResponse' :: GetChangesetResponse -> Maybe Text
updatesChangesetId} -> Maybe Text
updatesChangesetId) (\s :: GetChangesetResponse
s@GetChangesetResponse' {} Maybe Text
a -> GetChangesetResponse
s {$sel:updatesChangesetId:GetChangesetResponse' :: Maybe Text
updatesChangesetId = Maybe Text
a} :: GetChangesetResponse)

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

instance Prelude.NFData GetChangesetResponse where
  rnf :: GetChangesetResponse -> ()
rnf GetChangesetResponse' {Int
Maybe Integer
Maybe Text
Maybe (HashMap Text Text)
Maybe ChangeType
Maybe ChangesetErrorInfo
Maybe IngestionStatus
httpStatus :: Int
updatesChangesetId :: Maybe Text
updatedByChangesetId :: Maybe Text
status :: Maybe IngestionStatus
sourceParams :: Maybe (HashMap Text Text)
formatParams :: Maybe (HashMap Text Text)
errorInfo :: Maybe ChangesetErrorInfo
datasetId :: Maybe Text
createTime :: Maybe Integer
changesetId :: Maybe Text
changesetArn :: Maybe Text
changeType :: Maybe ChangeType
activeUntilTimestamp :: Maybe Integer
activeFromTimestamp :: Maybe Integer
$sel:httpStatus:GetChangesetResponse' :: GetChangesetResponse -> Int
$sel:updatesChangesetId:GetChangesetResponse' :: GetChangesetResponse -> Maybe Text
$sel:updatedByChangesetId:GetChangesetResponse' :: GetChangesetResponse -> Maybe Text
$sel:status:GetChangesetResponse' :: GetChangesetResponse -> Maybe IngestionStatus
$sel:sourceParams:GetChangesetResponse' :: GetChangesetResponse -> Maybe (HashMap Text Text)
$sel:formatParams:GetChangesetResponse' :: GetChangesetResponse -> Maybe (HashMap Text Text)
$sel:errorInfo:GetChangesetResponse' :: GetChangesetResponse -> Maybe ChangesetErrorInfo
$sel:datasetId:GetChangesetResponse' :: GetChangesetResponse -> Maybe Text
$sel:createTime:GetChangesetResponse' :: GetChangesetResponse -> Maybe Integer
$sel:changesetId:GetChangesetResponse' :: GetChangesetResponse -> Maybe Text
$sel:changesetArn:GetChangesetResponse' :: GetChangesetResponse -> Maybe Text
$sel:changeType:GetChangesetResponse' :: GetChangesetResponse -> Maybe ChangeType
$sel:activeUntilTimestamp:GetChangesetResponse' :: GetChangesetResponse -> Maybe Integer
$sel:activeFromTimestamp:GetChangesetResponse' :: GetChangesetResponse -> Maybe Integer
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe Integer
activeFromTimestamp
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Integer
activeUntilTimestamp
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ChangeType
changeType
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
changesetArn
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
changesetId
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Integer
createTime
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
datasetId
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ChangesetErrorInfo
errorInfo
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text Text)
formatParams
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text Text)
sourceParams
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe IngestionStatus
status
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
updatedByChangesetId
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
updatesChangesetId
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus