{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.FinSpaceData.GetChangeset
(
GetChangeset (..),
newGetChangeset,
getChangeset_datasetId,
getChangeset_changesetId,
GetChangesetResponse (..),
newGetChangesetResponse,
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
data GetChangeset = GetChangeset'
{
GetChangeset -> Text
datasetId :: Prelude.Text,
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)
newGetChangeset ::
Prelude.Text ->
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_
}
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)
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
data GetChangesetResponse = GetChangesetResponse'
{
GetChangesetResponse -> Maybe Integer
activeFromTimestamp :: Prelude.Maybe Prelude.Integer,
GetChangesetResponse -> Maybe Integer
activeUntilTimestamp :: Prelude.Maybe Prelude.Integer,
GetChangesetResponse -> Maybe ChangeType
changeType :: Prelude.Maybe ChangeType,
GetChangesetResponse -> Maybe Text
changesetArn :: Prelude.Maybe Prelude.Text,
GetChangesetResponse -> Maybe Text
changesetId :: Prelude.Maybe Prelude.Text,
GetChangesetResponse -> Maybe Integer
createTime :: Prelude.Maybe Prelude.Integer,
GetChangesetResponse -> Maybe Text
datasetId :: Prelude.Maybe Prelude.Text,
GetChangesetResponse -> Maybe ChangesetErrorInfo
errorInfo :: Prelude.Maybe ChangesetErrorInfo,
GetChangesetResponse -> Maybe (HashMap Text Text)
formatParams :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
GetChangesetResponse -> Maybe (HashMap Text Text)
sourceParams :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
GetChangesetResponse -> Maybe IngestionStatus
status :: Prelude.Maybe IngestionStatus,
GetChangesetResponse -> Maybe Text
updatedByChangesetId :: Prelude.Maybe Prelude.Text,
GetChangesetResponse -> Maybe Text
updatesChangesetId :: Prelude.Maybe Prelude.Text,
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)
newGetChangesetResponse ::
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_
}
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)
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)
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)
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)
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)
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)
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)
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)
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
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
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)
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)
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)
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