module Stratosphere.BillingConductor.CustomLineItem.CustomLineItemFlatChargeDetailsProperty (
CustomLineItemFlatChargeDetailsProperty(..),
mkCustomLineItemFlatChargeDetailsProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data CustomLineItemFlatChargeDetailsProperty
=
CustomLineItemFlatChargeDetailsProperty {CustomLineItemFlatChargeDetailsProperty -> ()
haddock_workaround_ :: (),
CustomLineItemFlatChargeDetailsProperty -> Value Double
chargeValue :: (Value Prelude.Double)}
deriving stock (CustomLineItemFlatChargeDetailsProperty
-> CustomLineItemFlatChargeDetailsProperty -> Bool
(CustomLineItemFlatChargeDetailsProperty
-> CustomLineItemFlatChargeDetailsProperty -> Bool)
-> (CustomLineItemFlatChargeDetailsProperty
-> CustomLineItemFlatChargeDetailsProperty -> Bool)
-> Eq CustomLineItemFlatChargeDetailsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CustomLineItemFlatChargeDetailsProperty
-> CustomLineItemFlatChargeDetailsProperty -> Bool
== :: CustomLineItemFlatChargeDetailsProperty
-> CustomLineItemFlatChargeDetailsProperty -> Bool
$c/= :: CustomLineItemFlatChargeDetailsProperty
-> CustomLineItemFlatChargeDetailsProperty -> Bool
/= :: CustomLineItemFlatChargeDetailsProperty
-> CustomLineItemFlatChargeDetailsProperty -> Bool
Prelude.Eq, Int -> CustomLineItemFlatChargeDetailsProperty -> ShowS
[CustomLineItemFlatChargeDetailsProperty] -> ShowS
CustomLineItemFlatChargeDetailsProperty -> String
(Int -> CustomLineItemFlatChargeDetailsProperty -> ShowS)
-> (CustomLineItemFlatChargeDetailsProperty -> String)
-> ([CustomLineItemFlatChargeDetailsProperty] -> ShowS)
-> Show CustomLineItemFlatChargeDetailsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> CustomLineItemFlatChargeDetailsProperty -> ShowS
showsPrec :: Int -> CustomLineItemFlatChargeDetailsProperty -> ShowS
$cshow :: CustomLineItemFlatChargeDetailsProperty -> String
show :: CustomLineItemFlatChargeDetailsProperty -> String
$cshowList :: [CustomLineItemFlatChargeDetailsProperty] -> ShowS
showList :: [CustomLineItemFlatChargeDetailsProperty] -> ShowS
Prelude.Show)
mkCustomLineItemFlatChargeDetailsProperty ::
Value Prelude.Double -> CustomLineItemFlatChargeDetailsProperty
mkCustomLineItemFlatChargeDetailsProperty :: Value Double -> CustomLineItemFlatChargeDetailsProperty
mkCustomLineItemFlatChargeDetailsProperty Value Double
chargeValue
= CustomLineItemFlatChargeDetailsProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), chargeValue :: Value Double
chargeValue = Value Double
chargeValue}
instance ToResourceProperties CustomLineItemFlatChargeDetailsProperty where
toResourceProperties :: CustomLineItemFlatChargeDetailsProperty -> ResourceProperties
toResourceProperties CustomLineItemFlatChargeDetailsProperty {()
Value Double
haddock_workaround_ :: CustomLineItemFlatChargeDetailsProperty -> ()
chargeValue :: CustomLineItemFlatChargeDetailsProperty -> Value Double
haddock_workaround_ :: ()
chargeValue :: Value Double
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::BillingConductor::CustomLineItem.CustomLineItemFlatChargeDetails",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"ChargeValue" Key -> Value Double -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Double
chargeValue]}
instance JSON.ToJSON CustomLineItemFlatChargeDetailsProperty where
toJSON :: CustomLineItemFlatChargeDetailsProperty -> Value
toJSON CustomLineItemFlatChargeDetailsProperty {()
Value Double
haddock_workaround_ :: CustomLineItemFlatChargeDetailsProperty -> ()
chargeValue :: CustomLineItemFlatChargeDetailsProperty -> Value Double
haddock_workaround_ :: ()
chargeValue :: Value Double
..}
= [(Key, Value)] -> Value
JSON.object [Key
"ChargeValue" Key -> Value Double -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Double
chargeValue]
instance Property "ChargeValue" CustomLineItemFlatChargeDetailsProperty where
type PropertyType "ChargeValue" CustomLineItemFlatChargeDetailsProperty = Value Prelude.Double
set :: PropertyType "ChargeValue" CustomLineItemFlatChargeDetailsProperty
-> CustomLineItemFlatChargeDetailsProperty
-> CustomLineItemFlatChargeDetailsProperty
set PropertyType "ChargeValue" CustomLineItemFlatChargeDetailsProperty
newValue CustomLineItemFlatChargeDetailsProperty {()
Value Double
haddock_workaround_ :: CustomLineItemFlatChargeDetailsProperty -> ()
chargeValue :: CustomLineItemFlatChargeDetailsProperty -> Value Double
haddock_workaround_ :: ()
chargeValue :: Value Double
..}
= CustomLineItemFlatChargeDetailsProperty
{chargeValue :: Value Double
chargeValue = PropertyType "ChargeValue" CustomLineItemFlatChargeDetailsProperty
Value Double
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}