module Stratosphere.S3.StorageLens.AccountLevelProperty (
        module Exports, AccountLevelProperty(..), mkAccountLevelProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.S3.StorageLens.ActivityMetricsProperty as Exports
import {-# SOURCE #-} Stratosphere.S3.StorageLens.AdvancedCostOptimizationMetricsProperty as Exports
import {-# SOURCE #-} Stratosphere.S3.StorageLens.AdvancedDataProtectionMetricsProperty as Exports
import {-# SOURCE #-} Stratosphere.S3.StorageLens.BucketLevelProperty as Exports
import {-# SOURCE #-} Stratosphere.S3.StorageLens.DetailedStatusCodesMetricsProperty as Exports
import {-# SOURCE #-} Stratosphere.S3.StorageLens.StorageLensGroupLevelProperty as Exports
import Stratosphere.ResourceProperties
data AccountLevelProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-s3-storagelens-accountlevel.html>
    AccountLevelProperty {AccountLevelProperty -> ()
haddock_workaround_ :: (),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-s3-storagelens-accountlevel.html#cfn-s3-storagelens-accountlevel-activitymetrics>
                          AccountLevelProperty -> Maybe ActivityMetricsProperty
activityMetrics :: (Prelude.Maybe ActivityMetricsProperty),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-s3-storagelens-accountlevel.html#cfn-s3-storagelens-accountlevel-advancedcostoptimizationmetrics>
                          AccountLevelProperty
-> Maybe AdvancedCostOptimizationMetricsProperty
advancedCostOptimizationMetrics :: (Prelude.Maybe AdvancedCostOptimizationMetricsProperty),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-s3-storagelens-accountlevel.html#cfn-s3-storagelens-accountlevel-advanceddataprotectionmetrics>
                          AccountLevelProperty -> Maybe AdvancedDataProtectionMetricsProperty
advancedDataProtectionMetrics :: (Prelude.Maybe AdvancedDataProtectionMetricsProperty),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-s3-storagelens-accountlevel.html#cfn-s3-storagelens-accountlevel-bucketlevel>
                          AccountLevelProperty -> BucketLevelProperty
bucketLevel :: BucketLevelProperty,
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-s3-storagelens-accountlevel.html#cfn-s3-storagelens-accountlevel-detailedstatuscodesmetrics>
                          AccountLevelProperty -> Maybe DetailedStatusCodesMetricsProperty
detailedStatusCodesMetrics :: (Prelude.Maybe DetailedStatusCodesMetricsProperty),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-s3-storagelens-accountlevel.html#cfn-s3-storagelens-accountlevel-storagelensgrouplevel>
                          AccountLevelProperty -> Maybe StorageLensGroupLevelProperty
storageLensGroupLevel :: (Prelude.Maybe StorageLensGroupLevelProperty)}
  deriving stock (AccountLevelProperty -> AccountLevelProperty -> Bool
(AccountLevelProperty -> AccountLevelProperty -> Bool)
-> (AccountLevelProperty -> AccountLevelProperty -> Bool)
-> Eq AccountLevelProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: AccountLevelProperty -> AccountLevelProperty -> Bool
== :: AccountLevelProperty -> AccountLevelProperty -> Bool
$c/= :: AccountLevelProperty -> AccountLevelProperty -> Bool
/= :: AccountLevelProperty -> AccountLevelProperty -> Bool
Prelude.Eq, Int -> AccountLevelProperty -> ShowS
[AccountLevelProperty] -> ShowS
AccountLevelProperty -> String
(Int -> AccountLevelProperty -> ShowS)
-> (AccountLevelProperty -> String)
-> ([AccountLevelProperty] -> ShowS)
-> Show AccountLevelProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> AccountLevelProperty -> ShowS
showsPrec :: Int -> AccountLevelProperty -> ShowS
$cshow :: AccountLevelProperty -> String
show :: AccountLevelProperty -> String
$cshowList :: [AccountLevelProperty] -> ShowS
showList :: [AccountLevelProperty] -> ShowS
Prelude.Show)
mkAccountLevelProperty ::
  BucketLevelProperty -> AccountLevelProperty
mkAccountLevelProperty :: BucketLevelProperty -> AccountLevelProperty
mkAccountLevelProperty BucketLevelProperty
bucketLevel
  = AccountLevelProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), bucketLevel :: BucketLevelProperty
bucketLevel = BucketLevelProperty
bucketLevel,
       activityMetrics :: Maybe ActivityMetricsProperty
activityMetrics = Maybe ActivityMetricsProperty
forall a. Maybe a
Prelude.Nothing,
       advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
advancedCostOptimizationMetrics = Maybe AdvancedCostOptimizationMetricsProperty
forall a. Maybe a
Prelude.Nothing,
       advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
advancedDataProtectionMetrics = Maybe AdvancedDataProtectionMetricsProperty
forall a. Maybe a
Prelude.Nothing,
       detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
detailedStatusCodesMetrics = Maybe DetailedStatusCodesMetricsProperty
forall a. Maybe a
Prelude.Nothing,
       storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
storageLensGroupLevel = Maybe StorageLensGroupLevelProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties AccountLevelProperty where
  toResourceProperties :: AccountLevelProperty -> ResourceProperties
toResourceProperties AccountLevelProperty {Maybe ActivityMetricsProperty
Maybe AdvancedCostOptimizationMetricsProperty
Maybe AdvancedDataProtectionMetricsProperty
Maybe DetailedStatusCodesMetricsProperty
Maybe StorageLensGroupLevelProperty
()
BucketLevelProperty
haddock_workaround_ :: AccountLevelProperty -> ()
activityMetrics :: AccountLevelProperty -> Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: AccountLevelProperty
-> Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: AccountLevelProperty -> Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: AccountLevelProperty -> BucketLevelProperty
detailedStatusCodesMetrics :: AccountLevelProperty -> Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: AccountLevelProperty -> Maybe StorageLensGroupLevelProperty
haddock_workaround_ :: ()
activityMetrics :: Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: BucketLevelProperty
detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::S3::StorageLens.AccountLevel",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
                           [Key
"BucketLevel" Key -> BucketLevelProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= BucketLevelProperty
bucketLevel]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> ActivityMetricsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ActivityMetrics" (ActivityMetricsProperty -> (Key, Value))
-> Maybe ActivityMetricsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ActivityMetricsProperty
activityMetrics,
                               Key -> AdvancedCostOptimizationMetricsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AdvancedCostOptimizationMetrics"
                                 (AdvancedCostOptimizationMetricsProperty -> (Key, Value))
-> Maybe AdvancedCostOptimizationMetricsProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AdvancedCostOptimizationMetricsProperty
advancedCostOptimizationMetrics,
                               Key -> AdvancedDataProtectionMetricsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AdvancedDataProtectionMetrics"
                                 (AdvancedDataProtectionMetricsProperty -> (Key, Value))
-> Maybe AdvancedDataProtectionMetricsProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AdvancedDataProtectionMetricsProperty
advancedDataProtectionMetrics,
                               Key -> DetailedStatusCodesMetricsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DetailedStatusCodesMetrics"
                                 (DetailedStatusCodesMetricsProperty -> (Key, Value))
-> Maybe DetailedStatusCodesMetricsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DetailedStatusCodesMetricsProperty
detailedStatusCodesMetrics,
                               Key -> StorageLensGroupLevelProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"StorageLensGroupLevel"
                                 (StorageLensGroupLevelProperty -> (Key, Value))
-> Maybe StorageLensGroupLevelProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe StorageLensGroupLevelProperty
storageLensGroupLevel]))}
instance JSON.ToJSON AccountLevelProperty where
  toJSON :: AccountLevelProperty -> Value
toJSON AccountLevelProperty {Maybe ActivityMetricsProperty
Maybe AdvancedCostOptimizationMetricsProperty
Maybe AdvancedDataProtectionMetricsProperty
Maybe DetailedStatusCodesMetricsProperty
Maybe StorageLensGroupLevelProperty
()
BucketLevelProperty
haddock_workaround_ :: AccountLevelProperty -> ()
activityMetrics :: AccountLevelProperty -> Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: AccountLevelProperty
-> Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: AccountLevelProperty -> Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: AccountLevelProperty -> BucketLevelProperty
detailedStatusCodesMetrics :: AccountLevelProperty -> Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: AccountLevelProperty -> Maybe StorageLensGroupLevelProperty
haddock_workaround_ :: ()
activityMetrics :: Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: BucketLevelProperty
detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
              [Key
"BucketLevel" Key -> BucketLevelProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= BucketLevelProperty
bucketLevel]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> ActivityMetricsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ActivityMetrics" (ActivityMetricsProperty -> (Key, Value))
-> Maybe ActivityMetricsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ActivityMetricsProperty
activityMetrics,
                  Key -> AdvancedCostOptimizationMetricsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AdvancedCostOptimizationMetrics"
                    (AdvancedCostOptimizationMetricsProperty -> (Key, Value))
-> Maybe AdvancedCostOptimizationMetricsProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AdvancedCostOptimizationMetricsProperty
advancedCostOptimizationMetrics,
                  Key -> AdvancedDataProtectionMetricsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AdvancedDataProtectionMetrics"
                    (AdvancedDataProtectionMetricsProperty -> (Key, Value))
-> Maybe AdvancedDataProtectionMetricsProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AdvancedDataProtectionMetricsProperty
advancedDataProtectionMetrics,
                  Key -> DetailedStatusCodesMetricsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DetailedStatusCodesMetrics"
                    (DetailedStatusCodesMetricsProperty -> (Key, Value))
-> Maybe DetailedStatusCodesMetricsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DetailedStatusCodesMetricsProperty
detailedStatusCodesMetrics,
                  Key -> StorageLensGroupLevelProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"StorageLensGroupLevel"
                    (StorageLensGroupLevelProperty -> (Key, Value))
-> Maybe StorageLensGroupLevelProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe StorageLensGroupLevelProperty
storageLensGroupLevel])))
instance Property "ActivityMetrics" AccountLevelProperty where
  type PropertyType "ActivityMetrics" AccountLevelProperty = ActivityMetricsProperty
  set :: PropertyType "ActivityMetrics" AccountLevelProperty
