packages feed

stratosphere-customerprofiles-1.0.0: gen/Stratosphere/CustomerProfiles/EventTrigger/EventTriggerConditionProperty.hs

module Stratosphere.CustomerProfiles.EventTrigger.EventTriggerConditionProperty (
        module Exports, EventTriggerConditionProperty(..),
        mkEventTriggerConditionProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.CustomerProfiles.EventTrigger.EventTriggerDimensionProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data EventTriggerConditionProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-customerprofiles-eventtrigger-eventtriggercondition.html>
    EventTriggerConditionProperty {haddock_workaround_ :: (),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-customerprofiles-eventtrigger-eventtriggercondition.html#cfn-customerprofiles-eventtrigger-eventtriggercondition-eventtriggerdimensions>
                                   eventTriggerDimensions :: [EventTriggerDimensionProperty],
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-customerprofiles-eventtrigger-eventtriggercondition.html#cfn-customerprofiles-eventtrigger-eventtriggercondition-logicaloperator>
                                   logicalOperator :: (Value Prelude.Text)}
  deriving stock (Prelude.Eq, Prelude.Show)
mkEventTriggerConditionProperty ::
  [EventTriggerDimensionProperty]
  -> Value Prelude.Text -> EventTriggerConditionProperty
mkEventTriggerConditionProperty
  eventTriggerDimensions
  logicalOperator
  = EventTriggerConditionProperty
      {haddock_workaround_ = (),
       eventTriggerDimensions = eventTriggerDimensions,
       logicalOperator = logicalOperator}
instance ToResourceProperties EventTriggerConditionProperty where
  toResourceProperties EventTriggerConditionProperty {..}
    = ResourceProperties
        {awsType = "AWS::CustomerProfiles::EventTrigger.EventTriggerCondition",
         supportsTags = Prelude.False,
         properties = ["EventTriggerDimensions"
                         JSON..= eventTriggerDimensions,
                       "LogicalOperator" JSON..= logicalOperator]}
instance JSON.ToJSON EventTriggerConditionProperty where
  toJSON EventTriggerConditionProperty {..}
    = JSON.object
        ["EventTriggerDimensions" JSON..= eventTriggerDimensions,
         "LogicalOperator" JSON..= logicalOperator]
instance Property "EventTriggerDimensions" EventTriggerConditionProperty where
  type PropertyType "EventTriggerDimensions" EventTriggerConditionProperty = [EventTriggerDimensionProperty]
  set newValue EventTriggerConditionProperty {..}
    = EventTriggerConditionProperty
        {eventTriggerDimensions = newValue, ..}
instance Property "LogicalOperator" EventTriggerConditionProperty where
  type PropertyType "LogicalOperator" EventTriggerConditionProperty = Value Prelude.Text
  set newValue EventTriggerConditionProperty {..}
    = EventTriggerConditionProperty {logicalOperator = newValue, ..}