packages feed

stratosphere-appflow-1.0.0: gen/Stratosphere/AppFlow/ConnectorProfile/DynatraceConnectorProfilePropertiesProperty.hs

module Stratosphere.AppFlow.ConnectorProfile.DynatraceConnectorProfilePropertiesProperty (
        DynatraceConnectorProfilePropertiesProperty(..),
        mkDynatraceConnectorProfilePropertiesProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data DynatraceConnectorProfilePropertiesProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appflow-connectorprofile-dynatraceconnectorprofileproperties.html>
    DynatraceConnectorProfilePropertiesProperty {haddock_workaround_ :: (),
                                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appflow-connectorprofile-dynatraceconnectorprofileproperties.html#cfn-appflow-connectorprofile-dynatraceconnectorprofileproperties-instanceurl>
                                                 instanceUrl :: (Value Prelude.Text)}
  deriving stock (Prelude.Eq, Prelude.Show)
mkDynatraceConnectorProfilePropertiesProperty ::
  Value Prelude.Text -> DynatraceConnectorProfilePropertiesProperty
mkDynatraceConnectorProfilePropertiesProperty instanceUrl
  = DynatraceConnectorProfilePropertiesProperty
      {haddock_workaround_ = (), instanceUrl = instanceUrl}
instance ToResourceProperties DynatraceConnectorProfilePropertiesProperty where
  toResourceProperties
    DynatraceConnectorProfilePropertiesProperty {..}
    = ResourceProperties
        {awsType = "AWS::AppFlow::ConnectorProfile.DynatraceConnectorProfileProperties",
         supportsTags = Prelude.False,
         properties = ["InstanceUrl" JSON..= instanceUrl]}
instance JSON.ToJSON DynatraceConnectorProfilePropertiesProperty where
  toJSON DynatraceConnectorProfilePropertiesProperty {..}
    = JSON.object ["InstanceUrl" JSON..= instanceUrl]
instance Property "InstanceUrl" DynatraceConnectorProfilePropertiesProperty where
  type PropertyType "InstanceUrl" DynatraceConnectorProfilePropertiesProperty = Value Prelude.Text
  set newValue DynatraceConnectorProfilePropertiesProperty {..}
    = DynatraceConnectorProfilePropertiesProperty
        {instanceUrl = newValue, ..}