-> AccountLevelProperty -> AccountLevelProperty
set PropertyType "ActivityMetrics" AccountLevelProperty
newValue AccountLevelProperty {Maybe ActivityMetricsProperty
Maybe AdvancedCostOptimizationMetricsProperty
Maybe AdvancedDataProtectionMetricsProperty
Maybe DetailedStatusCodesMetricsProperty
Maybe StorageLensGroupLevelProperty
()
BucketLevelProperty
haddock_workaround_ :: AccountLevelProperty -> ()
activityMetrics :: AccountLevelProperty -> Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: AccountLevelProperty
-> Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: AccountLevelProperty -> Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: AccountLevelProperty -> BucketLevelProperty
detailedStatusCodesMetrics :: AccountLevelProperty -> Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: AccountLevelProperty -> Maybe StorageLensGroupLevelProperty
haddock_workaround_ :: ()
activityMetrics :: Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: BucketLevelProperty
detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
..}
    = AccountLevelProperty
        {activityMetrics :: Maybe ActivityMetricsProperty
activityMetrics = ActivityMetricsProperty -> Maybe ActivityMetricsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ActivityMetrics" AccountLevelProperty
ActivityMetricsProperty
newValue, Maybe AdvancedCostOptimizationMetricsProperty
Maybe AdvancedDataProtectionMetricsProperty
Maybe DetailedStatusCodesMetricsProperty
Maybe StorageLensGroupLevelProperty
()
BucketLevelProperty
haddock_workaround_ :: ()
advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: BucketLevelProperty
detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
haddock_workaround_ :: ()
advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: BucketLevelProperty
detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
..}
instance Property "AdvancedCostOptimizationMetrics" AccountLevelProperty where
  type PropertyType "AdvancedCostOptimizationMetrics" AccountLevelProperty = AdvancedCostOptimizationMetricsProperty
  set :: PropertyType "AdvancedCostOptimizationMetrics" AccountLevelProperty
