{-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE DuplicateRecordFields #-} {-# LANGUAGE NamedFieldPuns #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE StrictData #-} {-# LANGUAGE TypeFamilies #-} {-# LANGUAGE NoImplicitPrelude #-} {-# OPTIONS_GHC -fno-warn-unused-binds #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-matches #-} -- Derived from AWS service descriptions, licensed under Apache 2.0. -- | -- Module : Amazonka.ApplicationAutoScaling.DeleteScalingPolicy -- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Deletes the specified scaling policy for an Application Auto Scaling -- scalable target. -- -- Deleting a step scaling policy deletes the underlying alarm action, but -- does not delete the CloudWatch alarm associated with the scaling policy, -- even if it no longer has an associated action. -- -- For more information, see -- <https://docs.aws.amazon.com/autoscaling/application/userguide/application-auto-scaling-step-scaling-policies.html#delete-step-scaling-policy Delete a step scaling policy> -- and -- <https://docs.aws.amazon.com/autoscaling/application/userguide/application-auto-scaling-target-tracking.html#delete-target-tracking-policy Delete a target tracking scaling policy> -- in the /Application Auto Scaling User Guide/. module Amazonka.ApplicationAutoScaling.DeleteScalingPolicy ( -- * Creating a Request DeleteScalingPolicy (..), newDeleteScalingPolicy, -- * Request Lenses deleteScalingPolicy_policyName, deleteScalingPolicy_serviceNamespace, deleteScalingPolicy_resourceId, deleteScalingPolicy_scalableDimension, -- * Destructuring the Response DeleteScalingPolicyResponse (..), newDeleteScalingPolicyResponse, -- * Response Lenses deleteScalingPolicyResponse_httpStatus, ) where import Amazonka.ApplicationAutoScaling.Types import qualified Amazonka.Core as Core import qualified Amazonka.Core.Lens.Internal as Lens import qualified Amazonka.Data as Data import qualified Amazonka.Prelude as Prelude import qualified Amazonka.Request as Request import qualified Amazonka.Response as Response -- | /See:/ 'newDeleteScalingPolicy' smart constructor. data DeleteScalingPolicy = DeleteScalingPolicy' { -- | The name of the scaling policy. DeleteScalingPolicy -> Text policyName :: Prelude.Text, -- | The namespace of the Amazon Web Services service that provides the -- resource. For a resource provided by your own application or service, -- use @custom-resource@ instead. DeleteScalingPolicy -> ServiceNamespace serviceNamespace :: ServiceNamespace, -- | The identifier of the resource associated with the scalable target. This -- string consists of the resource type and unique identifier. -- -- - ECS service - The resource type is @service@ and the unique -- identifier is the cluster name and service name. Example: -- @service\/default\/sample-webapp@. -- -- - Spot Fleet - The resource type is @spot-fleet-request@ and the -- unique identifier is the Spot Fleet request ID. Example: -- @spot-fleet-request\/sfr-73fbd2ce-aa30-494c-8788-1cee4EXAMPLE@. -- -- - EMR cluster - The resource type is @instancegroup@ and the unique -- identifier is the cluster ID and instance group ID. Example: -- @instancegroup\/j-2EEZNYKUA1NTV\/ig-1791Y4E1L8YI0@. -- -- - AppStream 2.0 fleet - The resource type is @fleet@ and the unique -- identifier is the fleet name. Example: @fleet\/sample-fleet@. -- -- - DynamoDB table - The resource type is @table@ and the unique -- identifier is the table name. Example: @table\/my-table@. -- -- - DynamoDB global secondary index - The resource type is @index@ and -- the unique identifier is the index name. Example: -- @table\/my-table\/index\/my-table-index@. -- -- - Aurora DB cluster - The resource type is @cluster@ and the unique -- identifier is the cluster name. Example: @cluster:my-db-cluster@. -- -- - SageMaker endpoint variant - The resource type is @variant@ and the -- unique identifier is the resource ID. Example: -- @endpoint\/my-end-point\/variant\/KMeansClustering@. -- -- - Custom resources are not supported with a resource type. This -- parameter must specify the @OutputValue@ from the CloudFormation -- template stack used to access the resources. The unique identifier -- is defined by the service provider. More information is available in -- our -- <https://github.com/aws/aws-auto-scaling-custom-resource GitHub repository>. -- -- - Amazon Comprehend document classification endpoint - The resource -- type and unique identifier are specified using the endpoint ARN. -- Example: -- @arn:aws:comprehend:us-west-2:123456789012:document-classifier-endpoint\/EXAMPLE@. -- -- - Amazon Comprehend entity recognizer endpoint - The resource type and -- unique identifier are specified using the endpoint ARN. Example: -- @arn:aws:comprehend:us-west-2:123456789012:entity-recognizer-endpoint\/EXAMPLE@. -- -- - Lambda provisioned concurrency - The resource type is @function@ and -- the unique identifier is the function name with a function version -- or alias name suffix that is not @$LATEST@. Example: -- @function:my-function:prod@ or @function:my-function:1@. -- -- - Amazon Keyspaces table - The resource type is @table@ and the unique -- identifier is the table name. Example: -- @keyspace\/mykeyspace\/table\/mytable@. -- -- - Amazon MSK cluster - The resource type and unique identifier are -- specified using the cluster ARN. Example: -- @arn:aws:kafka:us-east-1:123456789012:cluster\/demo-cluster-1\/6357e0b2-0e6a-4b86-a0b4-70df934c2e31-5@. -- -- - Amazon ElastiCache replication group - The resource type is -- @replication-group@ and the unique identifier is the replication -- group name. Example: @replication-group\/mycluster@. -- -- - Neptune cluster - The resource type is @cluster@ and the unique -- identifier is the cluster name. Example: @cluster:mycluster@. DeleteScalingPolicy -> Text resourceId :: Prelude.Text, -- | The scalable dimension. This string consists of the service namespace, -- resource type, and scaling property. -- -- - @ecs:service:DesiredCount@ - The desired task count of an ECS -- service. -- -- - @elasticmapreduce:instancegroup:InstanceCount@ - The instance count -- of an EMR Instance Group. -- -- - @ec2:spot-fleet-request:TargetCapacity@ - The target capacity of a -- Spot Fleet. -- -- - @appstream:fleet:DesiredCapacity@ - The desired capacity of an -- AppStream 2.0 fleet. -- -- - @dynamodb:table:ReadCapacityUnits@ - The provisioned read capacity -- for a DynamoDB table. -- -- - @dynamodb:table:WriteCapacityUnits@ - The provisioned write capacity -- for a DynamoDB table. -- -- - @dynamodb:index:ReadCapacityUnits@ - The provisioned read capacity -- for a DynamoDB global secondary index. -- -- - @dynamodb:index:WriteCapacityUnits@ - The provisioned write capacity -- for a DynamoDB global secondary index. -- -- - @rds:cluster:ReadReplicaCount@ - The count of Aurora Replicas in an -- Aurora DB cluster. Available for Aurora MySQL-compatible edition and -- Aurora PostgreSQL-compatible edition. -- -- - @sagemaker:variant:DesiredInstanceCount@ - The number of EC2 -- instances for a SageMaker model endpoint variant. -- -- - @custom-resource:ResourceType:Property@ - The scalable dimension for -- a custom resource provided by your own application or service. -- -- - @comprehend:document-classifier-endpoint:DesiredInferenceUnits@ - -- The number of inference units for an Amazon Comprehend document -- classification endpoint. -- -- - @comprehend:entity-recognizer-endpoint:DesiredInferenceUnits@ - The -- number of inference units for an Amazon Comprehend entity recognizer -- endpoint. -- -- - @lambda:function:ProvisionedConcurrency@ - The provisioned -- concurrency for a Lambda function. -- -- - @cassandra:table:ReadCapacityUnits@ - The provisioned read capacity -- for an Amazon Keyspaces table. -- -- - @cassandra:table:WriteCapacityUnits@ - The provisioned write -- capacity for an Amazon Keyspaces table. -- -- - @kafka:broker-storage:VolumeSize@ - The provisioned volume size (in -- GiB) for brokers in an Amazon MSK cluster. -- -- - @elasticache:replication-group:NodeGroups@ - The number of node -- groups for an Amazon ElastiCache replication group. -- -- - @elasticache:replication-group:Replicas@ - The number of replicas -- per node group for an Amazon ElastiCache replication group. -- -- - @neptune:cluster:ReadReplicaCount@ - The count of read replicas in -- an Amazon Neptune DB cluster. DeleteScalingPolicy -> ScalableDimension scalableDimension :: ScalableDimension } deriving (DeleteScalingPolicy -> DeleteScalingPolicy -> Bool forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: DeleteScalingPolicy -> DeleteScalingPolicy -> Bool $c/= :: DeleteScalingPolicy -> DeleteScalingPolicy -> Bool == :: DeleteScalingPolicy -> DeleteScalingPolicy -> Bool $c== :: DeleteScalingPolicy -> DeleteScalingPolicy -> Bool Prelude.Eq, ReadPrec [DeleteScalingPolicy] ReadPrec DeleteScalingPolicy Int -> ReadS DeleteScalingPolicy ReadS [DeleteScalingPolicy] forall a. (Int -> ReadS a) -> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a readListPrec :: ReadPrec [DeleteScalingPolicy] $creadListPrec :: ReadPrec [DeleteScalingPolicy] readPrec :: ReadPrec DeleteScalingPolicy $creadPrec :: ReadPrec DeleteScalingPolicy readList :: ReadS [DeleteScalingPolicy] $creadList :: ReadS [DeleteScalingPolicy] readsPrec :: Int -> ReadS DeleteScalingPolicy $creadsPrec :: Int -> ReadS DeleteScalingPolicy Prelude.Read, Int -> DeleteScalingPolicy -> ShowS [DeleteScalingPolicy] -> ShowS DeleteScalingPolicy -> String forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a showList :: [DeleteScalingPolicy] -> ShowS $cshowList :: [DeleteScalingPolicy] -> ShowS show :: DeleteScalingPolicy -> String $cshow :: DeleteScalingPolicy -> String showsPrec :: Int -> DeleteScalingPolicy -> ShowS $cshowsPrec :: Int -> DeleteScalingPolicy -> ShowS Prelude.Show, forall x. Rep DeleteScalingPolicy x -> DeleteScalingPolicy forall x. DeleteScalingPolicy -> Rep DeleteScalingPolicy x forall a. (forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a $cto :: forall x. Rep DeleteScalingPolicy x -> DeleteScalingPolicy $cfrom :: forall x. DeleteScalingPolicy -> Rep DeleteScalingPolicy x Prelude.Generic) -- | -- Create a value of 'DeleteScalingPolicy' with all optional fields omitted. -- -- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields. -- -- The following record fields are available, with the corresponding lenses provided -- for backwards compatibility: -- -- 'policyName', 'deleteScalingPolicy_policyName' - The name of the scaling policy. -- -- 'serviceNamespace', 'deleteScalingPolicy_serviceNamespace' - The namespace of the Amazon Web Services service that provides the -- resource. For a resource provided by your own application or service, -- use @custom-resource@ instead. -- -- 'resourceId', 'deleteScalingPolicy_resourceId' - The identifier of the resource associated with the scalable target. This -- string consists of the resource type and unique identifier. -- -- - ECS service - The resource type is @service@ and the unique -- identifier is the cluster name and service name. Example: -- @service\/default\/sample-webapp@. -- -- - Spot Fleet - The resource type is @spot-fleet-request@ and the -- unique identifier is the Spot Fleet request ID. Example: -- @spot-fleet-request\/sfr-73fbd2ce-aa30-494c-8788-1cee4EXAMPLE@. -- -- - EMR cluster - The resource type is @instancegroup@ and the unique -- identifier is the cluster ID and instance group ID. Example: -- @instancegroup\/j-2EEZNYKUA1NTV\/ig-1791Y4E1L8YI0@. -- -- - AppStream 2.0 fleet - The resource type is @fleet@ and the unique -- identifier is the fleet name. Example: @fleet\/sample-fleet@. -- -- - DynamoDB table - The resource type is @table@ and the unique -- identifier is the table name. Example: @table\/my-table@. -- -- - DynamoDB global secondary index - The resource type is @index@ and -- the unique identifier is the index name. Example: -- @table\/my-table\/index\/my-table-index@. -- -- - Aurora DB cluster - The resource type is @cluster@ and the unique -- identifier is the cluster name. Example: @cluster:my-db-cluster@. -- -- - SageMaker endpoint variant - The resource type is @variant@ and the -- unique identifier is the resource ID. Example: -- @endpoint\/my-end-point\/variant\/KMeansClustering@. -- -- - Custom resources are not supported with a resource type. This -- parameter must specify the @OutputValue@ from the CloudFormation -- template stack used to access the resources. The unique identifier -- is defined by the service provider. More information is available in -- our -- <https://github.com/aws/aws-auto-scaling-custom-resource GitHub repository>. -- -- - Amazon Comprehend document classification endpoint - The resource -- type and unique identifier are specified using the endpoint ARN. -- Example: -- @arn:aws:comprehend:us-west-2:123456789012:document-classifier-endpoint\/EXAMPLE@. -- -- - Amazon Comprehend entity recognizer endpoint - The resource type and -- unique identifier are specified using the endpoint ARN. Example: -- @arn:aws:comprehend:us-west-2:123456789012:entity-recognizer-endpoint\/EXAMPLE@. -- -- - Lambda provisioned concurrency - The resource type is @function@ and -- the unique identifier is the function name with a function version -- or alias name suffix that is not @$LATEST@. Example: -- @function:my-function:prod@ or @function:my-function:1@. -- -- - Amazon Keyspaces table - The resource type is @table@ and the unique -- identifier is the table name. Example: -- @keyspace\/mykeyspace\/table\/mytable@. -- -- - Amazon MSK cluster - The resource type and unique identifier are -- specified using the cluster ARN. Example: -- @arn:aws:kafka:us-east-1:123456789012:cluster\/demo-cluster-1\/6357e0b2-0e6a-4b86-a0b4-70df934c2e31-5@. -- -- - Amazon ElastiCache replication group - The resource type is -- @replication-group@ and the unique identifier is the replication -- group name. Example: @replication-group\/mycluster@. -- -- - Neptune cluster - The resource type is @cluster@ and the unique -- identifier is the cluster name. Example: @cluster:mycluster@. -- -- 'scalableDimension', 'deleteScalingPolicy_scalableDimension' - The scalable dimension. This string consists of the service namespace, -- resource type, and scaling property. -- -- - @ecs:service:DesiredCount@ - The desired task count of an ECS -- service. -- -- - @elasticmapreduce:instancegroup:InstanceCount@ - The instance count -- of an EMR Instance Group. -- -- - @ec2:spot-fleet-request:TargetCapacity@ - The target capacity of a -- Spot Fleet. -- -- - @appstream:fleet:DesiredCapacity@ - The desired capacity of an -- AppStream 2.0 fleet. -- -- - @dynamodb:table:ReadCapacityUnits@ - The provisioned read capacity -- for a DynamoDB table. -- -- - @dynamodb:table:WriteCapacityUnits@ - The provisioned write capacity -- for a DynamoDB table. -- -- - @dynamodb:index:ReadCapacityUnits@ - The provisioned read capacity -- for a DynamoDB global secondary index. -- -- - @dynamodb:index:WriteCapacityUnits@ - The provisioned write capacity -- for a DynamoDB global secondary index. -- -- - @rds:cluster:ReadReplicaCount@ - The count of Aurora Replicas in an -- Aurora DB cluster. Available for Aurora MySQL-compatible edition and -- Aurora PostgreSQL-compatible edition. -- -- - @sagemaker:variant:DesiredInstanceCount@ - The number of EC2 -- instances for a SageMaker model endpoint variant. -- -- - @custom-resource:ResourceType:Property@ - The scalable dimension for -- a custom resource provided by your own application or service. -- -- - @comprehend:document-classifier-endpoint:DesiredInferenceUnits@ - -- The number of inference units for an Amazon Comprehend document -- classification endpoint. -- -- - @comprehend:entity-recognizer-endpoint:DesiredInferenceUnits@ - The -- number of inference units for an Amazon Comprehend entity recognizer -- endpoint. -- -- - @lambda:function:ProvisionedConcurrency@ - The provisioned -- concurrency for a Lambda function. -- -- - @cassandra:table:ReadCapacityUnits@ - The provisioned read capacity -- for an Amazon Keyspaces table. -- -- - @cassandra:table:WriteCapacityUnits@ - The provisioned write -- capacity for an Amazon Keyspaces table. -- -- - @kafka:broker-storage:VolumeSize@ - The provisioned volume size (in -- GiB) for brokers in an Amazon MSK cluster. -- -- - @elasticache:replication-group:NodeGroups@ - The number of node -- groups for an Amazon ElastiCache replication group. -- -- - @elasticache:replication-group:Replicas@ - The number of replicas -- per node group for an Amazon ElastiCache replication group. -- -- - @neptune:cluster:ReadReplicaCount@ - The count of read replicas in -- an Amazon Neptune DB cluster. newDeleteScalingPolicy :: -- | 'policyName' Prelude.Text -> -- | 'serviceNamespace' ServiceNamespace -> -- | 'resourceId' Prelude.Text -> -- | 'scalableDimension' ScalableDimension -> DeleteScalingPolicy newDeleteScalingPolicy :: Text -> ServiceNamespace -> Text -> ScalableDimension -> DeleteScalingPolicy newDeleteScalingPolicy Text pPolicyName_ ServiceNamespace pServiceNamespace_ Text pResourceId_ ScalableDimension pScalableDimension_ = DeleteScalingPolicy' { $sel:policyName:DeleteScalingPolicy' :: Text policyName = Text pPolicyName_, $sel:serviceNamespace:DeleteScalingPolicy' :: ServiceNamespace serviceNamespace = ServiceNamespace pServiceNamespace_, $sel:resourceId:DeleteScalingPolicy' :: Text resourceId = Text pResourceId_, $sel:scalableDimension:DeleteScalingPolicy' :: ScalableDimension scalableDimension = ScalableDimension pScalableDimension_ } -- | The name of the scaling policy. deleteScalingPolicy_policyName :: Lens.Lens' DeleteScalingPolicy Prelude.Text deleteScalingPolicy_policyName :: Lens' DeleteScalingPolicy Text deleteScalingPolicy_policyName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\DeleteScalingPolicy' {Text policyName :: Text $sel:policyName:DeleteScalingPolicy' :: DeleteScalingPolicy -> Text policyName} -> Text policyName) (\s :: DeleteScalingPolicy s@DeleteScalingPolicy' {} Text a -> DeleteScalingPolicy s {$sel:policyName:DeleteScalingPolicy' :: Text policyName = Text a} :: DeleteScalingPolicy) -- | The namespace of the Amazon Web Services service that provides the -- resource. For a resource provided by your own application or service, -- use @custom-resource@ instead. deleteScalingPolicy_serviceNamespace :: Lens.Lens' DeleteScalingPolicy ServiceNamespace deleteScalingPolicy_serviceNamespace :: Lens' DeleteScalingPolicy ServiceNamespace deleteScalingPolicy_serviceNamespace = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\DeleteScalingPolicy' {ServiceNamespace serviceNamespace :: ServiceNamespace $sel:serviceNamespace:DeleteScalingPolicy' :: DeleteScalingPolicy -> ServiceNamespace serviceNamespace} -> ServiceNamespace serviceNamespace) (\s :: DeleteScalingPolicy s@DeleteScalingPolicy' {} ServiceNamespace a -> DeleteScalingPolicy s {$sel:serviceNamespace:DeleteScalingPolicy' :: ServiceNamespace serviceNamespace = ServiceNamespace a} :: DeleteScalingPolicy) -- | The identifier of the resource associated with the scalable target. This -- string consists of the resource type and unique identifier. -- -- - ECS service - The resource type is @service@ and the unique -- identifier is the cluster name and service name. Example: -- @service\/default\/sample-webapp@. -- -- - Spot Fleet - The resource type is @spot-fleet-request@ and the -- unique identifier is the Spot Fleet request ID. Example: -- @spot-fleet-request\/sfr-73fbd2ce-aa30-494c-8788-1cee4EXAMPLE@. -- -- - EMR cluster - The resource type is @instancegroup@ and the unique -- identifier is the cluster ID and instance group ID. Example: -- @instancegroup\/j-2EEZNYKUA1NTV\/ig-1791Y4E1L8YI0@. -- -- - AppStream 2.0 fleet - The resource type is @fleet@ and the unique -- identifier is the fleet name. Example: @fleet\/sample-fleet@. -- -- - DynamoDB table - The resource type is @table@ and the unique -- identifier is the table name. Example: @table\/my-table@. -- -- - DynamoDB global secondary index - The resource type is @index@ and -- the unique identifier is the index name. Example: -- @table\/my-table\/index\/my-table-index@. -- -- - Aurora DB cluster - The resource type is @cluster@ and the unique -- identifier is the cluster name. Example: @cluster:my-db-cluster@. -- -- - SageMaker endpoint variant - The resource type is @variant@ and the -- unique identifier is the resource ID. Example: -- @endpoint\/my-end-point\/variant\/KMeansClustering@. -- -- - Custom resources are not supported with a resource type. This -- parameter must specify the @OutputValue@ from the CloudFormation -- template stack used to access the resources. The unique identifier -- is defined by the service provider. More information is available in -- our -- <https://github.com/aws/aws-auto-scaling-custom-resource GitHub repository>. -- -- - Amazon Comprehend document classification endpoint - The resource -- type and unique identifier are specified using the endpoint ARN. -- Example: -- @arn:aws:comprehend:us-west-2:123456789012:document-classifier-endpoint\/EXAMPLE@. -- -- - Amazon Comprehend entity recognizer endpoint - The resource type and -- unique identifier are specified using the endpoint ARN. Example: -- @arn:aws:comprehend:us-west-2:123456789012:entity-recognizer-endpoint\/EXAMPLE@. -- -- - Lambda provisioned concurrency - The resource type is @function@ and -- the unique identifier is the function name with a function version -- or alias name suffix that is not @$LATEST@. Example: -- @function:my-function:prod@ or @function:my-function:1@. -- -- - Amazon Keyspaces table - The resource type is @table@ and the unique -- identifier is the table name. Example: -- @keyspace\/mykeyspace\/table\/mytable@. -- -- - Amazon MSK cluster - The resource type and unique identifier are -- specified using the cluster ARN. Example: -- @arn:aws:kafka:us-east-1:123456789012:cluster\/demo-cluster-1\/6357e0b2-0e6a-4b86-a0b4-70df934c2e31-5@. -- -- - Amazon ElastiCache replication group - The resource type is -- @replication-group@ and the unique identifier is the replication -- group name. Example: @replication-group\/mycluster@. -- -- - Neptune cluster - The resource type is @cluster@ and the unique -- identifier is the cluster name. Example: @cluster:mycluster@. deleteScalingPolicy_resourceId :: Lens.Lens' DeleteScalingPolicy Prelude.Text deleteScalingPolicy_resourceId :: Lens' DeleteScalingPolicy Text deleteScalingPolicy_resourceId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\DeleteScalingPolicy' {Text resourceId :: Text $sel:resourceId:DeleteScalingPolicy' :: DeleteScalingPolicy -> Text resourceId} -> Text resourceId) (\s :: DeleteScalingPolicy s@DeleteScalingPolicy' {} Text a -> DeleteScalingPolicy s {$sel:resourceId:DeleteScalingPolicy' :: Text resourceId = Text a} :: DeleteScalingPolicy) -- | The scalable dimension. This string consists of the service namespace, -- resource type, and scaling property. -- -- - @ecs:service:DesiredCount@ - The desired task count of an ECS -- service. -- -- - @elasticmapreduce:instancegroup:InstanceCount@ - The instance count -- of an EMR Instance Group. -- -- - @ec2:spot-fleet-request:TargetCapacity@ - The target capacity of a -- Spot Fleet. -- -- - @appstream:fleet:DesiredCapacity@ - The desired capacity of an -- AppStream 2.0 fleet. -- -- - @dynamodb:table:ReadCapacityUnits@ - The provisioned read capacity -- for a DynamoDB table. -- -- - @dynamodb:table:WriteCapacityUnits@ - The provisioned write capacity -- for a DynamoDB table. -- -- - @dynamodb:index:ReadCapacityUnits@ - The provisioned read capacity -- for a DynamoDB global secondary index. -- -- - @dynamodb:index:WriteCapacityUnits@ - The provisioned write capacity -- for a DynamoDB global secondary index. -- -- - @rds:cluster:ReadReplicaCount@ - The count of Aurora Replicas in an -- Aurora DB cluster. Available for Aurora MySQL-compatible edition and -- Aurora PostgreSQL-compatible edition. -- -- - @sagemaker:variant:DesiredInstanceCount@ - The number of EC2 -- instances for a SageMaker model endpoint variant. -- -- - @custom-resource:ResourceType:Property@ - The scalable dimension for -- a custom resource provided by your own application or service. -- -- - @comprehend:document-classifier-endpoint:DesiredInferenceUnits@ - -- The number of inference units for an Amazon Comprehend document -- classification endpoint. -- -- - @comprehend:entity-recognizer-endpoint:DesiredInferenceUnits@ - The -- number of inference units for an Amazon Comprehend entity recognizer -- endpoint. -- -- - @lambda:function:ProvisionedConcurrency@ - The provisioned -- concurrency for a Lambda function. -- -- - @cassandra:table:ReadCapacityUnits@ - The provisioned read capacity -- for an Amazon Keyspaces table. -- -- - @cassandra:table:WriteCapacityUnits@ - The provisioned write -- capacity for an Amazon Keyspaces table. -- -- - @kafka:broker-storage:VolumeSize@ - The provisioned volume size (in -- GiB) for brokers in an Amazon MSK cluster. -- -- - @elasticache:replication-group:NodeGroups@ - The number of node -- groups for an Amazon ElastiCache replication group. -- -- - @elasticache:replication-group:Replicas@ - The number of replicas -- per node group for an Amazon ElastiCache replication group. -- -- - @neptune:cluster:ReadReplicaCount@ - The count of read replicas in -- an Amazon Neptune DB cluster. deleteScalingPolicy_scalableDimension :: Lens.Lens' DeleteScalingPolicy ScalableDimension deleteScalingPolicy_scalableDimension :: Lens' DeleteScalingPolicy ScalableDimension deleteScalingPolicy_scalableDimension = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\DeleteScalingPolicy' {ScalableDimension scalableDimension :: ScalableDimension $sel:scalableDimension:DeleteScalingPolicy' :: DeleteScalingPolicy -> ScalableDimension scalableDimension} -> ScalableDimension scalableDimension) (\s :: DeleteScalingPolicy s@DeleteScalingPolicy' {} ScalableDimension a -> DeleteScalingPolicy s {$sel:scalableDimension:DeleteScalingPolicy' :: ScalableDimension scalableDimension = ScalableDimension a} :: DeleteScalingPolicy) instance Core.AWSRequest DeleteScalingPolicy where type AWSResponse DeleteScalingPolicy = DeleteScalingPolicyResponse request :: (Service -> Service) -> DeleteScalingPolicy -> Request DeleteScalingPolicy request Service -> Service overrides = forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a Request.postJSON (Service -> Service overrides Service defaultService) response :: forall (m :: * -> *). MonadResource m => (ByteStringLazy -> IO ByteStringLazy) -> Service -> Proxy DeleteScalingPolicy -> ClientResponse ClientBody -> m (Either Error (ClientResponse (AWSResponse DeleteScalingPolicy))) response = forall (m :: * -> *) a. MonadResource m => (Int -> ResponseHeaders -> () -> Either String (AWSResponse a)) -> (ByteStringLazy -> IO ByteStringLazy) -> Service -> Proxy a -> ClientResponse ClientBody -> m (Either Error (ClientResponse (AWSResponse a))) Response.receiveEmpty ( \Int s ResponseHeaders h () x -> Int -> DeleteScalingPolicyResponse DeleteScalingPolicyResponse' forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b Prelude.<$> (forall (f :: * -> *) a. Applicative f => a -> f a Prelude.pure (forall a. Enum a => a -> Int Prelude.fromEnum Int s)) ) instance Prelude.Hashable DeleteScalingPolicy where hashWithSalt :: Int -> DeleteScalingPolicy -> Int hashWithSalt Int _salt DeleteScalingPolicy' {Text ScalableDimension ServiceNamespace scalableDimension :: ScalableDimension resourceId :: Text serviceNamespace :: ServiceNamespace policyName :: Text $sel:scalableDimension:DeleteScalingPolicy' :: DeleteScalingPolicy -> ScalableDimension $sel:resourceId:DeleteScalingPolicy' :: DeleteScalingPolicy -> Text $sel:serviceNamespace:DeleteScalingPolicy' :: DeleteScalingPolicy -> ServiceNamespace $sel:policyName:DeleteScalingPolicy' :: DeleteScalingPolicy -> Text ..} = Int _salt forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Text policyName forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` ServiceNamespace serviceNamespace forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Text resourceId forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` ScalableDimension scalableDimension instance Prelude.NFData DeleteScalingPolicy where rnf :: DeleteScalingPolicy -> () rnf DeleteScalingPolicy' {Text ScalableDimension ServiceNamespace scalableDimension :: ScalableDimension resourceId :: Text serviceNamespace :: ServiceNamespace policyName :: Text $sel:scalableDimension:DeleteScalingPolicy' :: DeleteScalingPolicy -> ScalableDimension $sel:resourceId:DeleteScalingPolicy' :: DeleteScalingPolicy -> Text $sel:serviceNamespace:DeleteScalingPolicy' :: DeleteScalingPolicy -> ServiceNamespace $sel:policyName:DeleteScalingPolicy' :: DeleteScalingPolicy -> Text ..} = forall a. NFData a => a -> () Prelude.rnf Text policyName seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf ServiceNamespace serviceNamespace seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Text resourceId seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf ScalableDimension scalableDimension instance Data.ToHeaders DeleteScalingPolicy where toHeaders :: DeleteScalingPolicy -> ResponseHeaders toHeaders = forall a b. a -> b -> a Prelude.const ( forall a. Monoid a => [a] -> a Prelude.mconcat [ HeaderName "X-Amz-Target" forall a. ToHeader a => HeaderName -> a -> ResponseHeaders Data.=# ( ByteString "AnyScaleFrontendService.DeleteScalingPolicy" :: Prelude.ByteString ), HeaderName "Content-Type" forall a. ToHeader a => HeaderName -> a -> ResponseHeaders Data.=# ( ByteString "application/x-amz-json-1.1" :: Prelude.ByteString ) ] ) instance Data.ToJSON DeleteScalingPolicy where toJSON :: DeleteScalingPolicy -> Value toJSON DeleteScalingPolicy' {Text ScalableDimension ServiceNamespace scalableDimension :: ScalableDimension resourceId :: Text serviceNamespace :: ServiceNamespace policyName :: Text $sel:scalableDimension:DeleteScalingPolicy' :: DeleteScalingPolicy -> ScalableDimension $sel:resourceId:DeleteScalingPolicy' :: DeleteScalingPolicy -> Text $sel:serviceNamespace:DeleteScalingPolicy' :: DeleteScalingPolicy -> ServiceNamespace $sel:policyName:DeleteScalingPolicy' :: DeleteScalingPolicy -> Text ..} = [Pair] -> Value Data.object ( forall a. [Maybe a] -> [a] Prelude.catMaybes [ forall a. a -> Maybe a Prelude.Just (Key "PolicyName" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..= Text policyName), forall a. a -> Maybe a Prelude.Just (Key "ServiceNamespace" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..= ServiceNamespace serviceNamespace), forall a. a -> Maybe a Prelude.Just (Key "ResourceId" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..= Text resourceId), forall a. a -> Maybe a Prelude.Just (Key "ScalableDimension" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..= ScalableDimension scalableDimension) ] ) instance Data.ToPath DeleteScalingPolicy where toPath :: DeleteScalingPolicy -> ByteString toPath = forall a b. a -> b -> a Prelude.const ByteString "/" instance Data.ToQuery DeleteScalingPolicy where toQuery :: DeleteScalingPolicy -> QueryString toQuery = forall a b. a -> b -> a Prelude.const forall a. Monoid a => a Prelude.mempty -- | /See:/ 'newDeleteScalingPolicyResponse' smart constructor. data DeleteScalingPolicyResponse = DeleteScalingPolicyResponse' { -- | The response's http status code. DeleteScalingPolicyResponse -> Int httpStatus :: Prelude.Int } deriving (DeleteScalingPolicyResponse -> DeleteScalingPolicyResponse -> Bool forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: DeleteScalingPolicyResponse -> DeleteScalingPolicyResponse -> Bool $c/= :: DeleteScalingPolicyResponse -> DeleteScalingPolicyResponse -> Bool == :: DeleteScalingPolicyResponse -> DeleteScalingPolicyResponse -> Bool $c== :: DeleteScalingPolicyResponse -> DeleteScalingPolicyResponse -> Bool Prelude.Eq, ReadPrec [DeleteScalingPolicyResponse] ReadPrec DeleteScalingPolicyResponse Int -> ReadS DeleteScalingPolicyResponse ReadS [DeleteScalingPolicyResponse] forall a. (Int -> ReadS a) -> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a readListPrec :: ReadPrec [DeleteScalingPolicyResponse] $creadListPrec :: ReadPrec [DeleteScalingPolicyResponse] readPrec :: ReadPrec DeleteScalingPolicyResponse $creadPrec :: ReadPrec DeleteScalingPolicyResponse readList :: ReadS [DeleteScalingPolicyResponse] $creadList :: ReadS [DeleteScalingPolicyResponse] readsPrec :: Int -> ReadS DeleteScalingPolicyResponse $creadsPrec :: Int -> ReadS DeleteScalingPolicyResponse Prelude.Read, Int -> DeleteScalingPolicyResponse -> ShowS [DeleteScalingPolicyResponse] -> ShowS DeleteScalingPolicyResponse -> String forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a showList :: [DeleteScalingPolicyResponse] -> ShowS $cshowList :: [DeleteScalingPolicyResponse] -> ShowS show :: DeleteScalingPolicyResponse -> String $cshow :: DeleteScalingPolicyResponse -> String showsPrec :: Int -> DeleteScalingPolicyResponse -> ShowS $cshowsPrec :: Int -> DeleteScalingPolicyResponse -> ShowS Prelude.Show, forall x. Rep DeleteScalingPolicyResponse x -> DeleteScalingPolicyResponse forall x. DeleteScalingPolicyResponse -> Rep DeleteScalingPolicyResponse x forall a. (forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a $cto :: forall x. Rep DeleteScalingPolicyResponse x -> DeleteScalingPolicyResponse $cfrom :: forall x. DeleteScalingPolicyResponse -> Rep DeleteScalingPolicyResponse x Prelude.Generic) -- | -- Create a value of 'DeleteScalingPolicyResponse' with all optional fields omitted. -- -- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields. -- -- The following record fields are available, with the corresponding lenses provided -- for backwards compatibility: -- -- 'httpStatus', 'deleteScalingPolicyResponse_httpStatus' - The response's http status code. newDeleteScalingPolicyResponse :: -- | 'httpStatus' Prelude.Int -> DeleteScalingPolicyResponse newDeleteScalingPolicyResponse :: Int -> DeleteScalingPolicyResponse newDeleteScalingPolicyResponse Int pHttpStatus_ = DeleteScalingPolicyResponse' { $sel:httpStatus:DeleteScalingPolicyResponse' :: Int httpStatus = Int pHttpStatus_ } -- | The response's http status code. deleteScalingPolicyResponse_httpStatus :: Lens.Lens' DeleteScalingPolicyResponse Prelude.Int deleteScalingPolicyResponse_httpStatus :: Lens' DeleteScalingPolicyResponse Int deleteScalingPolicyResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\DeleteScalingPolicyResponse' {Int httpStatus :: Int $sel:httpStatus:DeleteScalingPolicyResponse' :: DeleteScalingPolicyResponse -> Int httpStatus} -> Int httpStatus) (\s :: DeleteScalingPolicyResponse s@DeleteScalingPolicyResponse' {} Int a -> DeleteScalingPolicyResponse s {$sel:httpStatus:DeleteScalingPolicyResponse' :: Int httpStatus = Int a} :: DeleteScalingPolicyResponse) instance Prelude.NFData DeleteScalingPolicyResponse where rnf :: DeleteScalingPolicyResponse -> () rnf DeleteScalingPolicyResponse' {Int httpStatus :: Int $sel:httpStatus:DeleteScalingPolicyResponse' :: DeleteScalingPolicyResponse -> Int ..} = forall a. NFData a => a -> () Prelude.rnf Int httpStatus