module Stratosphere.Batch.JobQueue.ServiceEnvironmentOrderProperty ( ServiceEnvironmentOrderProperty(..), mkServiceEnvironmentOrderProperty ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import Stratosphere.ResourceProperties import Stratosphere.Value data ServiceEnvironmentOrderProperty = -- | See: ServiceEnvironmentOrderProperty {haddock_workaround_ :: (), -- | See: order :: (Value Prelude.Integer), -- | See: serviceEnvironment :: (Value Prelude.Text)} deriving stock (Prelude.Eq, Prelude.Show) mkServiceEnvironmentOrderProperty :: Value Prelude.Integer -> Value Prelude.Text -> ServiceEnvironmentOrderProperty mkServiceEnvironmentOrderProperty order serviceEnvironment = ServiceEnvironmentOrderProperty {haddock_workaround_ = (), order = order, serviceEnvironment = serviceEnvironment} instance ToResourceProperties ServiceEnvironmentOrderProperty where toResourceProperties ServiceEnvironmentOrderProperty {..} = ResourceProperties {awsType = "AWS::Batch::JobQueue.ServiceEnvironmentOrder", supportsTags = Prelude.False, properties = ["Order" JSON..= order, "ServiceEnvironment" JSON..= serviceEnvironment]} instance JSON.ToJSON ServiceEnvironmentOrderProperty where toJSON ServiceEnvironmentOrderProperty {..} = JSON.object ["Order" JSON..= order, "ServiceEnvironment" JSON..= serviceEnvironment] instance Property "Order" ServiceEnvironmentOrderProperty where type PropertyType "Order" ServiceEnvironmentOrderProperty = Value Prelude.Integer set newValue ServiceEnvironmentOrderProperty {..} = ServiceEnvironmentOrderProperty {order = newValue, ..} instance Property "ServiceEnvironment" ServiceEnvironmentOrderProperty where type PropertyType "ServiceEnvironment" ServiceEnvironmentOrderProperty = Value Prelude.Text set newValue ServiceEnvironmentOrderProperty {..} = ServiceEnvironmentOrderProperty {serviceEnvironment = newValue, ..}