module Stratosphere.DataBrew.Ruleset.SubstitutionValueProperty ( SubstitutionValueProperty(..), mkSubstitutionValueProperty ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import Stratosphere.ResourceProperties import Stratosphere.Value data SubstitutionValueProperty = -- | See: SubstitutionValueProperty {haddock_workaround_ :: (), -- | See: value :: (Value Prelude.Text), -- | See: valueReference :: (Value Prelude.Text)} deriving stock (Prelude.Eq, Prelude.Show) mkSubstitutionValueProperty :: Value Prelude.Text -> Value Prelude.Text -> SubstitutionValueProperty mkSubstitutionValueProperty value valueReference = SubstitutionValueProperty {haddock_workaround_ = (), value = value, valueReference = valueReference} instance ToResourceProperties SubstitutionValueProperty where toResourceProperties SubstitutionValueProperty {..} = ResourceProperties {awsType = "AWS::DataBrew::Ruleset.SubstitutionValue", supportsTags = Prelude.False, properties = ["Value" JSON..= value, "ValueReference" JSON..= valueReference]} instance JSON.ToJSON SubstitutionValueProperty where toJSON SubstitutionValueProperty {..} = JSON.object ["Value" JSON..= value, "ValueReference" JSON..= valueReference] instance Property "Value" SubstitutionValueProperty where type PropertyType "Value" SubstitutionValueProperty = Value Prelude.Text set newValue SubstitutionValueProperty {..} = SubstitutionValueProperty {value = newValue, ..} instance Property "ValueReference" SubstitutionValueProperty where type PropertyType "ValueReference" SubstitutionValueProperty = Value Prelude.Text set newValue SubstitutionValueProperty {..} = SubstitutionValueProperty {valueReference = newValue, ..}