-> AccountLevelProperty -> AccountLevelProperty
set PropertyType "AdvancedCostOptimizationMetrics" AccountLevelProperty
newValue AccountLevelProperty {Maybe ActivityMetricsProperty
Maybe AdvancedCostOptimizationMetricsProperty
Maybe AdvancedDataProtectionMetricsProperty
Maybe DetailedStatusCodesMetricsProperty
Maybe StorageLensGroupLevelProperty
()
BucketLevelProperty
haddock_workaround_ :: AccountLevelProperty -> ()
activityMetrics :: AccountLevelProperty -> Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: AccountLevelProperty
-> Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: AccountLevelProperty -> Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: AccountLevelProperty -> BucketLevelProperty
detailedStatusCodesMetrics :: AccountLevelProperty -> Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: AccountLevelProperty -> Maybe StorageLensGroupLevelProperty
haddock_workaround_ :: ()
activityMetrics :: Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: BucketLevelProperty
detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
..}
    = AccountLevelProperty
        {advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
advancedCostOptimizationMetrics = AdvancedCostOptimizationMetricsProperty
-> Maybe AdvancedCostOptimizationMetricsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "AdvancedCostOptimizationMetrics" AccountLevelProperty
AdvancedCostOptimizationMetricsProperty
newValue, Maybe ActivityMetricsProperty
Maybe AdvancedDataProtectionMetricsProperty
Maybe DetailedStatusCodesMetricsProperty
Maybe StorageLensGroupLevelProperty
()
BucketLevelProperty
haddock_workaround_ :: ()
activityMetrics :: Maybe ActivityMetricsProperty
advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: BucketLevelProperty
detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
haddock_workaround_ :: ()
activityMetrics :: Maybe ActivityMetricsProperty
advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: BucketLevelProperty
detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
..}
instance Property "AdvancedDataProtectionMetrics" AccountLevelProperty where
  type PropertyType "AdvancedDataProtectionMetrics" AccountLevelProperty = AdvancedDataProtectionMetricsProperty
  set :: PropertyType "AdvancedDataProtectionMetrics" AccountLevelProperty
