{-# 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.Glue.RemoveSchemaVersionMetadata
(
RemoveSchemaVersionMetadata (..),
newRemoveSchemaVersionMetadata,
removeSchemaVersionMetadata_schemaVersionId,
removeSchemaVersionMetadata_schemaId,
removeSchemaVersionMetadata_schemaVersionNumber,
removeSchemaVersionMetadata_metadataKeyValue,
RemoveSchemaVersionMetadataResponse (..),
newRemoveSchemaVersionMetadataResponse,
removeSchemaVersionMetadataResponse_registryName,
removeSchemaVersionMetadataResponse_schemaName,
removeSchemaVersionMetadataResponse_schemaVersionId,
removeSchemaVersionMetadataResponse_versionNumber,
removeSchemaVersionMetadataResponse_schemaArn,
removeSchemaVersionMetadataResponse_metadataKey,
removeSchemaVersionMetadataResponse_metadataValue,
removeSchemaVersionMetadataResponse_latestVersion,
removeSchemaVersionMetadataResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import Amazonka.Glue.Types
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data RemoveSchemaVersionMetadata = RemoveSchemaVersionMetadata'
{
RemoveSchemaVersionMetadata -> Maybe Text
schemaVersionId :: Prelude.Maybe Prelude.Text,
RemoveSchemaVersionMetadata -> Maybe SchemaId
schemaId :: Prelude.Maybe SchemaId,
RemoveSchemaVersionMetadata -> Maybe SchemaVersionNumber
schemaVersionNumber :: Prelude.Maybe SchemaVersionNumber,
RemoveSchemaVersionMetadata -> MetadataKeyValuePair
metadataKeyValue :: MetadataKeyValuePair
}
deriving (RemoveSchemaVersionMetadata -> RemoveSchemaVersionMetadata -> Bool
(RemoveSchemaVersionMetadata
-> RemoveSchemaVersionMetadata -> Bool)
-> (RemoveSchemaVersionMetadata
-> RemoveSchemaVersionMetadata -> Bool)
-> Eq RemoveSchemaVersionMetadata
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RemoveSchemaVersionMetadata -> RemoveSchemaVersionMetadata -> Bool
$c/= :: RemoveSchemaVersionMetadata -> RemoveSchemaVersionMetadata -> Bool
== :: RemoveSchemaVersionMetadata -> RemoveSchemaVersionMetadata -> Bool
$c== :: RemoveSchemaVersionMetadata -> RemoveSchemaVersionMetadata -> Bool
Prelude.Eq, ReadPrec [RemoveSchemaVersionMetadata]
ReadPrec RemoveSchemaVersionMetadata
Int -> ReadS RemoveSchemaVersionMetadata
ReadS [RemoveSchemaVersionMetadata]
(Int -> ReadS RemoveSchemaVersionMetadata)
-> ReadS [RemoveSchemaVersionMetadata]
-> ReadPrec RemoveSchemaVersionMetadata
-> ReadPrec [RemoveSchemaVersionMetadata]
-> Read RemoveSchemaVersionMetadata
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [RemoveSchemaVersionMetadata]
$creadListPrec :: ReadPrec [RemoveSchemaVersionMetadata]
readPrec :: ReadPrec RemoveSchemaVersionMetadata
$creadPrec :: ReadPrec RemoveSchemaVersionMetadata
readList :: ReadS [RemoveSchemaVersionMetadata]
$creadList :: ReadS [RemoveSchemaVersionMetadata]
readsPrec :: Int -> ReadS RemoveSchemaVersionMetadata
$creadsPrec :: Int -> ReadS RemoveSchemaVersionMetadata
Prelude.Read, Int -> RemoveSchemaVersionMetadata -> ShowS
[RemoveSchemaVersionMetadata] -> ShowS
RemoveSchemaVersionMetadata -> String
(Int -> RemoveSchemaVersionMetadata -> ShowS)
-> (RemoveSchemaVersionMetadata -> String)
-> ([RemoveSchemaVersionMetadata] -> ShowS)
-> Show RemoveSchemaVersionMetadata
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RemoveSchemaVersionMetadata] -> ShowS
$cshowList :: [RemoveSchemaVersionMetadata] -> ShowS
show :: RemoveSchemaVersionMetadata -> String
$cshow :: RemoveSchemaVersionMetadata -> String
showsPrec :: Int -> RemoveSchemaVersionMetadata -> ShowS
$cshowsPrec :: Int -> RemoveSchemaVersionMetadata -> ShowS
Prelude.Show, (forall x.
RemoveSchemaVersionMetadata -> Rep RemoveSchemaVersionMetadata x)
-> (forall x.
Rep RemoveSchemaVersionMetadata x -> RemoveSchemaVersionMetadata)
-> Generic RemoveSchemaVersionMetadata
forall x.
Rep RemoveSchemaVersionMetadata x -> RemoveSchemaVersionMetadata
forall x.
RemoveSchemaVersionMetadata -> Rep RemoveSchemaVersionMetadata x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep RemoveSchemaVersionMetadata x -> RemoveSchemaVersionMetadata
$cfrom :: forall x.
RemoveSchemaVersionMetadata -> Rep RemoveSchemaVersionMetadata x
Prelude.Generic)
newRemoveSchemaVersionMetadata ::
MetadataKeyValuePair ->
RemoveSchemaVersionMetadata
newRemoveSchemaVersionMetadata :: MetadataKeyValuePair -> RemoveSchemaVersionMetadata
newRemoveSchemaVersionMetadata MetadataKeyValuePair
pMetadataKeyValue_ =
RemoveSchemaVersionMetadata' :: Maybe Text
-> Maybe SchemaId
-> Maybe SchemaVersionNumber
-> MetadataKeyValuePair
-> RemoveSchemaVersionMetadata
RemoveSchemaVersionMetadata'
{ $sel:schemaVersionId:RemoveSchemaVersionMetadata' :: Maybe Text
schemaVersionId =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:schemaId:RemoveSchemaVersionMetadata' :: Maybe SchemaId
schemaId = Maybe SchemaId
forall a. Maybe a
Prelude.Nothing,
$sel:schemaVersionNumber:RemoveSchemaVersionMetadata' :: Maybe SchemaVersionNumber
schemaVersionNumber = Maybe SchemaVersionNumber
forall a. Maybe a
Prelude.Nothing,
$sel:metadataKeyValue:RemoveSchemaVersionMetadata' :: MetadataKeyValuePair
metadataKeyValue = MetadataKeyValuePair
pMetadataKeyValue_
}
removeSchemaVersionMetadata_schemaVersionId :: Lens.Lens' RemoveSchemaVersionMetadata (Prelude.Maybe Prelude.Text)
removeSchemaVersionMetadata_schemaVersionId :: (Maybe Text -> f (Maybe Text))
-> RemoveSchemaVersionMetadata -> f RemoveSchemaVersionMetadata
removeSchemaVersionMetadata_schemaVersionId = (RemoveSchemaVersionMetadata -> Maybe Text)
-> (RemoveSchemaVersionMetadata
-> Maybe Text -> RemoveSchemaVersionMetadata)
-> Lens
RemoveSchemaVersionMetadata
RemoveSchemaVersionMetadata
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveSchemaVersionMetadata' {Maybe Text
schemaVersionId :: Maybe Text
$sel:schemaVersionId:RemoveSchemaVersionMetadata' :: RemoveSchemaVersionMetadata -> Maybe Text
schemaVersionId} -> Maybe Text
schemaVersionId) (\s :: RemoveSchemaVersionMetadata
s@RemoveSchemaVersionMetadata' {} Maybe Text
a -> RemoveSchemaVersionMetadata
s {$sel:schemaVersionId:RemoveSchemaVersionMetadata' :: Maybe Text
schemaVersionId = Maybe Text
a} :: RemoveSchemaVersionMetadata)
removeSchemaVersionMetadata_schemaId :: Lens.Lens' RemoveSchemaVersionMetadata (Prelude.Maybe SchemaId)
removeSchemaVersionMetadata_schemaId :: (Maybe SchemaId -> f (Maybe SchemaId))
-> RemoveSchemaVersionMetadata -> f RemoveSchemaVersionMetadata
removeSchemaVersionMetadata_schemaId = (RemoveSchemaVersionMetadata -> Maybe SchemaId)
-> (RemoveSchemaVersionMetadata
-> Maybe SchemaId -> RemoveSchemaVersionMetadata)
-> Lens
RemoveSchemaVersionMetadata
RemoveSchemaVersionMetadata
(Maybe SchemaId)
(Maybe SchemaId)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveSchemaVersionMetadata' {Maybe SchemaId
schemaId :: Maybe SchemaId
$sel:schemaId:RemoveSchemaVersionMetadata' :: RemoveSchemaVersionMetadata -> Maybe SchemaId
schemaId} -> Maybe SchemaId
schemaId) (\s :: RemoveSchemaVersionMetadata
s@RemoveSchemaVersionMetadata' {} Maybe SchemaId
a -> RemoveSchemaVersionMetadata
s {$sel:schemaId:RemoveSchemaVersionMetadata' :: Maybe SchemaId
schemaId = Maybe SchemaId
a} :: RemoveSchemaVersionMetadata)
removeSchemaVersionMetadata_schemaVersionNumber :: Lens.Lens' RemoveSchemaVersionMetadata (Prelude.Maybe SchemaVersionNumber)
removeSchemaVersionMetadata_schemaVersionNumber :: (Maybe SchemaVersionNumber -> f (Maybe SchemaVersionNumber))
-> RemoveSchemaVersionMetadata -> f RemoveSchemaVersionMetadata
removeSchemaVersionMetadata_schemaVersionNumber = (RemoveSchemaVersionMetadata -> Maybe SchemaVersionNumber)
-> (RemoveSchemaVersionMetadata
-> Maybe SchemaVersionNumber -> RemoveSchemaVersionMetadata)
-> Lens
RemoveSchemaVersionMetadata
RemoveSchemaVersionMetadata
(Maybe SchemaVersionNumber)
(Maybe SchemaVersionNumber)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveSchemaVersionMetadata' {Maybe SchemaVersionNumber
schemaVersionNumber :: Maybe SchemaVersionNumber
$sel:schemaVersionNumber:RemoveSchemaVersionMetadata' :: RemoveSchemaVersionMetadata -> Maybe SchemaVersionNumber
schemaVersionNumber} -> Maybe SchemaVersionNumber
schemaVersionNumber) (\s :: RemoveSchemaVersionMetadata
s@RemoveSchemaVersionMetadata' {} Maybe SchemaVersionNumber
a -> RemoveSchemaVersionMetadata
s {$sel:schemaVersionNumber:RemoveSchemaVersionMetadata' :: Maybe SchemaVersionNumber
schemaVersionNumber = Maybe SchemaVersionNumber
a} :: RemoveSchemaVersionMetadata)
removeSchemaVersionMetadata_metadataKeyValue :: Lens.Lens' RemoveSchemaVersionMetadata MetadataKeyValuePair
removeSchemaVersionMetadata_metadataKeyValue :: (MetadataKeyValuePair -> f MetadataKeyValuePair)
-> RemoveSchemaVersionMetadata -> f RemoveSchemaVersionMetadata
removeSchemaVersionMetadata_metadataKeyValue = (RemoveSchemaVersionMetadata -> MetadataKeyValuePair)
-> (RemoveSchemaVersionMetadata
-> MetadataKeyValuePair -> RemoveSchemaVersionMetadata)
-> Lens
RemoveSchemaVersionMetadata
RemoveSchemaVersionMetadata
MetadataKeyValuePair
MetadataKeyValuePair
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveSchemaVersionMetadata' {MetadataKeyValuePair
metadataKeyValue :: MetadataKeyValuePair
$sel:metadataKeyValue:RemoveSchemaVersionMetadata' :: RemoveSchemaVersionMetadata -> MetadataKeyValuePair
metadataKeyValue} -> MetadataKeyValuePair
metadataKeyValue) (\s :: RemoveSchemaVersionMetadata
s@RemoveSchemaVersionMetadata' {} MetadataKeyValuePair
a -> RemoveSchemaVersionMetadata
s {$sel:metadataKeyValue:RemoveSchemaVersionMetadata' :: MetadataKeyValuePair
metadataKeyValue = MetadataKeyValuePair
a} :: RemoveSchemaVersionMetadata)
instance Core.AWSRequest RemoveSchemaVersionMetadata where
type
AWSResponse RemoveSchemaVersionMetadata =
RemoveSchemaVersionMetadataResponse
request :: RemoveSchemaVersionMetadata -> Request RemoveSchemaVersionMetadata
request = Service
-> RemoveSchemaVersionMetadata
-> Request RemoveSchemaVersionMetadata
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON Service
defaultService
response :: Logger
-> Service
-> Proxy RemoveSchemaVersionMetadata
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse RemoveSchemaVersionMetadata)))
response =
(Int
-> ResponseHeaders
-> Object
-> Either String (AWSResponse RemoveSchemaVersionMetadata))
-> Logger
-> Service
-> Proxy RemoveSchemaVersionMetadata
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse RemoveSchemaVersionMetadata)))
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> Logger
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Int
-> RemoveSchemaVersionMetadataResponse
RemoveSchemaVersionMetadataResponse'
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Int
-> RemoveSchemaVersionMetadataResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Int
-> RemoveSchemaVersionMetadataResponse)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"RegistryName")
Either
String
(Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Int
-> RemoveSchemaVersionMetadataResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Int
-> RemoveSchemaVersionMetadataResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"SchemaName")
Either
String
(Maybe Text
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Int
-> RemoveSchemaVersionMetadataResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Int
-> RemoveSchemaVersionMetadataResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"SchemaVersionId")
Either
String
(Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Int
-> RemoveSchemaVersionMetadataResponse)
-> Either String (Maybe Natural)
-> Either
String
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Int
-> RemoveSchemaVersionMetadataResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Natural)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"VersionNumber")
Either
String
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Int
-> RemoveSchemaVersionMetadataResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text
-> Maybe Text
-> Maybe Bool
-> Int
-> RemoveSchemaVersionMetadataResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"SchemaArn")
Either
String
(Maybe Text
-> Maybe Text
-> Maybe Bool
-> Int
-> RemoveSchemaVersionMetadataResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text
-> Maybe Bool -> Int -> RemoveSchemaVersionMetadataResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"MetadataKey")
Either
String
(Maybe Text
-> Maybe Bool -> Int -> RemoveSchemaVersionMetadataResponse)
-> Either String (Maybe Text)
-> Either
String (Maybe Bool -> Int -> RemoveSchemaVersionMetadataResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"MetadataValue")
Either
String (Maybe Bool -> Int -> RemoveSchemaVersionMetadataResponse)
-> Either String (Maybe Bool)
-> Either String (Int -> RemoveSchemaVersionMetadataResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Bool)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"LatestVersion")
Either String (Int -> RemoveSchemaVersionMetadataResponse)
-> Either String Int
-> Either String RemoveSchemaVersionMetadataResponse
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Int -> Either String Int
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (Int -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance Prelude.Hashable RemoveSchemaVersionMetadata
instance Prelude.NFData RemoveSchemaVersionMetadata
instance Core.ToHeaders RemoveSchemaVersionMetadata where
toHeaders :: RemoveSchemaVersionMetadata -> ResponseHeaders
toHeaders =
ResponseHeaders -> RemoveSchemaVersionMetadata -> ResponseHeaders
forall a b. a -> b -> a
Prelude.const
( [ResponseHeaders] -> ResponseHeaders
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
HeaderName -> ByteString -> ResponseHeaders
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Core.=# ( ByteString
"AWSGlue.RemoveSchemaVersionMetadata" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
HeaderName -> ByteString -> ResponseHeaders
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Core.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Core.ToJSON RemoveSchemaVersionMetadata where
toJSON :: RemoveSchemaVersionMetadata -> Value
toJSON RemoveSchemaVersionMetadata' {Maybe Text
Maybe SchemaId
Maybe SchemaVersionNumber
MetadataKeyValuePair
metadataKeyValue :: MetadataKeyValuePair
schemaVersionNumber :: Maybe SchemaVersionNumber
schemaId :: Maybe SchemaId
schemaVersionId :: Maybe Text
$sel:metadataKeyValue:RemoveSchemaVersionMetadata' :: RemoveSchemaVersionMetadata -> MetadataKeyValuePair
$sel:schemaVersionNumber:RemoveSchemaVersionMetadata' :: RemoveSchemaVersionMetadata -> Maybe SchemaVersionNumber
$sel:schemaId:RemoveSchemaVersionMetadata' :: RemoveSchemaVersionMetadata -> Maybe SchemaId
$sel:schemaVersionId:RemoveSchemaVersionMetadata' :: RemoveSchemaVersionMetadata -> Maybe Text
..} =
[Pair] -> Value
Core.object
( [Maybe Pair] -> [Pair]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Text
"SchemaVersionId" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(Text -> Pair) -> Maybe Text -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
schemaVersionId,
(Text
"SchemaId" Text -> SchemaId -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (SchemaId -> Pair) -> Maybe SchemaId -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe SchemaId
schemaId,
(Text
"SchemaVersionNumber" Text -> SchemaVersionNumber -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(SchemaVersionNumber -> Pair)
-> Maybe SchemaVersionNumber -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe SchemaVersionNumber
schemaVersionNumber,
Pair -> Maybe Pair
forall a. a -> Maybe a
Prelude.Just
(Text
"MetadataKeyValue" Text -> MetadataKeyValuePair -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..= MetadataKeyValuePair
metadataKeyValue)
]
)
instance Core.ToPath RemoveSchemaVersionMetadata where
toPath :: RemoveSchemaVersionMetadata -> ByteString
toPath = ByteString -> RemoveSchemaVersionMetadata -> ByteString
forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Core.ToQuery RemoveSchemaVersionMetadata where
toQuery :: RemoveSchemaVersionMetadata -> QueryString
toQuery = QueryString -> RemoveSchemaVersionMetadata -> QueryString
forall a b. a -> b -> a
Prelude.const QueryString
forall a. Monoid a => a
Prelude.mempty
data RemoveSchemaVersionMetadataResponse = RemoveSchemaVersionMetadataResponse'
{
RemoveSchemaVersionMetadataResponse -> Maybe Text
registryName :: Prelude.Maybe Prelude.Text,
RemoveSchemaVersionMetadataResponse -> Maybe Text
schemaName :: Prelude.Maybe Prelude.Text,
RemoveSchemaVersionMetadataResponse -> Maybe Text
schemaVersionId :: Prelude.Maybe Prelude.Text,
RemoveSchemaVersionMetadataResponse -> Maybe Natural
versionNumber :: Prelude.Maybe Prelude.Natural,
RemoveSchemaVersionMetadataResponse -> Maybe Text
schemaArn :: Prelude.Maybe Prelude.Text,
RemoveSchemaVersionMetadataResponse -> Maybe Text
metadataKey :: Prelude.Maybe Prelude.Text,
RemoveSchemaVersionMetadataResponse -> Maybe Text
metadataValue :: Prelude.Maybe Prelude.Text,
RemoveSchemaVersionMetadataResponse -> Maybe Bool
latestVersion :: Prelude.Maybe Prelude.Bool,
RemoveSchemaVersionMetadataResponse -> Int
httpStatus :: Prelude.Int
}
deriving (RemoveSchemaVersionMetadataResponse
-> RemoveSchemaVersionMetadataResponse -> Bool
(RemoveSchemaVersionMetadataResponse
-> RemoveSchemaVersionMetadataResponse -> Bool)
-> (RemoveSchemaVersionMetadataResponse
-> RemoveSchemaVersionMetadataResponse -> Bool)
-> Eq RemoveSchemaVersionMetadataResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RemoveSchemaVersionMetadataResponse
-> RemoveSchemaVersionMetadataResponse -> Bool
$c/= :: RemoveSchemaVersionMetadataResponse
-> RemoveSchemaVersionMetadataResponse -> Bool
== :: RemoveSchemaVersionMetadataResponse
-> RemoveSchemaVersionMetadataResponse -> Bool
$c== :: RemoveSchemaVersionMetadataResponse
-> RemoveSchemaVersionMetadataResponse -> Bool
Prelude.Eq, ReadPrec [RemoveSchemaVersionMetadataResponse]
ReadPrec RemoveSchemaVersionMetadataResponse
Int -> ReadS RemoveSchemaVersionMetadataResponse
ReadS [RemoveSchemaVersionMetadataResponse]
(Int -> ReadS RemoveSchemaVersionMetadataResponse)
-> ReadS [RemoveSchemaVersionMetadataResponse]
-> ReadPrec RemoveSchemaVersionMetadataResponse
-> ReadPrec [RemoveSchemaVersionMetadataResponse]
-> Read RemoveSchemaVersionMetadataResponse
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [RemoveSchemaVersionMetadataResponse]
$creadListPrec :: ReadPrec [RemoveSchemaVersionMetadataResponse]
readPrec :: ReadPrec RemoveSchemaVersionMetadataResponse
$creadPrec :: ReadPrec RemoveSchemaVersionMetadataResponse
readList :: ReadS [RemoveSchemaVersionMetadataResponse]
$creadList :: ReadS [RemoveSchemaVersionMetadataResponse]
readsPrec :: Int -> ReadS RemoveSchemaVersionMetadataResponse
$creadsPrec :: Int -> ReadS RemoveSchemaVersionMetadataResponse
Prelude.Read, Int -> RemoveSchemaVersionMetadataResponse -> ShowS
[RemoveSchemaVersionMetadataResponse] -> ShowS
RemoveSchemaVersionMetadataResponse -> String
(Int -> RemoveSchemaVersionMetadataResponse -> ShowS)
-> (RemoveSchemaVersionMetadataResponse -> String)
-> ([RemoveSchemaVersionMetadataResponse] -> ShowS)
-> Show RemoveSchemaVersionMetadataResponse
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RemoveSchemaVersionMetadataResponse] -> ShowS
$cshowList :: [RemoveSchemaVersionMetadataResponse] -> ShowS
show :: RemoveSchemaVersionMetadataResponse -> String
$cshow :: RemoveSchemaVersionMetadataResponse -> String
showsPrec :: Int -> RemoveSchemaVersionMetadataResponse -> ShowS
$cshowsPrec :: Int -> RemoveSchemaVersionMetadataResponse -> ShowS
Prelude.Show, (forall x.
RemoveSchemaVersionMetadataResponse
-> Rep RemoveSchemaVersionMetadataResponse x)
-> (forall x.
Rep RemoveSchemaVersionMetadataResponse x
-> RemoveSchemaVersionMetadataResponse)
-> Generic RemoveSchemaVersionMetadataResponse
forall x.
Rep RemoveSchemaVersionMetadataResponse x
-> RemoveSchemaVersionMetadataResponse
forall x.
RemoveSchemaVersionMetadataResponse
-> Rep RemoveSchemaVersionMetadataResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep RemoveSchemaVersionMetadataResponse x
-> RemoveSchemaVersionMetadataResponse
$cfrom :: forall x.
RemoveSchemaVersionMetadataResponse
-> Rep RemoveSchemaVersionMetadataResponse x
Prelude.Generic)
newRemoveSchemaVersionMetadataResponse ::
Prelude.Int ->
RemoveSchemaVersionMetadataResponse
newRemoveSchemaVersionMetadataResponse :: Int -> RemoveSchemaVersionMetadataResponse
newRemoveSchemaVersionMetadataResponse Int
pHttpStatus_ =
RemoveSchemaVersionMetadataResponse' :: Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Int
-> RemoveSchemaVersionMetadataResponse
RemoveSchemaVersionMetadataResponse'
{ $sel:registryName:RemoveSchemaVersionMetadataResponse' :: Maybe Text
registryName =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:schemaName:RemoveSchemaVersionMetadataResponse' :: Maybe Text
schemaName = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:schemaVersionId:RemoveSchemaVersionMetadataResponse' :: Maybe Text
schemaVersionId = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:versionNumber:RemoveSchemaVersionMetadataResponse' :: Maybe Natural
versionNumber = Maybe Natural
forall a. Maybe a
Prelude.Nothing,
$sel:schemaArn:RemoveSchemaVersionMetadataResponse' :: Maybe Text
schemaArn = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:metadataKey:RemoveSchemaVersionMetadataResponse' :: Maybe Text
metadataKey = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:metadataValue:RemoveSchemaVersionMetadataResponse' :: Maybe Text
metadataValue = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:latestVersion:RemoveSchemaVersionMetadataResponse' :: Maybe Bool
latestVersion = Maybe Bool
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:RemoveSchemaVersionMetadataResponse' :: Int
httpStatus = Int
pHttpStatus_
}
removeSchemaVersionMetadataResponse_registryName :: Lens.Lens' RemoveSchemaVersionMetadataResponse (Prelude.Maybe Prelude.Text)
removeSchemaVersionMetadataResponse_registryName :: (Maybe Text -> f (Maybe Text))
-> RemoveSchemaVersionMetadataResponse
-> f RemoveSchemaVersionMetadataResponse
removeSchemaVersionMetadataResponse_registryName = (RemoveSchemaVersionMetadataResponse -> Maybe Text)
-> (RemoveSchemaVersionMetadataResponse
-> Maybe Text -> RemoveSchemaVersionMetadataResponse)
-> Lens
RemoveSchemaVersionMetadataResponse
RemoveSchemaVersionMetadataResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveSchemaVersionMetadataResponse' {Maybe Text
registryName :: Maybe Text
$sel:registryName:RemoveSchemaVersionMetadataResponse' :: RemoveSchemaVersionMetadataResponse -> Maybe Text
registryName} -> Maybe Text
registryName) (\s :: RemoveSchemaVersionMetadataResponse
s@RemoveSchemaVersionMetadataResponse' {} Maybe Text
a -> RemoveSchemaVersionMetadataResponse
s {$sel:registryName:RemoveSchemaVersionMetadataResponse' :: Maybe Text
registryName = Maybe Text
a} :: RemoveSchemaVersionMetadataResponse)
removeSchemaVersionMetadataResponse_schemaName :: Lens.Lens' RemoveSchemaVersionMetadataResponse (Prelude.Maybe Prelude.Text)
removeSchemaVersionMetadataResponse_schemaName :: (Maybe Text -> f (Maybe Text))
-> RemoveSchemaVersionMetadataResponse
-> f RemoveSchemaVersionMetadataResponse
removeSchemaVersionMetadataResponse_schemaName = (RemoveSchemaVersionMetadataResponse -> Maybe Text)
-> (RemoveSchemaVersionMetadataResponse
-> Maybe Text -> RemoveSchemaVersionMetadataResponse)
-> Lens
RemoveSchemaVersionMetadataResponse
RemoveSchemaVersionMetadataResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveSchemaVersionMetadataResponse' {Maybe Text
schemaName :: Maybe Text
$sel:schemaName:RemoveSchemaVersionMetadataResponse' :: RemoveSchemaVersionMetadataResponse -> Maybe Text
schemaName} -> Maybe Text
schemaName) (\s :: RemoveSchemaVersionMetadataResponse
s@RemoveSchemaVersionMetadataResponse' {} Maybe Text
a -> RemoveSchemaVersionMetadataResponse
s {$sel:schemaName:RemoveSchemaVersionMetadataResponse' :: Maybe Text
schemaName = Maybe Text
a} :: RemoveSchemaVersionMetadataResponse)
removeSchemaVersionMetadataResponse_schemaVersionId :: Lens.Lens' RemoveSchemaVersionMetadataResponse (Prelude.Maybe Prelude.Text)
removeSchemaVersionMetadataResponse_schemaVersionId :: (Maybe Text -> f (Maybe Text))
-> RemoveSchemaVersionMetadataResponse
-> f RemoveSchemaVersionMetadataResponse
removeSchemaVersionMetadataResponse_schemaVersionId = (RemoveSchemaVersionMetadataResponse -> Maybe Text)
-> (RemoveSchemaVersionMetadataResponse
-> Maybe Text -> RemoveSchemaVersionMetadataResponse)
-> Lens
RemoveSchemaVersionMetadataResponse
RemoveSchemaVersionMetadataResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveSchemaVersionMetadataResponse' {Maybe Text
schemaVersionId :: Maybe Text
$sel:schemaVersionId:RemoveSchemaVersionMetadataResponse' :: RemoveSchemaVersionMetadataResponse -> Maybe Text
schemaVersionId} -> Maybe Text
schemaVersionId) (\s :: RemoveSchemaVersionMetadataResponse
s@RemoveSchemaVersionMetadataResponse' {} Maybe Text
a -> RemoveSchemaVersionMetadataResponse
s {$sel:schemaVersionId:RemoveSchemaVersionMetadataResponse' :: Maybe Text
schemaVersionId = Maybe Text
a} :: RemoveSchemaVersionMetadataResponse)
removeSchemaVersionMetadataResponse_versionNumber :: Lens.Lens' RemoveSchemaVersionMetadataResponse (Prelude.Maybe Prelude.Natural)
removeSchemaVersionMetadataResponse_versionNumber :: (Maybe Natural -> f (Maybe Natural))
-> RemoveSchemaVersionMetadataResponse
-> f RemoveSchemaVersionMetadataResponse
removeSchemaVersionMetadataResponse_versionNumber = (RemoveSchemaVersionMetadataResponse -> Maybe Natural)
-> (RemoveSchemaVersionMetadataResponse
-> Maybe Natural -> RemoveSchemaVersionMetadataResponse)
-> Lens
RemoveSchemaVersionMetadataResponse
RemoveSchemaVersionMetadataResponse
(Maybe Natural)
(Maybe Natural)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveSchemaVersionMetadataResponse' {Maybe Natural
versionNumber :: Maybe Natural
$sel:versionNumber:RemoveSchemaVersionMetadataResponse' :: RemoveSchemaVersionMetadataResponse -> Maybe Natural
versionNumber} -> Maybe Natural
versionNumber) (\s :: RemoveSchemaVersionMetadataResponse
s@RemoveSchemaVersionMetadataResponse' {} Maybe Natural
a -> RemoveSchemaVersionMetadataResponse
s {$sel:versionNumber:RemoveSchemaVersionMetadataResponse' :: Maybe Natural
versionNumber = Maybe Natural
a} :: RemoveSchemaVersionMetadataResponse)
removeSchemaVersionMetadataResponse_schemaArn :: Lens.Lens' RemoveSchemaVersionMetadataResponse (Prelude.Maybe Prelude.Text)
removeSchemaVersionMetadataResponse_schemaArn :: (Maybe Text -> f (Maybe Text))
-> RemoveSchemaVersionMetadataResponse
-> f RemoveSchemaVersionMetadataResponse
removeSchemaVersionMetadataResponse_schemaArn = (RemoveSchemaVersionMetadataResponse -> Maybe Text)
-> (RemoveSchemaVersionMetadataResponse
-> Maybe Text -> RemoveSchemaVersionMetadataResponse)
-> Lens
RemoveSchemaVersionMetadataResponse
RemoveSchemaVersionMetadataResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveSchemaVersionMetadataResponse' {Maybe Text
schemaArn :: Maybe Text
$sel:schemaArn:RemoveSchemaVersionMetadataResponse' :: RemoveSchemaVersionMetadataResponse -> Maybe Text
schemaArn} -> Maybe Text
schemaArn) (\s :: RemoveSchemaVersionMetadataResponse
s@RemoveSchemaVersionMetadataResponse' {} Maybe Text
a -> RemoveSchemaVersionMetadataResponse
s {$sel:schemaArn:RemoveSchemaVersionMetadataResponse' :: Maybe Text
schemaArn = Maybe Text
a} :: RemoveSchemaVersionMetadataResponse)
removeSchemaVersionMetadataResponse_metadataKey :: Lens.Lens' RemoveSchemaVersionMetadataResponse (Prelude.Maybe Prelude.Text)
removeSchemaVersionMetadataResponse_metadataKey :: (Maybe Text -> f (Maybe Text))
-> RemoveSchemaVersionMetadataResponse
-> f RemoveSchemaVersionMetadataResponse
removeSchemaVersionMetadataResponse_metadataKey = (RemoveSchemaVersionMetadataResponse -> Maybe Text)
-> (RemoveSchemaVersionMetadataResponse
-> Maybe Text -> RemoveSchemaVersionMetadataResponse)
-> Lens
RemoveSchemaVersionMetadataResponse
RemoveSchemaVersionMetadataResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveSchemaVersionMetadataResponse' {Maybe Text
metadataKey :: Maybe Text
$sel:metadataKey:RemoveSchemaVersionMetadataResponse' :: RemoveSchemaVersionMetadataResponse -> Maybe Text
metadataKey} -> Maybe Text
metadataKey) (\s :: RemoveSchemaVersionMetadataResponse
s@RemoveSchemaVersionMetadataResponse' {} Maybe Text
a -> RemoveSchemaVersionMetadataResponse
s {$sel:metadataKey:RemoveSchemaVersionMetadataResponse' :: Maybe Text
metadataKey = Maybe Text
a} :: RemoveSchemaVersionMetadataResponse)
removeSchemaVersionMetadataResponse_metadataValue :: Lens.Lens' RemoveSchemaVersionMetadataResponse (Prelude.Maybe Prelude.Text)
removeSchemaVersionMetadataResponse_metadataValue :: (Maybe Text -> f (Maybe Text))
-> RemoveSchemaVersionMetadataResponse
-> f RemoveSchemaVersionMetadataResponse
removeSchemaVersionMetadataResponse_metadataValue = (RemoveSchemaVersionMetadataResponse -> Maybe Text)
-> (RemoveSchemaVersionMetadataResponse
-> Maybe Text -> RemoveSchemaVersionMetadataResponse)
-> Lens
RemoveSchemaVersionMetadataResponse
RemoveSchemaVersionMetadataResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveSchemaVersionMetadataResponse' {Maybe Text
metadataValue :: Maybe Text
$sel:metadataValue:RemoveSchemaVersionMetadataResponse' :: RemoveSchemaVersionMetadataResponse -> Maybe Text
metadataValue} -> Maybe Text
metadataValue) (\s :: RemoveSchemaVersionMetadataResponse
s@RemoveSchemaVersionMetadataResponse' {} Maybe Text
a -> RemoveSchemaVersionMetadataResponse
s {$sel:metadataValue:RemoveSchemaVersionMetadataResponse' :: Maybe Text
metadataValue = Maybe Text
a} :: RemoveSchemaVersionMetadataResponse)
removeSchemaVersionMetadataResponse_latestVersion :: Lens.Lens' RemoveSchemaVersionMetadataResponse (Prelude.Maybe Prelude.Bool)
removeSchemaVersionMetadataResponse_latestVersion :: (Maybe Bool -> f (Maybe Bool))
-> RemoveSchemaVersionMetadataResponse
-> f RemoveSchemaVersionMetadataResponse
removeSchemaVersionMetadataResponse_latestVersion = (RemoveSchemaVersionMetadataResponse -> Maybe Bool)
-> (RemoveSchemaVersionMetadataResponse
-> Maybe Bool -> RemoveSchemaVersionMetadataResponse)
-> Lens
RemoveSchemaVersionMetadataResponse
RemoveSchemaVersionMetadataResponse
(Maybe Bool)
(Maybe Bool)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveSchemaVersionMetadataResponse' {Maybe Bool
latestVersion :: Maybe Bool
$sel:latestVersion:RemoveSchemaVersionMetadataResponse' :: RemoveSchemaVersionMetadataResponse -> Maybe Bool
latestVersion} -> Maybe Bool
latestVersion) (\s :: RemoveSchemaVersionMetadataResponse
s@RemoveSchemaVersionMetadataResponse' {} Maybe Bool
a -> RemoveSchemaVersionMetadataResponse
s {$sel:latestVersion:RemoveSchemaVersionMetadataResponse' :: Maybe Bool
latestVersion = Maybe Bool
a} :: RemoveSchemaVersionMetadataResponse)
removeSchemaVersionMetadataResponse_httpStatus :: Lens.Lens' RemoveSchemaVersionMetadataResponse Prelude.Int
removeSchemaVersionMetadataResponse_httpStatus :: (Int -> f Int)
-> RemoveSchemaVersionMetadataResponse
-> f RemoveSchemaVersionMetadataResponse
removeSchemaVersionMetadataResponse_httpStatus = (RemoveSchemaVersionMetadataResponse -> Int)
-> (RemoveSchemaVersionMetadataResponse
-> Int -> RemoveSchemaVersionMetadataResponse)
-> Lens
RemoveSchemaVersionMetadataResponse
RemoveSchemaVersionMetadataResponse
Int
Int
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveSchemaVersionMetadataResponse' {Int
httpStatus :: Int
$sel:httpStatus:RemoveSchemaVersionMetadataResponse' :: RemoveSchemaVersionMetadataResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: RemoveSchemaVersionMetadataResponse
s@RemoveSchemaVersionMetadataResponse' {} Int
a -> RemoveSchemaVersionMetadataResponse
s {$sel:httpStatus:RemoveSchemaVersionMetadataResponse' :: Int
httpStatus = Int
a} :: RemoveSchemaVersionMetadataResponse)
instance
Prelude.NFData
RemoveSchemaVersionMetadataResponse