module Stratosphere.AppFlow.ConnectorProfile.RedshiftConnectorProfilePropertiesProperty (
RedshiftConnectorProfilePropertiesProperty(..),
mkRedshiftConnectorProfilePropertiesProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data RedshiftConnectorProfilePropertiesProperty
=
RedshiftConnectorProfilePropertiesProperty {RedshiftConnectorProfilePropertiesProperty -> ()
haddock_workaround_ :: (),
RedshiftConnectorProfilePropertiesProperty -> Value Text
bucketName :: (Value Prelude.Text),
RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
bucketPrefix :: (Prelude.Maybe (Value Prelude.Text)),
RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
clusterIdentifier :: (Prelude.Maybe (Value Prelude.Text)),
RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
dataApiRoleArn :: (Prelude.Maybe (Value Prelude.Text)),
RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseName :: (Prelude.Maybe (Value Prelude.Text)),
RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseUrl :: (Prelude.Maybe (Value Prelude.Text)),
RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Bool)
isRedshiftServerless :: (Prelude.Maybe (Value Prelude.Bool)),
RedshiftConnectorProfilePropertiesProperty -> Value Text
roleArn :: (Value Prelude.Text),
RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
workgroupName :: (Prelude.Maybe (Value Prelude.Text))}
deriving stock (RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty -> Bool
(RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty -> Bool)
-> (RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty -> Bool)
-> Eq RedshiftConnectorProfilePropertiesProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty -> Bool
== :: RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty -> Bool
$c/= :: RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty -> Bool
/= :: RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty -> Bool
Prelude.Eq, Int -> RedshiftConnectorProfilePropertiesProperty -> ShowS
[RedshiftConnectorProfilePropertiesProperty] -> ShowS
RedshiftConnectorProfilePropertiesProperty -> String
(Int -> RedshiftConnectorProfilePropertiesProperty -> ShowS)
-> (RedshiftConnectorProfilePropertiesProperty -> String)
-> ([RedshiftConnectorProfilePropertiesProperty] -> ShowS)
-> Show RedshiftConnectorProfilePropertiesProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> RedshiftConnectorProfilePropertiesProperty -> ShowS
showsPrec :: Int -> RedshiftConnectorProfilePropertiesProperty -> ShowS
$cshow :: RedshiftConnectorProfilePropertiesProperty -> String
show :: RedshiftConnectorProfilePropertiesProperty -> String
$cshowList :: [RedshiftConnectorProfilePropertiesProperty] -> ShowS
showList :: [RedshiftConnectorProfilePropertiesProperty] -> ShowS
Prelude.Show)
mkRedshiftConnectorProfilePropertiesProperty ::
Value Prelude.Text
-> Value Prelude.Text -> RedshiftConnectorProfilePropertiesProperty
mkRedshiftConnectorProfilePropertiesProperty :: Value Text
-> Value Text -> RedshiftConnectorProfilePropertiesProperty
mkRedshiftConnectorProfilePropertiesProperty Value Text
bucketName Value Text
roleArn
= RedshiftConnectorProfilePropertiesProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), bucketName :: Value Text
bucketName = Value Text
bucketName,
roleArn :: Value Text
roleArn = Value Text
roleArn, bucketPrefix :: Maybe (Value Text)
bucketPrefix = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
clusterIdentifier :: Maybe (Value Text)
clusterIdentifier = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
dataApiRoleArn :: Maybe (Value Text)
dataApiRoleArn = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, databaseName :: Maybe (Value Text)
databaseName = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
databaseUrl :: Maybe (Value Text)
databaseUrl = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
isRedshiftServerless :: Maybe (Value Bool)
isRedshiftServerless = Maybe (Value Bool)
forall a. Maybe a
Prelude.Nothing,
workgroupName :: Maybe (Value Text)
workgroupName = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties RedshiftConnectorProfilePropertiesProperty where
toResourceProperties :: RedshiftConnectorProfilePropertiesProperty -> ResourceProperties
toResourceProperties
RedshiftConnectorProfilePropertiesProperty {Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: RedshiftConnectorProfilePropertiesProperty -> ()
bucketName :: RedshiftConnectorProfilePropertiesProperty -> Value Text
bucketPrefix :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
clusterIdentifier :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
dataApiRoleArn :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseUrl :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
isRedshiftServerless :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Bool)
roleArn :: RedshiftConnectorProfilePropertiesProperty -> Value Text
workgroupName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::AppFlow::ConnectorProfile.RedshiftConnectorProfileProperties",
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
"BucketName" 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
bucketName, Key
"RoleArn" 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
roleArn]
([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
"BucketPrefix" (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)
bucketPrefix,
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
"ClusterIdentifier" (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)
clusterIdentifier,
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
"DataApiRoleArn" (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)
dataApiRoleArn,
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
"DatabaseName" (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)
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..=) Key
"DatabaseUrl" (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)
databaseUrl,
Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"IsRedshiftServerless" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
isRedshiftServerless,
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
"WorkgroupName" (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)
workgroupName]))}
instance JSON.ToJSON RedshiftConnectorProfilePropertiesProperty where
toJSON :: RedshiftConnectorProfilePropertiesProperty -> Value
toJSON RedshiftConnectorProfilePropertiesProperty {Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: RedshiftConnectorProfilePropertiesProperty -> ()
bucketName :: RedshiftConnectorProfilePropertiesProperty -> Value Text
bucketPrefix :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
clusterIdentifier :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
dataApiRoleArn :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseUrl :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
isRedshiftServerless :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Bool)
roleArn :: RedshiftConnectorProfilePropertiesProperty -> Value Text
workgroupName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (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
"BucketName" 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
bucketName, Key
"RoleArn" 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
roleArn]
([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
"BucketPrefix" (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)
bucketPrefix,
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
"ClusterIdentifier" (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)
clusterIdentifier,
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
"DataApiRoleArn" (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)
dataApiRoleArn,
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
"DatabaseName" (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)
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..=) Key
"DatabaseUrl" (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)
databaseUrl,
Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"IsRedshiftServerless" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
isRedshiftServerless,
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
"WorkgroupName" (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)
workgroupName])))
instance Property "BucketName" RedshiftConnectorProfilePropertiesProperty where
type PropertyType "BucketName" RedshiftConnectorProfilePropertiesProperty = Value Prelude.Text
set :: PropertyType
"BucketName" RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty
set PropertyType
"BucketName" RedshiftConnectorProfilePropertiesProperty
newValue RedshiftConnectorProfilePropertiesProperty {Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: RedshiftConnectorProfilePropertiesProperty -> ()
bucketName :: RedshiftConnectorProfilePropertiesProperty -> Value Text
bucketPrefix :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
clusterIdentifier :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
dataApiRoleArn :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseUrl :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
isRedshiftServerless :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Bool)
roleArn :: RedshiftConnectorProfilePropertiesProperty -> Value Text
workgroupName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
..}
= RedshiftConnectorProfilePropertiesProperty
{bucketName :: Value Text
bucketName = PropertyType
"BucketName" RedshiftConnectorProfilePropertiesProperty
Value Text
newValue, Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
haddock_workaround_ :: ()
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
..}
instance Property "BucketPrefix" RedshiftConnectorProfilePropertiesProperty where
type PropertyType "BucketPrefix" RedshiftConnectorProfilePropertiesProperty = Value Prelude.Text
set :: PropertyType
"BucketPrefix" RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty
set PropertyType
"BucketPrefix" RedshiftConnectorProfilePropertiesProperty
newValue RedshiftConnectorProfilePropertiesProperty {Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: RedshiftConnectorProfilePropertiesProperty -> ()
bucketName :: RedshiftConnectorProfilePropertiesProperty -> Value Text
bucketPrefix :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
clusterIdentifier :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
dataApiRoleArn :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseUrl :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
isRedshiftServerless :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Bool)
roleArn :: RedshiftConnectorProfilePropertiesProperty -> Value Text
workgroupName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
..}
= RedshiftConnectorProfilePropertiesProperty
{bucketPrefix :: Maybe (Value Text)
bucketPrefix = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"BucketPrefix" RedshiftConnectorProfilePropertiesProperty
Value Text
newValue, Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
bucketName :: Value Text
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
haddock_workaround_ :: ()
bucketName :: Value Text
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
..}
instance Property "ClusterIdentifier" RedshiftConnectorProfilePropertiesProperty where
type PropertyType "ClusterIdentifier" RedshiftConnectorProfilePropertiesProperty = Value Prelude.Text
set :: PropertyType
"ClusterIdentifier" RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty
set PropertyType
"ClusterIdentifier" RedshiftConnectorProfilePropertiesProperty
newValue RedshiftConnectorProfilePropertiesProperty {Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: RedshiftConnectorProfilePropertiesProperty -> ()
bucketName :: RedshiftConnectorProfilePropertiesProperty -> Value Text
bucketPrefix :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
clusterIdentifier :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
dataApiRoleArn :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseUrl :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
isRedshiftServerless :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Bool)
roleArn :: RedshiftConnectorProfilePropertiesProperty -> Value Text
workgroupName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
..}
= RedshiftConnectorProfilePropertiesProperty
{clusterIdentifier :: Maybe (Value Text)
clusterIdentifier = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"ClusterIdentifier" RedshiftConnectorProfilePropertiesProperty
Value Text
newValue, Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
..}
instance Property "DataApiRoleArn" RedshiftConnectorProfilePropertiesProperty where
type PropertyType "DataApiRoleArn" RedshiftConnectorProfilePropertiesProperty = Value Prelude.Text
set :: PropertyType
"DataApiRoleArn" RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty
set PropertyType
"DataApiRoleArn" RedshiftConnectorProfilePropertiesProperty
newValue RedshiftConnectorProfilePropertiesProperty {Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: RedshiftConnectorProfilePropertiesProperty -> ()
bucketName :: RedshiftConnectorProfilePropertiesProperty -> Value Text
bucketPrefix :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
clusterIdentifier :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
dataApiRoleArn :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseUrl :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
isRedshiftServerless :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Bool)
roleArn :: RedshiftConnectorProfilePropertiesProperty -> Value Text
workgroupName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
..}
= RedshiftConnectorProfilePropertiesProperty
{dataApiRoleArn :: Maybe (Value Text)
dataApiRoleArn = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"DataApiRoleArn" RedshiftConnectorProfilePropertiesProperty
Value Text
newValue, Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
..}
instance Property "DatabaseName" RedshiftConnectorProfilePropertiesProperty where
type PropertyType "DatabaseName" RedshiftConnectorProfilePropertiesProperty = Value Prelude.Text
set :: PropertyType
"DatabaseName" RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty
set PropertyType
"DatabaseName" RedshiftConnectorProfilePropertiesProperty
newValue RedshiftConnectorProfilePropertiesProperty {Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: RedshiftConnectorProfilePropertiesProperty -> ()
bucketName :: RedshiftConnectorProfilePropertiesProperty -> Value Text
bucketPrefix :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
clusterIdentifier :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
dataApiRoleArn :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseUrl :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
isRedshiftServerless :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Bool)
roleArn :: RedshiftConnectorProfilePropertiesProperty -> Value Text
workgroupName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
..}
= RedshiftConnectorProfilePropertiesProperty
{databaseName :: Maybe (Value Text)
databaseName = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"DatabaseName" RedshiftConnectorProfilePropertiesProperty
Value Text
newValue, Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
..}
instance Property "DatabaseUrl" RedshiftConnectorProfilePropertiesProperty where
type PropertyType "DatabaseUrl" RedshiftConnectorProfilePropertiesProperty = Value Prelude.Text
set :: PropertyType
"DatabaseUrl" RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty
set PropertyType
"DatabaseUrl" RedshiftConnectorProfilePropertiesProperty
newValue RedshiftConnectorProfilePropertiesProperty {Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: RedshiftConnectorProfilePropertiesProperty -> ()
bucketName :: RedshiftConnectorProfilePropertiesProperty -> Value Text
bucketPrefix :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
clusterIdentifier :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
dataApiRoleArn :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseUrl :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
isRedshiftServerless :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Bool)
roleArn :: RedshiftConnectorProfilePropertiesProperty -> Value Text
workgroupName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
..}
= RedshiftConnectorProfilePropertiesProperty
{databaseUrl :: Maybe (Value Text)
databaseUrl = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"DatabaseUrl" RedshiftConnectorProfilePropertiesProperty
Value Text
newValue, Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
..}
instance Property "IsRedshiftServerless" RedshiftConnectorProfilePropertiesProperty where
type PropertyType "IsRedshiftServerless" RedshiftConnectorProfilePropertiesProperty = Value Prelude.Bool
set :: PropertyType
"IsRedshiftServerless" RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty
set PropertyType
"IsRedshiftServerless" RedshiftConnectorProfilePropertiesProperty
newValue RedshiftConnectorProfilePropertiesProperty {Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: RedshiftConnectorProfilePropertiesProperty -> ()
bucketName :: RedshiftConnectorProfilePropertiesProperty -> Value Text
bucketPrefix :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
clusterIdentifier :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
dataApiRoleArn :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseUrl :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
isRedshiftServerless :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Bool)
roleArn :: RedshiftConnectorProfilePropertiesProperty -> Value Text
workgroupName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
..}
= RedshiftConnectorProfilePropertiesProperty
{isRedshiftServerless :: Maybe (Value Bool)
isRedshiftServerless = Value Bool -> Maybe (Value Bool)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"IsRedshiftServerless" RedshiftConnectorProfilePropertiesProperty
Value Bool
newValue, Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
..}
instance Property "RoleArn" RedshiftConnectorProfilePropertiesProperty where
type PropertyType "RoleArn" RedshiftConnectorProfilePropertiesProperty = Value Prelude.Text
set :: PropertyType "RoleArn" RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty
set PropertyType "RoleArn" RedshiftConnectorProfilePropertiesProperty
newValue RedshiftConnectorProfilePropertiesProperty {Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: RedshiftConnectorProfilePropertiesProperty -> ()
bucketName :: RedshiftConnectorProfilePropertiesProperty -> Value Text
bucketPrefix :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
clusterIdentifier :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
dataApiRoleArn :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseUrl :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
isRedshiftServerless :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Bool)
roleArn :: RedshiftConnectorProfilePropertiesProperty -> Value Text
workgroupName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
..}
= RedshiftConnectorProfilePropertiesProperty
{roleArn :: Value Text
roleArn = PropertyType "RoleArn" RedshiftConnectorProfilePropertiesProperty
Value Text
newValue, Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
workgroupName :: Maybe (Value Text)
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
workgroupName :: Maybe (Value Text)
..}
instance Property "WorkgroupName" RedshiftConnectorProfilePropertiesProperty where
type PropertyType "WorkgroupName" RedshiftConnectorProfilePropertiesProperty = Value Prelude.Text
set :: PropertyType
"WorkgroupName" RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty
-> RedshiftConnectorProfilePropertiesProperty
set PropertyType
"WorkgroupName" RedshiftConnectorProfilePropertiesProperty
newValue RedshiftConnectorProfilePropertiesProperty {Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: RedshiftConnectorProfilePropertiesProperty -> ()
bucketName :: RedshiftConnectorProfilePropertiesProperty -> Value Text
bucketPrefix :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
clusterIdentifier :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
dataApiRoleArn :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
databaseUrl :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
isRedshiftServerless :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Bool)
roleArn :: RedshiftConnectorProfilePropertiesProperty -> Value Text
workgroupName :: RedshiftConnectorProfilePropertiesProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
workgroupName :: Maybe (Value Text)
..}
= RedshiftConnectorProfilePropertiesProperty
{workgroupName :: Maybe (Value Text)
workgroupName = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"WorkgroupName" RedshiftConnectorProfilePropertiesProperty
Value Text
newValue, Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
haddock_workaround_ :: ()
bucketName :: Value Text
bucketPrefix :: Maybe (Value Text)
clusterIdentifier :: Maybe (Value Text)
dataApiRoleArn :: Maybe (Value Text)
databaseName :: Maybe (Value Text)
databaseUrl :: Maybe (Value Text)
isRedshiftServerless :: Maybe (Value Bool)
roleArn :: Value Text
..}