module Stratosphere.AppFlow.ConnectorProfile.DynatraceConnectorProfileCredentialsProperty (
DynatraceConnectorProfileCredentialsProperty(..),
mkDynatraceConnectorProfileCredentialsProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data DynatraceConnectorProfileCredentialsProperty
=
DynatraceConnectorProfileCredentialsProperty {DynatraceConnectorProfileCredentialsProperty -> ()
haddock_workaround_ :: (),
DynatraceConnectorProfileCredentialsProperty -> Value Text
apiToken :: (Value Prelude.Text)}
deriving stock (DynatraceConnectorProfileCredentialsProperty
-> DynatraceConnectorProfileCredentialsProperty -> Bool
(DynatraceConnectorProfileCredentialsProperty
-> DynatraceConnectorProfileCredentialsProperty -> Bool)
-> (DynatraceConnectorProfileCredentialsProperty
-> DynatraceConnectorProfileCredentialsProperty -> Bool)
-> Eq DynatraceConnectorProfileCredentialsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DynatraceConnectorProfileCredentialsProperty
-> DynatraceConnectorProfileCredentialsProperty -> Bool
== :: DynatraceConnectorProfileCredentialsProperty
-> DynatraceConnectorProfileCredentialsProperty -> Bool
$c/= :: DynatraceConnectorProfileCredentialsProperty
-> DynatraceConnectorProfileCredentialsProperty -> Bool
/= :: DynatraceConnectorProfileCredentialsProperty
-> DynatraceConnectorProfileCredentialsProperty -> Bool
Prelude.Eq, Int -> DynatraceConnectorProfileCredentialsProperty -> ShowS
[DynatraceConnectorProfileCredentialsProperty] -> ShowS
DynatraceConnectorProfileCredentialsProperty -> String
(Int -> DynatraceConnectorProfileCredentialsProperty -> ShowS)
-> (DynatraceConnectorProfileCredentialsProperty -> String)
-> ([DynatraceConnectorProfileCredentialsProperty] -> ShowS)
-> Show DynatraceConnectorProfileCredentialsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> DynatraceConnectorProfileCredentialsProperty -> ShowS
showsPrec :: Int -> DynatraceConnectorProfileCredentialsProperty -> ShowS
$cshow :: DynatraceConnectorProfileCredentialsProperty -> String
show :: DynatraceConnectorProfileCredentialsProperty -> String
$cshowList :: [DynatraceConnectorProfileCredentialsProperty] -> ShowS
showList :: [DynatraceConnectorProfileCredentialsProperty] -> ShowS
Prelude.Show)
mkDynatraceConnectorProfileCredentialsProperty ::
Value Prelude.Text -> DynatraceConnectorProfileCredentialsProperty
mkDynatraceConnectorProfileCredentialsProperty :: Value Text -> DynatraceConnectorProfileCredentialsProperty
mkDynatraceConnectorProfileCredentialsProperty Value Text
apiToken
= DynatraceConnectorProfileCredentialsProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), apiToken :: Value Text
apiToken = Value Text
apiToken}
instance ToResourceProperties DynatraceConnectorProfileCredentialsProperty where
toResourceProperties :: DynatraceConnectorProfileCredentialsProperty -> ResourceProperties
toResourceProperties
DynatraceConnectorProfileCredentialsProperty {()
Value Text
haddock_workaround_ :: DynatraceConnectorProfileCredentialsProperty -> ()
apiToken :: DynatraceConnectorProfileCredentialsProperty -> Value Text
haddock_workaround_ :: ()
apiToken :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::AppFlow::ConnectorProfile.DynatraceConnectorProfileCredentials",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"ApiToken" 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
apiToken]}
instance JSON.ToJSON DynatraceConnectorProfileCredentialsProperty where
toJSON :: DynatraceConnectorProfileCredentialsProperty -> Value
toJSON DynatraceConnectorProfileCredentialsProperty {()
Value Text
haddock_workaround_ :: DynatraceConnectorProfileCredentialsProperty -> ()
apiToken :: DynatraceConnectorProfileCredentialsProperty -> Value Text
haddock_workaround_ :: ()
apiToken :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object [Key
"ApiToken" 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
apiToken]
instance Property "ApiToken" DynatraceConnectorProfileCredentialsProperty where
type PropertyType "ApiToken" DynatraceConnectorProfileCredentialsProperty = Value Prelude.Text
set :: PropertyType
"ApiToken" DynatraceConnectorProfileCredentialsProperty
-> DynatraceConnectorProfileCredentialsProperty
-> DynatraceConnectorProfileCredentialsProperty
set PropertyType
"ApiToken" DynatraceConnectorProfileCredentialsProperty
newValue DynatraceConnectorProfileCredentialsProperty {()
Value Text
haddock_workaround_ :: DynatraceConnectorProfileCredentialsProperty -> ()
apiToken :: DynatraceConnectorProfileCredentialsProperty -> Value Text
haddock_workaround_ :: ()
apiToken :: Value Text
..}
= DynatraceConnectorProfileCredentialsProperty
{apiToken :: Value Text
apiToken = PropertyType
"ApiToken" DynatraceConnectorProfileCredentialsProperty
Value Text
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}