module Stratosphere.Connect.EvaluationForm.ScoringStrategyProperty ( ScoringStrategyProperty(..), mkScoringStrategyProperty ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import Stratosphere.ResourceProperties import Stratosphere.Value data ScoringStrategyProperty = -- | See: ScoringStrategyProperty {haddock_workaround_ :: (), -- | See: mode :: (Value Prelude.Text), -- | See: status :: (Value Prelude.Text)} deriving stock (Prelude.Eq, Prelude.Show) mkScoringStrategyProperty :: Value Prelude.Text -> Value Prelude.Text -> ScoringStrategyProperty mkScoringStrategyProperty mode status = ScoringStrategyProperty {haddock_workaround_ = (), mode = mode, status = status} instance ToResourceProperties ScoringStrategyProperty where toResourceProperties ScoringStrategyProperty {..} = ResourceProperties {awsType = "AWS::Connect::EvaluationForm.ScoringStrategy", supportsTags = Prelude.False, properties = ["Mode" JSON..= mode, "Status" JSON..= status]} instance JSON.ToJSON ScoringStrategyProperty where toJSON ScoringStrategyProperty {..} = JSON.object ["Mode" JSON..= mode, "Status" JSON..= status] instance Property "Mode" ScoringStrategyProperty where type PropertyType "Mode" ScoringStrategyProperty = Value Prelude.Text set newValue ScoringStrategyProperty {..} = ScoringStrategyProperty {mode = newValue, ..} instance Property "Status" ScoringStrategyProperty where type PropertyType "Status" ScoringStrategyProperty = Value Prelude.Text set newValue ScoringStrategyProperty {..} = ScoringStrategyProperty {status = newValue, ..}