module Stratosphere.Bedrock.KnowledgeBase.MongoDbAtlasConfigurationProperty (
module Exports, MongoDbAtlasConfigurationProperty(..),
mkMongoDbAtlasConfigurationProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Bedrock.KnowledgeBase.MongoDbAtlasFieldMappingProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data MongoDbAtlasConfigurationProperty
=
MongoDbAtlasConfigurationProperty {MongoDbAtlasConfigurationProperty -> ()
haddock_workaround_ :: (),
MongoDbAtlasConfigurationProperty -> Value Text
collectionName :: (Value Prelude.Text),
MongoDbAtlasConfigurationProperty -> Value Text
credentialsSecretArn :: (Value Prelude.Text),
MongoDbAtlasConfigurationProperty -> Value Text
databaseName :: (Value Prelude.Text),
MongoDbAtlasConfigurationProperty -> Value Text
endpoint :: (Value Prelude.Text),
MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
endpointServiceName :: (Prelude.Maybe (Value Prelude.Text)),
MongoDbAtlasConfigurationProperty
-> MongoDbAtlasFieldMappingProperty
fieldMapping :: MongoDbAtlasFieldMappingProperty,
MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
textIndexName :: (Prelude.Maybe (Value Prelude.Text)),
MongoDbAtlasConfigurationProperty -> Value Text
vectorIndexName :: (Value Prelude.Text)}
deriving stock (MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty -> Bool
(MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty -> Bool)
-> (MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty -> Bool)
-> Eq MongoDbAtlasConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty -> Bool
== :: MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty -> Bool
$c/= :: MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty -> Bool
/= :: MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty -> Bool
Prelude.Eq, Int -> MongoDbAtlasConfigurationProperty -> ShowS
[MongoDbAtlasConfigurationProperty] -> ShowS
MongoDbAtlasConfigurationProperty -> String
(Int -> MongoDbAtlasConfigurationProperty -> ShowS)
-> (MongoDbAtlasConfigurationProperty -> String)
-> ([MongoDbAtlasConfigurationProperty] -> ShowS)
-> Show MongoDbAtlasConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> MongoDbAtlasConfigurationProperty -> ShowS
showsPrec :: Int -> MongoDbAtlasConfigurationProperty -> ShowS
$cshow :: MongoDbAtlasConfigurationProperty -> String
show :: MongoDbAtlasConfigurationProperty -> String
$cshowList :: [MongoDbAtlasConfigurationProperty] -> ShowS
showList :: [MongoDbAtlasConfigurationProperty] -> ShowS
Prelude.Show)
mkMongoDbAtlasConfigurationProperty ::
Value Prelude.Text
-> Value Prelude.Text
-> Value Prelude.Text
-> Value Prelude.Text
-> MongoDbAtlasFieldMappingProperty
-> Value Prelude.Text -> MongoDbAtlasConfigurationProperty
mkMongoDbAtlasConfigurationProperty :: Value Text
-> Value Text
-> Value Text
-> Value Text
-> MongoDbAtlasFieldMappingProperty
-> Value Text
-> MongoDbAtlasConfigurationProperty
mkMongoDbAtlasConfigurationProperty
Value Text
collectionName
Value Text
credentialsSecretArn
Value Text
databaseName
Value Text
endpoint
MongoDbAtlasFieldMappingProperty
fieldMapping
Value Text
vectorIndexName
= MongoDbAtlasConfigurationProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), collectionName :: Value Text
collectionName = Value Text
collectionName,
credentialsSecretArn :: Value Text
credentialsSecretArn = Value Text
credentialsSecretArn,
databaseName :: Value Text
databaseName = Value Text
databaseName, endpoint :: Value Text
endpoint = Value Text
endpoint,
fieldMapping :: MongoDbAtlasFieldMappingProperty
fieldMapping = MongoDbAtlasFieldMappingProperty
fieldMapping, vectorIndexName :: Value Text
vectorIndexName = Value Text
vectorIndexName,
endpointServiceName :: Maybe (Value Text)
endpointServiceName = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
textIndexName :: Maybe (Value Text)
textIndexName = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties MongoDbAtlasConfigurationProperty where
toResourceProperties :: MongoDbAtlasConfigurationProperty -> ResourceProperties
toResourceProperties MongoDbAtlasConfigurationProperty {Maybe (Value Text)
()
Value Text
MongoDbAtlasFieldMappingProperty
haddock_workaround_ :: MongoDbAtlasConfigurationProperty -> ()
collectionName :: MongoDbAtlasConfigurationProperty -> Value Text
credentialsSecretArn :: MongoDbAtlasConfigurationProperty -> Value Text
databaseName :: MongoDbAtlasConfigurationProperty -> Value Text
endpoint :: MongoDbAtlasConfigurationProperty -> Value Text
endpointServiceName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
fieldMapping :: MongoDbAtlasConfigurationProperty
-> MongoDbAtlasFieldMappingProperty
textIndexName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
vectorIndexName :: MongoDbAtlasConfigurationProperty -> Value Text
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::Bedrock::KnowledgeBase.MongoDbAtlasConfiguration",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
[Key
"CollectionName" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
collectionName,
Key
"CredentialsSecretArn" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
credentialsSecretArn,
Key
"DatabaseName" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
databaseName, Key
"Endpoint" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
endpoint,
Key
"FieldMapping" Key -> MongoDbAtlasFieldMappingProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= MongoDbAtlasFieldMappingProperty
fieldMapping,
Key
"VectorIndexName" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
vectorIndexName]
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EndpointServiceName" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
endpointServiceName,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TextIndexName" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
textIndexName]))}
instance JSON.ToJSON MongoDbAtlasConfigurationProperty where
toJSON :: MongoDbAtlasConfigurationProperty -> Value
toJSON MongoDbAtlasConfigurationProperty {Maybe (Value Text)
()
Value Text
MongoDbAtlasFieldMappingProperty
haddock_workaround_ :: MongoDbAtlasConfigurationProperty -> ()
collectionName :: MongoDbAtlasConfigurationProperty -> Value Text
credentialsSecretArn :: MongoDbAtlasConfigurationProperty -> Value Text
databaseName :: MongoDbAtlasConfigurationProperty -> Value Text
endpoint :: MongoDbAtlasConfigurationProperty -> Value Text
endpointServiceName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
fieldMapping :: MongoDbAtlasConfigurationProperty
-> MongoDbAtlasFieldMappingProperty
textIndexName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
vectorIndexName :: MongoDbAtlasConfigurationProperty -> Value Text
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object
([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
[Key
"CollectionName" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
collectionName,
Key
"CredentialsSecretArn" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
credentialsSecretArn,
Key
"DatabaseName" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
databaseName, Key
"Endpoint" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
endpoint,
Key
"FieldMapping" Key -> MongoDbAtlasFieldMappingProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= MongoDbAtlasFieldMappingProperty
fieldMapping,
Key
"VectorIndexName" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
vectorIndexName]
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EndpointServiceName" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
endpointServiceName,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TextIndexName" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
textIndexName])))
instance Property "CollectionName" MongoDbAtlasConfigurationProperty where
type PropertyType "CollectionName" MongoDbAtlasConfigurationProperty = Value Prelude.Text
set :: PropertyType "CollectionName" MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty
set PropertyType "CollectionName" MongoDbAtlasConfigurationProperty
newValue MongoDbAtlasConfigurationProperty {Maybe (Value Text)
()
Value Text
MongoDbAtlasFieldMappingProperty
haddock_workaround_ :: MongoDbAtlasConfigurationProperty -> ()
collectionName :: MongoDbAtlasConfigurationProperty -> Value Text
credentialsSecretArn :: MongoDbAtlasConfigurationProperty -> Value Text
databaseName :: MongoDbAtlasConfigurationProperty -> Value Text
endpoint :: MongoDbAtlasConfigurationProperty -> Value Text
endpointServiceName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
fieldMapping :: MongoDbAtlasConfigurationProperty
-> MongoDbAtlasFieldMappingProperty
textIndexName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
vectorIndexName :: MongoDbAtlasConfigurationProperty -> Value Text
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
..}
= MongoDbAtlasConfigurationProperty {collectionName :: Value Text
collectionName = PropertyType "CollectionName" MongoDbAtlasConfigurationProperty
Value Text
newValue, Maybe (Value Text)
()
Value Text
MongoDbAtlasFieldMappingProperty
haddock_workaround_ :: ()
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
haddock_workaround_ :: ()
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
..}
instance Property "CredentialsSecretArn" MongoDbAtlasConfigurationProperty where
type PropertyType "CredentialsSecretArn" MongoDbAtlasConfigurationProperty = Value Prelude.Text
set :: PropertyType
"CredentialsSecretArn" MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty
set PropertyType
"CredentialsSecretArn" MongoDbAtlasConfigurationProperty
newValue MongoDbAtlasConfigurationProperty {Maybe (Value Text)
()
Value Text
MongoDbAtlasFieldMappingProperty
haddock_workaround_ :: MongoDbAtlasConfigurationProperty -> ()
collectionName :: MongoDbAtlasConfigurationProperty -> Value Text
credentialsSecretArn :: MongoDbAtlasConfigurationProperty -> Value Text
databaseName :: MongoDbAtlasConfigurationProperty -> Value Text
endpoint :: MongoDbAtlasConfigurationProperty -> Value Text
endpointServiceName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
fieldMapping :: MongoDbAtlasConfigurationProperty
-> MongoDbAtlasFieldMappingProperty
textIndexName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
vectorIndexName :: MongoDbAtlasConfigurationProperty -> Value Text
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
..}
= MongoDbAtlasConfigurationProperty
{credentialsSecretArn :: Value Text
credentialsSecretArn = PropertyType
"CredentialsSecretArn" MongoDbAtlasConfigurationProperty
Value Text
newValue, Maybe (Value Text)
()
Value Text
MongoDbAtlasFieldMappingProperty
haddock_workaround_ :: ()
collectionName :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
haddock_workaround_ :: ()
collectionName :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
..}
instance Property "DatabaseName" MongoDbAtlasConfigurationProperty where
type PropertyType "DatabaseName" MongoDbAtlasConfigurationProperty = Value Prelude.Text
set :: PropertyType "DatabaseName" MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty
set PropertyType "DatabaseName" MongoDbAtlasConfigurationProperty
newValue MongoDbAtlasConfigurationProperty {Maybe (Value Text)
()
Value Text
MongoDbAtlasFieldMappingProperty
haddock_workaround_ :: MongoDbAtlasConfigurationProperty -> ()
collectionName :: MongoDbAtlasConfigurationProperty -> Value Text
credentialsSecretArn :: MongoDbAtlasConfigurationProperty -> Value Text
databaseName :: MongoDbAtlasConfigurationProperty -> Value Text
endpoint :: MongoDbAtlasConfigurationProperty -> Value Text
endpointServiceName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
fieldMapping :: MongoDbAtlasConfigurationProperty
-> MongoDbAtlasFieldMappingProperty
textIndexName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
vectorIndexName :: MongoDbAtlasConfigurationProperty -> Value Text
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
..}
= MongoDbAtlasConfigurationProperty {databaseName :: Value Text
databaseName = PropertyType "DatabaseName" MongoDbAtlasConfigurationProperty
Value Text
newValue, Maybe (Value Text)
()
Value Text
MongoDbAtlasFieldMappingProperty
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
..}
instance Property "Endpoint" MongoDbAtlasConfigurationProperty where
type PropertyType "Endpoint" MongoDbAtlasConfigurationProperty = Value Prelude.Text
set :: PropertyType "Endpoint" MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty
set PropertyType "Endpoint" MongoDbAtlasConfigurationProperty
newValue MongoDbAtlasConfigurationProperty {Maybe (Value Text)
()
Value Text
MongoDbAtlasFieldMappingProperty
haddock_workaround_ :: MongoDbAtlasConfigurationProperty -> ()
collectionName :: MongoDbAtlasConfigurationProperty -> Value Text
credentialsSecretArn :: MongoDbAtlasConfigurationProperty -> Value Text
databaseName :: MongoDbAtlasConfigurationProperty -> Value Text
endpoint :: MongoDbAtlasConfigurationProperty -> Value Text
endpointServiceName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
fieldMapping :: MongoDbAtlasConfigurationProperty
-> MongoDbAtlasFieldMappingProperty
textIndexName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
vectorIndexName :: MongoDbAtlasConfigurationProperty -> Value Text
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
..}
= MongoDbAtlasConfigurationProperty {endpoint :: Value Text
endpoint = PropertyType "Endpoint" MongoDbAtlasConfigurationProperty
Value Text
newValue, Maybe (Value Text)
()
Value Text
MongoDbAtlasFieldMappingProperty
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
..}
instance Property "EndpointServiceName" MongoDbAtlasConfigurationProperty where
type PropertyType "EndpointServiceName" MongoDbAtlasConfigurationProperty = Value Prelude.Text
set :: PropertyType
"EndpointServiceName" MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty
set PropertyType
"EndpointServiceName" MongoDbAtlasConfigurationProperty
newValue MongoDbAtlasConfigurationProperty {Maybe (Value Text)
()
Value Text
MongoDbAtlasFieldMappingProperty
haddock_workaround_ :: MongoDbAtlasConfigurationProperty -> ()
collectionName :: MongoDbAtlasConfigurationProperty -> Value Text
credentialsSecretArn :: MongoDbAtlasConfigurationProperty -> Value Text
databaseName :: MongoDbAtlasConfigurationProperty -> Value Text
endpoint :: MongoDbAtlasConfigurationProperty -> Value Text
endpointServiceName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
fieldMapping :: MongoDbAtlasConfigurationProperty
-> MongoDbAtlasFieldMappingProperty
textIndexName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
vectorIndexName :: MongoDbAtlasConfigurationProperty -> Value Text
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
..}
= MongoDbAtlasConfigurationProperty
{endpointServiceName :: Maybe (Value Text)
endpointServiceName = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"EndpointServiceName" MongoDbAtlasConfigurationProperty
Value Text
newValue, Maybe (Value Text)
()
Value Text
MongoDbAtlasFieldMappingProperty
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
..}
instance Property "FieldMapping" MongoDbAtlasConfigurationProperty where
type PropertyType "FieldMapping" MongoDbAtlasConfigurationProperty = MongoDbAtlasFieldMappingProperty
set :: PropertyType "FieldMapping" MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty
set PropertyType "FieldMapping" MongoDbAtlasConfigurationProperty
newValue MongoDbAtlasConfigurationProperty {Maybe (Value Text)
()
Value Text
MongoDbAtlasFieldMappingProperty
haddock_workaround_ :: MongoDbAtlasConfigurationProperty -> ()
collectionName :: MongoDbAtlasConfigurationProperty -> Value Text
credentialsSecretArn :: MongoDbAtlasConfigurationProperty -> Value Text
databaseName :: MongoDbAtlasConfigurationProperty -> Value Text
endpoint :: MongoDbAtlasConfigurationProperty -> Value Text
endpointServiceName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
fieldMapping :: MongoDbAtlasConfigurationProperty
-> MongoDbAtlasFieldMappingProperty
textIndexName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
vectorIndexName :: MongoDbAtlasConfigurationProperty -> Value Text
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
..}
= MongoDbAtlasConfigurationProperty {fieldMapping :: MongoDbAtlasFieldMappingProperty
fieldMapping = PropertyType "FieldMapping" MongoDbAtlasConfigurationProperty
MongoDbAtlasFieldMappingProperty
newValue, Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
..}
instance Property "TextIndexName" MongoDbAtlasConfigurationProperty where
type PropertyType "TextIndexName" MongoDbAtlasConfigurationProperty = Value Prelude.Text
set :: PropertyType "TextIndexName" MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty
set PropertyType "TextIndexName" MongoDbAtlasConfigurationProperty
newValue MongoDbAtlasConfigurationProperty {Maybe (Value Text)
()
Value Text
MongoDbAtlasFieldMappingProperty
haddock_workaround_ :: MongoDbAtlasConfigurationProperty -> ()
collectionName :: MongoDbAtlasConfigurationProperty -> Value Text
credentialsSecretArn :: MongoDbAtlasConfigurationProperty -> Value Text
databaseName :: MongoDbAtlasConfigurationProperty -> Value Text
endpoint :: MongoDbAtlasConfigurationProperty -> Value Text
endpointServiceName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
fieldMapping :: MongoDbAtlasConfigurationProperty
-> MongoDbAtlasFieldMappingProperty
textIndexName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
vectorIndexName :: MongoDbAtlasConfigurationProperty -> Value Text
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
..}
= MongoDbAtlasConfigurationProperty
{textIndexName :: Maybe (Value Text)
textIndexName = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TextIndexName" MongoDbAtlasConfigurationProperty
Value Text
newValue, Maybe (Value Text)
()
Value Text
MongoDbAtlasFieldMappingProperty
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
vectorIndexName :: Value Text
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
vectorIndexName :: Value Text
..}
instance Property "VectorIndexName" MongoDbAtlasConfigurationProperty where
type PropertyType "VectorIndexName" MongoDbAtlasConfigurationProperty = Value Prelude.Text
set :: PropertyType "VectorIndexName" MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty
-> MongoDbAtlasConfigurationProperty
set PropertyType "VectorIndexName" MongoDbAtlasConfigurationProperty
newValue MongoDbAtlasConfigurationProperty {Maybe (Value Text)
()
Value Text
MongoDbAtlasFieldMappingProperty
haddock_workaround_ :: MongoDbAtlasConfigurationProperty -> ()
collectionName :: MongoDbAtlasConfigurationProperty -> Value Text
credentialsSecretArn :: MongoDbAtlasConfigurationProperty -> Value Text
databaseName :: MongoDbAtlasConfigurationProperty -> Value Text
endpoint :: MongoDbAtlasConfigurationProperty -> Value Text
endpointServiceName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
fieldMapping :: MongoDbAtlasConfigurationProperty
-> MongoDbAtlasFieldMappingProperty
textIndexName :: MongoDbAtlasConfigurationProperty -> Maybe (Value Text)
vectorIndexName :: MongoDbAtlasConfigurationProperty -> Value Text
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
vectorIndexName :: Value Text
..}
= MongoDbAtlasConfigurationProperty
{vectorIndexName :: Value Text
vectorIndexName = PropertyType "VectorIndexName" MongoDbAtlasConfigurationProperty
Value Text
newValue, Maybe (Value Text)
()
Value Text
MongoDbAtlasFieldMappingProperty
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
haddock_workaround_ :: ()
collectionName :: Value Text
credentialsSecretArn :: Value Text
databaseName :: Value Text
endpoint :: Value Text
endpointServiceName :: Maybe (Value Text)
fieldMapping :: MongoDbAtlasFieldMappingProperty
textIndexName :: Maybe (Value Text)
..}