{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.CostExplorer.Types.CostCategoryReference where
import qualified Amazonka.Core as Core
import Amazonka.CostExplorer.Types.CostCategoryProcessingStatus
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
data CostCategoryReference = CostCategoryReference'
{
CostCategoryReference -> Maybe Text
effectiveStart :: Prelude.Maybe Prelude.Text,
CostCategoryReference -> Maybe [Text]
values :: Prelude.Maybe [Prelude.Text],
CostCategoryReference -> Maybe Text
costCategoryArn :: Prelude.Maybe Prelude.Text,
CostCategoryReference -> Maybe [CostCategoryProcessingStatus]
processingStatus :: Prelude.Maybe [CostCategoryProcessingStatus],
CostCategoryReference -> Maybe Natural
numberOfRules :: Prelude.Maybe Prelude.Natural,
CostCategoryReference -> Maybe Text
name :: Prelude.Maybe Prelude.Text,
CostCategoryReference -> Maybe Text
effectiveEnd :: Prelude.Maybe Prelude.Text,
CostCategoryReference -> Maybe Text
defaultValue :: Prelude.Maybe Prelude.Text
}
deriving (CostCategoryReference -> CostCategoryReference -> Bool
(CostCategoryReference -> CostCategoryReference -> Bool)
-> (CostCategoryReference -> CostCategoryReference -> Bool)
-> Eq CostCategoryReference
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CostCategoryReference -> CostCategoryReference -> Bool
$c/= :: CostCategoryReference -> CostCategoryReference -> Bool
== :: CostCategoryReference -> CostCategoryReference -> Bool
$c== :: CostCategoryReference -> CostCategoryReference -> Bool
Prelude.Eq, ReadPrec [CostCategoryReference]
ReadPrec CostCategoryReference
Int -> ReadS CostCategoryReference
ReadS [CostCategoryReference]
(Int -> ReadS CostCategoryReference)
-> ReadS [CostCategoryReference]
-> ReadPrec CostCategoryReference
-> ReadPrec [CostCategoryReference]
-> Read CostCategoryReference
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CostCategoryReference]
$creadListPrec :: ReadPrec [CostCategoryReference]
readPrec :: ReadPrec CostCategoryReference
$creadPrec :: ReadPrec CostCategoryReference
readList :: ReadS [CostCategoryReference]
$creadList :: ReadS [CostCategoryReference]
readsPrec :: Int -> ReadS CostCategoryReference
$creadsPrec :: Int -> ReadS CostCategoryReference
Prelude.Read, Int -> CostCategoryReference -> ShowS
[CostCategoryReference] -> ShowS
CostCategoryReference -> String
(Int -> CostCategoryReference -> ShowS)
-> (CostCategoryReference -> String)
-> ([CostCategoryReference] -> ShowS)
-> Show CostCategoryReference
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CostCategoryReference] -> ShowS
$cshowList :: [CostCategoryReference] -> ShowS
show :: CostCategoryReference -> String
$cshow :: CostCategoryReference -> String
showsPrec :: Int -> CostCategoryReference -> ShowS
$cshowsPrec :: Int -> CostCategoryReference -> ShowS
Prelude.Show, (forall x. CostCategoryReference -> Rep CostCategoryReference x)
-> (forall x. Rep CostCategoryReference x -> CostCategoryReference)
-> Generic CostCategoryReference
forall x. Rep CostCategoryReference x -> CostCategoryReference
forall x. CostCategoryReference -> Rep CostCategoryReference x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep CostCategoryReference x -> CostCategoryReference
$cfrom :: forall x. CostCategoryReference -> Rep CostCategoryReference x
Prelude.Generic)
newCostCategoryReference ::
CostCategoryReference
newCostCategoryReference :: CostCategoryReference
newCostCategoryReference =
CostCategoryReference' :: Maybe Text
-> Maybe [Text]
-> Maybe Text
-> Maybe [CostCategoryProcessingStatus]
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> CostCategoryReference
CostCategoryReference'
{ $sel:effectiveStart:CostCategoryReference' :: Maybe Text
effectiveStart =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:values:CostCategoryReference' :: Maybe [Text]
values = Maybe [Text]
forall a. Maybe a
Prelude.Nothing,
$sel:costCategoryArn:CostCategoryReference' :: Maybe Text
costCategoryArn = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:processingStatus:CostCategoryReference' :: Maybe [CostCategoryProcessingStatus]
processingStatus = Maybe [CostCategoryProcessingStatus]
forall a. Maybe a
Prelude.Nothing,
$sel:numberOfRules:CostCategoryReference' :: Maybe Natural
numberOfRules = Maybe Natural
forall a. Maybe a
Prelude.Nothing,
$sel:name:CostCategoryReference' :: Maybe Text
name = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:effectiveEnd:CostCategoryReference' :: Maybe Text
effectiveEnd = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:defaultValue:CostCategoryReference' :: Maybe Text
defaultValue = Maybe Text
forall a. Maybe a
Prelude.Nothing
}
costCategoryReference_effectiveStart :: Lens.Lens' CostCategoryReference (Prelude.Maybe Prelude.Text)
costCategoryReference_effectiveStart :: (Maybe Text -> f (Maybe Text))
-> CostCategoryReference -> f CostCategoryReference
costCategoryReference_effectiveStart = (CostCategoryReference -> Maybe Text)
-> (CostCategoryReference -> Maybe Text -> CostCategoryReference)
-> Lens
CostCategoryReference
CostCategoryReference
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CostCategoryReference' {Maybe Text
effectiveStart :: Maybe Text
$sel:effectiveStart:CostCategoryReference' :: CostCategoryReference -> Maybe Text
effectiveStart} -> Maybe Text
effectiveStart) (\s :: CostCategoryReference
s@CostCategoryReference' {} Maybe Text
a -> CostCategoryReference
s {$sel:effectiveStart:CostCategoryReference' :: Maybe Text
effectiveStart = Maybe Text
a} :: CostCategoryReference)
costCategoryReference_values :: Lens.Lens' CostCategoryReference (Prelude.Maybe [Prelude.Text])
costCategoryReference_values :: (Maybe [Text] -> f (Maybe [Text]))
-> CostCategoryReference -> f CostCategoryReference
costCategoryReference_values = (CostCategoryReference -> Maybe [Text])
-> (CostCategoryReference -> Maybe [Text] -> CostCategoryReference)
-> Lens
CostCategoryReference
CostCategoryReference
(Maybe [Text])
(Maybe [Text])
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CostCategoryReference' {Maybe [Text]
values :: Maybe [Text]
$sel:values:CostCategoryReference' :: CostCategoryReference -> Maybe [Text]
values} -> Maybe [Text]
values) (\s :: CostCategoryReference
s@CostCategoryReference' {} Maybe [Text]
a -> CostCategoryReference
s {$sel:values:CostCategoryReference' :: Maybe [Text]
values = Maybe [Text]
a} :: CostCategoryReference) ((Maybe [Text] -> f (Maybe [Text]))
-> CostCategoryReference -> f CostCategoryReference)
-> ((Maybe [Text] -> f (Maybe [Text]))
-> Maybe [Text] -> f (Maybe [Text]))
-> (Maybe [Text] -> f (Maybe [Text]))
-> CostCategoryReference
-> f CostCategoryReference
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso [Text] [Text] [Text] [Text]
-> Iso (Maybe [Text]) (Maybe [Text]) (Maybe [Text]) (Maybe [Text])
forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping AnIso [Text] [Text] [Text] [Text]
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
costCategoryReference_costCategoryArn :: Lens.Lens' CostCategoryReference (Prelude.Maybe Prelude.Text)
costCategoryReference_costCategoryArn :: (Maybe Text -> f (Maybe Text))
-> CostCategoryReference -> f CostCategoryReference
costCategoryReference_costCategoryArn = (CostCategoryReference -> Maybe Text)
-> (CostCategoryReference -> Maybe Text -> CostCategoryReference)
-> Lens
CostCategoryReference
CostCategoryReference
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CostCategoryReference' {Maybe Text
costCategoryArn :: Maybe Text
$sel:costCategoryArn:CostCategoryReference' :: CostCategoryReference -> Maybe Text
costCategoryArn} -> Maybe Text
costCategoryArn) (\s :: CostCategoryReference
s@CostCategoryReference' {} Maybe Text
a -> CostCategoryReference
s {$sel:costCategoryArn:CostCategoryReference' :: Maybe Text
costCategoryArn = Maybe Text
a} :: CostCategoryReference)
costCategoryReference_processingStatus :: Lens.Lens' CostCategoryReference (Prelude.Maybe [CostCategoryProcessingStatus])
costCategoryReference_processingStatus :: (Maybe [CostCategoryProcessingStatus]
-> f (Maybe [CostCategoryProcessingStatus]))
-> CostCategoryReference -> f CostCategoryReference
costCategoryReference_processingStatus = (CostCategoryReference -> Maybe [CostCategoryProcessingStatus])
-> (CostCategoryReference
-> Maybe [CostCategoryProcessingStatus] -> CostCategoryReference)
-> Lens
CostCategoryReference
CostCategoryReference
(Maybe [CostCategoryProcessingStatus])
(Maybe [CostCategoryProcessingStatus])
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CostCategoryReference' {Maybe [CostCategoryProcessingStatus]
processingStatus :: Maybe [CostCategoryProcessingStatus]
$sel:processingStatus:CostCategoryReference' :: CostCategoryReference -> Maybe [CostCategoryProcessingStatus]
processingStatus} -> Maybe [CostCategoryProcessingStatus]
processingStatus) (\s :: CostCategoryReference
s@CostCategoryReference' {} Maybe [CostCategoryProcessingStatus]
a -> CostCategoryReference
s {$sel:processingStatus:CostCategoryReference' :: Maybe [CostCategoryProcessingStatus]
processingStatus = Maybe [CostCategoryProcessingStatus]
a} :: CostCategoryReference) ((Maybe [CostCategoryProcessingStatus]
-> f (Maybe [CostCategoryProcessingStatus]))
-> CostCategoryReference -> f CostCategoryReference)
-> ((Maybe [CostCategoryProcessingStatus]
-> f (Maybe [CostCategoryProcessingStatus]))
-> Maybe [CostCategoryProcessingStatus]
-> f (Maybe [CostCategoryProcessingStatus]))
-> (Maybe [CostCategoryProcessingStatus]
-> f (Maybe [CostCategoryProcessingStatus]))
-> CostCategoryReference
-> f CostCategoryReference
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso
[CostCategoryProcessingStatus]
[CostCategoryProcessingStatus]
[CostCategoryProcessingStatus]
[CostCategoryProcessingStatus]
-> Iso
(Maybe [CostCategoryProcessingStatus])
(Maybe [CostCategoryProcessingStatus])
(Maybe [CostCategoryProcessingStatus])
(Maybe [CostCategoryProcessingStatus])
forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping AnIso
[CostCategoryProcessingStatus]
[CostCategoryProcessingStatus]
[CostCategoryProcessingStatus]
[CostCategoryProcessingStatus]
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
costCategoryReference_numberOfRules :: Lens.Lens' CostCategoryReference (Prelude.Maybe Prelude.Natural)
costCategoryReference_numberOfRules :: (Maybe Natural -> f (Maybe Natural))
-> CostCategoryReference -> f CostCategoryReference
costCategoryReference_numberOfRules = (CostCategoryReference -> Maybe Natural)
-> (CostCategoryReference
-> Maybe Natural -> CostCategoryReference)
-> Lens
CostCategoryReference
CostCategoryReference
(Maybe Natural)
(Maybe Natural)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CostCategoryReference' {Maybe Natural
numberOfRules :: Maybe Natural
$sel:numberOfRules:CostCategoryReference' :: CostCategoryReference -> Maybe Natural
numberOfRules} -> Maybe Natural
numberOfRules) (\s :: CostCategoryReference
s@CostCategoryReference' {} Maybe Natural
a -> CostCategoryReference
s {$sel:numberOfRules:CostCategoryReference' :: Maybe Natural
numberOfRules = Maybe Natural
a} :: CostCategoryReference)
costCategoryReference_name :: Lens.Lens' CostCategoryReference (Prelude.Maybe Prelude.Text)
costCategoryReference_name :: (Maybe Text -> f (Maybe Text))
-> CostCategoryReference -> f CostCategoryReference
costCategoryReference_name = (CostCategoryReference -> Maybe Text)
-> (CostCategoryReference -> Maybe Text -> CostCategoryReference)
-> Lens
CostCategoryReference
CostCategoryReference
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CostCategoryReference' {Maybe Text
name :: Maybe Text
$sel:name:CostCategoryReference' :: CostCategoryReference -> Maybe Text
name} -> Maybe Text
name) (\s :: CostCategoryReference
s@CostCategoryReference' {} Maybe Text
a -> CostCategoryReference
s {$sel:name:CostCategoryReference' :: Maybe Text
name = Maybe Text
a} :: CostCategoryReference)
costCategoryReference_effectiveEnd :: Lens.Lens' CostCategoryReference (Prelude.Maybe Prelude.Text)
costCategoryReference_effectiveEnd :: (Maybe Text -> f (Maybe Text))
-> CostCategoryReference -> f CostCategoryReference
costCategoryReference_effectiveEnd = (CostCategoryReference -> Maybe Text)
-> (CostCategoryReference -> Maybe Text -> CostCategoryReference)
-> Lens
CostCategoryReference
CostCategoryReference
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CostCategoryReference' {Maybe Text
effectiveEnd :: Maybe Text
$sel:effectiveEnd:CostCategoryReference' :: CostCategoryReference -> Maybe Text
effectiveEnd} -> Maybe Text
effectiveEnd) (\s :: CostCategoryReference
s@CostCategoryReference' {} Maybe Text
a -> CostCategoryReference
s {$sel:effectiveEnd:CostCategoryReference' :: Maybe Text
effectiveEnd = Maybe Text
a} :: CostCategoryReference)
costCategoryReference_defaultValue :: Lens.Lens' CostCategoryReference (Prelude.Maybe Prelude.Text)
costCategoryReference_defaultValue :: (Maybe Text -> f (Maybe Text))
-> CostCategoryReference -> f CostCategoryReference
costCategoryReference_defaultValue = (CostCategoryReference -> Maybe Text)
-> (CostCategoryReference -> Maybe Text -> CostCategoryReference)
-> Lens
CostCategoryReference
CostCategoryReference
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CostCategoryReference' {Maybe Text
defaultValue :: Maybe Text
$sel:defaultValue:CostCategoryReference' :: CostCategoryReference -> Maybe Text
defaultValue} -> Maybe Text
defaultValue) (\s :: CostCategoryReference
s@CostCategoryReference' {} Maybe Text
a -> CostCategoryReference
s {$sel:defaultValue:CostCategoryReference' :: Maybe Text
defaultValue = Maybe Text
a} :: CostCategoryReference)
instance Core.FromJSON CostCategoryReference where
parseJSON :: Value -> Parser CostCategoryReference
parseJSON =
String
-> (Object -> Parser CostCategoryReference)
-> Value
-> Parser CostCategoryReference
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Core.withObject
String
"CostCategoryReference"
( \Object
x ->
Maybe Text
-> Maybe [Text]
-> Maybe Text
-> Maybe [CostCategoryProcessingStatus]
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> CostCategoryReference
CostCategoryReference'
(Maybe Text
-> Maybe [Text]
-> Maybe Text
-> Maybe [CostCategoryProcessingStatus]
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> CostCategoryReference)
-> Parser (Maybe Text)
-> Parser
(Maybe [Text]
-> Maybe Text
-> Maybe [CostCategoryProcessingStatus]
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> CostCategoryReference)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"EffectiveStart")
Parser
(Maybe [Text]
-> Maybe Text
-> Maybe [CostCategoryProcessingStatus]
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> CostCategoryReference)
-> Parser (Maybe [Text])
-> Parser
(Maybe Text
-> Maybe [CostCategoryProcessingStatus]
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> CostCategoryReference)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe (Maybe [Text]))
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Values" Parser (Maybe (Maybe [Text]))
-> Maybe [Text] -> Parser (Maybe [Text])
forall a. Parser (Maybe a) -> a -> Parser a
Core..!= Maybe [Text]
forall a. Monoid a => a
Prelude.mempty)
Parser
(Maybe Text
-> Maybe [CostCategoryProcessingStatus]
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> CostCategoryReference)
-> Parser (Maybe Text)
-> Parser
(Maybe [CostCategoryProcessingStatus]
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> CostCategoryReference)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"CostCategoryArn")
Parser
(Maybe [CostCategoryProcessingStatus]
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> CostCategoryReference)
-> Parser (Maybe [CostCategoryProcessingStatus])
-> Parser
(Maybe Natural
-> Maybe Text -> Maybe Text -> Maybe Text -> CostCategoryReference)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x Object
-> Text -> Parser (Maybe (Maybe [CostCategoryProcessingStatus]))
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"ProcessingStatus"
Parser (Maybe (Maybe [CostCategoryProcessingStatus]))
-> Maybe [CostCategoryProcessingStatus]
-> Parser (Maybe [CostCategoryProcessingStatus])
forall a. Parser (Maybe a) -> a -> Parser a
Core..!= Maybe [CostCategoryProcessingStatus]
forall a. Monoid a => a
Prelude.mempty
)
Parser
(Maybe Natural
-> Maybe Text -> Maybe Text -> Maybe Text -> CostCategoryReference)
-> Parser (Maybe Natural)
-> Parser
(Maybe Text -> Maybe Text -> Maybe Text -> CostCategoryReference)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Natural)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"NumberOfRules")
Parser
(Maybe Text -> Maybe Text -> Maybe Text -> CostCategoryReference)
-> Parser (Maybe Text)
-> Parser (Maybe Text -> Maybe Text -> CostCategoryReference)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Name")
Parser (Maybe Text -> Maybe Text -> CostCategoryReference)
-> Parser (Maybe Text)
-> Parser (Maybe Text -> CostCategoryReference)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"EffectiveEnd")
Parser (Maybe Text -> CostCategoryReference)
-> Parser (Maybe Text) -> Parser CostCategoryReference
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"DefaultValue")
)
instance Prelude.Hashable CostCategoryReference
instance Prelude.NFData CostCategoryReference