-> AccountLevelProperty -> AccountLevelProperty
set PropertyType "AdvancedDataProtectionMetrics" AccountLevelProperty
newValue AccountLevelProperty {Maybe ActivityMetricsProperty
Maybe AdvancedCostOptimizationMetricsProperty
Maybe AdvancedDataProtectionMetricsProperty
Maybe DetailedStatusCodesMetricsProperty
Maybe StorageLensGroupLevelProperty
()
BucketLevelProperty
haddock_workaround_ :: AccountLevelProperty -> ()
activityMetrics :: AccountLevelProperty -> Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: AccountLevelProperty
-> Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: AccountLevelProperty -> Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: AccountLevelProperty -> BucketLevelProperty
detailedStatusCodesMetrics :: AccountLevelProperty -> Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: AccountLevelProperty -> Maybe StorageLensGroupLevelProperty
haddock_workaround_ :: ()
activityMetrics :: Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: BucketLevelProperty
detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
..}
    = AccountLevelProperty
        {advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
advancedDataProtectionMetrics = AdvancedDataProtectionMetricsProperty
-> Maybe AdvancedDataProtectionMetricsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "AdvancedDataProtectionMetrics" AccountLevelProperty
AdvancedDataProtectionMetricsProperty
newValue, Maybe ActivityMetricsProperty
Maybe AdvancedCostOptimizationMetricsProperty
Maybe DetailedStatusCodesMetricsProperty
Maybe StorageLensGroupLevelProperty
()
BucketLevelProperty
haddock_workaround_ :: ()
activityMetrics :: Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
bucketLevel :: BucketLevelProperty
detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
haddock_workaround_ :: ()
activityMetrics :: Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
bucketLevel :: BucketLevelProperty
detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
..}
instance Property "BucketLevel" AccountLevelProperty where
  type PropertyType "BucketLevel" AccountLevelProperty = BucketLevelProperty
  set :: PropertyType "BucketLevel" AccountLevelProperty
-> AccountLevelProperty -> AccountLevelProperty
set PropertyType "BucketLevel" AccountLevelProperty
newValue AccountLevelProperty {Maybe ActivityMetricsProperty
Maybe AdvancedCostOptimizationMetricsProperty
Maybe AdvancedDataProtectionMetricsProperty
Maybe DetailedStatusCodesMetricsProperty
Maybe StorageLensGroupLevelProperty
()
BucketLevelProperty
haddock_workaround_ :: AccountLevelProperty -> ()
activityMetrics :: AccountLevelProperty -> Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: AccountLevelProperty
-> Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: AccountLevelProperty -> Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: AccountLevelProperty -> BucketLevelProperty
detailedStatusCodesMetrics :: AccountLevelProperty -> Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: AccountLevelProperty -> Maybe StorageLensGroupLevelProperty
haddock_workaround_ :: ()
activityMetrics :: Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: BucketLevelProperty
detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
..}
    = AccountLevelProperty {bucketLevel :: BucketLevelProperty
bucketLevel = PropertyType "BucketLevel" AccountLevelProperty
BucketLevelProperty
newValue, Maybe ActivityMetricsProperty
Maybe AdvancedCostOptimizationMetricsProperty
Maybe AdvancedDataProtectionMetricsProperty
Maybe DetailedStatusCodesMetricsProperty
Maybe StorageLensGroupLevelProperty
()
haddock_workaround_ :: ()
activityMetrics :: Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
haddock_workaround_ :: ()
activityMetrics :: Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
..}
instance Property "DetailedStatusCodesMetrics" AccountLevelProperty where
  type PropertyType "DetailedStatusCodesMetrics" AccountLevelProperty = DetailedStatusCodesMetricsProperty
  set :: PropertyType "DetailedStatusCodesMetrics" AccountLevelProperty
-> AccountLevelProperty -> AccountLevelProperty
set PropertyType "DetailedStatusCodesMetrics" AccountLevelProperty
newValue AccountLevelProperty {Maybe ActivityMetricsProperty
Maybe AdvancedCostOptimizationMetricsProperty
Maybe AdvancedDataProtectionMetricsProperty
Maybe DetailedStatusCodesMetricsProperty
Maybe StorageLensGroupLevelProperty
()
BucketLevelProperty
haddock_workaround_ :: AccountLevelProperty -> ()
activityMetrics :: AccountLevelProperty -> Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: AccountLevelProperty
-> Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: AccountLevelProperty -> Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: AccountLevelProperty -> BucketLevelProperty
detailedStatusCodesMetrics :: AccountLevelProperty -> Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: AccountLevelProperty -> Maybe StorageLensGroupLevelProperty
haddock_workaround_ :: ()
activityMetrics :: Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: BucketLevelProperty
detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
..}
    = AccountLevelProperty
        {detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
detailedStatusCodesMetrics = DetailedStatusCodesMetricsProperty
-> Maybe DetailedStatusCodesMetricsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "DetailedStatusCodesMetrics" AccountLevelProperty
DetailedStatusCodesMetricsProperty
newValue, Maybe ActivityMetricsProperty
Maybe AdvancedCostOptimizationMetricsProperty
Maybe AdvancedDataProtectionMetricsProperty
Maybe StorageLensGroupLevelProperty
()
BucketLevelProperty
haddock_workaround_ :: ()
activityMetrics :: Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: BucketLevelProperty
storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
haddock_workaround_ :: ()
activityMetrics :: Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: BucketLevelProperty
storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
..}
instance Property "StorageLensGroupLevel" AccountLevelProperty where
  type PropertyType "StorageLensGroupLevel" AccountLevelProperty = StorageLensGroupLevelProperty
  set :: PropertyType "StorageLensGroupLevel" AccountLevelProperty
-> AccountLevelProperty -> AccountLevelProperty
set PropertyType "StorageLensGroupLevel" AccountLevelProperty
newValue AccountLevelProperty {Maybe ActivityMetricsProperty
Maybe AdvancedCostOptimizationMetricsProperty
Maybe AdvancedDataProtectionMetricsProperty
Maybe DetailedStatusCodesMetricsProperty
Maybe StorageLensGroupLevelProperty
()
BucketLevelProperty
haddock_workaround_ :: AccountLevelProperty -> ()
activityMetrics :: AccountLevelProperty -> Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: AccountLevelProperty
-> Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: AccountLevelProperty -> Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: AccountLevelProperty -> BucketLevelProperty
detailedStatusCodesMetrics :: AccountLevelProperty -> Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: AccountLevelProperty -> Maybe StorageLensGroupLevelProperty
haddock_workaround_ :: ()
activityMetrics :: Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: BucketLevelProperty
detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
..}
    = AccountLevelProperty
        {storageLensGroupLevel :: Maybe StorageLensGroupLevelProperty
storageLensGroupLevel = StorageLensGroupLevelProperty
-> Maybe StorageLensGroupLevelProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "StorageLensGroupLevel" AccountLevelProperty
StorageLensGroupLevelProperty
newValue, Maybe ActivityMetricsProperty
Maybe AdvancedCostOptimizationMetricsProperty
Maybe AdvancedDataProtectionMetricsProperty
Maybe DetailedStatusCodesMetricsProperty
()
BucketLevelProperty
haddock_workaround_ :: ()
activityMetrics :: Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: BucketLevelProperty
detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
haddock_workaround_ :: ()
activityMetrics :: Maybe ActivityMetricsProperty
advancedCostOptimizationMetrics :: Maybe AdvancedCostOptimizationMetricsProperty
advancedDataProtectionMetrics :: Maybe AdvancedDataProtectionMetricsProperty
bucketLevel :: BucketLevelProperty
detailedStatusCodesMetrics :: Maybe DetailedStatusCodesMetricsProperty
..}